MacOS Menüeinträge

[CHackbart]

Eine Kleinigkeit habe ich hier noch. Aus unerklärlichen Gründen geht unter Delphi Berlin der Spotlightmenu Eintrag nicht.
Abhilfe schafft folgender Code in
procedure TPlatformCocoa.CreateOSMenu(AForm: TCommonCustomForm; const AMenu: IItemsContainer);

Delphi-Quellcode:

if J = VisibleItemCount - 1 then
                begin
                  LNewMenu := NewNSMenu(SSpotlightFeature);
                  TNSApplication.Wrap(TNSApplication.OCClass.sharedApplication).
                    setHelpMenu(LNewMenu); //+++
                end
                else
                  LNewMenu := NewNSMenu('');

Christian