Вниз
Скачать: CL | DM;

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]


> Serge ©

Спасибо большое!!!!!


← →
TUser ©   (2003-12-26 12:50) [7]


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

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


← →
Silver_ ©   (2003-12-26 13:27) [8]

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



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.013 c
1-37779
alexnmsk
2003-12-26 16:23
2004.01.13
Hint в TreeView


11-37593
Сызганов Николай
2003-04-17 14:00
2004.01.13
Не грузится компонент mdvXLGrid 1.03


11-37601
Separator
2003-04-11 10:42
2004.01.13
KOL и MySQL


14-37890
Drakon
2003-12-21 17:47
2004.01.13
Бесплатная альтернатива Delphi


3-37559
Vick
2003-12-17 10:33
2004.01.13
Нет доступа при чтении файлов -ем с другого сервера




   Наверх