Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Клик мышки


alexdn ©   (2012-03-13 12:58:00) 

Как простенько сделать эмуляцию нажатия клика мышки, по известным координатам курсора..? т.е. выставить курсор в позицию p.x, p.y и создать команду 'клик'?..


alexdn   (2012-03-13 13:34:00) [1]

> Омлет ©   (13.03.12 13:29) [7]
Да, спасибо), уже понял, на отжатие работает, задержку можно не делать..)


Омлет   (2012-03-13 13:29:00) [2]

> alexdn ©   (13.03.12 13:21) [6]

Сначала необходимо переместить в нужную точку (MOUSEEVENTF_MOVE), затем нажать (MOUSEEVENTF_LEFTDOWN), затем отжать (MOUSEEVENTF_LEFTUP). К тому же, между всеми операциями делать задержку, 50 мс например.


alexdn   (2012-03-13 13:21:00) [3]

> Омлет ©   (13.03.12 13:14) [4]
вот странно, сделал Mouse_Event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_LEFTDOWN,P.x,P.y,0,0);
но я бы не сказал что нажатие эмулируется.. по крайней мере опера что то не реагирует, ну сменой странички.


Омлет   (2012-03-13 13:16:00) [4]


> может принимать значения
> ...

и некоторые другие.


Омлет   (2012-03-13 13:14:00) [5]

Например, так:
 DX := 65535 / Screen.Width;
 DY := 65535 / Screen.Height;

 Mouse_Event(MOUSEEVENTF_ABSOLUTE or Event, Trunc(X*DX), Trunc(Y*DY), 0, 0);


где Event может принимать значения:
- MOUSEEVENTF_LEFTDOWN
- MOUSEEVENTF_LEFTUP
- MOUSEEVENTF_MOVE


RWolf   (2012-03-13 13:12:00) [6]

http://www.google.ru/search?q=mouse_event


alexdn   (2012-03-13 13:09:00) [7]

> RWolf ©   (13.03.12 13:01) [1]
> SetCursorPos, mouse_event.
Если можно с mouse_event поподробнее..
т.е. mouse_event(click)? как то так?


RWolf   (2012-03-13 13:01:00) [8]

SetCursorPos, mouse_event.


Наверх

Титульная страница Поиск, карта сайта Написать письмо