From 90eb7065e9f49d476abc3791daef7086fd776c8d Mon Sep 17 00:00:00 2001
From: jesusr <jesusr@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Tue, 28 Feb 2017 03:59:25 +0000
Subject: [PATCH] PowerPDF: remove unexpected frame from RRect

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5770 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/powerpdf/PReport.pas | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/components/powerpdf/PReport.pas b/components/powerpdf/PReport.pas
index 45a4d451d..6f7304941 100644
--- a/components/powerpdf/PReport.pas
+++ b/components/powerpdf/PReport.pas
@@ -2380,7 +2380,14 @@ begin
     end;
 
     if self.GradientColor<>clNone then
-      ACanvas.PdfCanvas.ClosepathFillStroke
+    begin
+      if (LineColor = clNone) or (LineStyle = psClear) then
+      begin
+        ACanvas.PdfCanvas.Closepath;
+        ACanvas.PdfCanvas.Fill;
+      end else
+        ACanvas.PdfCanvas.ClosepathFillStroke
+    end
     else
       StdFillOrStroke(ACanvas.PDFCanvas);
   end;