FastReport 还是固定行问题

[wn520]

var 
PageLine: integer;      //在現在頁列印到第幾行 
PageMaxRow: integer=10;  //設定每頁行數   
procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
                               
begin
PageLine := <Line> mod PageMaxRow; 
if (PageLine = 1) and ( <line> > 1) then 
       Engine.newpage; 
child1.visible := False; 
  
end;



procedure GroupFooter1OnBeforePrint(Sender: TfrxComponent);
  var 
i: integer; 
begin 
i := iif(PageLine=0, PageMaxRow, PageLine); 
child1.visible := True; 
while i < PageMaxRow do 
begin 
i := i + 1; 
Engine.ShowBand(Child1);  //印空白表格 
end; 
child1.visible := False;

end;

begin
    
end.

我这样写之后，结果打印一条数据，就打印9行空白行啊
我还必须要分栏，怎么实现啊！

[火龙岛主]

没明白楼主的需求！

[wn520]

[Quote=引用 1 楼 smallhand 的回复:]
没明白楼主的需求！
[/Quote]

现要求每张纸上打印20条数据,比如数据表中有12条数据,则自动补8条空白行;如数据表中有11条数据,则自动补9条空白行.我增加了一个band 指定一虚拟数据集和记录数,但是记录数只能固定设制,如何指定记录数=20-数据表记录数呢??