(in Unit: IdGlobal)
function IsNumeric(c: char): Boolean;
Parameters c: char Character to be examined.
Returns Boolean - True if the character is a numeric digit.
Description
IsNumeric is a Boolean function that indicates
if the character in c contains a numeric digit in the range '0'..'9'.
function IsDigit(S: string): Boolean;
var
i: integer;
begin
for i := 1 to length(S) do
if (ord(S) < 48) or (ord(S) > 57) then
begin
result := false;
exit;
end;
result := true;
end;
