Delphi 行数大于32时快速报告显示页脚

Delphi 行数大于32时快速报告显示页脚,delphi,report,fastreport,Delphi,Report,Fastreport,我有一个快速报告数据。我只想在行数大于32时显示PageFooter,如果行数小于32时隐藏它 我想要一个快速报告提示或由德尔福代码 任何帮助都将不胜感激。解决方案: procedure SysMemo1OnBeforePrint(Sender: TfrxComponent); begin if COUNT(MasterData1) >= 32 then begin SysMemo1.Text := '[Page#]'; end else begin

我有一个快速报告数据。我只想在行数大于32时显示PageFooter,如果行数小于32时隐藏它

我想要一个快速报告提示或由德尔福代码


任何帮助都将不胜感激。

解决方案:

procedure SysMemo1OnBeforePrint(Sender: TfrxComponent);
begin
   if COUNT(MasterData1) >= 32 then begin
      SysMemo1.Text := '[Page#]';
      end
   else begin
      SysMemo1.Text := '';                                  
   end;                 
end;
可以更改系统备忘录的文本,而不是显示(隐藏)页脚标注栏。在PageFooter栏上放置一个SystemMemo对象,并使用此系统备忘录的OnBeforePrint事件。此示例用于显示每页行的页脚标注栏

代码:

procedure SysMemo1OnBeforePrint(Sender: TfrxComponent);
begin
   if COUNT(MasterData1) >= 32 then begin
      SysMemo1.Text := '[Page#]';
      end
   else begin
      SysMemo1.Text := '';                                  
   end;                 
end;

您只能在报表脚本的主过程中更改PageHeader的可见性:

begin
    PageHeader1.Visible := MasterData1.DataSet.RecordCount > 32;                                                                                                                          
end.

到目前为止,您尝试了什么?您的意思是:每页的行数还是整个报告的行数?