[原創]Delphi 字符串函數（字符串判斷 TryStrToFloat 、TryStrToInt、TryStrToInt64、TryStrToBool、TryStrToCurr、TryStrToDate、TryStrToTime、TryStrToDateTime）

引用單元SysUtils

 

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

將字符串轉換成其中一種格式，轉換成功返回true，否則false

例如：

TryStrToFloat函數 示例：

var
    aa:Extended;
begin
    if TryStrToFloat('12.3456',aa) then  
    ShowMessage(FloatToStr(aa));    //結果：12.3456 
    else
     ShowMessage('轉換異常') 
end;

TryStrToInt函數 示例：

var
    aa:Integer;
begin
    if TryStrToInt('1234',aa) then  
    ShowMessage(IntToStr(aa));    //結果：1234
    else
     ShowMessage('轉換異常') 
end;