diff --git a/components/fpreport/design/frmfpreportdesignermain.pp b/components/fpreport/design/frmfpreportdesignermain.pp
index 0a635c5373..fa62a3e175 100644
--- a/components/fpreport/design/frmfpreportdesignermain.pp
+++ b/components/fpreport/design/frmfpreportdesignermain.pp
@@ -1121,6 +1121,7 @@ begin
     F.Data:=FReportDesignData.DataDefinitions;
     if F.ShowModal=mrOK then
       begin
+      FReportDesignData.RemoveFromReport(FReport);
       FReportDesignData.DataDefinitions:=F.Data;
       CreateReportDataSets(Nil);
       Modified:=True;