QReport: Page Header nur auf der ersten Seite?

[chaosben]

Der erste offizielle Weg geht so: Dein Page-Header wegschmeißen und dafür ein Title-Band nehmen.

Die andere (äußerst unschöne) Methode sieht so aus:

Delphi-Quellcode:

procedure Form1.OnPageHeader1BeforePrint(var PrintBand : Boolean);
begin
  if DeinQuickreport.Printer.Page<>1 then
    PrintBand:=false
  else
    PrintBand:=true;
  //Oder, wenns unleserlich aber "cool" sein sein soll
  PrintBand:=DeinQuickreport.Printer.Page=1;
end;