有没有什么函数可以将十六进制的字符串转成十进制的呢?
或者二进制转成十进制
或者二进制转成十进制
解决方案 »
- 请问各位大侠,怎么把outlook通讯录或foxmail中同学录导入到自己的数据库中
- 如何取得目录下的所有文件夹名称
- 这条SQL语句在IB7中运行正常,但在FB1.5中却报错!
- 大哥们:给我介绍几本经典的Dephi各个学习阶段的用书
- TreeView.Data的问题,搞不定了,大家帮忙!
- 什么意思?
- 请问为什么我自己写的一个类里面不能声明第二个函数,请大家帮我看一下,谢谢
- 哪位高手能告诉我怎样把自己所编的和序做成安装程序
- 当locate查找记录后,查找到的记录为当前的活动记录吗? 如果不是,请问该如何把查找到的记录设为当前的活动记录?
- delphi 开发动态库的问题,见代码!
- 请教BMP图片存到ACCESS数据库
- Interweb 调用服务器上的 HTML文件 问题!!!
begin
Result:=StrToInt('0x'+s);
end;2->10的就慢慢乘上去啊
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;type
TForm1 = class(TForm)
Button1: TButton;
Edit1: TEdit;
Edit2: TEdit;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
var
i: integer;
begin
i := StrToInt('$'+Edit1.Text);
Edit2.Text := IntToStr(i);
end;end.
StrToInt('$'+'FF');方法了。'$'是十六进制标志,和一些语言中的0XFF 、 FFH 等表示方法等效,只是DELPHI中用$.注意:StrToInt('$'+'FF');如果提供的字符串非法,转换将失败。