Problema con el TEdit y las comas

[[Ohcan]]

¡Ya lo tengo!
"Mea culpa" te puse en la primera respuesta:

A esta funcion la llamas desde el evento onKeyPress del Edit de esta forma:
Key := ComprobarNumerico(MiEdit.Text; Key:Char);

Y ese ";"... debería ser una coma ","...

Así que intenta simplemente

Key := ComprobarNumerico(EdPagat.Text, Key:Char);

Y me cuentas... yo me marcho hasta mañana ... que ya es hora