diff --git a/lcl/controls.pp b/lcl/controls.pp index 3f28eb4af6..713cc93ce1 100644 --- a/lcl/controls.pp +++ b/lcl/controls.pp @@ -1238,7 +1238,7 @@ type property AutoSizing: Boolean read FAutoSizingSelf;// see Begin/EndAutoSizing property AutoSizingAll: Boolean read GetAutoSizingAll;// set in DoAllAutoSize - property AutoSizingLockCount: Integer read FAutoSizingLockCount; + property AutoSizingLockCount: Integer read FAutoSizingLockCount; // in/decreased by Disable/EnableAutoSizing protected // protected messages procedure WMCancelMode(var Message: TLMessage); message LM_CANCELMODE; diff --git a/lcl/include/control.inc b/lcl/include/control.inc index 896ef8db0f..a7bf43feb0 100644 --- a/lcl/include/control.inc +++ b/lcl/include/control.inc @@ -2863,7 +2863,9 @@ procedure TControl.DoAllAutoSize; begin AWinControl := TWinControl(AControl); for i := 0 to AWinControl.ControlCount - 1 do - if AWinControl.Controls[i].IsControlVisible and not CallAllOnResize(AWinControl.Controls[i]) then Exit; + if AWinControl.Controls[i].IsControlVisible + and not CallAllOnResize(AWinControl.Controls[i]) then + exit; end; {$IFDEF VerboseOnResize} debugln(['TControl.DoAllAutoSize ',DbgSName(AControl),' calling Resize ...']);