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

Вниз

Обработка OnClick у объектов   Найти похожие ветки 

 
lamer666   (2003-11-14 18:37) [0]

Доброго всем времени суток!
Я тут объектов наделал в runtime: PopupMenu1.Items[i],
где PopupMenu1.Items.Count меняется.
Проблема в том, что каждый item должен иметь обработку
PopupMenu1.Items[i].OnClick, зависящую от номера i.
Проще, по клику на пункт меню должно выдаваться сообщение
c номером этого пункта.
???


 
Skier ©   (2003-11-14 18:42) [1]

обрати внимание на параметр OnClick-а, на Sender


 
Goffman ©   (2003-11-14 18:43) [2]

Что-то в этом духе
procedure MenuItemClick(Sender: TObject);
begin
ShowMessage(IntToStr((Sender as TMenuItem).Tag))
end;


Присваивание:
PopupMenu1.Items[i].OnClick:=MenuItemClick


 
lamer666   (2003-11-14 18:45) [3]

Спасибо.



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

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

Наверх




Память: 0.47 MB
Время: 0.033 c
7-79213
Shopot
2003-09-13 16:31
2003.11.24
Шрифты для матричного принтера


3-78846
MORA
2003-11-04 04:25
2003.11.24
IB 6


1-78900
_jek
2003-11-14 18:58
2003.11.24
Текстовые файлы и ADO


4-79214
frost63
2003-10-02 07:20
2003.11.24
ShellExecute


1-78984
qwe
2003-11-14 13:04
2003.11.24
как изменить высоту заголовка в TListView??