Hi,
es ist besser, wenn Du von vorneherein keine Eingabe von Zahlen zulässt.
Übrigens gibt es keine If-Schleife
Um nochmal auf den Code aus dem
Thread zurückzukommen:
Mach ein OnKeyPress-Ereignis für Dein Edit und füg ein:
Delphi-Quellcode:
If not(key in [#48..#57,#8]) then
key := #0;
Damit kannst Du nur Zahlen eintippen und per Backspace-Taste wieder löschen.