| Вопрос: Нажатие мышки | Добавлено: 09.10.05 22:40 |
Автор вопроса:  Master Cheat'$
|
| Как можно сэмитировать нажатие кнопкой мыши в любом другом окне? и перемещение? и чтоб это ничем не отличалось от обычного клика? т.е, вот ты переместил мышку - винде подалась "команда" че её переместили. как можно это сэмитировать? Послать ету заветную "команду" или че там курсор двигает? Подскажите, очень надо! |
| Ответы | Всего ответов: 8 |
|
Номер ответа: 1 Автор ответа:  Victor ICQ: 345743490 Вопросов: 42 Ответов: 385 |
Web-сайт: Профиль | | #1 | Добавлено: 09.10.05 22:54 |
|
Public Declare Sub mouse_event Lib "user32" Alias "mouse_event" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
Public Declare Function SetCursorPos Lib "user32" Alias "SetCursorPos" (ByVal x As Long, ByVal y As Long) As Long |
||
|
Номер ответа: 2 Автор ответа: Master Cheat'$Вопросов: 14 Ответов: 102 |
Профиль | | #2 | Добавлено: 09.10.05 22:59 |
|
ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long
а по подробнее что и за что отвечает? |
||
|
Номер ответа: 3 Автор ответа: Master Cheat'$Вопросов: 14 Ответов: 102 |
Профиль | | #3 | Добавлено: 09.10.05 23:00 |
| хотя dx, dy и cButtons - понятно. А dwFlags это че? | ||
|
Номер ответа: 4 Автор ответа: Master Cheat'$Вопросов: 14 Ответов: 102 |
Профиль | | #4 | Добавлено: 09.10.05 23:03 |
| и еще если можно, как сэмитировать нажатие клавишь. заранее спасиб. | ||
|
Номер ответа: 5 Автор ответа: VictorICQ: 345743490 Вопросов: 42 Ответов: 385 |
Web-сайт: Профиль | | #5 | Добавлено: 11.10.05 19:26 |
|
http://vt-dbnz.narod.ru/API/mouse_event.html
http://vt-dbnz.narod.ru/API/setcursorpos.html На русский переводить не хочу. А вообще, MSDN всегда поможет. Если у тебя его нет, это плохо. Я, например, жить без него не могу. |
||
|
Номер ответа: 6 Автор ответа:  «UL.eXe»ICQ: 197.895.916.247 Вопросов: 72 Ответов: 540 |
Профиль | | #6 | Добавлено: 11.10.05 19:55 |
|
В модуль:
Option Explicit
Public Declare Function SetCursorPos Lib "user32" (ByVal X As Long, ByVal Y As Long) As Long В таймер на форме: Dim xm, ym
xm = Int(Rnd * 640) ym = Int(Rnd * 480) SetCursorPos xm, ym И всего-то.. |
||
|
Номер ответа: 7 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #7 | Добавлено: 11.10.05 21:27 |
| www.msdn.com - и мсдн есть у каждого! | ||
|
Номер ответа: 8 Автор ответа: NecoICQ: 247906854 Вопросов: 133 Ответов: 882 |
Web-сайт: Профиль | | #8 | Добавлено: 13.10.05 05:09 |
| Он даже на дсл тормозит нещадно - больше трёх окон одновременно и включаются любимые мелкомягкие непонятные паузы. | ||
Страница: 1 |