[es] - Kako pretvoritu . u ,

Srodne teme

Kliknite za generisanje liste srodnih tema...

Navigacija

Brisanje liste

Lista poslednjih: 16, 32, 64, 128 poruka.

gygy
Dragan Grbic

Član broj: 7861
Poruke: 205
*.sezampro.yu.

Profil

Kako pretvoritu . u ,

^{16.02.2004. u 22:15 - pre 245 meseci}

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

GYGY

Odgovor na temu

Pajke
Pajovic Nenad
Vatrogasac
Sabac

Član broj: 2888
Poruke: 41
*.vdial.verat.net

Sajt: www.ptt.yu/korisnici/p/a/..

Profil

Re: Kako pretvoritu . u ,

^{17.02.2004. u 12:04 - pre 245 meseci}

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

Odgovor na temu

gygy
Dragan Grbic

Član broj: 7861
Poruke: 205
*.sezampro.yu.

Profil

Re: Kako pretvoritu . u ,

^{19.02.2004. u 22:21 - pre 245 meseci}

Hvala, kod radi savrseno!!!
GYGY

GYGY

Odgovor na temu

Alberto
Programer

Član broj: 21928
Poruke: 2
*.podgorica.cg.yu

Profil

Re: Kako pretvoritu . u ,

^{04.03.2004. u 23:22 - pre 245 meseci}

MALA DOPUNA

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

Mnogo je sigurnije!

Odgovor na temu