![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Событие OnClick для меню [D6, WinXP]
Shark2001 © (2002-03-27 09:54:00)В процессе выполнения программы в меню должны добавлятся пункты меню (примерно 30). Как сделать чтобы для всех этих пунктов был один и тотже код, но чтобы можно было определить, какой именно пункт меню был выбран ?
Помогите пожалуйста.
Shark2001 (2002-03-27 10:59:00) [1]Kull с индексами тоже не получается т.к. пункты меню добавляются в разном порядке.
Мне подходит вариант Adder и gek
Shark2001 (2002-03-27 10:57:00) [2]Спасибо !!!
kull (2002-03-27 10:56:00) [3]А еще у пунктов меню есть свои индексы.
Adder (2002-03-27 10:17:00) [4](Sender as TMenuItem).Tag
gek (2002-03-27 10:13:00) [5]If (Sender as TMenuItem).Tag = 1 then
Shark2001 (2002-03-27 10:10:00) [6]Дело в том что в общем обработчике Tag проверить нельзя т.к. Он имеет единственный входящий параметр Sender:TObject, который не имеет Tag
DieHard (2002-03-27 09:58:00) [7]Установи свойство Tag у каждого пункта меню со своим значением и в общем обработчике его проверяй