十六进制如何转换为十进制

Question

十六进制如何转换为十进制

Answer 1

真接赋值就行了.
procedure TForm1.Button1Click(Sender: TObject);
var
  I : Integer;
begin
  I := $FF;
  showmessage(Inttostr(i));
end;

Answer 2

代码里可以通用。用户输入时可以直接用strtoint()函数，此函数也认得$开头的十六进制数。

Answer 3

我真的服了You.
我的例子就是把十六进制的FF转化为十进制的255.

Answer 4

数字在运算时分进制?'FF',这是字符串,不是数字,StrToInt('$FF')$FF,这是数字,它就等于255,不存在转换的概念

Answer 5

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if Key=#13 then edit1.Text:=inttostr(strtoint(edit1.Text));
end;procedure TForm1.Edit1Enter(Sender: TObject);
begin
edit1.clear;
end;

Answer 6

支持用 StrToInt('$'+Str);

Answer 7

我说Delphi怎么没有HexToInt函数呢，呵呵，原来StrToInt就可以了

Answer 8

ShowMessage(IntToStr(StrToInt('$' + 'FF3412')))