Formataçao de casas decimais
15/06/2008
0
Como faço para colocar 2 casas decimais, quando não informado Centavos ???
Tipo, se eu informar: 150 tem que aparecer no dbedit 150,00
Veja bem: Somente quando nao informar os centavos, ele tem que aparecer ,00 automaticamente
Estou usando o BDS2006 + Firebird + conexao dbexpress
Fico no aguardo
Rogério
Rogeranalista
Posts
15/06/2008
Marco Salles
uma delas é utilizar o evento [b:26f6a04b5d]OnGetText [/b:26f6a04b5d]do campo field
procedure TForm1.SeuDataSetSeuCampo(Sender: TField; var Text: String; DisplayText: Boolean); begin text:=formatfloat(´#,0.00´,roundTo(sender.AsFloat,-2)); end;
16/06/2008
Emerson Nascimento
16/06/2008
Felipemarinho
desta maneira eu acho mais simples
na propriedade ´displayformat´ da sua query ou table
coloque o seguinte
#,0.00
03/12/2008
Mahdak
boa!
03/12/2008
Luizriacho
edit.Text := FormatFloat(´#0.00´, StrToFloat(edit.Text)
Clique aqui para fazer login e interagir na Comunidade :)