Zitat von
freejay:
Da ich mir nun nicht extra merken wollte, welche Funktion denn nun auf welchem MenuItem liegt (diese Info brauche ich zum dynamischen Ein- und Ausschalten von Einträgen), wollte ich dafür einfach die verknüpfte Prozedur heranziehen. Scheint aber wohl nicht so einfach zu sein.
Dann muss ich mir halt den Index der jeweiligen Funktion umständlich merken. Umständlich, weil ich entweder für jeden Eintrag extra eine Variable eintragen muss oder - wenn ich ein Array nehme - ich mir wieder extra merken muss, welcher ArrayIndex welcher Funktion entspricht. Da steht dann im Code:
Delphi-Quellcode:
for i := 0 to PopupMenu1.Items.Count - 1 do
if i = myArray[3] then ... // [3] ist seeehr sprechend...
Sollte es eine einfachere Lösung geben zu einem bestehenden (Popup-) Menü Default-Funktionen hinzuzufügen bin ich ganz Ohr
Du scheinst einen festen Satz von Funktionen zu haben. Dann würde ich pro (potentiell) erzeugtem MenuItem eine Variable reservieren. Dann kannst du doch nachher viel besser damit arbeiten. Kein Suchschleifen und so, einfach
Delphi-Quellcode:
if not Frobbering then
FFrobberItem.Visible := False;
oder so.