Yo lo hago de la siguiente forma:
Código Delphi
[-]
uses
QRPDFFilt;
FImprimir := TFImprimir.Create(NIL); try
PDFExport := TQRPDFDocumentFilter.Create(RutaAlPdf);
try
FImprimir.Rep.ExportToFilter(PDFExport);
finally
PDFExport.Free;
end;
finally
FImprimir.Free;
end;