字符串函数大全(22) 说明 字符串非六十四位整数表达时返回False并且Value将输出为0 参考 procedure System.Val 例子 ///////Begin TryStrToInt64 procedure TForm1.Button1Click(Sender: TObject); var I: Int64; begin CheckBox1.Checked := TryStrToInt64(Edit1.Text, I); SpinEdit1.Value := I; end; ///////End TryStrToInt64 ━━━━━━━━━━━━━━━━━━━━━ 首部 function StrToBool(const S: string): Boolean; $[SysUtils.pas 功能 返回字符串S转换成逻辑值 说明 字符非逻辑表达时将引起异常 参考 function SysUtils.TryStrToBool 例子 CheckBox1.Checked := StrToBool(Edit1.Text); ━━━━━━━━━━━━━━━━━━━━━ 首部 function StrToBoolDef(const S: string; const Default: Boolean): Boolean; $[SysUtils.pas 功能 返回字符串S转换成逻辑值 说明 字符非逻辑表达时则返回默认值Default 参考 function SysUtils.TryStrToBool 例子 CheckBox1.Checked := StrToBoolDef(Edit1.Text, False); ━━━━━━━━━━━━━━━━━━━━━ 首部 function TryStrToBool(const S: string; out Value: Boolean): Boolean; $[SysUtils.pas 功能 返回字符串S转换成逻辑值Value是否成功 说明 [注意]0为假非0为真;不是'True'和'False';Delphi6 Bug 如下修正
