摘要: 形式 function StrToIntDef(const S: string; Default: Integer): Integer;引用单元 SysUtils.pas功能 返回字符串S转换成整数说明 字符串非整数表达时则返回默认值Default参考 procedure System.Val例子 SpinEdit1.Value := StrToIntDef(Edit1.Text, 0);返回int(Edit1.Text) 如果不成功,返回0例子代码:procedure TForm1.btn1Click(Sender: TObject);var i:Integer; S:string;begi 阅读全文
posted @ 2011-07-14 19:01 aBung 阅读(6719) 评论(0) 推荐(0) 编辑