* tohexstring calls inttohex instead of hexstr. Hexstr has fixed number of

  digits, inttohex a minimum number. Mantis #35015

git-svn-id: trunk@41268 -

rtl/objpas/sysutils/syshelpo.inc

@@ -49,13 +49,13 @@ Function TORDINALHELPER.ToHexString(const AMinDigits: Integer): string;
 overload; inline;
 
 begin
-  Result:=HexStr(Self,AMinDigits);
+  Result:=IntToHex(Self,AMinDigits);
 end;
 
 Function TORDINALHELPER.ToHexString: string; overload; inline;
 
 begin
-  Result:=HexStr(Self,SizeOf(TORDINALTYPE)*2);
+  Result:=IntToHex(Self,SizeOf(TORDINALTYPE)*2);
 end;
 
 Function TORDINALHELPER.ToSingle: Single; inline;