Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.09.12;
Скачать: CL | DM;

Вниз

Есть PopupMenu, как на все его MenuItem..   Найти похожие ветки 

 
Ragazor   (2004-08-30 23:03) [0]

Есть PopupMenu, как на все его MenuItem порписать один и тот же обработчик OnClick, определяющий Caption нажатого MenuItem?


 
GuAV ©   (2004-08-30 23:35) [1]

Недавно было
http://delphimaster.net/view/1-1093714909/
http://delphimaster.net/view/1-1093714909/
короче ещё дофига таких веток и в FAQ уверен есть


 
Алхимик ©   (2004-08-30 23:43) [2]

Выбрать первый ИТЕМ,
В Обжект Инспекторе найти на закладке Эвент
строку "OnClick|______"
Тыркнуть мышой справа от OnClick
Написать что то вроде:
procedure TForm1.N11Click(Sender: TObject);
begin
  ShowMessage(TMenuItem(sender).Caption);
end;

В цикле от второго Итема до последнего Итема делать следующее:
перебрать все Итемы и каждому Итему в
Обжект Инспекторе на закладке Эвент супротив OnClick прописать вышеуказанный обработчик.


 
jack128 ©   (2004-08-30 23:49) [3]

Алхимик ©   (30.08.04 23:43) [2]
Блин. Аплодисменты вашей выдержке.. У меня рука уже не подымается на такие вопросы отвечать..


 
GuAV ©   (2004-08-31 00:03) [4]


> У меня рука уже не подымается на такие вопросы отвечать..

Ничё, Жень твоя смена уже растёт и всегда кто-то будет отвечать,
даже когда Алхимику надоест. :)



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

Текущий архив: 2004.09.12;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.035 c
3-1092561530
сергей1
2004-08-15 13:18
2004.09.12
dbGrid


1-1093502344
*Pavel
2004-08-26 10:39
2004.09.12
Скрипты


6-1089138129
SergP
2004-07-06 22:22
2004.09.12
UDP. Как отослать пакет на диапазон адресов?


1-1093779566
начинающий
2004-08-29 15:39
2004.09.12
TListBox.onCompare := MyCompare


6-1088927693
Интересующийся
2004-07-04 11:54
2004.09.12
TServerSoket -> TProxySoket