Popupcomponent funktioniert nur teilweise

lkz633 · Verfasst: So 03.11.02 13:38

Hi,

ich versuche folgenden code auszuführen:

Quelltext

1:	tpanel(findcomponent('Panels'+inttostr(tspeedbutton(tpopupmenu(tmenuitem(sender).GetParentMenu).PopupComponent).tag))).caption:= tmenuitem(sender).Caption;

Das klappt auch wunderbar, wenn autopopup auf true ist, und ich so dass popupmenu öffne. Falls ich es aber per popupmenu.popup öffne, funktioniert dieser code nicht mehr. Tspeedbutton.popupmenu ist aber das popupmenu zugeordnet.

Wie kann ich es dann machen, dass es genauso funktioniert ?

Herzlichen Dank und Gruss
lkz633

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme