Lazreport PDF-Export funktioniert nicht

[Weizenbaum]

Hallo zusammen,
ich habe folgendes Problem, wenn ich einen Report als PDF Expotieren will, kommt folgende Fehlermeldung
Error: Incompatible type for arg no. 1: Got "Class Of TfrTNPDFExport", expected "TfrExportFilterClass"

Hier noch der Quelltext dazu

Code: Alles auswählen

 
// Aktuelle Rechnung als Mail versenden
procedure TFormMainAboVerwaltung.BitBtnREMailVersandClick(Sender: TObject);
var
  sProgDir: string;
  frPdfExportFilter: TfrExportFilterClass;
  PDFExp: TfrTNPDFExport;
  ExportStream: TFileStream;
  aFileName: string;
begin
  if EMail = nil then
  begin
    EMail:= TEMail.Create;
    EMail.SetUserName(Stammdaten.GetEMail);
    EMail.SetPassword(Stammdaten.GetEMailHostPW);
    EMail.SetHost(Stammdaten.GetEMailHost);
    EMail.SetPort(StrToInt(Stammdaten.GetEMailPort));
  end;
  if Rechnung.GetDatei = '' then
  begin
    sProgDir:= ExtractFilePath(Application.ExeName);
    frReportRechnung.LoadFromFile(sProgDir + 'Rechnung.lrf');
    if frReportRechnung.PrepareReport = true then
    begin
     frReportRechnung.ExportTo(TfrTNPDFExport, sProgDir + 'blubb.pdf');
    end;
  end;
end;
 

[Weizenbaum]

Hab den Fehler gefunden.

Code: Alles auswählen

 
    if frReportRechnung.PrepareReport = true then
    begin
     frReportRechnung.ExportTo(TFrTNPDFExportFilter, sProgDir + 'blubb.pdf');
    end;