PopupMenu в Delphi

Создавая из панели инструментов Standard компонент PopupMenu на нашей форме, вы заметите, что PopupMenu – это невизуальный компонент. Вообще PopupMenu это всплывающее контекстное меню, которое возникает при нажатии пользователя правой кнопкой мыши.

Что ж сделать, чтобы увидеть PopupMenu? Для этого сразу привяжите всплывающее меню к форме. Это делается на вкладке Events (события) главной формы PopupMenu. После этого при запуске проекта F9 щелкая правой кнопкой можно увидеть следующее:

popoupmenu

Кстати PopupMenu во многом напоминает MainMenu, но контекстные меню разных форм не объединяются. Можно говорить, что для одной формы – одно PopupMenu, а для следующей к примеру другое PopupMenu.

Само проектирование всплывающего меню в Delphi происходит с помощью конструктора:

popoupmenu

На рисунке показано, что PopupMenu имеет Name=N1 как и в случае с MainMenu. Так что основные свойства можно перечесть по пальцам: Aligment (выравнивание), AutoHotKeys (горячие клавиши), AutoPopup (автоматическое появление при щелчке правой кнопки), TrackButton (какая кнопка активирует всплывающее меню, если связано с кнопкой панели инструментов). Остальные свойства рассмотрите самостоятельно, там ничего особенного нет.

Основные методы:

Метод Описание
DoPopup Procedure DoPopup(Sender: TObject);Генерирует событие OnPopup
FindItem Type TFindItemKind =(fkCommand, fkHandle, fkShortCut);Function FindItem(Value: Word, Kind:TFindItemKind): TMenuItem;

Ищет и возвращает раздел меню из

Значения Value равное Kind = fkCommand;

При Kind = fkHandle – дескриптор всплывающего

меню, при Kind = fkShortCut – код горячих клавиш

Popup Procedure Popup (x,y: Integer);Показывает меню в указанной позиции экрана

На вкладке Events (события): OnChange – событие при изменеии меню, OnPopup – событие происходит перед появление всплывающего меню.

. popupmenu delphi
. свойства popupmenu delphi
Комментирование и размещение ссылок запрещено.

Top