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 ·
510 阅读 ·
0 评论