Changeset 70 for oup/current/Tools/RawEdit.pas

Timestamp:

Jan 9, 2007, 10:16:16 PM (18 years ago)

Author:

alloc

Message:

 

File:

• oup/current/Tools/RawEdit.pas (modified) (2 diffs)

oup/current/Tools/RawEdit.pas

@@ -385 +385 @@
   fileid     := -1;
 
+{
   value_viewer.ColCount := 2;
   value_viewer.RowCount := 8;
   value_viewer.FixedRows := 1;
-
+}
   value_viewer.Cells[0, 0] := 'Type';
   value_viewer.Cells[1, 0] := 'Value';
@@ -457 +458 @@
 procedure TForm_RawEdit.panel_contentResize(Sender: TObject);
 begin
-//  value_viewer.ColWidths[1] := value_viewer.Width - value_viewer.ColWidths[0] - 28;
+  if fileid >= 0 then
+    value_viewer.ColWidths[1] := value_viewer.Width - value_viewer.ColWidths[0] - 50;
 end;