wenn keine zahl, dann...?

[MrSpock]

Hallo herrentor,

z.B. so:

Delphi-Quellcode:

function isNumber(str: String; var number: Extended): Boolen;
var
  wert : Extended;
begin
  Result := True;
  try
    wert := StrToFloat(str);
    number := wert; 
  except
    on exception do
    begin
      Result := False;
    end
  end
end;