Показать сообщение отдельно
  #1  
Старый 11.01.2014, 18:57
AZelensky AZelensky вне форума
Прохожий
 
Регистрация: 11.01.2014
Сообщения: 2
Версия Delphi: Delphi XE5
Репутация: 10
По умолчанию Пиксели, координаты курсора и т.п.

Здравствуйте, уважаемые форумчане. У меня возник такой вопрос: "Как мне получить координаты курсора(желательно пикселя) в определённом окне(конечно же зная "ХЕНДЛ")"?

Вот мои наработки:
Код:
setcursorpos(430, 700);
mouse_event(mouseeventf_leftdown, 0, 0, 0, 0);
mouse_event(mouseeventf_leftup, 0, 0, 0, 0);
GetCursorPos(CursorPoint);
hWin := WindowFromPoint(CursorPoint);
descpixel:= getdc(0);
setcursorpos(764, 657);
while (getpixel(descpixel, mouse.CursorPos.X, mouse.CursorPos.Y)) = 4797409 do
      begin
      keybd_event(ord('D'), 0, 0, 0);
      keybd_event(ord('D'), 0, KEYEVENTF_KEYUP, 0);
      end;
Ответить с цитированием