Hallo Mada,
zunächst möchte ich dich hier im Forum herzlich willkommen heißen.
Nun zu deiner Frage:
Ich würde im PRIVAT Bereich des Reports eine Variable ZWSumme einfügen (z.B. vom Typ Integer oder Float, was immer du brauchst)
Delphi-Quellcode:
{ Nach dem Drucken des Detailbandes den Wert des Feldes,
das summiert werden soll, hinzuzählen }
procedure TForm3.DetailBand1AfterPrint(Sender: TQRCustomBand;
BandPrinted: Boolean);
begin
ZWSumme := ZWSumme +Table1Pause.AsInteger;
end;
{ Nach Drucken des Gruppenkopfes, Wert neu initialisieren }
procedure TForm3.QRGroup1AfterPrint(Sender: TQRCustomBand;
BandPrinted: Boolean);
begin
ZWSumme := 0;
end;
{ Im GroupFooter ein Label anlegen und die Zwischensumme in der
OnPrint Methode wie folgt zuweisen }
procedure TForm3.QRLabel2Print(sender: TObject; var Value: String);
begin
Value := IntToStr(ZWSumme);
end;