Menüeinträge im Popup

[cugar]

Hi,
hab auf meinem Formular 3 PopupMenüs, 1 Hauptpopup und 2 kleine. Das Hauptpopup soll sich zur Laufzeit (nur beim 1 aufruf) mit den kleinen füllen.

zB.
Im AdvPopupMenuRechAnschrift gibt es an der Position Punkt: 'Optionen', jetzt möchte ich aus dem AdvPopupOptionen seine Einträge hier als SubMenü reinkopieren.
Mit dem Befehl:
AdvPopupMenuRechAnschrift.Items[11].Add(AdvPopupOptionen.Items);
geht das auch, nur er macht mir ein Submenü zu viel (sehe Bild).
Wo liegt mein Fehler?

[cugar]

Habs fertig:

Delphi-Quellcode:

     for i1:=0 to AdvPopupOptionen.Items.Count-1 do begin
              NewItem := TMenuItem.Create(self);
              NewItem.Caption := AdvPopupOptionen.Items[i1].Caption;
              NewItem.OnClick := AdvPopupOptionen.Items[i1].OnClick;
              NewItem.ImageIndex := AdvPopupOptionen.Items[i1].ImageIndex;
              AdvPopupMenuRechAnschrift.Items[i].Add(NewItem);
     end;

Dachte es geht noch einfacher um die Einträge zu kopieren^^

[edit=mkinzler]Delphi-Tag eingefügt Mfg, mkinzler[/edit]

[mirage228]

Gabs da nicht die Eigenschaft LinkSubMenuItems oder so ähnlich?