Das Thema wurde hier schon öfters behandelt.
Benutze mal die Suchfunktion...
Du kannst im KeyPress event via
Delphi-Quellcode:
if Key in ['0'..'9'] then
// Es wurde eine Zahl eingegebn
else
// Es wurde ein anderes Zeichen eingeben
prüfen, was eingegeben wurde.
Björn