如何知道QuickRep的总页数? 没有属性能直接得到!刚刚有个帖子也是关于这的http://www.csdn.net/expert/topic/568/568319.xml?temp=.8695642 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 以下程序可以这样得到总页数,并在Preview中显示,但数据较多时,可能在Preview之前需要等待一会:procedure TForm1.Button1Click(Sender: TObject);begin QuickReport1.Prepare; //必须 QuickReport1.QRLabel1.Caption := IntToStr(QuickReport1.QRPrinter.PageCount); //此处得到总页数 QuickReport1.Preview;end; 但是有可能会不能释放资源(可用win98的资源查看器来查看)我就是因为这才换reportbuilder的 利用TUniQuery、TUniConnection写库出错 在TStingGrid如何实线超连接交果? listview的值导出至EXCEL,该如何操作? a varibale problem ! help 请教关于按钮问题? 如何将程序最小化后出现在托盘上? 怎么给数据库加密码? 关于access关系的问题 关于TDate的一个弱问题 Delphi研究方向咨询? 我的错误在哪儿?关于SQL语句语法 有关数据库中数据转化的问题!请大家帮忙!!
在Preview之前需要等待一会:procedure TForm1.Button1Click(Sender: TObject);
begin
QuickReport1.Prepare; //必须
QuickReport1.QRLabel1.Caption := IntToStr(QuickReport1.QRPrinter.PageCount); //此处得到总页数
QuickReport1.Preview;
end;