Einzelnen Beitrag anzeigen

BerndS

Registriert seit: 8. Mär 2006
Ort: Jüterbog
480 Beiträge
 
Delphi 11 Alexandria
 
#2

AW: Quickreport TQrShape in TQrChildBand kopieren

  Alt 27. Feb 2020, 07: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;
Bernd
  Mit Zitat antworten Zitat