Validación coma y decimales Keypress

[olbeup]

Empezado por Soa Pelaez

Primero muchas gracias por tu aporte.
Pero sigue con la misma falla que tiene mi código porque lo ensaye y al compilarlo e ingresar un punto en el edit no me lo modifica por la coma y a su vez con tu código si escribo muchas comas lo deja hacer.

El problema que tú tienes, es, en el procedimiento, tienes que añadir "var", en vez de:

Código Delphi [-]
procedure ValidarPorcentajeKeyPressEdit(Caracter: Char;Edit:TrDBEdit);

Pon esto otro:

Código Delphi [-]
procedure ValidarPorcentajeKeyPressEdit(var Caracter: Char;Edit:TrDBEdit);

Un saludo