mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-18 04:49:43 +02:00
LCL/FlowPanel: Fix TFlowPanel.AutoSize calculation, excludes hidden controls now. Issue #40137, patch by Henner Drewes.
This commit is contained in:
parent
b61d4e63a1
commit
6cc8ef7446
@ -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