Einzelnen Beitrag anzeigen

Satyr

Registriert seit: 8. Feb 2012
Ort: Essen
305 Beiträge
 
Delphi 10.4 Sydney
 
#1

Ein MenüItem in mehrere PopUp Menüs adden

  Alt 15. Apr 2013, 18:13
Hallo,

ich habe ca. 8 PopUp Menüs die ich teilweise dynamisch fülle und dynamisch entscheide welches genommen wird.
Soweit kein Problem. Aber alle 8 bekommen jetzt einen Untermenü mit Einträgen aus einer DB. Alle 8 quasi das Gleiche.
Deshalb dachte ich mir ich kann es mir einfach machen und die Daten einmal auslesen und allen Menüs zuweisen.
Also in etwa so etwas:

Delphi-Quellcode:
Item:= TMenuItem.Create(Self);
Item.Caption := 'Test';

Menu1.Add(Item);
Menu2.Add(Item);
Geht natürlich nicht, Menu2 wird nicht gefüllt. Irgendwie logisch, Item ist ja schon in Verwendung.
Allerdings, kann ich es - mit dem selben Namen - erneut creieren und dann an Menu2 hängen.

Wie mache ich das aber automatisch, so das ich nicht für jedes Menü das Gleiche per Hand schreiben muss?

Gruß,
Andreas
  Mit Zitat antworten Zitat