QuickRep ExportToFilter

[pmoegenb]

Hallo hier ein Beispiel:

Delphi-Quellcode:

procedure TJAWVereineFrm.ToolButton4Click(Sender: TObject);
var
   PDFFilt: TQRPDFDocumentFilter;
begin
   PDFFilt := TQRPDFDocumentFilter.Create(HauptFrm.TempPfad+'\Jahresauswertung.PDF');
   PrtJAWVereineFrm.QuickRep1.ExportToFilter(PDFFilt);
end;