Форум: "Основная";
Текущий архив: 2005.06.14;
Скачать: [xml.tar.bz2];
Вниз
Как узнать положение компонента относительно десктопа Найти похожие ветки
← →
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;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.039 c
