From ad154a3de0dac8b040b828b07426e53f14079fac Mon Sep 17 00:00:00 2001
From: paul <paul@lazarus-ide.org>
Date: Sat, 6 Jun 2009 15:16:25 +0000
Subject: [PATCH] lcl: change TSpitter to respect other control constrains
 (issue #0013905 by Martin)

git-svn-id: trunk@20473 -
---
 lcl/include/customsplitter.inc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lcl/include/customsplitter.inc b/lcl/include/customsplitter.inc
index c005d4bb69..af618e63c3 100644
--- a/lcl/include/customsplitter.inc
+++ b/lcl/include/customsplitter.inc
@@ -349,7 +349,7 @@ begin
     if Assigned(CurOtherResizeControl)
     then EndSize := GetControlSize(CurResizeControl)
                   + GetControlSize(CurOtherResizeControl)
-                  - fMinSize
+                  - Max(fMinSize, GetControlConstraintsMinSize(CurOtherResizeControl))
     else begin
       VirtualOppositeControl := FindVirtualOppositeControl(Self);
       LastControl := FindLastControl(Self);