is wert ein integer

[Julzn]

hoi,
wie kann ich prüfen ob der wert eines textfeldes ein integer ist??

[Kroko1999]

Val + F1
StrtoInt + F1
StrToIntDef + F1

[Luckie]

Entweder mit val oder mit StrToIntDef oder selber die Exception abfangen die von StrToInt ausgelöst wird. Ich würde ersteres vorziehen bzw. die Eingabe von ungültigen Zeichen gleich ganz verhindern. Wie das geht, findest du im Forum.

http://www.michael-puff.de/files/mecker.gif Versucht da jemand schneller zu sein, als der Moderator der schneller postet, als sein Schatten? :mrgreen:

[Kroko1999]

Zitat:

Zitat von Luckie

...
Versucht da jemand schneller zu sein, als der Moderator der schneller postet, als sein Schatten? :mrgreen:

Ja, ich habe solche Antworten bereits fertig und kopiere sie nur noch, weil ja die Frage wöchentlich mindestens, ja mindestens ... zig Milliorden mal auf taucht :wink:

[Helmi]

Hallo,

leider gibst du keine Delphi-Version an.

Ab Delphi 7 könntest das machen:


ich geh davon aus, dass dein Textfeld ein Edit ist - bei mir Edit1

Delphi-Quellcode:

var
  i: Integer;

begin
  i := StrToIntDef(Edit1.Text, 1);
end;

Wenn der Wert deines Textfeldes (Edits) ein Integer ist, wird Dieser an i übergeben. Wenn nicht, dann wird der Defaultwert (hier 1) übergeben.

....

ansonsten kannst es so machen:

Delphi-Quellcode:

var
  i: Integer;

begin
  try
    i := StrToInt(Edit1.Text);
  except
    i := 0; //oder was auch immer du dann machen willst, wenn der Wert des Textfeldes kein Integer ist.
  end;
end;