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

Question

本帖最后由 luojianfeng 于 2010-01-22 10:21:49 编辑

Answer 1

不是很明白，10进制相差1，16进制也相差1啊，只是到9的时候变成A-F，需要这种推吗？那要做一个函数了，很容易实现，问题是，转成10进制推算不是更容易？转成10机制之后再来推算很容易的，推算了再转HEX不行吗？

Answer 2

//inttohex第二个参数我觉得用2，就可以了
var
  hex1,hex2:string;
  i1,i2:integer;
begin
  hex1:=inttohex(100,2);
  hex2:=inttohex(1000,2);
  i1:=strtoint('$'+hex1);
  i2:=strtoint('$'+hex2);
//i2-i1，应该就是你要的结果了。

Answer 3

integer不是10进制的，是2进制的。