Как узнать содержимое компонента, над которым находится мышь |
![]() |
![]() |
Статьи |
Для примера поместить два TLabel на свою форму Delphi (Label1 и Label2). Поместите TPopupMenu (PopupMenu1) на форму и присоедините его к форме, установив свойство формы PopupMenu равным PopupMenu1. Не добавляйте никаких пунктов в меню. Также добавьте два компонента TEdit и TMemo (для примера) и назначьте им свойства Text. Далее поместите этот код в событие OnPopup компонента PopupMenu1. В Label1 будет отображать имя компонента, на котором щелкнули правой кнопкой мыши, а Label2 его содержимое.
|