[原创]Delphi 字符串函数（字符串判断 TryStrToFloat 、TryStrToInt、TryStrToInt64、TryStrToBool、TryStrToCurr、TryStrToDate、TryStrToTime、TryStrToDateTime）

引用单元SysUtils

 

TryStrToFloat 、TryStrToInt、TryStrToInt64、TryStrToBool、TryStrToCurr、TryStrToDate、TryStrToTime、TryStrToDateTime

将字符串转换成其中一种格式，转换成功返回true，否则false

例如：

TryStrToFloat函数 示例：

?

1 2 3 4 5 6 7 8

var     aa:Extended; begin     if TryStrToFloat('12.3456',aa) then      ShowMessage(FloatToStr(aa));    //结果：12.3456     else      ShowMessage('转换异常') end;

TryStrToInt函数 示例：

?

1 2 3 4 5 6 7 8

var     aa:Integer; begin     if TryStrToInt('1234',aa) then      ShowMessage(IntToStr(aa));    //结果：1234     else      ShowMessage('转换异常') end;