FastReport 还是固定行问题


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行空白行啊
我还必须要分栏，怎么实现啊！