QReport如何报告和打印总页数？

Question

delphi6中的QuickReport控件，只能使用pagenumber得到正在生成的页，若想知道共计有多少页，怎么办？

Answer 1

to see this FAQ:
http://expert.csdn.net/Expert/FAQ/FAQ_Index.asp?id=1464================================================================
　　　　　◆◆◆ CSDN查询助手，查询方便快捷◆◆◆ 下载地址：  
　http://CoolSlob.ifood1.com/Download/CSDNFinder.exe  
　http://CoolSlob.8u8.com/Download/Tools/CSDNFinder.Slob[更名为.exe即可]  

Answer 2

procedure TFrmkehudd_prt.lbPgCountPrint(sender: TObject;
  var Value: String);
begin
  lbPgCount.Caption:=inttostr(QuickRep1.QRPrinter.PageCount);
end;//不过好象在打印预览的时候不能知道只有在打印的时候才能打印出来!

Answer 3

QuickReport1.Prepare;  
   QuickReport1.PageCount  :=  QuickReport.QRPrinter.PageCount;