PopUpMenu

← →
Merlot (2003-12-25 17:27) [0]

Здравствуйте Уважаемые!
Подскажите пожалуйста как мне решить такую проблему: во время выполнения программы создается popupmenu, как мне обработать клики по его пунктам.
Спасибо

← →
Тимохов © (2003-12-25 17:30) [1]

Ты явно popupmenu создаешь?
Если да, то задавай значения Item.OnClick := fItemOnClick, где fItemOnClick имеет такие же параметры, как у события, созданного в дизайн тайме.

← →
Merlot (2003-12-26 08:42) [2]

> Если да, то задавай значения Item.OnClick := fItemOnClick,
> где fItemOnClick имеет такие же параметры, как у события,
> созданного в дизайн тайме.

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

← →
TUser © (2003-12-26 08:55) [3]

Я делаю так
var ne:TNotEv;
...
@ne:=@YourProc;
YourMenuItem.OnClick:=ne;

← →
Merlot (2003-12-26 12:40) [4]

> Я делаю так
> var ne:TNotEv;
> ...
> @ne:=@YourProc;
> YourMenuItem.OnClick:=ne;

Куда это все вставлять? Будте любезны расскажите по подробней пожалуйст. никак не могу сообразить. А очень надо!!!

← →
Serge © (2003-12-26 12:46) [5]

В Program Files\Borland\DelphiX\Help\Examples\Menu2\ - есть примерчик

← →
Merlot (2003-12-26 12:48) [6]

> Куда это все вставлять?

В твою программу - в то место, где ты создаещь пункт меню. Т.е. надо создать массив элементов типа TMenuItem, добавить эти пункты в пупап и назначить им обработчики.

Разумеется после создания пункта меню
YourMenuItem.OnClick := YourProc;

PopUpMenu Найти похожие ветки