如果页面上没有数据，如何在快速报告中隐藏页面？

Question

我正在设计一个有两页的快速报告，在第二页我已经使用了页面页眉/页脚，组页眉/页脚和主数据带。 如果主数据带中没有数据，我必须隐藏page2。主日期带的名称是'masterdata2'。 我试图使用的pascal脚本

procedure Page2OnAfterPrint(Sender: TfrxComponent);
begin
          if MasterData2.RowCount <> 0 then                                                                      
              Page2.visible :=true
              else
               Page2.visible :=false;                                              

end;

但如果第2页上没有数据，它不会隐藏要打印的页面。任何帮助？

Answer 1

如果您尝试：

procedure TForm1.Button1Click(Sender: TObject);
var
  MyPage: TfrxPage;
begin
  if ADOQuery1.RecordCount > 0 then
  begin
    MyPage := frxReport1.FindComponent('Page1') as TfrxPage;
    MyPage.Visible := False;
  end;
  frxReport1.ShowReport;
end;

如需更多信息，请查找Google中的“FR4.6.ProgrammerManual-en.pdf”。