使用hjy2:=inttohex(hjy,4);方法假设得到2个（hjy2）：1A 01 和 DE 21，那能推出这2个之前的10进制相差多少吗？
hjy : integer;
hjy2 : string;

使用 hjy2 := inttohex(hjy,4); 方法假设得到2个（hjy2）：1A 01 和 DE 21，那能推出这2个之前的10进制（hjy） 相差多少吗 ？

[解决办法]

Delphi(Pascal) code

var  I: Integer;begin  I := $1A01 - $DE21;  Edit1.Text := IntToStr(I);end;
[解决办法]
Delphi(Pascal) code
友情UP ，DELPHI没有专门的十六进制转十进制，可用IntToStr或StrtoInt做替代转换