步骤:
1、quickrpt属性:
QuickRep1.Bands.HasColumnHeader:=true;
QuickRep1.Bands.HasDetail:=true;
QuickRep1.Bands.HasSummary:=true;
2、加控件
qrgroup,qrband
属性设置 qrgroup.footerband:=qrband
qrband.bandtype:=rbGroupFooter
qrgroup.expression:=你的分组字段(多字段要建立多个qrgroup)
3、在qrband加:qrlabel1,qrexpr
qrexpr1.expression:=sum(你的小计字段)
qrexpr1.resetAfterPrint:=true;
4、在summaryband加:qrlabel(合计),qrexpr2
qrexpr2.expression:=sum(你的合计字段)
qrexpr2.resetAfterPrint:=false;
注意:以上属性设置大多不要写代码,直接设置就行了