大神来帮帮忙！！！

[dskcv12]

Delphi中如何自定义一个函数或过程，把十进制转换成十六进制数

[lyhoo163]

十进制转换成十六进制可以用函数 InttoHex 功能说明：该函数用于将“十进制”转换成“十进制”。该函数有二个参数。第一个参数为要转换的十进制数据，第二个参数是指定使用多少位来显示十六进制数据。 　　参考实例： 　　Edit1.Text := IntToHex('100', 2); 　　执行结果，Edit1.Text等于64。 　　注意：Delphi没有提供专门的“十六进制”转换为“十进制”的函数。使用StrToInt函数可以实现这个功能。具体代码是：I := StrToInt('$' + '64'); 这时I等于100。加上一个'$'即可将“十六进制”转换为“十进制”。 showmessage(IntTostr(StrToint( '$ '+edit1.text)));