Forum: Object-Pascal / Delphi-Language
Delphi
by leddl,
6. Sep 2005
Ähm, nö. Ich würde einfach
if StroToInt(Edit1.text) in Then
//bla
else
//Editwert auf gültigen Wert setzen oder Fehlermeldung und FOkus auf Edit
//oder sonst irgendein Mist ;)
schreiben, denn wenn du nur prüfst, ob die erste Zahl größer gleich 2 ist, läßt du auch ein- und zweistellige Zahlen zu.
Forum: Object-Pascal / Delphi-Language
Delphi
by leddl,
6. Sep 2005
Und sowieso im OnKeyPress erstmal nur Zahlen zulassen
if not key in Then key := #0;
Aber OnChange ist keine gute Idee, denn wenn der User anfängt einzugeben, wird er niemals sofort 200 eingeben, sondern eben erstmal eine 2. Die wäre zu klein, und damit nicht zulässig.
Überprüfe also die Werte am besten im OnExit.
//Edit:
Jetzt hab ich den roten Kasten einfach ignoriert und nix...