Создавая из панели инструментов Standard компонент PopupMenu на нашей форме, вы заметите, что PopupMenu – это невизуальный компонент. Вообще PopupMenu это всплывающее контекстное меню, которое возникает при нажатии пользователя правой кнопкой мыши.
Что ж сделать, чтобы увидеть PopupMenu? Для этого сразу привяжите всплывающее меню к форме. Это делается на вкладке Events (события) главной формы PopupMenu. После этого при запуске проекта F9 щелкая правой кнопкой можно увидеть следующее:
Кстати PopupMenu во многом напоминает MainMenu, но контекстные меню разных форм не объединяются. Можно говорить, что для одной формы – одно PopupMenu, а для следующей к примеру другое PopupMenu.
Само проектирование всплывающего меню в Delphi происходит с помощью конструктора:
На рисунке показано, что 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 – событие происходит перед появление всплывающего меню.
. компонент popup menu делфи7 свойства и событие компонентов PopupMenu, TImage popupmenu в delphi popup menu combo box delphi popup меню delphi