Index: oup/current/Tools/BinEdit.dfm
===================================================================
--- oup/current/Tools/BinEdit.dfm	(revision 173)
+++ oup/current/Tools/BinEdit.dfm	(revision 174)
@@ -62,5 +62,5 @@
       Colors.EvenColumn = clNavy
       Colors.CurrentOffsetBackground = clBtnShadow
-      Colors.OffsetBackGround = clBtnFace
+      Colors.OffsetBackground = clBtnFace
       Colors.CurrentOffset = clBtnHighlight
       Colors.Grid = clBtnFace
@@ -71,5 +71,5 @@
       AllowInsertMode = False
       DrawGridLines = False
-      Version = 'May 23, 2005; '#169' markus stephany, vcl[at]mirkes[dot]de'
+      Version = 'december 06, 2006; '#169' markus stephany, vcl[at]mirkes[dot]de'
       OnChange = hexChange
       ShowPositionIfNotFocused = True
Index: oup/current/Tools/BinEdit.pas
===================================================================
--- oup/current/Tools/BinEdit.pas	(revision 173)
+++ oup/current/Tools/BinEdit.pas	(revision 174)
@@ -468,6 +468,8 @@
       if hex.SelCount = 0 then
       begin
-        while (hex.Data[hex.SelStart + j] > 0) and ((hex.SelStart + j) < hex.DataSize) do
+        while (hex.SelStart + j) < hex.DataSize do
         begin
+          if hex.Data[hex.SelStart + j] = 0 then
+            Break;
           if hex.Data[hex.selstart + j] >= 32 then
             str := str + Char(hex.Data[hex.SelStart + j])