Zitat von
Windwalker:
Aha, dann könnte ich z.B. alle Werte in eine StringList schreiben und dann jeweils im AfterPrint überprüfen, ob der Eintrag schon in der Liste ist.
Falls nicht, in die Liste einfügen und Anzahl2 erhöhen.
Richtig so?
Wie lese ich die Variablen dann mit QuickReport aus?
Ja, z.B. mit einer Stringliste.
Die Werte der Variablen kannst Du einem QRLabel zuweisen. Z. B.
Delphi-Quellcode:
procedure TFrm.QRLabel13Print(sender: TObject; var Value: String);
begin
Value := IntToStr(Anzahl1);
end;