diff --git a/components/lazreport/source/addons/pdfexport/lazreportpdfexport.lpk b/components/lazreport/source/addons/pdfexport/lazreportpdfexport.lpk
index 93b35777b9..63efd854a4 100644
--- a/components/lazreport/source/addons/pdfexport/lazreportpdfexport.lpk
+++ b/components/lazreport/source/addons/pdfexport/lazreportpdfexport.lpk
@@ -43,7 +43,7 @@
       </Item2>
       <Item3>
         <PackageName Value="pack_powerpdf"/>
-        <MinVersion Minor="9" Release="3" Valid="True"/>
+        <MinVersion Minor="9" Release="3" Build="1" Valid="True"/>
       </Item3>
       <Item4>
         <PackageName Value="lazreport"/>
diff --git a/components/lazreport/source/addons/pdfexport/lr_e_pdf.pas b/components/lazreport/source/addons/pdfexport/lr_e_pdf.pas
index d3ff4a4afd..d9b7d267ab 100644
--- a/components/lazreport/source/addons/pdfexport/lr_e_pdf.pas
+++ b/components/lazreport/source/addons/pdfexport/lr_e_pdf.pas
@@ -238,9 +238,6 @@ end;
 
 procedure TfrTNPDFExportFilter.ShowShape(View: TfrShapeView; x, y, h, w: integer
   );
-var
-  Canvas: TPDFCanvas;
-  PRRect: TPRRect;
 
   function CreateShape(ShapeClass: TPRShapeClass): TPRShape;
   begin
@@ -257,7 +254,6 @@ var
   end;
 
 begin
-  Canvas := PDF.GetPdfDoc.Canvas;
   case View.ShapeType of
     frstRectangle:
       CreateShape(TPRRect);
@@ -265,6 +261,11 @@ begin
     frstEllipse:
       CreateShape(TPREllipse);
 
+    frstRoundRect:
+      with TPRRect(CreateShape(TPRRect)) do begin
+        Radius := -1.0;
+      end;
+
     frstTriangle:
       with TPRPolygon(CreateShape(TPRPolygon)) do begin
         SetLength(Points, 3);
@@ -310,9 +311,6 @@ begin
           ShowBarCode(TfrBarCodeView(View), nx, ny, ndy, ndx)
       else if View is TfrPictureView then
           ShowPicture(TfrPictureView(View), nx, ny, ndy, ndx);
-          //   For debugging only
-          //    else if not View is  TfrMemoView then
-          //        MessageDlg(View.ClassName, mtWarning, [mbOK], 0);
 
       if (View.Frames<>[]) and not (View is TfrBarCodeView) then
          ShowFrame(View, nx, ny, ndy, ndx);