Kako pretvoritu . u ,

Kako da u programu zamenim da mi umesto tacke pise zarez '.'=',' a da zarez ostane zarez?
Radi se o Edit-u i Memo.
Unapred hvala!!!
GYGY

Potpis

GYGY

u dogadjaj onkeyPress ubaci sledecu proveru:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key ='.' then key :=',';
end;

tacka ce biti pretvorena u zarez a svi ostali karakteri ce se ispisivati normalno

Hvala, kod radi savrseno!!!
GYGY

Potpis

GYGY

MALA DOPUNA

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key ='.' then key :=DecimalSeparator;
end;

Mnogo je sigurnije!