Kako pretvoritu . u ,

[ gygy @ 16.02.2004. 22:15 ] @

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

[ Pajke @ 17.02.2004. 12:04 ] @

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

[ gygy @ 19.02.2004. 22:21 ] @

Hvala, kod radi savrseno!!!
GYGY

[ Alberto @ 04.03.2004. 23:22 ] @

MALA DOPUNA

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

Mnogo je sigurnije!