...然后在edit.text中显示,edit.text是字符型?
发布网友
发布时间：2024-10-23 23:08
共1个回答
热心网友
时间：2024-11-18 11:51
//如果十六进制非字符串, 无须转换, 直接赋值即可
var
i: Integer;
begin
i := $FF;
Edit1.Text:=(IntToStr(i));
end;
//如果十六进制是字符串, 用 StrToInt 即可
var
s: string;
i: Integer;
begin
s := '$FF';
i := StrToInt(s);
Edit1.Text:=(IntToStr(i));
end;
//如果你接收的数据里没有$, 加上就得了嘛
var
s: string;
i: Integer;
begin
s := 'FF';
i := '$'+StrToInt(s);
Edit1.Text:=(IntToStr(i));
end;
