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




Вниз

Хочу сделать единый обработчик для MainMenu 


mik   (2002-04-16 10:24) [0]

Но проблема! Есть меню
N1 N2 N3
N5 N11
N7 N13
N9 N15
Обработчик: OnMenuClick(Sender:TObject);
if (Sender As TObject)=N1 then (* Действие выполняется*)
а вот if (Sender As TObject)=N5 - действие УЖЕ НЕ выполняется.
Вопрос: как заставить обработчик выполнять действия на N5, N7 и др. вложенных меню



Толик   (2002-04-16 10:32) [1]

в ObjectInspector"е для всех MenuItem указываешь один и тот же обработчик, а уже в это обработчике определяешь, в кого кликнули и что теперь делать. Скорее всего это будет длинный case по id этих MenuItem.



Reindeer Moss Eater   (2002-04-16 10:35) [2]

А зачем Sender"а приводить к TObject, если это и есть TObject?




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




Наверх





Память: 0.72 MB
Время: 0.027 c
4-94615           Nigth                 2002-02-21 00:24  2002.04.29  
Win API


7-94591           Raider                2002-01-08 16:32  2002.04.29  
Debuger vs Win XP pro


3-94319           iva                   2002-04-09 13:30  2002.04.29  
Как добавить поле


1-94494           Ptushenko Denis       2002-04-16 15:13  2002.04.29  
Кто знает как убрать в РичЭдите мигаюший курсор и запретить...


3-94274           КСА                   2002-04-08 10:53  2002.04.29  
Вертикаьлный текст в QReport