Index: oup/current/Tools/BinEdit.pas
===================================================================
--- oup/current/Tools/BinEdit.pas	(revision 95)
+++ oup/current/Tools/BinEdit.pas	(revision 96)
@@ -397,5 +397,5 @@
 procedure TForm_BinEdit.WriteValues;
 var
-  i, j:  Byte;
+  i, j:  Integer;
   Data:  Tdata;
   str:   String;