Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.08;
Скачать: [xml.tar.bz2];




Вниз

Событие OnClick для меню 


Shark2001   (2002-03-27 09:54) [0]

В процессе выполнения программы в меню должны добавлятся пункты меню (примерно 30). Как сделать чтобы для всех этих пунктов был один и тотже код, но чтобы можно было определить, какой именно пункт меню был выбран ?
Помогите пожалуйста.



DieHard   (2002-03-27 09:58) [1]

Установи свойство Tag у каждого пункта меню со своим значением и в общем обработчике его проверяй



Shark2001   (2002-03-27 10:10) [2]

Дело в том что в общем обработчике Tag проверить нельзя т.к. Он имеет единственный входящий параметр Sender:TObject, который не имеет Tag



gek   (2002-03-27 10:13) [3]

If (Sender as TMenuItem).Tag = 1 then



Adder   (2002-03-27 10:17) [4]

(Sender as TMenuItem).Tag



kull   (2002-03-27 10:56) [5]

А еще у пунктов меню есть свои индексы.



Shark2001   (2002-03-27 10:57) [6]

Спасибо !!!



Shark2001   (2002-03-27 10:59) [7]

Kull с индексами тоже не получается т.к. пункты меню добавляются в разном порядке.
Мне подходит вариант Adder и gek




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.08;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.016 c
14-22804          Song                  2002-02-26 17:51  2002.04.08  
Скажите за что зацепиться. Нужно узнать выключен ли монитор.


1-22744           Yuraz                 2002-03-27 08:20  2002.04.08  
Мастера, помогите с написанием функции удаления лишних пробелов в строке,


1-22655           DikobraZ              2002-03-26 12:00  2002.04.08  
User32.dll:SetLayeredWindowAttributes.


1-22737           snoup                 2002-03-26 13:45  2002.04.08  
Как сделать например мне нужно что бы я пороботал в программе изменил там что то


14-22787          JustMan               2002-02-24 16:55  2002.04.08  
Люди, нужна помощь!