From daa7994b98fdcdee8cb89662eca141cccbbd0ae4 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Fri, 19 Jul 2013 09:39:06 +0000
Subject: [PATCH] IDE: center lost window: min size 70x70, set WindowState to
 wsNormal

git-svn-id: trunk@42138 -
---
 ide/mainbase.pas | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/ide/mainbase.pas b/ide/mainbase.pas
index 4e180a1675..ce757205ab 100644
--- a/ide/mainbase.pas
+++ b/ide/mainbase.pas
@@ -269,10 +269,11 @@ begin
           NewBounds.Top:=(r.Top+r.Bottom-Form.Height) div 2
         else
           NewBounds.Top:=r.Top+50;
-        NewBounds.Right:=NewBounds.Left+Max(200,Form.Width);
-        NewBounds.Bottom:=NewBounds.Top+Max(200,Form.Height);
+        NewBounds.Right:=NewBounds.Left+Max(70,Form.Width);
+        NewBounds.Bottom:=NewBounds.Top+Max(70,Form.Height);
         debugln(['TMainIDEBase.mnuCenterWindowItemClick New=',dbgs(NewBounds)]);
         Form.BoundsRect:=NewBounds;
+        Form.WindowState:=wsNormal;
       end;
       break;
     end;