delphi - Fastreport VCL 奇数ページでのヘッダーの可視性の設定

Question

fastreport VCL 4 で、ヘッダーの可視性をレポートの奇数ページのみに設定する方法はありますか? fastreportのサイト、ドキュメント、フォーラムでも、グーグルでも答えが見つかりませんでした。

Answer 1

コードでそれを行います。ページ オブジェクトの OnBeforePrint イベントに、次のようなコードを配置します。

procedure PageHeader1OnBeforePrint(Sender: TfrxComponent);
begin
  PageHeader1.Visible := (Frac(<Page#> / 2) > 0.01)                                                                                                                                   
end;

奇数ページにいるかどうかを判断する簡単な方法があるかもしれませんが、Mod 関数がないため、Frac 関数に頼りました。実際には、その関数を独自のコード内に追加して、レポート内でアクセスできるようにするでしょう。