Wenn Fremdkomponenten in Frage kommen, wäre aus den Jedis JvValidateEdit mit DisplayFormat:= dfInteger was.
Das hätte den Vorteil, dass nur Zahlen eingegeben werden können und du dir das Prüfen sparen kannst.
In einem älteren Programm hab ich das verwendet:
Delphi-Quellcode:
...
if (Key in [#8, '0'..'9']) then
else
begin
begin
Key:= #0;
end;
end;
...
Wobei man immer noch über die Zwischenablage Buchstaben ins Edit bekommt...