ich versuche gerade ein Package zu erstellen welches im Project Menü einen neuen Menüeintrag mit zwei Submenüs einrichtet.
Mit folgendem Code
Code: Alles auswählen
procedure Register;
var
IDEProjectAppImageSection: TIDEMenuSection;
IDEProjectAppImageMenu: TIDEMenuSection;
begin
IDEProjectAppImageSection := RegisterIDEMenuSection(itmProjectSaveSection, 'Linux AppImage');
IDEProjectAppImageMenu := RegisterIDESubMenu(IDEProjectAppImageSection, 'itmProjectLinuxAppimage', 'Linux AppImage');
RegisterIDEMenuCommand(IDEProjectAppImageMenu, 'itmProjectAppimageCreate', 'Create ...', nil, @OpenAppImageCreate);
RegisterIDEMenuCommand(IDEProjectAppImageMenu, 'itmProjectAppimageSettings', 'Settings', nil, @OpenAppImageSettings);
end;
Ich hätte aber gerne einen einfachen Menüeintrag mit den 2 Submenüs.
Code: Alles auswählen
procedure Register;
begin
RegisterIDEMenuCommand(itmProjectSaveSection, 'itmProjectLinuxAppimage', 'Linux AppImage', nil, nil);
end;
Würde mich über Hilfe sehr freuen.
Grüße
HobbyProgrammer