Вниз
Скачать: CL | DM;

Хочу сделать единый обработчик для 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?



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

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



Память: 0.45 MB
Время: 0.009 c
1-94387
Darlok
2002-04-17 16:24
2002.04.29
Проблема с Delphi6


1-94385
inko
2002-04-17 15:41
2002.04.29
Выгрузка из памяти DLL файлов.


1-94381
Каспер
2002-04-17 09:19
2002.04.29
TReeView мигание!


1-94465
Reticent
2002-04-16 12:13
2002.04.29
Подскажите


3-94303
mcmax
2002-04-08 15:27
2002.04.29
Подскажите как назначить обработчик события новорожденному TField




   Наверх