Einzelnen Beitrag anzeigen

Nicolai1234

Registriert seit: 21. Feb 2004
1.008 Beiträge
 
Turbo Delphi für Win32
 
#1

Popoupmenu zur Laufzeit erstellen

  Alt 4. Apr 2005, 20:13
Hallo,
ich erstelle so ein Popupmenu zur Laufzeit (bzw. die Inhalte des Menüs)
Delphi-Quellcode:
tmi := tmenuitem.Create(self);
[..]
tmi.Caption := listbox1.Items[i];
popupmenu1.Items.Add(tmi);
Das Funktioniert auch alles recht gut, allerdings möchte ich es jetzt so machen, dass beim KLICK auf die einzelnen Menüpunkte immer EINE procedure aufgerufen wird.

Diese Prozedur sieht wie folgt aus:
procedure oeffnen(s:string); Der String der der Prozedur übermittelt wird, soll gleichzeitig das (oder die?) Caption des Menüpunktes sein.

Also: Wie kann ich beim erstellen der Menüpunkte klarmachen, dass er immer diese Prozedur mit dem entsprechenen String aufrufen soll?

Ich hoffe ihr versteht was ich meine.
Vielen Dank im voraus
  Mit Zitat antworten Zitat