如何在quickreport中仅打印 4 页,象我们的档案一样的表?(100分)

  • 主题发起人 主题发起人 zhbj
  • 开始时间 开始时间
Z

zhbj

Unregistered / Unconfirmed
GUEST, unregistred user!
如何在quickreport中仅打印4页,象我们的档案一样的表?
(及第一页是封皮,第二页是主体,第三页是评定等 )
我仅仅实现了 3 页,用的是Hasdetail ,Hassummary ,Hastitle(其他的不行的)
无法实现 4 页 , 在线关注
 
问题没听明白 priter setup不就可以设置打印页码区间
 
即在浏览时,显示四页,第一页是封皮 ,
第二页是主体 。。。。。最后一页是尾页
print setup仅仅有设置列数,却没有设置页数的地方
 
编程实现。
 
同意楼上:思路是:当PageCount>=4 时,停止打印
 
但编程实现,表格所有的框架都要代码生成 ,几乎不能考虑,
且要实现编程,如何保证实现4页 ,(无法采用数据集,)
请两位大侠说的纤细一点好吗 ?
 
procedure TForm1.QuickRep1NeedData(Sender: TObject;
var MoreData: Boolean);
begin
MoreData := True;
QuickRep1.PageNumber > 4 then
MoreData := False;
end;
研究一下
 
完颜康,兄 :
(你的代码好像还是代码控制四页,)
现在关键是
在设计期间,我无法看到这四页的版面 ,进而是无法进行框架设定的,
也就是说看到四页版面是关键(安装开始的说法,我仅仅实现了三页)
 
她的代码只有在QuickReport的DataSet没有设置的时候才有效的。
 
用ForceNewPage属性。
封皮、主体、评定、备注各用一个QRBand,把QRBand的ForceNewPage属性设为True。
 
多人接受答案了。
 
后退
顶部