mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-03 13:20:13 +02:00
LCL/FlowPanel: Fix TFlowPanel.AutoSize calculation, excludes hidden controls now. Issue #40137, patch by Henner Drewes.
(cherry picked from commit 6cc8ef7446
)
This commit is contained in:
parent
75ee8b4c01
commit
cbedc5ddf0
@ -398,6 +398,8 @@ begin
|
||||
for I := 0 to ControlCount-1 do
|
||||
begin
|
||||
xControl := FControlList.Items[I].Control;
|
||||
if not xControl.Visible then
|
||||
Continue;
|
||||
if FFlowStyle in [fsLeftRightTopBottom, fsRightLeftTopBottom, fsLeftRightBottomTop, fsRightLeftBottomTop] then
|
||||
begin
|
||||
PreferredHeight := Max(PreferredHeight,
|
||||
|
Loading…
Reference in New Issue
Block a user