Форум: "Основная";
Текущий архив: 2003.10.30;
Скачать: [xml.tar.bz2];

Вниз

PopupMenu   Найти похожие ветки 

← →
Delph   (2003-10-21 16:23) [0]

Использую процедуру PopupMenu1.Popup(x,y). Вопрос: как узнать эти x и y, если меню необходимо показать точно под кнопкой, расположеной в дочернем окне на, скажем, панели. (Form1,Button1,Panel1)

---

← →
ZEE   (2003-10-21 16:26) [1]

примерно так
P:TPoint;
...
P.X:=Button1.Left;
P.Y:=Button1.Top+Button1.Height;
Panel1.ClientToScreen(P);
PopupMenu1.Popup(P.X,P.Y);

---

← →
ZEE   (2003-10-21 16:31) [2]

поправка
P:TPoint;
...
P.X:=Button1.Left;
P.Y:=Button1.Top+Button1.Height;
P:=Panel1.ClientToScreen(P);
PopupMenu1.Popup(P.X,P.Y);

---

← →
Delph   (2003-10-21 16:37) [3]

>ZEE
Спасибо, с поправкой сработало:)

---

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

Форум: "Основная";
Текущий архив: 2003.10.30;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.01 c