求证一个函数的用法:StrToIntDef()

路过路人乙 2008-12-02 02:04:12

StrToIntDef(const AnsiString S; const int Default);

这个函数的作用是否是查看S是否是整型,如果不是,则返回默认Default.是这样的么?

如果S=01则返回什么..

...全文

83 4 打赏收藏转发到动态举报

写回复

4 条回复

切换为时间正序

请发表友善的回复…

发表回复

Jim@luckeeinc.com 2008-12-02

打赏
举报

回复

01 就返回1
“01”是可以轉成int的

路过路人乙 2008-12-02

打赏
举报

回复

if(StrToIntDef(Edit1->Text, 0) != 0)

   ShowMessage("OK");

else

   ShowMessage("NO");

请问我这样的用法有错误没?

如果为Edit1->Text为01请问会返回什么...我只是想确认下..谢谢...

Jim@luckeeinc.com 2008-12-02

打赏
举报

回复

StrToIntDef("1",100) 值為1
StrToIntDef("aaa",0) 值為0

Jim@luckeeinc.com 2008-12-02

打赏
举报

回复

可轉則轉不可轉則置成default值

delphi 怎样在数据表中调整记录指针的位置的源码实例，源代码运行于Delphi7环境，有兴趣的可下载测试。有兴趣可参考以下核心代码： ...　No := StrToIntDef(Edit1.Text, 1); 　ADODataSet1.MoveBy(No); 　end;

MQTTClient.Port := StrToIntDef(edtPort.Text, 1883); MQTTClient.Host := edtHost.Text; MQTTClient.Activate(true); btnClearClick(Sender); //清空计数器 end; //断开MQTT服务器 procedure TfrmMain....

uses ShareMem, // ShareMem 一定放第一个 Windows, Messages, SysUtils, math, strutils, registry , StdCtrls, ExtCtrls, ADODB, DB,dateutils,Dialogs; // fucs in 'fucs.pas'; const INPASSSTR='89...

StrtoIntDef('2', 2), //边界 StrToIntDef('5', 3), //大小 0, 1, 0, 0, 0, clBlack, //颜色 clWhite //底色 ); except MessageDlg('生成失败！', mtInformation, [mbOK], -1); end;

// 将接收到的字符串分解为接收端口、色深、品质3个参数 int pos = sRecvString.Pos("\n"); // 接收端口 port = u_short(StrToIntDef(sRecvString.SubString(1,pos-1),0)); sRecvString = sRecvString....

13,825

社区成员

102,679

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章