Abfrage ob ein String , Zahlen enthält ?

[Boombuler]

Hi

wenn du wissen willst ob überhaupt zahlen da drin stehen...

Delphi-Quellcode:

function ZahlenDrin(aString:String):boolean;
var Loop:Integer;
begin
  result := false;
  for Loop := 1 to Length(aString) do
    if (aString[Loop] in ['0'..'9']) then result := true;
end;

sonst wenn du wissen willst ob der String NUR eine Zahl ist:

Delphi-Quellcode:

function IstZahl(aString:String):boolean;
var tmp:double;
begin
  try
    tmp := strtofloat(aString);
    result := true;
  except 
    result := false;
  end;
end;

hab beide gerad nur so runter getippt sollte laufen hab ich aber nicht getestet!

Greetz
Boombuler