Fórum Formatar o edit1.text #161649
21/05/2003
0
Como faço para quando eu digitar um valor dentro da edit1.text ela me transformar em valor de moeda?
Ex: Digito 1 ela transforma em 1,00
1,3 ela transforma em 1,30
E também, qual comando uso para não deixar digitar letras dentro da edit1.text
Desde já muito grato;
Ex: Digito 1 ela transforma em 1,00
1,3 ela transforma em 1,30
E também, qual comando uso para não deixar digitar letras dentro da edit1.text
Desde já muito grato;
Marcelototini
Curtir tópico
+ 0
Responder
Posts
21/05/2003
Rodrigo Costa
Função FormatCurr ex:
Seria mais fácil vc usar um dbedit ligado a uma tabela com o campo numérico que automaticamente não permite que seja digitado caracteres alfabeticos. Inclusive vc pode definir no Fields Editor da query ou table como é que vc quer que os campos sejam exibidos.
val_desconto:=strtofloat(edt_valdesconto.Text);
edt_valdesconto.Text:=FormatCurr(´R$ #,0.00´,val_desconto);
Seria mais fácil vc usar um dbedit ligado a uma tabela com o campo numérico que automaticamente não permite que seja digitado caracteres alfabeticos. Inclusive vc pode definir no Fields Editor da query ou table como é que vc quer que os campos sejam exibidos.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)