Hola ercrizeporta
Pienso que deberias cambiar la configuración regional... Inicio - Panel de Control - Configuración Regional
ahí puede establecer cual será el separador decimal.. pero ojo.. cuando el programa lo ejecutes en otro Pc, deberás establecer las mismas características...
Mira.. el sgte codigo lo debes colocar en el Evento OnKeyPreess de Edit donde ingresar el dato...
la primera lines te cambia el punto (.) por una coma (,).. lo puedes usar al reves tambien.. y te valida que solo se ingresen numeros
Código Delphi
[-]
If Key='.' Then Key:=',';
If Pos(',',Edit1.Text)=0 Then
If not (Key in ['0'..'9',',',#8]) Then Key:=#0
else Exit
else
If not (Key in ['0'..'9',#8]) Then Key:=#0;
espero que te sirva..
