Вниз
Скачать: CL | DM;

Пересчет координат   Найти похожие ветки 

 
Dmk ©   (2002-07-09 03:42) [0]

Подскажите пожалуйста, как можно пересчитать координаты левого верхнего угла Form1 в координаты Form2?
Нужно узнать находится ли Form1 над Form2.
Или можно узнать сколько и какие формы находятся над нужной?


 
MBo ©   (2002-07-09 06:02) [1]

left и top форм в системе координат экрана известны, ничего пересчитывать не надо.


 
Dmk ©   (2002-07-09 20:20) [2]

Нужно узнать координаты у Child относительно Normal формы.


 
pusrg ©   (2002-07-09 20:37) [3]

Вообще-то если объект Child, то его координаты - это координаты относительно парента...
Для того чтобы узнать относительное положение объекта относительно другого, пользуйся ClientToScreen и ScreenToClient.


 
Dmk ©   (2002-07-09 21:07) [4]

Спасибо! Попробую.


 
Proton ©   (2002-07-11 02:32) [5]

The MapWindowPoints function converts (maps) a set of points from a coordinate space relative to one window to a coordinate space relative to another window.

int MapWindowPoints(

HWND hWndFrom, // handle of window to be mapped from
HWND hWndTo, // handle of window to be mapped to
LPPOINT lpPoints, // address of structure array with points to map
UINT cPoints // number of structures in array
);


 
Юрий Зотов ©   (2002-07-11 03:01) [6]

> Или можно узнать сколько и какие формы находятся над нужной?

MapWindowPoints решает проблему, но не полностью. Потому что одной точки для этой задачи недостаточно - ведь если Form1 лежит над Form2, то в рамках Form2 может находиться ЛЮБОЙ из четырех углов Form1, или даже вовсе ни одного угла. К чему тогда привязываться? Не к чему.

Проверять надо не отдельные точки, а пересечение прямоугольников окон. См. EnumWindows (или Screen.Forms, если интересуют только свои формы), GetWindowRect и IntersectRect. После завершения цикла получаем хэндлы всех окон верхнего уровня, пересекающихся с заданным окном.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.008 c
1-70822
eruc
2002-07-09 17:51
2002.07.22
string ???


1-70783
race1
2002-07-09 15:47
2002.07.22
незнаю


1-70705
lak_b
2002-07-11 12:45
2002.07.22
ТэСпидБатон


1-70782
BlackSun
2002-07-10 01:34
2002.07.22
Программно нажать ссылку в TWebBrowser


14-70911
copyr25
2002-06-26 04:52
2002.07.22
Так скучно ночью! Я же знаю, многие




   Наверх