- rm the hexstr function from the graph unit, as that has already been included

  in the system unit

git-svn-id: trunk@25677 -

packages/graph/src/go32v2/vesa.inc

@@ -76,20 +76,6 @@ var
 
   ScanLines: word;        { maximum number of scan lines for mode }
 
-function hexstr(val : longint;cnt : byte) : string;
-const
-  HexTbl : array[0..15] of char='0123456789ABCDEF';
-var
-  i : longint;
-begin
-  hexstr[0]:=char(cnt);
-  for i:=cnt downto 1 do
-   begin
-     hexstr[i]:=hextbl[val and $f];
-     val:=val shr 4;
-   end;
-end;
-
 
 {$IFDEF DPMI}
 

packages/graph/src/msdos/vesa.inc

@@ -76,20 +76,6 @@ var
 
   ScanLines: word;        { maximum number of scan lines for mode }
 
-function hexstr(val : longint;cnt : byte) : string;
-const
-  HexTbl : array[0..15] of char='0123456789ABCDEF';
-var
-  i : longint;
-begin
-  hexstr[0]:=char(cnt);
-  for i:=cnt downto 1 do
-   begin
-     hexstr[i]:=hextbl[val and $f];
-     val:=val shr 4;
-   end;
-end;
-
 
 {$IFDEF DPMI}