FIX: the issue of Services SubMenu in Context Popup Menu #2217

This commit is contained in:
rich2014 2026-03-27 23:35:19 +08:00 committed by Alexander Koblov
commit bd9859dbff

View file

@ -259,10 +259,9 @@ begin
servicesItem:= menu.Items.Find(serviceSubMenuCaption);
if servicesItem<>nil then
begin
subMenu:= TCocoaMenu.alloc.initWithTitle(NSString.string_);
subMenu:= NSApp.servicesMenu.copy;
TCocoaMenuItem(servicesItem.Handle).setSubmenu( subMenu );
subMenu.release;
NSApp.setServicesMenu( NSMenu(servicesItem.Handle) );
end;
end;