Fórum Fortes Report - RLDBResult #220677

17/03/2004

0

Delphi

Pessoal, eu já tentei de tudo para utilizar esse componente (com a opção info riSum), mas ele insiste em retornar zero...

Eu utilizo um sistema em 3 camadas com o DBExpress, acessando um banco de dados Oracle...

O campo que eu desejo somar é do tipo TFMTBCDField...

O componente foi colocado em uma band do tipo BtSummary...

A versão do Delphi é 7...

Por favor... alguem me ajude...


Kotho

Kotho

Responder

Post mais votado

25/09/2004

pode não ser a melhor mas só sei que deu certo: crie uma variável na seção var, coloque uma label na banda summary, não retire o rldbresult, apenas coloque-o visible false, e no evento onCompute do rldbresult digite:
variável := (variável + rldbresult.field.asFloat);
no evento beforePrint da banda summary digite:
label.caption := floattostrF(variável,ffnumber,12,2);
variável := 0.00;

pronto esta foi a solução para imprimir, se alguém tiver melhor coloque no forum por favor.


Jbneto

Jbneto
Responder

Gostei + 1

Mais Posts

24/09/2004

Jbneto

:cry: caro colega o seu problema é o mesmo que o meu, a única diferença é o banco de dados, se vc já achou a solução por favor mande e-mail para sistema@realonline.com.br
desde já fico bastante agradecido.


Responder

Gostei + 0

25/09/2004

Jbneto

testei o tipo de campo double precision e float e funcionanou, o problema é eu mudar todos os campos que possuem valores, e as procedures e views.


Responder

Gostei + 0

07/09/2005

Otorquati

:P Colegas,

Também passei por este problema e resolvi da seguinte forma:

utilizo dbExpress + DataSnap + Firebird e acho que isso funciona na maioria dos SGBD´s.

:arrow: Select DESCRICAO, QUANTIDADE, PRECOUNIT, cast(QUANTIDADE * PRECOUNIT as Float) as TOTAL From PRODUTOS

Desvantagem é que o tipo Float tem problemas de arredondamento...


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar