Dynamisch erstelltes PopUpMenu Unter- Untereinträge hinzufügen / löschen

[Metschu]

Hallo zusammen!

Ich stehe irgendwie auf dem Schlauch. Ich versuche bei einem Dynamisch erstelltem PopUpMenu die Unter- Untereinträge hinzuzufügen oder zu löschen.
Die Untereinträge erstelle ich wie folgt:

PopupMenu.Items.Items[popUpMenu.Items.IndexOf(Menu1)].Add(NewItem('Untermenu1',0,False,True,Aktion,0,'');

Über PopUp.items.FindItem('Untermenu1') sollte ich ja den Index des eben erstellten Untermenüs finden, nur bekomme ich da immer "-1" zurück.

Ich schätze mal das das Unter-Untermenü nach folgendem Schema erstellt werden muss:

PopUpMenu.items.items[Itemindex von Menu1].items[Itemindex von Untermenu1].Add(...)

Kann mir einer mal nen Tip geben, wie ich da weiter komme?

Vielen Dank schonmal!