F�rum casas decimais fixas #382329

28/07/2010

Ol� galera do comum problema que esta me matando ja fiz quase tudo, vamo l� preciso colocar uma mascara fixa para o campo com duas casas decimas de forma que nao arredonte o valor por exemplo : valores como 5 e mostrado no relatorio como 5 e deveria ser 5,00 o codigo que eu uso esta abaixo QR_BASE.Caption := formatfloat('00.00',(StrToFloat(qr_val_us.Caption) * (dmBase.qAuxLoc1.FIELDBYNAME('DOLAR_COMERCIAL').AsCurrency)));
QRVAL_II.Caption := formatfloat('00.00',(StrToFloat(QR_BASE.Caption) * 0.60)); help, valeu

Gustavo Matos

Curtir t�pico

+ 0

Responder

Posts

28/07/2010

Thiago Pedro

Amigo, s� para compreender a sua interroga��o.
Voc� quer conseguir fazer isso no tratamento ou dentro do componente de edi��o ?

Responder

Gostei + 0

28/07/2010

Gustavo Matos

A ai Tiago valeu pelo apoio... Entao do usando ai o quick report este codigo passa pelo print do detail

Responder

Gostei + 0

28/07/2010

Thiago Pedro

Tente tratar da seguinte maneira:

FormatFloat('###,###,##0.00', Valor);

Responder

Gostei + 0

28/07/2010

Gustavo Matos

entao mano quando fa�o isso que vc me falo acontece ter uma mensangem de erro de ponto flutuante nao valido dae o relatorio nao print ta foda

Responder

Gostei + 0

28/07/2010

Thiago Pedro

Voc� tem que ver se este valor que voc� est� pegando e/ou formatando realmente � n�mero real.

Tente substituir essas linhas de c�digo, e tente pegar o valor por exemplo, por um ShowMessage.

V� se voc� consegue isso!

Responder

Gostei + 0

28/07/2010

Gustavo Matos

Valeu pela inten�ao brother vou fazer o teste e escrevo aki mas como fa�o pra trasforma em real no caso de nao for real porque eu ja usei o codigo que voce passo e deu erro de ponto flutuante nao valido...

Responder

Gostei + 0

28/07/2010

Gustavo Matos

no caso ai thiago ja tentei formatfloat para a label com displayformat nesse fielbyname('dolar_cormecial') e nao deu certo continuo arredondando o valor como 5.00 para 5 dai tentei usar strtofloat na label com ffnumber mas tambem deu erro de ponto flutuante nao valido..... dai tentei tratar a virgula do valor para ponto e vice versa sem sucesso com stringreplace

Responder

Gostei + 0

29/07/2010

Thiago Pedro

Pegue a string completa que voc� est� teoricamente converter para real (float) e coloque corretamente ela aqui!

Se sua string for: 5.000.000

coloque aqui: 5.000.00

Responder

Gostei + 0

29/07/2010

Eriley Barbosa

Vamos l�, experimente trocar os QrLabel's por QrExpression e no seu evento onPrint tente fazer o calculo: Value := FloatToStr(StrToFloat(qr_val_us.Caption)) * (dmBase.qAuxLoc1.FIELDBYNAME('DOLAR_COMERCIAL').AsFloat));
Value := FloatToStr(StrToFloat(QR_BASE.Caption) * 0.60)); D� uma olhada como est� a configura��o do sistema operacional para o separador de milhar e o separador decimal, para o separador de milhar deve ser usado.(Ponto) e para o separador decimal deve ser usado,(Virgula). Com estas configura��es que informei acima a linha: Value := FloatToStr(StrToFloat(QR_BASE.Caption) * 0.60)); Ficaria Value := FloatToStr(StrToFloat(QR_BASE.Caption) * 0,60)); Em cada QrExpression coloque na propriedade Mask a mascara #,##0.00 Atenciosamente Eriley

Responder

Gostei + 0