--- oup/current/Tools/BinEdit.pas	2007/05/12 13:22:11	177
+++ oup/current/Tools/BinEdit.pas	2007/05/26 19:28:08	198
@@ -21,6 +21,9 @@ type
     value_viewer_context_copyasstring: TMenuItem;
     value_viewer_context_copyashex: TMenuItem;
     VTHPopup: TVTHeaderPopupMenu;
+    panel_imexport: TPanel;
+    btn_export: TButton;
+    btn_import: TButton;
     procedure FormCreate(Sender: TObject);
     procedure NewFile(fileinfo: TFileInfo);
 
@@ -222,6 +225,7 @@ begin
     11:
     begin
       if Length(rawlist) > 0 then
+      begin
         for i := 0 to High(rawlist) do
           if rawlist[i].SrcOffset = offset then
           begin
@@ -231,6 +235,9 @@ begin
               Result := 'unused';
             Break;
           end;
+        if i > High(rawlist) then
+          Result := 'unused';
+      end;
     end;
     12:
       if hex.Data[offset] = 1 then