Forum: Object-Pascal / Delphi-Language
by eugene222,
26. Mär 2011
Ich hab das von DeddyH ausprobiert und es funktioniert einwandfrei. Ich werd jetzt erstmal versuchen den kleinen Code komplett zu verstehen. Naja vielen Dank an alle!
Ich hab das jetzt anders gelöst. Die Schrift wird rot wenn es falsch ist und Grün wenn die Eingabe richtig ist. Wenn alle Editfelder OK sind, wird der Button aktiviert, sonst deaktiviert.
Dieses Thema kann geschlossen werden....
Forum: Object-Pascal / Delphi-Language
by eugene222,
25. Mär 2011
Ich hab eine Try Except Funktion, welche dafür sorgt, dass man in ein EditFeld keine Buchstaben eingeben kann. Jetz hab ich das Problem, dass man keine Negativen Zahlen eingeben kann. Kann mir villeicht jemand helfen oder eine bessere Alternative präsentieren.
procedure TForm1.ed_abst_Change(Sender: TObject);
BEGIN
TRY
f_abst := StrToFloat(ed_abst.Text);
EXCEPT
ed_abst.Text...