QReport: Page Header nur auf der ersten Seite?

[mlspider]

Hallo,

Sicher wird die Lösung meines Problems sehr banal sein. Aber wie bekomme ich das hin, dass der Page Header im Quick Report nur auf der ersten Seite erscheint?

[chaosben]

Hi tu oll!

Ein Page-Header ist leider nur ein Page-Header und will auf jeder Page der Header sein. Was du willst, ist bestimmt ein Title-Band.
Wenn du aber partout dein Page-Header auf die erste Seite zwingen willst, kannst du auch mal das "OnBeforePrint-Ereignis" ansehen und darin bei "Printer.Page<>1" Printband auf false setzen.

[mlspider]

Und wie würde es im "Klartext" (Code) aussehen?

[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;

[mlspider]

ist diese Bedingung nicht inkompatibel?

Edit: Habe jetzt alles im Titel abgelegt.

[chaosben]

Zitat:

Zitat von mlspider

ist diese Bedingung nicht inkompatibel?

Wie meinst du das? Was soll inkompatibel sein?