gracias coso funciono bien el codigo que me facilitaste pero ahora me surge una nueva duda por que creí que al saber que tecla se pulsaba podia controlarlo de esta manera:
Código Delphi
[-]
procedure TForm13.Edit1KeyPress(Sender: TObject; var Key: Char);
var
te:string;
begin
if key=#110 then
begin
edit1.Clear;
edit1.Text:=te+',';
end;
end;
lo que quiero dar a enteder con este código es que quiero que cuando yo presione la tecla punto (al lado del cero "0") se escriba la coma en ves del punto
pero no me ha funcionado

podrias ayudarme?