diff --git a/components/fpreport/design/frmfpreportdesignermain.pp b/components/fpreport/design/frmfpreportdesignermain.pp
index 0454c1cee2..1a8a55c3da 100644
--- a/components/fpreport/design/frmfpreportdesignermain.pp
+++ b/components/fpreport/design/frmfpreportdesignermain.pp
@@ -922,6 +922,8 @@ end;
 
 function TFPReportDesignerForm.SaveReport: Boolean;
 begin
+  if Assigned(FReport) and FReport.Prepared then
+    FReport.ClearPreparedReport;
   Result:=Assigned(OnSaveReport);
   if result then
     OnSaveReport(Self)