FastReport如何打印表格式的空行？

var  
  PageLine: integer;       //在現在頁列印到第幾行  
  PageMaxRow: integer=15;  //設定每頁列數
procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin  
  PageLine := <Line> mod PageMaxRow;  
  if (PageLine = 1) and (<line> > 1) then   
    Engine.newpage;
  child1.visible := False;
end;
//Footer1高度設為0
procedure Footer1OnBeforePrint(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.