Duas casas decimais!
Amigos.
Tenho o seguinte código
if DBEdit4.Text <> ´0´ then
DBEdit5.Text := FloatToStr(( StrToFloat(DBEdit2.Text)) * (100 - (StrToFloat(DBEdit4.Text))) / 100)
Else
DBEdit5.Text := FloatToStr(( StrToFloat(DBEdit2.Text)) )
Preciso que seja armazenado o valoe com duas casas decimais, mesmo se conter o Zero na última! Não seicomo fazer nem onde usar o código
FormatFloat(´#0.00´,Valor);
Teria como me ajudar?
Tenho o seguinte código
if DBEdit4.Text <> ´0´ then
DBEdit5.Text := FloatToStr(( StrToFloat(DBEdit2.Text)) * (100 - (StrToFloat(DBEdit4.Text))) / 100)
Else
DBEdit5.Text := FloatToStr(( StrToFloat(DBEdit2.Text)) )
Preciso que seja armazenado o valoe com duas casas decimais, mesmo se conter o Zero na última! Não seicomo fazer nem onde usar o código
FormatFloat(´#0.00´,Valor);
Teria como me ajudar?
Leonardo Bonoto
Curtidas 0
Respostas
Venus
11/12/2003
será q a propriedade displayformat do TField resolve seu problema ?
juliana
juliana
GOSTEI 0
Leonardo Bonoto
11/12/2003
Podeira sim, mas como faço?
Léo
Léo
GOSTEI 0