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

Вниз

какой пункт PopupMenu нажат?   Найти похожие ветки 

 
a123 ©   (2003-08-27 13:57) [0]

Подскажите, пожалуйста!
Как определить какой пункт PopupMenu нажат, если они генирируются динамически?

mi := TMenuItem.Create(self);
with mi do
begin
Caption := GlList1.Strings[GlList1.Count-1-i];
Tag:=i;
OnClick := MyClick;
end;
Items.Insert(i, mi);


 
Hooch ©   (2003-08-27 13:58) [1]

в OnClick Sender и есть пункт меню


 
BillyJeans ©   (2003-08-27 14:01) [2]

в MyClick напиши:

ИмяПункта := (Sender as TMenuItem).Name;


 
Романов Р.В. ©   (2003-08-27 14:01) [3]

tag, Caption, Name



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

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

Наверх




Память: 0.47 MB
Время: 0.017 c
6-24600
ASTARD
2003-06-30 19:21
2003.09.08
Indy HTTP server


8-24554
Navi
2003-05-11 07:37
2003.09.08
Цветной TMetafile в черно-белый


14-24677
Hawk2
2003-08-19 16:03
2003.09.08
Можно ли


3-24372
AAAAz
2003-08-13 04:35
2003.09.08
Тип базы данных


4-24753
tiam
2003-07-07 10:34
2003.09.08
Как направить приложению строку текста?