IsDigitStr Function
Returns True if the string is not empty and is only made of Digits '0' through '9'.

Unit
QESBPCSConvert

Declaration
Function IsDigitStr(const S: string): Boolean;

Category
Extra String Handling Routines

Implementation

function IsDigitStr (const S: string): Boolean;
begin
     Result := IsCharSetStr (S, ['0'..'9']);
End;


HTML generated by Time2HELP
http://www.time2help.com