[求助]fastreport中如何让表格没有数据也能打出空行表格出来,急急急,谢谢 ( 积分: 50 )

  • 主题发起人 主题发起人 yanweiwu
  • 开始时间 开始时间
Y

yanweiwu

Unregistered / Unconfirmed
GUEST, unregistred user!
fastreport中如何让表格没有数据也能打出空行表格出来,急急急,谢谢
 
fastreport中如何让表格没有数据也能打出空行表格出来,急急急,谢谢
 
我在网上看到的方法,你加一个CHILD1,然后添加以下代码若满足条件则显示CHILD1的内容,CHILD1那里放空行表格
var pageline:integer;
var pagemaxrow:integer=4;//每页最大行数

procedure MasterData1OnBeforePrint(Sender: TfrxComponent);//该函数设置每页的打印记录数
begin
PageLine := <line> mod PageMaxRow;
if (PageLine = 1) and (<line> > 1) then
Engine.newpage;
end;
procedure Footer1OnBeforePrint(Sender: TfrxComponent);
var
i: integer;
begin
i := iif(PageLine=0, PageMaxRow, PageLine);
while i < PageMaxRowdo
begin
i := i + 1;
Engine.ShowBand(Child1);
//印空白表格
end;
end;
 
demo中有例子
 
我的DEMO中怎么没有
 
demos/reports/Frdemo.exe
print empty grid
講的很清楚,自己看
主要是在 對應類型表帶的 footer表帶的 onbefortprint 事件里用循環show事先放好的child表帶
 
我的是V3。07的,我又找了一遍,还是没有呀
 
在V2。5中找到了,谢谢
 

Similar threads

后退
顶部