Currency no Edit

Delphi

22/12/2003

fiz uma sql assim:
...
close;
sql.text:=´select * from tabela where campo =:camp´;
parambyname(´camp´).asstring:=edit1.text;
open;
...
até aí OK. Após aberta a query, digo:
edit2.text:=currtostr(tabelacampo.ascurrency);
Na hora de carregar o valor da tabela, no edit, ele vem, mas sem a máscara MOEDA(currency). No editor de campos da tabela, coloquei currency para true, mas não aconteceu nada. Fiz também, apos o open assim:
tabelacampo.editformat:=´#.00´;
tabelacampo.displayformat:=´R$.00´; e nada, continua o edit sem a máscara. O q devo fazer para carregar o formato moeda dentro do edit?


Paulo

Paulo

Curtidas 0

Respostas

Renata Coimbra

Renata Coimbra

22/12/2003

Acho q assim dar certo !


Edit2.Text := FormatFloat(´,0.00´, tabelaCampo.asCurrency);


Renata Coimbra.


GOSTEI 0
POSTAR