|
@@ -4043,6 +4043,7 @@ begin
|
|
Case StretchMode of
|
|
Case StretchMode of
|
|
smMaxHeight:
|
|
smMaxHeight:
|
|
begin
|
|
begin
|
|
|
|
+ RTLayout.Height := aDesiredHeight;
|
|
if Assigned(Parent) and Assigned(RTLayout) then
|
|
if Assigned(Parent) and Assigned(RTLayout) then
|
|
RTLayout.Height:=Parent.RTLayout.Height-RTLayout.Top;
|
|
RTLayout.Height:=Parent.RTLayout.Height-RTLayout.Top;
|
|
end;
|
|
end;
|