diff --git a/components/lazreport/source/addons/cairoexport/lr_e_cairo.pas b/components/lazreport/source/addons/cairoexport/lr_e_cairo.pas
index 5329ca3613..816467451a 100644
--- a/components/lazreport/source/addons/cairoexport/lr_e_cairo.pas
+++ b/components/lazreport/source/addons/cairoexport/lr_e_cairo.pas
@@ -80,6 +80,18 @@ type
     property Backend: TlrCairoBackend read fBackend write fBackend;
   end;
 
+  { TlrCairoPDFExportFilter }
+
+  TlrCairoPDFExportFilter = class(TlrCairoExportFilter)
+    constructor Create(AStream: TStream); override;
+  end;
+
+  { TlrCairoPSExportFilter }
+
+  TlrCairoPSExportFilter = class(TlrCairoExportFilter)
+    constructor Create(AStream: TStream); override;
+  end;
+
 implementation
 uses LR_Utils;
 
@@ -99,6 +111,22 @@ begin
   result := trunc(value + 0.5);
 end;
 
+{ TlrCairoPSExportFilter }
+
+constructor TlrCairoPSExportFilter.Create(AStream: TStream);
+begin
+  inherited Create(AStream);
+  Backend := cePS;
+end;
+
+{ TlrCairoPDFExportFilter }
+
+constructor TlrCairoPDFExportFilter.Create(AStream: TStream);
+begin
+  inherited Create(AStream);
+  Backend := cePDF;
+end;
+
 { TlrCairoExportFilter }
 
 procedure TlrCairoExportFilter.AddShape(Data: TShapeData; x, y, h, w: integer);
@@ -848,7 +876,7 @@ begin
 end;
 
 initialization
-    frRegisterExportFilter(TlrCairoExportFilter, 'Cairo PDF (*.pdf)', '*.pdf');
-    frRegisterExportFilter(TlrCairoExportFilter, 'Cairo Postscript (*.ps)', '*.ps');
+    frRegisterExportFilter(TlrCairoPDFExportFilter, 'Cairo PDF (*.pdf)', '*.pdf');
+    frRegisterExportFilter(TlrCairoPSExportFilter, 'Cairo Postscript (*.ps)', '*.ps');
 
 end.