Текущий архив: 2006.11.05;
Скачать: CL | DM;

Вниз

Popupmenu над кнопкой   Найти похожие ветки 

← →
Crazybeaver   (2006-10-24 12:33) [0]

Здрасти. Недавно изучаю Делфи. Пока любитель, поэтому простой ламерский вопрос.

Необходимо, чтобы после нажатия на кнопку всплывала менюшка popupmenu2. Меню всплывает на popupmenu2.Popup(x,y), где x и y координаты кнопки. Как определить эти координаты? Заранее спасибо.

---

← →
Elen ©   (2006-10-24 12:55) [1]

> Crazybeaver

как вариант :

procedure TForm1.Button1Click(Sender: TObject);
var t:Tpoint;
begin
t.X :=Button1.Left;
t.Y:=Button1.Top;
t:=form1.ClientToScreen(t);
PopupMenu1.Popup(t.X, t.Y);
end;

---

← →
Crazybeaver   (2006-10-24 13:16) [2]

2 Elen
Спасибо.

---

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

Текущий архив: 2006.11.05;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.028 c