Скачать: CL | DM;

Одна процедура для всех пунктов TPopupMenu.   Найти похожие ветки 

← →
Slaga ©   (2004-10-09 17:46) [0]

У меня такой вопрос, есть TPopupMenu, у него есть 6 пунктов, я для них всех сделал одну процедуру, как мне внутри этой процедуры узнать какой пункт меню я выбрал ?
Я это делаю так:

ID := (Sender as TPopupMenu).Items.MenuIndex;

Но оно ругается что инвалид тайп класс.

---

← →
Семен Сорокин ©   (2004-10-09 17:47) [1]

Sender as TMenuItem

---

← →
Slaga ©   (2004-10-09 18:00) [2]

А можно полностью кусочек кода который покажет мне индекс нажатого пункта меню !?

---

← →
Семен Сорокин ©   (2004-10-09 18:02) [3]

выстави у каждого пункта меню свой Tag - и его используй.

TMenuItem(Sender).Tag

---

← →
Slaga ©   (2004-10-09 18:03) [4]

Не, вот это класно работает: (Sender as TMenuItem).MenuIndex;
Спасибо.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.05 c