请教各位大侠：如何实现报表打印中的分页汇总？--100分

自己汇总:
1.增加计数器变量
2.在 new page 事件时,计数器清零
3.在 每行数据生成时,计数器累计
4.在打印页尾时,将计数器输出

解决方案 »

  1.   

    http://usevb.yeah.net
    一个用vb写的ActiveX控件，完全可满足你的需要（可以指定任意字段为合计字段，指定后该字段的表合计、表小计、页小计、总计可作为宏出现在表格中），不过没在Delphi环境试过
      

  2.   

    加一个 QRBand, Bandtype 设为 PageFooter, 在其中加一个 QRExpression,
    其 Expression定义为要统计的表达式，如：Sum(table1.salary)就可以了。
    但这样算出来的是从开始到该页所有的合计，而非仅是本页的合计数。这时设置QRExpression.restafterprint:=true试试