Mit der
Unit im Anhang ist es möglich,
bestehende Menuzweige zu kopieren.
Es ist dabei gleichgültig, ob mit
TMainMenu oder
TPopupMenu gearbeitet wird.
Beispiel:
Delphi-Quellcode:
// kopiert das Popup-Menue unter einen leeren Menuezweig im Hauptmenue
procedure TForm1.Button1Click(Sender: TObject);
begin
CopyMenuItems(PopupMenu1.Items, Utilities1);
end;
Man sollte es mit dem Kopieren von Menues aber nicht übertreiben, sondern normalerweise mit ActionLists arbeiten.