永发信息网

delphi中的16进制+法

答案:3  悬赏:0  手机版
解决时间 2021-07-21 10:20
  • 提问者网友:末路
  • 2021-07-20 22:22
edit1+edit2 显示在edit3 在线等
最佳答案
  • 五星知识达人网友:街头电车
  • 2021-07-20 23:34

Delphi中科没有HexToInt这个函数哦,就是StrToInt函数,通吃的,只要格式对就行,注意,以下代码中


Edit1输入框中应是不加$的十六进制,比如F4D522,如果Edit1输入框中的是$F4D522,应把下面代码中的“'$'+”去掉就行


var
i1, i2, sum: Integer;
begin
i1 := StrtoInt('$'+Edit1.Text);
i2 := StrtoInt('$'+Edit1.Text);
sum := i1 + i2;
edit3.text := '0x'+IntToHex(sum,8);
end;


全部回答
  • 1楼网友:独行浪子会拥风
  • 2021-07-21 02:04

感觉格式上有问题:Edit。Text是string类型,应该先把他转成十六进制,转不转成十进制无所谓

你试试看

  • 2楼网友:舍身薄凉客
  • 2021-07-21 01:10

IntToHex(sum,8);

需要加上转换成几位

我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯