fastreport 空行补充
var
PageLine: integer; //在现在页列印到第几行
PageMaxRow: integer=40; //设定每页列数
procedure Footer1OnBeforePrint(Sender: TfrxComponent);
var
i: integer;
begin
i := iif(PageLine=0, PageMaxRow, PageLine);
while i < PageMaxRow do begin
i := i + 1;
Engine....
原创
2022-04-19 15:24:11 ·
473 阅读 ·
0 评论