From 3fa752211086b6800dcbb06c76d9be5a29d71fbd Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Mon, 14 Jun 2010 15:15:56 +0000
Subject: [PATCH] IDE: apply window settings again after form was destroyed

git-svn-id: trunk@26114 -
---
 ide/ideoptiondefs.pas | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/ide/ideoptiondefs.pas b/ide/ideoptiondefs.pas
index 1315195548..cedcee1be6 100644
--- a/ide/ideoptiondefs.pas
+++ b/ide/ideoptiondefs.pas
@@ -447,8 +447,10 @@ procedure TSimpleWindowLayout.Notification(AComponent: TComponent;
 begin
   inherited Notification(AComponent, Operation);
   if Operation=opRemove then begin
-    if fForm=AComponent then
+    if fForm=AComponent then begin
       fForm:=nil;
+      Applied:=false;
+    end;
   end;
 end;
 
@@ -513,6 +515,7 @@ begin
     fFormID := Form.Name;
     FFormCaption := Form.Caption;
     FreeNotification(Form);
+    Applied:=false;
   end;
 end;
 
@@ -746,7 +749,7 @@ begin
       ALayout.Form:=AForm;
       if ALayout.Applied then exit;
       ALayout.Applied:=true;
-      debugln(['TSimpleWindowLayoutList.ApplyAndShow restore']);
+      debugln(['TSimpleWindowLayoutList.ApplyAndShow restore ',ALayout.FormID]);
 
       WindowType:=NonModalIDEFormIDToEnum(ALayout.FormID);
       SubIndex := -1;