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

Вниз

Динамическое меню   Найти похожие ветки 

 
Woprosnik   (2005-06-03 10:30) [0]

Программно создаю пункты меню. Теперь на каждый смозданный пункт надо повесить обработчик события OnClick. Подскажите пожалуйста, как это можно сделать?

Собственно действие на клик по любому пункту должно быть одно, просто передаются в него разные параметры.


 
Sergey Masloff   (2005-06-03 10:35) [1]

Просто присвоить событию указатель на процедуру.


 
Woprosnik   (2005-06-03 10:39) [2]

Пытаюсь так сделать, но не срабатывает. Хотя, возможно, я что-то делаю не так. Вот код создания:

 While not Form1.pFIBDataSet5.Eof do begin
      NewItem:= TMenuItem.Create(Self);
      NewItem.Caption:= Form1.pFIBDataSet5Tip.AsString;
      NewItem.ImageIndex:= 0;
      PopupMenu1.Items.Add(NewItem);
      PopupMenu1.Items.OnClick:= N1Click;
      Form1.pFIBDataSet5.Next;
   end;


 
Плохиш ©   (2005-06-03 10:54) [3]

Обработчик надо присваивать каждому создаваемому пункту меню


NewItem.OnClick := ...


 
Woprosnik   (2005-06-03 12:05) [4]

Большое спасибо.
Еще один вопрос. Как определить какой из пунктов меню выбрано? Как я понимаю, подобия свойства SelectIndex у PopupMenu нет.


 
Gero ©   (2005-06-03 12:09) [5]

Что значит «выбрано»?


 
Pearled ©   (2005-06-03 12:11) [6]

If TMenuItem(Sender).Caption = ... then ...


 
Woprosnik   (2005-06-03 12:11) [7]

По которому сделан клик.
Динамически фйормируется меню. В программе пользователь открывает еге, щелкает по пункту меню. Как мне определеить в программе, по какому пункту был сделан клик?


 
Woprosnik   (2005-06-03 12:49) [8]

Всем большое спасибо.



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

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

Наверх




Память: 0.48 MB
Время: 0.026 c
3-1116836022
Cat
2005-05-23 12:13
2005.06.29
Есть ли оператор case в хранимых процедурах?


4-1115604301
Antoxa
2005-05-09 06:05
2005.06.29
Подскажите. Есть ярлыка на рабочем столе в т.ч. и мой надо чтобы


3-1116844274
ass1
2005-05-23 14:31
2005.06.29
опять isc4.gdb


14-1117047651
kat
2005-05-25 23:00
2005.06.29
Создание компонентов


1-1117777655
Homa_Programer
2005-06-03 09:47
2005.06.29
StringGrid & mouse