摘要:
形式 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 阅读全文