Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Кнопка с привязанным PopupMenu. [D7, WinXP]


Guest001 ©   (2006-10-06 15:39:00) 

Помогите с проблемкой - хочу сделать кнопку(TButton), по нажатию на которую будет появляться PopupMenu, ниже кнопки или выше - это взависимости от положения этой кнопки на экране. Как это проще сделать?


Guest001   (2006-10-06 17:15:00) [1]


>  [2] clickmaker ©   (06.10.06 15:43)

Спасибо за сей замечательный метод ClientToScreen(pt)! Только у меня кнопка лежит на панели, поэтому получается Panel1.ClientToScreen(pt)!


zdm   (2006-10-06 15:44:00) [2]

onclick кнопка
PopupMenu1.Popup(x,y);


clickmaker   (2006-10-06 15:43:00) [3]

Button1Click()
begin
   pt := Point(Button1.Left, Button1.BoundsRect.Bottom);
   pt := ClientToScreen(pt);
   popupMenu.Popup(pt.x, pt.y);
end;


zdm   (2006-10-06 15:42:00) [4]

у кнопки есть свойство PopupMenu


Наверх

Титульная страница Поиск, карта сайта Написать письмо