Einzelnen Beitrag anzeigen

Benutzerbild von sakura
sakura

Registriert seit: 10. Jun 2002
Ort: Unterhaching
11.412 Beiträge
 
Delphi 12 Athens
 
#11

Re: Ist String eine gültige Zahl?"

  Alt 16. Dez 2003, 11:48
Wenn Du Val nicht willst (Achtung: bei Vall ist XC auch eine Zahl ) dann:
Delphi-Quellcode:
function IsInt(s: string): boolean;
var
  I: Integer;
begin
  for i := 0 to length(s) do
    if not (StrToInt(s[i]) in [0..9]) then
    begin
      result := False;
      Exit;
    end;
  Result := True;
end;
......
Daniel Lizbeth
Ich bin nicht zurück, ich tue nur so
  Mit Zitat antworten Zitat