diff --git a/lcl/interfaces/cocoa/cocoaint.pas b/lcl/interfaces/cocoa/cocoaint.pas index 9729821b36..df0a6d6a11 100644 --- a/lcl/interfaces/cocoa/cocoaint.pas +++ b/lcl/interfaces/cocoa/cocoaint.pas @@ -680,6 +680,10 @@ begin PrevMenu.retain; PrevLCLMenu := CurLCLMenu; + + if (lNSMenu.isKindOfClass(TCocoaMenu)) then + TCocoaMenu(lNSMenu).attachAppleMenu(); + NSApp.setMainMenu(lNSMenu); CurLCLMenu := ALCLMenu; diff --git a/lcl/interfaces/cocoa/cocoawsforms.pas b/lcl/interfaces/cocoa/cocoawsforms.pas index d9abd6a166..b1de3d3bca 100644 --- a/lcl/interfaces/cocoa/cocoawsforms.pas +++ b/lcl/interfaces/cocoa/cocoawsforms.pas @@ -367,7 +367,6 @@ begin if NSObject(ACustForm.Menu.Handle).isKindOfClass_(TCocoaMenu) then begin CocoaWidgetSet.SetMainMenu(ACustForm.Menu.Handle, ACustForm.Menu); - TCocoaMenu(ACustForm.Menu.Handle).attachAppleMenu(); end else debugln('Warning: Menu does not have a valid handle.');