我之前在Delphi7环境下用FastReport开发报表时，也碰到过子报表内容超过一页就出现空白页的情况，以下几个亲测有效的解决方法，你可以逐一尝试：

• 核对主/子报表的页面设置
  子报表的纸张尺寸、边距必须和主报表完全一致！很多时候空白页的根源就是子报表页面参数和主报表不匹配，导致内容溢出后自动生成空白页。打开子报表设计器，通过File -> Page Settings菜单，把纸张大小、上下左右边距都调整成和主报表一模一样的数值。

• 调整主报表Detail带区的拉伸模式
  主报表的Detail带区如果设置了smDontStretch，当子报表内容超过当前页剩余空间时，会强制生成空白页来“占位”。你可以选中主报表的Detail带区，在对象编辑器里把StretchMode属性改成smStretch，让Detail带区根据子报表的实际高度自动拉伸，内容就能自然延续到下一页，不会凭空多出空白页。

• 禁用子报表的强制分页属性
  检查子报表的NewPage属性，如果它被设为True，每次渲染子报表都会强制新建一页，这在多页子报表场景下必然会导致空白页。打开子报表的对象编辑器，找到NewPage选项，将其改为False，让子报表内容紧跟主报表的当前位置输出。

• 排查子报表的页眉/页脚带区
  如果子报表里有Header或Footer带区，并且开启了PrintOnEveryPage，可能会在分页时触发不必要的空白页。你可以先暂时隐藏这些带区（把Visible设为False），测试是否还会出现空白页；如果确认是这个原因，可以调整带区的显示逻辑，或者确保带区内没有空的内容导致分页。

• 代码层面手动控制分页逻辑
  如果以上方法都没有效果，可以尝试在主报表的OnBeforePrint事件中添加代码，手动修正子报表的分页行为：

  procedure TForm1.frxMasterReport1BeforePrint(Sender: TfrxComponent);
  var
    SubReport: TfrxSubreport;
  begin
    SubReport := frxMasterReport1.FindObject('frxSubreport1') as TfrxSubreport;
    if Assigned(SubReport) then
    begin
      SubReport.NewPage := False;
      // 强制重新计算子报表高度，避免分页错误
      SubReport.Report.PrepareReport(False);
    end;
  end;
  

一般来说，通过以上步骤就能解决子报表分页出现空白页的问题。如果还是不行，可以检查主报表和子报表的带区高度，看看有没有多余的空白带区导致的分页。

内容的提问来源于stack exchange，提问作者Evandro Poncio