D7 und QuickRep

[beanbear6]

Hallo zusammen,
wer kennt sich denn noch mit dem Quickreport von D7 aus? Ich hab da ein altes Projekt und muss da ein Rechnungsformular einbauen. Das Problem: Wie krieg ich da einen Übertrag mit den jeweiligen auf der Seite aufgeführten Summen hin? Ich denke da muss irgendwie ein geeignetes QRBand rein - aber wie? Ich weis nicht wie ich das bewerkstelligen soll, aber das müsste doch irgendwie gehen.. Hat da jemand einen Tip? Vielen Dank gleich für Eure Hilfe.
Gruß Beanbear

[Andreas Schilling]

Ich habe gerade eine Delphi5 Projekt am Anpassen mit Quickreport drinnen. Da habe ich eine Fußzeile und eine Kopfzeile drinnen für die Summen. Gesetzt werden die darauf liegenden Labels für die Summen im Detailband.AfterPrint-Ereignis. Die Summenwerte dazu werden in einer Globalen Variablen gesammelt. Heute würde ich das wahrscheinlich anders machen, aber vor 15 Jahren habe ich das so programmiert.

Gruß Andreas

[bcvs]

Ich benutze den Quickreport auch noch.

Nimm einfach ein TQRBand, mit BandType rbPageHeader (Falls du so was nicht eh schon hast) Da die entsprechenden TQrLabels rein, die dann im OnBeforPrint des QrBands befüllt werden.

[beanbear6]

Hi,
da ist mir klar, aber wie krieg ich das hin, dass der das Band erst ab der zweiten seite zeigt... bzw. auf der ersten Seite nicht... Mit Visible.false will der das irgendwie nicht machen - ich seh das Band trotzdem. Hab das mit If Rep1.Rechnung.PageNumber > 1 then QRBand.Visible=True else ...false. Aber das funktioniert nicht...
Gruß Reiner

[Andreas Schilling]

Delphi-Quellcode:

procedure TQR_RechnungForm.PageHeaderBand1BeforePrint(
  Sender: TQRCustomBand; var PrintBand: Boolean);
begin
  PrintBand := (QR_RechnungReport.PageNumber > 1);
end;