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

Comparing oup/current/Tools/BinEdit.pas (file contents):
Revision 177 by alloc, Sat May 12 13:22:11 2007 UTC vs.
Revision 198 by alloc, Sat May 26 19:28:08 2007 UTC

# Line 21 | Line 21 | type
21      value_viewer_context_copyasstring: TMenuItem;
22      value_viewer_context_copyashex: TMenuItem;
23      VTHPopup: TVTHeaderPopupMenu;
24 +    panel_imexport: TPanel;
25 +    btn_export: TButton;
26 +    btn_import: TButton;
27      procedure FormCreate(Sender: TObject);
28      procedure NewFile(fileinfo: TFileInfo);
29  
# Line 222 | Line 225 | begin
225      11:
226      begin
227        if Length(rawlist) > 0 then
228 +      begin
229          for i := 0 to High(rawlist) do
230            if rawlist[i].SrcOffset = offset then
231            begin
# Line 231 | Line 235 | begin
235                Result := 'unused';
236              Break;
237            end;
238 +        if i > High(rawlist) then
239 +          Result := 'unused';
240 +      end;
241      end;
242      12:
243        if hex.Data[offset] = 1 then

Diff Legend

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