如果只能3條數據,要實現下面的空行有兩種辦法
其一是在數據表中插入空記錄,如果不允許插入記錄,則插入為零的記錄
因為報表顯示時可以把零隱藏
另一個方法是用FR本身的Child和Footer
如
var
PageLine: integer;
PageMaxRow: integer=9;
procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin
PageLine := <line> mod PageMaxRow;
if (PageLine = 1) and (<line> > 1) then
begin
Engine.ShowBand(footer2);
Engine.newpage;
end;
end;
//Footer1 高度設為0
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;