用QReport如何加上"共xx页"?(30分)

  • 主题发起人 主题发起人 ly_8
  • 开始时间 开始时间
L

ly_8

Unregistered / Unconfirmed
GUEST, unregistred user!
用QReport如何加上"共xx页"?
 
简单的办法,用RecordCount除以每页的记录数的结果向上取整,将结果以QRLabel的
形式显示!或者你在QrExpr中该表达式!
 
Form.QUICKREP1.Prepare;
Form.QRLabel19.Caption:='共'
+INTTOSTR(Form.QUICKREP1.Printer.PageCount)
+'页';
Form.QuickRep1.Preview;
或者
'共'+PrinterSettings.LastPage+'页'
 
问题的关键在于QuickReport的Prepare,Prepare后方能取得总页数.
 
多人接受答案了。
 
后退
顶部