From d80c75d65981ac42fed6afe58719edaf15302257 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Fri, 18 Apr 2008 19:13:00 +0000
Subject: [PATCH] IDE: when component is deleted, mark referring designers
 modified

git-svn-id: trunk@14882 -
---
 ide/main.pp    | 7 ++++++-
 ide/project.pp | 1 -
 2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/ide/main.pp b/ide/main.pp
index d02d2c0418..0307f7adce 100644
--- a/ide/main.pp
+++ b/ide/main.pp
@@ -11064,6 +11064,10 @@ begin
     RaiseException('[TMainIDE.OnPropHookPersistentDeleting] Error: form without source');
   end;
   if APersistent is TComponent then begin
+    // mark references modified
+    if APersistent is TComponent then
+      MarkUnitsModifiedUsingSubComponent(TComponent(APersistent));
+    
     // remember cursor position
     SourceNotebook.AddJumpPointClicked(Self);
 
@@ -12846,6 +12850,8 @@ begin
 
     // rename inherited components
     RenameInheritedComponents(ActiveUnitInfo,false);
+    // mark references modified
+    MarkUnitsModifiedUsingSubComponent(AComponent);
 
     // rename methods
     RenameMethods;
@@ -13622,7 +13628,6 @@ begin
   if (AComponent.Owner=nil) then
     FormEditor1.UpdateDesignerFormName(AComponent);
   ObjectInspector1.FillPersistentComboBox;
-  MarkUnitsModifiedUsingSubComponent(AComponent);
 end;
 
 {-------------------------------------------------------------------------------
diff --git a/ide/project.pp b/ide/project.pp
index 8624ad61e6..f4f794f412 100644
--- a/ide/project.pp
+++ b/ide/project.pp
@@ -1,4 +1,3 @@
-{  $Id$  }
 {
  /***************************************************************************
                   project.pp  -  project utility class file