Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.029 c
15-1160773435
Иксик
2006-10-14 01:03
2006.11.05
Зотов


4-1150704205
_Вован
2006-06-19 12:03
2006.11.05
Не могу скопировать/удалить файл на диске Novell 4.2


6-1150160343
anton773
2006-06-13 04:59
2006.11.05
большой размер файла


1-1159276063
Lexer
2006-09-26 17:07
2006.11.05
Вызов MDI окна не меняя WindowState у родителя


1-1158927251
dmitry kholl
2006-09-22 16:14
2006.11.05
Ошибка с TWebBrowser