![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Одна процедура для всех пунктов TPopupMenu. [D7, WinXP]
Slaga © (2004-10-09 17:46:00)У меня такой вопрос, есть TPopupMenu, у него есть 6 пунктов, я для них всех сделал одну процедуру, как мне внутри этой процедуры узнать какой пункт меню я выбрал ?
Я это делаю так:
ID := (Sender as TPopupMenu).Items.MenuIndex;
Но оно ругается что инвалид тайп класс.
Slaga (2004-10-09 18:03:00) [1]Не, вот это класно работает: (Sender as TMenuItem).MenuIndex;
Спасибо.
Семен Сорокин (2004-10-09 18:02:00) [2]выстави у каждого пункта меню свой Tag - и его используй.
TMenuItem(Sender).Tag
Slaga (2004-10-09 18:00:00) [3]А можно полностью кусочек кода который покажет мне индекс нажатого пункта меню !?
Семен Сорокин (2004-10-09 17:47:00) [4]Sender as TMenuItem