Changeset 64


Ignore:
Timestamp:
Jan 9, 2007, 9:34:27 PM (15 years ago)
Author:
alloc
Message:
 
Location:
oup/current
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • oup/current/Tools/RawEdit.pas

    r63 r64  
    5656    procedure hexChange(Sender: TObject);
    5757  private
    58     fileid:     LongWord;
     58    fileid:     Integer;
    5959    dat_offset: LongWord;
    6060    fileid_opened, dat_offset_opened: LongWord;
     
    369369begin
    370370  inherited;
    371 {  Self.OnNewFileSelected := Self.NewFile;
     371  Self.OnNewFileSelected := Self.NewFile;
    372372
    373373  exts := '';
     
    384384  Self.Caption := '';
    385385  fileid     := -1;
     386{
    386387  value_viewer.ColCount := 2;
    387388  value_viewer.RowCount := 8;
    388389  value_viewer.FixedRows := 1;
     390}
    389391  value_viewer.Cells[0, 0] := 'Type';
    390392  value_viewer.Cells[1, 0] := 'Value';
     
    399401  //
    400402  value_viewer.Font.Charset := AppSettings.CharSet;
    401   //   }
     403  //
    402404end;
    403405
     
    455457procedure TForm_RawEdit.panel_contentResize(Sender: TObject);
    456458begin
    457   value_viewer.ColWidths[1] := value_viewer.Width - value_viewer.ColWidths[0] - 28;
     459//  value_viewer.ColWidths[1] := value_viewer.Width - value_viewer.ColWidths[0] - 28;
    458460end;
    459461
Note: See TracChangeset for help on using the changeset viewer.