diff --git a/components/lazreport/source/addons/pdfexport/lr_e_pdf.pas b/components/lazreport/source/addons/pdfexport/lr_e_pdf.pas
index dfe33806a8..4f810be0af 100644
--- a/components/lazreport/source/addons/pdfexport/lr_e_pdf.pas
+++ b/components/lazreport/source/addons/pdfexport/lr_e_pdf.pas
@@ -420,9 +420,9 @@ begin
     else
       Data.FillColor := ColorToRGB(View.FillColor);
     if View.Frames=[] then
-      Data.FrameColor := Data.FillColor
+      Data.FrameColor := clNone
     else
-      Data.FrameColor := ColorToRGB(View.FrameColor);
+      Data.FrameColor := View.FrameColor;
     Data.FrameWidth := View.FrameWidth;
     Data.FrameStyle := View.FrameStyle;
     AddShape(Data, x, y, h - SWidth, w - SWidth);