字符串函数大全(21) 首部 function TryStrToInt(const S: string; out Value: Integer): Boolean; $[SysUtils.pas 功能 返回字符串S转换成整数Value是否成功 说明 字符串非整数表达时返回False并且Value将输出为0 参考 procedure System.Val 例子 ///////Begin TryStrToInt procedure TForm1.Button1Click(Sender: TObject); var I: Integer; begin CheckBox1.Checked := TryStrToInt(Edit1.Text, I); SpinEdit1.Value := I; end; ///////End TryStrToInt ━━━━━━━━━━━━━━━━━━━━━ 首部 function StrToInt64(const S: string): Int64; $[SysUtils.pas 功能 返回字符串S转换成六十四位整数 说明 字符串非六十四位整数表达时将引起异常 参考 procedure System.Val 例子 SpinEdit1.Value := StrToInt64(Edit1.Text); ━━━━━━━━━━━━━━━━━━━━━ 首部 function StrToInt64Def(const S: string; const Default: Int64): Int64; $[SysUtils.pas 功能 返回字符串S转换成六十四位整数 说明 字符串非六十四位整数表达时则返回默认值Default 参考 procedure System.Val 例子 SpinEdit1.Value := StrToInt64Def(Edit1.Text, 0); ━━━━━━━━━━━━━━━━━━━━━ 首部 function TryStrToInt64(const S: string; out Value: Int64): Boolean; $[SysUtils.pas 功能 返回字符串S转换成六十四位整数Value是否成功