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

Координаты мыши в чужом окне   Найти похожие ветки 

← →
DmitriyR   (2006-01-12 07:57) [0]

Подскажите как узнать координаты мыши в чужом окне?
тоесть я знаю как выяснить координаты мыши на рабочем столе или в своей программе а вот как узнать координаты мыши когда она над чужим окном (относительно етого окна) тоесть кордината 0.0 должна быть в левом верхнем углу етого окна.


← →
evvcom ©   (2006-01-12 08:35) [1]

Посмотри реализацию TControl.ScreenToClient - ничего сложного.


← →
DmitriyR   (2006-01-12 08:45) [2]

Если вас сильно не затруднит можно пример кода, по нему легче разобратся что к чему.


← →
evvcom ©   (2006-01-12 09:33) [3]


> можно пример кода, по нему легче разобратся что к чему

Легче разобраться по исходникам VCL. Пример, пожалуйста:
function TControl.ScreenToClient(const Point: TPoint): TPoint;
var
 Origin: TPoint;
begin
 Origin := ClientOrigin;
 Result.X := Point.X - Origin.X;
 Result.Y := Point.Y - Origin.Y;
end;

Только этого недостаточно. Ведь сейчас спросишь, а что внутри ClientOrigin? А весь Controls выкладывать здесь я не собираюсь.


← →
DmitriyR   (2006-01-12 10:02) [4]

:) не пасиб я уже немного сам разобрался.
А еще не подскажеш как узнать координаты и размер чужого окна на рабочем столе?
Мне каждий день надо делать работу открыть прогу нажать мышкой неколько кнопок и закрыть ее. Вот и хотел сделать чтоб все ето делалось автоматом. Но так как каждый раз окно открывается в разном месте надо привязыватся к координатам всяким :(


← →
evvcom ©   (2006-01-12 11:43) [5]


> А еще не подскажеш как узнать координаты и размер чужого
> окна на рабочем столе?

GetWindowPlacement
GetWindowRect



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

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



Память: 0.46 MB
Время: 0.024 c
2-1136744151
Opred
2006-01-08 21:15
2006.01.29
Множества


3-1133266091
Sanktum
2005-11-29 15:08
2006.01.29
Not a valid bookmark. (Error 3159)


2-1136885708
312Kbps
2006-01-10 12:35
2006.01.29
DBF файл !


15-1136981804
Polevi
2006-01-11 15:16
2006.01.29
Песня


6-1129584117
Lord_of_Darkness
2005-10-18 01:21
2006.01.29
Рдновременный прием TServerSocket ом файлов от нескольких клиенто




   Наверх