高手请进,100分请教怎样实现多页报表的设计?(100分)

  • 主题发起人 主题发起人 ruolink
  • 开始时间 开始时间
R

ruolink

Unregistered / Unconfirmed
GUEST, unregistred user!
我要设计一个报表,分若干页,不同页上面的内容不同,比如第一页是封面,
第二页是问候语,第三、四……页是内容(内容是不同的文字),第四页是结束语,封底,
怎么才能实现这样一种多页的报表?
 
多作几页报表
 
用几份不同的报表和在一起不行吗
 
我当然在设计的时候要分页设计,
可是执行的时候怎么实现预览一次这几页报表一起出来呢?
高手帮帮忙,看看有没有合适的办法?
 
ReportMachine
 
我用的是 QReport控件,也使用了QRCompositeReport,代码如下:
with QRCompositeReport1do
begin
reports.Add(QuickReport2);
reports.Add(QuickReport3);
reports.Add(QuickReport4);
Preview;
end;

可是预览出来什么也没有,什么原因?如果单页预览,却没有问题。
大虾们看看,给点建议
 
用ReportMachine怎么实现?
 
这个要求好象设计一个报表就能做到。 根本不必分多个报表嘛。 无非就是多层titleband和footband。然后运行时决定显示哪个而已。
 
Another_eYes,你好,你能说的清楚一些么?我很想知道你是怎么实现的,能不能举一个例子,
很简单的就行,比如两页的一个小例子?谢谢了!
 
呵呵。例子是没时间写的。 口头描述一下如何?
放一个QRBand, 设置Type为PageHeader, 放个ChildBand, 设置ParentBand为PageHeaderBand.
分别设计你的封面, 封二, PageHeaderBand.BeforePrint里写: PrintBand := QuickRep1.QRPrinter.PageCount=0;
ChildBand.BeforePrint里写:PrintBand := QuickRep.QRPrinter.PageCount=1;
QuickRep1.BeforePrint里写:
PageHeaderBand.Height := QuickRep1.ClientHeight;
ChildBand.Height := QuickRep1.ClientHeight;
试试看
 
Another_eYes,你好,按照你说得,我设置了一下,可是预览的时候,只是显示ChildBand的
内容,没有显示PageHeaderBand里面的内容,也没有分页。你能在你那里做一个测试么?
谢谢了,分数不是问题!
 
俺已经搞定了,还是用的delphi自带的控件QRCompositeReport,在他的OnAddReports事件里面写如下代码:
with QRCompositeReport1.Reportsdo
begin
Add(QuickReport2);
//封面
Add(QuickReport3);
//内容
Add(QuickReport4);
//封底
end;
在一个点击事件里面写:
QRCompositeReport.Preview;
就OK了。
当然封面一定要设计的占满一个A4的篇幅,这样内容才不会跑到封面上去。
高兴,结贴!
 
多人接受答案了。
 
后退
顶部