Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.03.19;
Скачать: CL | DM;

Вниз

Эмуляция клика   Найти похожие ветки 

 
Дубинка   (2006-02-13 21:50) [0]

Подскажите пожалуйста, как можно программно сэмулировать клик мышью? Я написал так:

GetCursorPos(p);
SendMessage(WindowFromPoint(p), WM_LBUTTONDOWN, MK_LBUTTON, MAKEWORD(p.x, p.y);
SendMessage(WindowFromPoint(p), WM_LBUTTONUP, MK_LBUTTON, MAKEWORD(p.x, p.y);


В большинстве (но не во всех) случаях не работает....


 
Grief ©   (2006-02-13 21:54) [1]

Mouse_Event(MOUSEEVENTF_ABSOLUTE or  MOUSEEVENTF_LEFTDOWN, P.x, P.y,  0,  0);
Mouse_Event(MOUSEEVENTF_ABSOLUTE or  MOUSEEVENTF_LEFTUP,  P.x,  P.y,  0,  0);


 
Дубинка   (2006-02-13 22:36) [2]

Благодарю, а не объясните ли вы мне, почему не работает то что написал я?


 
begin...end ©   (2006-02-14 08:54) [3]

> Дубинка   (13.02.06 22:36) [2]

Потому что, во-первых, в качестве lParam для WM_LBUTTONDOWN/WM_LBUTTONUP должны передаваться не абсолютные координаты курсора, а клиентские. А во-вторых, параметр lParam -- 32-битный, и для его "конструирования" нужно использовать не MakeWord, а MakeLong (или MakeLParam).



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

Текущий архив: 2006.03.19;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.052 c
2-1141127012
antoxa2005
2006-02-28 14:43
2006.03.19
ПОМОГИТЕ ! Как так Class TEdit not found ?


15-1140774865
-=Dark=-
2006-02-24 12:54
2006.03.19
При запуске, Delphi ругаеться на rtl60.bpl! Как исправить?


3-1138354243
Barsky
2006-01-27 12:30
2006.03.19
Как сделать выборку не чувствительную к регистру?


15-1140558633
xayam
2006-02-22 00:50
2006.03.19
Ресурсы по intraweb studio есть?


2-1141457905
Piero
2006-03-04 10:38
2006.03.19
Строки в TMemo разных цветов