Formatar o edit1.text

21/05/2003

2

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;


Responder

Posts

21/05/2003

Rodrigo Costa

Função FormatCurr ex:

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
×
+1 DevUP
Acesso diário, +1 DevUP
Parabéns, você está investindo na sua carreira