Ingresar sólo decimales en un Edit
Hola, quisiera saber cómo hacer para que un usuario sólo pueda ingresar números decimales en un Edit.
Se que existe este método:
procedure TForm1.Edit1KeyPress(Sender: TObject;
var Key: Char);
begin
if ((Key < '0') or (Key > '9')) and (Key <> #8) then
Key := #0;
end;
el cual impide que se ingresen caracteres. Mi problema es que los valores que se ingresan en el edit son decimales, y no puedo ingresar la coma. Si me pueden ayudar... Muchas gracias!
|