Abfragen

[marabu]

Delphi-Quellcode:

function IsNumeric(s: string): boolean;
var
  i: integer;
begin
  Result := TryStrToInt(s, i);
end;

Grüße vom marabu