diff --git a/components/spktoolbar/SpkPopupMenu/spkpopup.pas b/components/spktoolbar/SpkPopupMenu/spkpopup.pas index c182908bb..1c370efcc 100644 --- a/components/spktoolbar/SpkPopupMenu/spkpopup.pas +++ b/components/spktoolbar/SpkPopupMenu/spkpopup.pas @@ -196,8 +196,8 @@ procedure TSpkPopupMenu.SetAppearance(AValue: TSpkToolbarAppearance); var i: Integer; begin - if FAppearance = AValue then - exit; +// if FAppearance = AValue then +// exit; FAppearance := AValue; OwnerDraw := FAppearance <> nil; OnDrawItem := @DrawItemHandler; diff --git a/components/spktoolbar/SpkToolbar/spkt_Buttons.pas b/components/spktoolbar/SpkToolbar/spkt_Buttons.pas index 2ba348bba..da36ebe66 100644 --- a/components/spktoolbar/SpkToolbar/spkt_Buttons.pas +++ b/components/spktoolbar/SpkToolbar/spkt_Buttons.pas @@ -995,6 +995,9 @@ end; procedure TSpkLargeButton.CalcRects; begin + if (FDropdownMenu is TSpkPopupMenu) then + TSpkPopupMenu(FDropdownMenu).Appearance := FAppearance; + {$IFDEF EnhancedRecordSupport} if FButtonKind = bkButtonDropdown then begin