onKeyPress es caracter no numérico

[roman]

Quizá tengas que darle un repaso a los conjuntos (sets) .

Recuerda que los corchetes [] sirven (en este contexto) para denotar un conjunto. Así, ['0'..'9', #8] denota al conjunto formado por los caracteres '0' al '9' (los dos puntos indican un rango de elementos) y el caracter de código ascii 8. Este último corresponde a la tecla BkSpace. El operador in es para verificar la pertenencia de un elemento a un conjunto de manera que cuando pones

Código Delphi [-]
if (Key in ['0'..'9', #8]) then

estás preguntando si Key es un elemento del conjunto ['0'..'9', #8], es decir, si oprimiste una de las teclas del conjunto.

Con esto en mente, decide tú si puedes o no quitar el #8.

// Saludos

[__cadetill]

Sólo añadir una nota a todo lo expuesto

Por que no usas un componente que ya te controle que sólo se puedan escribir números estilo al CurrencyEdit de las RX??

Lo digo porque si se pega texto desde el portapapeles y no controlas también eso, podrán escribirte lo que quieran