在master band中OnBeforePrint事件中写代码:
var
vLineCount: integer;
begin
vLineCount := vLineCount + 1;
if vLineCount = 10 then //10行换页
begin
vLineCount := 0;
NewPage;
end;
end;
var
vLineCount: integer;
begin
vLineCount := vLineCount + 1;
if vLineCount = 10 then //10行换页
begin
vLineCount := 0;
NewPage;
end;
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货