QuickReport能否实现每页金额合计，如何实现？

[playdown]

QuickReport能否实现每页金额合计，如何实现？

[playdown]

是只合计每一页的。可不可以？

[WWWWA]

当然可以，在打印内容所在BAND中BEFORE　PRINT事件中进行
赋值、累加，在页脚中打印、清零

[playdown]

大哥你能不能具体一点，我还是搞不定呀。

[playdown]

大哥具体一点好吗?我的金额字段是adoquery2.fields[5]

[playdown]

我顶

[jaunmai]

定義變量 如aaa
detail band beforepint 寫 aaa:= aaa+adoquery2.fields[5].value
pagefooterband beforepint 寫 qrlabel1.caption:= floattostr(aaa), aaa:=0

[playdown]

急，在线等待解决，请各位指点一下小弟，小弟我不胜感激，送分1000

[playdown]

还不行呀

[playdown]

不行呀，AAA结果是整个报表的合计呀不是本页的合计。

[jaunmai]

pagefooterband beforepint //頁腳設定,不要錯
qrlabel1.caption:= floattostr(aaa);
aaa:=0; //這句清0呀,

[playdown]

pagefooterband beforepint //頁腳設定,不要錯 ----这个没错
qrlabel1.caption:= floattostr(aaa); ----这里出来的值是整个报表的金额合计；
aaa:=0; //這句清0呀, ------这个到第二页的时候qrlabel1.caption的值就是0了

[jaunmai]

那會,除非你第二頁沒有合計值了
aaa:= aaa+adoquery2.fields[5].value // detail band beforepint

[jaunmai]

計數值放在那一個band中??

[sdyds]

你在QuickReport的bands属性选择HasPagefooter为TRUE
在QuickReport的Pagefooterbande栏内添加一个QRExpr控件并将它的ResetAfterPint设为TRUE
再设置EXpression的属性：SUM(adoquery2.fields[5])

[playdown]

不过qrexpr的值取不过来呀，不能把值给另一变量.

[playdown]

我第二页是有数据的

[playdown]

sdyds不好意思，好像只能给一个分数，你到基础类中来，我给分。

[sdyds]

你不是要每份汇总吗？
这样在每页的下面就会有汇总。
qrexpr不能取值你可先付adoquery2一个值，将adoquery2.open

[playdown]

我是想把每一页的金额都转换为大写的金额，可以吗，请具体一点好吗？

[playdown]

計數值放在那一個band中??我是放在rbDetail band中的。