6,108
社区成员
发帖
与我相关
我的任务
分享fastreport打印固定行数?
var
PageLine: integer; //在現在頁列印到第幾行
PageMaxRow: integer=8; //設定每頁列數
procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin
PageLine:=[Line#]-1;
if ( PageLine > 1) and (PageLine mod PageMaxRow) = 0 then
//Engine.newpage;
newpage;
end;
在设计器中浏览时,总是提示']'except. 不知是什么原因?
[Line#]系统变量的引用是这样的吗?
PageLine: integer; //在現在頁列印到第幾行
PageMaxRow: integer=8; //設定每頁列數
procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin
PageLine:=[Line#]-1;
if ( PageLine > 1) and (PageLine mod PageMaxRow) = 0 then
//Engine.newpage;
newpage;
end;
在设计器中浏览时,总是提示']'except. 不知是什么原因?
[Line#]系统变量的引用是这样的吗?
...全文
请发表友善的回复…
发表回复
