|
@@ -943,7 +943,7 @@ end;
|
|
|
|
|
|
function IntToHex(Value: UInt32): string;
|
|
function IntToHex(Value: UInt32): string;
|
|
begin
|
|
begin
|
|
- Result:=IntToHex(Value, 2*SizeOf(UInt32));
|
|
|
|
|
|
+ Result:=IntToHex(LongInt(Value), 2*SizeOf(UInt32));
|
|
end;
|
|
end;
|
|
|
|
|
|
function IntToHex(Value: Int64): string;
|
|
function IntToHex(Value: Int64): string;
|