ViewVC Help
View File | Revision Log | View Changeset | Root Listing
root/Oni2/oup/current/Tools/RawEdit.pas
(Generate patch)

Comparing oup/current/Tools/RawEdit.pas (file contents):
Revision 221 by alloc, Mon Jun 18 14:20:33 2007 UTC vs.
Revision 245 by alloc, Sat Aug 18 15:51:42 2007 UTC

# Line 5 | Line 5 | interface
5   uses
6    Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
7    Dialogs, _TemplateFileList, Menus, StdCtrls, ExtCtrls, Buttons, ComCtrls,
8 <  TypeDefs, Grids, Wrapgrid, MPHexEditor;
8 >  TypeDefs, Grids, Wrapgrid, MPHexEditor, VirtualTrees;
9  
10   type
11    TForm_RawEdit = class(TForm_TemplateFileList)
# Line 145 | Line 145 | begin
145  
146    rawinfo := ConManager.Connection[ConnectionID].GetRawInfo(fileid, datoffset);
147  
148 <  mem := nil;
149 <  ConManager.Connection[ConnectionID].LoadRawFile(rawinfo.SrcID, rawinfo.SrcOffset, TStream(mem));
150 <  hex.LoadFromStream(mem);
151 <  ClearValues;
152 <  hexSelectionChanged(Self);
148 >  if rawinfo.RawSize > 0 then
149 >  begin
150 >    mem := nil;
151 >    ConManager.Connection[ConnectionID].LoadRawFile(rawinfo.SrcID, rawinfo.SrcOffset, TStream(mem));
152 >    hex.LoadFromStream(mem);
153 >    ClearValues;
154 >    hexSelectionChanged(Self);
155 >  end
156 >  else
157 >  begin
158 >    hex.DataSize := 0;
159 >    ClearValues;
160 >  end;
161   end;
162  
163  

Diff Legend

– Removed lines
+ Added lines
< Changed lines (old)
> Changed lines (new)