你知道吗？(50分)

在Delphi 6 中，用QuickReport制作报表时，TQRSysData元件的Data特性的值
比以前的版本少了’qrsPageCount’即报表的总页数这一个选项，不知是否有
其它方法可以实现这一功能，请各位大虾指教一二。

知道什么啊？

gz

据我所知道,以前的QuickReport好像也没有qrsPageCount.
但你可以用以下方法实现.
var nPageCount:integer；
begin

　　{...}
　　 QuickRep1.Prepare；
　　 nPageCount:=QuickRep1.QRPrinter.PageCount；
　　 QuickRep1.QRPrinter.Free；
　　 QuickRep1.QRPrinter:=nil；
　　 {在此修改QuickRep1，实现在页眉或页脚中打印“共 xx 页 第 xx 页” ... }
　　 QuickRep1.PreView；
　　 {...}
End；

接受答案了.