Validar un TEdit.....

[[David]]

Hola

De otro post me han enlazado a este. He visto el código para introducir sólo numericos en el edit y si le agregas un TPopupmenu pues no funciona el pegar, que permite pegar strings.

Pero ahora tengo la pregunta. No habría una forma de que si el portapapeles tuviera un número válido, si se pudiera pegar con ctrl+v o botón derecho, pegar.

Edito, porque me surge un duda, si pones un punto se convierte en coma, perfecto, pero si pulsas la coma, no se añade nada, no te deja, ¿Qué habría que añadir en el código para permitir también la coma?