Текущий архив: 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.902 c
