Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.06.14;
Скачать: CL | DM;

Вниз

Как узнать положение компонента относительно десктопа   Найти похожие ветки 

 
SergP ©   (2005-05-26 00:06) [0]

нужно вызвать popupmenu. Но в его методе popup нужно указать координаты.
У меня есть TEdit. При вызове меню нужно чтобы оно отображалось возле эдита, но как оказалось нужно указывать координаты относительно десктопа. Как их попроще узнать?


 
Gero ©   (2005-05-26 00:07) [1]

ClientToScreen


 
Гаврила ©   (2005-05-26 00:08) [2]

ClientToScreen method (TControl)


 
SergP ©   (2005-05-26 00:26) [3]

Хм... Почему же тогда при работе этого кода:


type
    TMonth = class(TEdit)
.....

procedure TMonth.MyKeyPress(Sender: TObject; var Key: Char);
var
z:Tpoint;
begin
 z:=ClientToScreen(point(left,top));
 PopupMenu.Popup(z.X,z.Y);
end;


меню появляется не там где находится эдит, т.е.

если пишу
 z:=ClientToScreen(point(left,top));
 PopupMenu.Popup(z.X-left,z.Y-top);

то все нормально...? Что за фигня такая?


 
Gero ©   (2005-05-26 00:29) [4]


>  z:=ClientToScreen(point(left,top));

Не Left, Top, а 0, 0.



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

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

Наверх




Память: 0.47 MB
Время: 0.027 c
3-1115349628
SergP
2005-05-06 07:20
2005.06.14
Как работать с таблицами DBASE IV имеющими расширение не dbf?


1-1117423021
FANAT
2005-05-30 07:17
2005.06.14
Количество строк


14-1117031425
Kolan
2005-05-25 18:30
2005.06.14
Книги по проектированию.


14-1117138496
Qwertyk
2005-05-27 00:14
2005.06.14
Командная работа


1-1117006147
Ботвин Дмитрий
2005-05-25 11:29
2005.06.14
Добавление кнопок