Einzelnen Beitrag anzeigen

BerndS

Registriert seit: 8. Mär 2006
Ort: Jüterbog
491 Beiträge
 
Delphi 12 Athens
 
#2

AW: Quickreport TQrShape in TQrChildBand kopieren

  Alt 27. Feb 2020, 08:28
Hallo
möglicher Weise hilft es, wenn bei den Controls QRPrinter vom Report gesetzt wird.
Wir machen das so.
Allerdings haben wir die Quellen gekauft und direkt die Methode function TQRCustomBand.AddPrintable entsprechend angepasst.
Die Controls werden dann direkt mit Band.AddPrintable(...) hinzugefügt.

Hier die Anpassung in der QuickRpt.pas:
Code:
function TQRCustomBand.AddPrintable(PrintableClass : TQRNewComponentClass) : TQRPrintable;
var
...
begin
  ...
  if Assigned(FParentReport) then
     aPrintable.FQRPrinter := FParentReport.QRPrinter;
end;
  Mit Zitat antworten Zitat