Ich weise (nach bestimmten nicht weiter wichtigen Kriterien) dem OnClick-Event von MenuItems verschiedene Prozeduren zu, z.B.:
Delphi-Quellcode:
PopupMenu1.Items[1].OnClick := Prozedur3;
PopupMenu1.Items[2].OnClick := Prozedur1;
PopupMenu1.Items[3].OnClick := Prozedur2;
Wie kann ich später im Code herausfinden, welchem MenuItem ich welche Prozedur zugewiesen habe?
So geht das jedenfalls nicht:
Delphi-Quellcode:
for i := 0 to PopupMenu1.Items.Count - 1 do
if PopupMenu1.Items[i].OnClick = Prozedur1 then
...
else if PopupMenu1.Items[i].OnClick = Prozedur2 then
...
else if PopupMenu1.Items[i].OnClick = Prozedur3 then
...
Wie mach ich's richtig? Oder geht das nur mit
RTTI oder sowas?