fastreport报表中如何增加空行一页记录行没打印完,想在后面添加空白行,如何做?在线等,谢谢

解决方案 »

  1.   

    var
    i:integer;
    procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
    begin
      if ((<Line#>-1) mod 9 =0)and ((<Line#>-1)>0) then
       begin
        engine.newpage;
        end;
     i:=<line#>+1;end;procedure MasterData1OnAfterPrint(Sender: TfrxComponent);
    var
    j:integer;
    t:integer;begin
        if (<Page#>=<TotalPages#>) then
        begin
          if engine.finalpass  then
        if (MasterData1.dataset.recordcount=<line>)  then
        begin
         j:=9-(MasterData1.dataset.recordcount mod 9) ;
         if ((MasterData1.dataset.recordcount mod 9))<>0 then
         for t:=1 to j  do
             engine.showband(child1);
        end;
                //engine.showband(child1);
        end;
    end;beginend.
    明白?
    设置一空:child1  当然要显示的行数你自己确定  我这里举例为9
      

  2.   

    我按你的方法做了,可是报"Undeclared indentifier:'recordcount'"错误,不知该如何解决??
      

  3.   

    双击Master Band 修改行数为你要的,不就可以了吗????