Delphi - necesito noNo ingresar caracteres en un edit

Hola mi pregunta escomo puedo hacer que una caja de texto solo reciba numerosy no letras.

por ejm en mi aplicacion tengo esta codificacion.

if key = (numeral)13 then
begin
if not (key in (corchete)'0'..'9',(numeral)8(corchete) ) then
begin
Showmessage(' no se puede');
end
else
hacelaoperacion

bueno lapregunta esmiproblema es
que cuando llega al if ese de donde pregunta que ingrese todo los numerosmenos la letras. se queda estancada ahi. por que ya no metomalatecla enter.os e numeral13

y si incorporo numeral13 alcodigo ese.. lo admite pero cuando busca algo en la tabla que tiene que se integer. y yo por eeorrmeti una letra y presione enter.. obvia el paso esede la pregunta del key y me comete un error...

me gustaria sabercomo hago pàra que micaja solo admita numeros. y no letras..

perodn si no me entiendenn estoy apuradisimo.. se me acaba la hora del cyber.

espero quelo poco que me allan entendido me lo resuelvann

graciaaaaasss

En el evento OnKeyPress del Edit pon:

if key in ['a'..'z', 'A'..'Z'] then
key := #0; //Nos "comemos" las letras.