使用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) 相差多少吗 ? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 var I: Integer;begin I := $1A01 - $DE21; Edit1.Text := IntToStr(I);end; 友情UP ,DELPHI没有专门的十六进制转十进制,可用IntToStr或StrtoInt做替代转换 第三方控件安装(Ehlib)? TWebBrowser控件如何实现内容的复制、粘贴? 200分求idhttp上传文件的方法。 用流的方式把access读入内存,能直接用ado连吗? 把一个窗口加入dll中,在程序最后关闭时,用RmDir('文件路径+文件名')删除文件,报告错误。 delphi连接mysql出现MySql server has gone away如何解决 数据类型问题. 怎样用TADOCommand对象? 存储过程对于记录不多的系统能否提高速度?! 我想改变dbgrid的背景颜色可是,,, rave 如何直接打印而不跳出对话框 晕 !
var
I: Integer;
begin
I := $1A01 - $DE21;
Edit1.Text := IntToStr(I);
end;
友情UP ,DELPHI没有专门的十六进制转十进制,可用IntToStr或StrtoInt做替代转换