1.10进制转16进制

intTohex(10,4);  //第一个参数为要转换的数据，第二个参数为要转换后的16进制位数；得到：000A;

2. 16进制转10进制

 strToInt(‘$‘+‘64‘) ;  //前面加上$符合，然后再加上要转换的16进制；

一个16进制转10进制的函数：

function myHexToInt(value:string):Byte;
begin
 Result:=StrToInt(‘$‘+value);
end;

Delphi 的进制转换