diff --git a/components/fpreport/design/frmfpreportdesignermain.pp b/components/fpreport/design/frmfpreportdesignermain.pp
index 287a03265a..004fa4e739 100644
--- a/components/fpreport/design/frmfpreportdesignermain.pp
+++ b/components/fpreport/design/frmfpreportdesignermain.pp
@@ -1125,10 +1125,15 @@ Var
 begin
   if not ValidateReport then
     exit;
-  FReport.RunReport;
-  F:=TFPreportPreviewExport.Create(Self);
-  FReport.RenderReport(F);
-  FReport.ClearPreparedReport;
+  FReportDesignData.StartRender;
+  try
+    FReport.RunReport;
+    F:=TFPreportPreviewExport.Create(Self);
+    FReport.RenderReport(F);
+    FReport.ClearPreparedReport;
+  finally
+    FReportDesignData.EndRender;
+  end;
 end;
 
 procedure TFPReportDesignerForm.APreviewUpdate(Sender: TObject);