我用TQRCompositeReport进行打印，如何得出总页数？ 欢迎 dq 进入！70分在这！ (70分)

由于报表的特殊性，我用复合报表控件 TQRCompositeReport（用来组合两个TQuickRep
－分别在两个不同的表单上）
在第一页上 要显示有多少页，即需要得出总页数。
我知道只用一个TQuickRep时候可以用如下语句:
printmx.QuickRep1.Prepare;
nPageCount := printmx.QuickRep1.QRPrinter.PageCount
但用TQRCompositeReport时，好像这个不能用，很可惜。
于是，我在第二个 TQuickRep 的最后一页打印时，再动态的改第一页的总页数（
在第一个 TQuickRep 里，我用了一个TQRLable控件进行显示）用了如下语句：
procedure TprintMxRest.QRLabel27Print(sender: TObject;
var Value: String);
begin

printmx.QRLabel57.Caption :=Inttostr(QuickRep1.pagenumber);
end;

结果好像不起作用。
请高手不吝指导。如果我说得不是很清楚，请告知我！

不好意思，我再解释一下我得最后一个程序段：
procedure TprintMxRest.QRLabel27Print(sender: TObject;
var Value: String);
begin

printmx.QRLabel57.Caption :=Inttostr(QuickRep1.pagenumber);
end;
;
QRLabel27是后一个TQuickRep中的一个标签控件，我利用其打印的事件来改变总页数。
－－－－－
程序算段基本起作用，必须预览两次 ，第一次的效果才能反应出来，有一定的滞后性
，（我不太好说清楚，就是说虽然总页数的QRLabe.caption已经改变，但是不能动态的反映
出来）,
静候诸位的指导。

由于别的原因，本问题到此结束。
谢谢大家的光临！

斑竹 在那？
这个问题没有人回答，我现在想将其结束，怎么办？
请赶快将这个问题结束吧！
谢谢！

多人接受答案了。