lcl: change TSpitter to respect other control constrains (issue #0013905 by Martin)

git-svn-id: trunk@20473 -
This commit is contained in:
paul 2009-06-06 15:16:25 +00:00
parent 2544382402
commit ad154a3de0

View File

@ -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);