From 41c8f0ba80a57987265eb692dae57903ec29bac9 Mon Sep 17 00:00:00 2001
From: paul <paul@lazarus-ide.org>
Date: Tue, 27 May 2008 07:35:07 +0000
Subject: [PATCH] lcl: don't show enlarge group box of docking dialog if no one
 child is visible

git-svn-id: trunk@15252 -
---
 lcl/ldockctrl.pas | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/lcl/ldockctrl.pas b/lcl/ldockctrl.pas
index 21d731b360..4b9b3c77ea 100644
--- a/lcl/ldockctrl.pas
+++ b/lcl/ldockctrl.pas
@@ -667,6 +667,11 @@ begin
     Dlg.EnlargeBottomSpeedButton.Visible:=
                           Manager.Manager.EnlargeControl(Control,akBottom,true);
 
+    Dlg.EnlargeGroupBox.Visible := Dlg.EnlargeLeftSpeedButton.Visible or 
+                                   Dlg.EnlargeTopSpeedButton.Visible or
+                                   Dlg.EnlargeRightSpeedButton.Visible or
+                                   Dlg.EnlargeBottomSpeedButton.Visible;
+
     if Dlg.ShowModal=mrOk then begin
       // dock or undock
       case Dlg.DlgResult of