Varios TEdit solo numericos

[Casimiro Noteví]

Deduzco que estás haciendo una calculadora.
Tienes diversas formas, por ejemplo, en la propiedad de cada tecla pones su número. En el tag del 1 pones un 1, en el tab del 2 pones un 2, etc.
Luego, en el evento común a todas las teclas, al hacer click, detectas su tag y actuas en consecuencia.

Código Delphi [-]
TeclaPulsada( Sender:Tbutton );
var iTecla:int;
begin
  iTecla = sender.tag;
  if iTecla=1 then
   ...
  else if iTecla=2 then
   ...
  etc.
end;