Вниз
Скачать: 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.026 c
2-1136757545
Фродо )
2006-01-09 00:59
2006.01.29
Работы с большими таблицами данных.


8-1124463831
Артём
2005-08-19 19:03
2006.01.29
Проблема с DBCLICK


2-1137063265
Perf2k2
2006-01-12 13:54
2006.01.29
Как перебрать все записи, полученные из запроса?


15-1136466461
Ломброзо
2006-01-05 16:07
2006.01.29
Тоже хочу интерпретатор, но SQL


15-1136713012
Kerk
2006-01-08 12:36
2006.01.29
Bugger Hukker Crew




   Наверх