Текущий архив: 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.014 c
