paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-29 09:30:37 +02:00
Code Issues Packages Projects Releases Wiki Activity

Cocoa/Menu: fix the crash when insert a hidden separator after a visible MenuItem, introduced by e762d9b, see also #41028

Browse Source
This commit is contained in:
rich2014 2024-09-09 16:07:54 +08:00
parent aa2b041e48
commit fd73e63c77
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lcl/interfaces/cocoa/cocoawsmenus.pas
View File

@ -219,7 +219,9 @@ begin
MenuObj := NSObject(AMenuItem.Handle);
if MenuObj.isKindOfClass(NSMenuItem) then begin
item := NSMenuItem(MenuObj);
Parent.insertItem_atIndex(NSMenuItem(item), idx)
if idx > Parent.numberOfItems then
idx:= Parent.numberOfItems;
Parent.insertItem_atIndex(NSMenuItem(item), idx);
end
else if MenuObj.isKindOfClass(NSMenu) then
begin