Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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


mik ©   (2002-04-16 10:24:00) 

Но проблема! Есть меню
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 и др. вложенных меню


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

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


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

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо