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;