Saludos
Lo mas sencillo es usar el evento OnKeyPress del edit y poner este codigo
Código Delphi
[-]
Procedure editOnKeyPress(...);
Begin
if not (key in ['0'..'9',#13,#8]) then key:=#0
end;
Suerte
Y como veo que eres nuevo, Bienvenido al ClubDelphi. Date una miradita a la Guia de estilo y al uso de las etiquetas. Puede encotrar los enlaces en mi firma
Hasta luego