Na dann kann man den String immer noch Zeichenweise durchklauben und prüfen, ob ein ungültiges Zeichen drinnen ist.
Delphi-Quellcode:
function IsZahl (s:string) : boolean;
var i,res,len:integer;
zahl:integer;
istZahl : boolean;
begin
result := true;
len := length (s);
for i := 1 to len do begin
if not (s[i] in ['-','0'..'9']) then beginn
result := false;
exit;
end;
end;
end;
Sollte so funktionieren, oder?