From 90f3071c4f394b36b5b11fa4206ca6dc1aca750a Mon Sep 17 00:00:00 2001 From: juha Date: Fri, 17 Apr 2020 07:26:18 +0000 Subject: [PATCH] LCL: Don't make unnecessary calls to ButtonPanel.UpdateSizes. Issue #25580. git-svn-id: trunk@63003 - --- lcl/buttonpanel.pas | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/lcl/buttonpanel.pas b/lcl/buttonpanel.pas index 15aaf0dd90..542f582820 100644 --- a/lcl/buttonpanel.pas +++ b/lcl/buttonpanel.pas @@ -487,8 +487,8 @@ procedure TCustomButtonPanel.Notification(AComponent: TComponent; var btn: TPanelButton; begin - if Operation=opRemove - then begin + if Operation=opRemove then + begin for btn := Low(btn) to High(btn) do begin if FButtons[btn] <> AComponent then Continue; @@ -497,7 +497,8 @@ begin end; end; inherited Notification(AComponent, Operation); - UpdateSizes; + if AComponent is TPanelBitBtn then + UpdateSizes; end; constructor TCustomButtonPanel.Create(AOwner: TComponent);