Янв 26, 2013 - Уроки Visual Basic.NET    3 комментария

Эмуляция клика мышью (API)

Привет!

В этом уроке я вкратце расскажу вам как при помощи API эмитировать клик мыши.

Вот собственно сама функция:

Declare Function Мышь Lib "user32.dll" Alias "mouse_event" (ByVal dwFlags As Int32, ByVal dX As Int32, ByVal dY As Int32, ByVal cButtons As Int32, ByVal dwExtraInfo As Int32) As Boolean
    Const Нажать_Левую_Кнопку = &H2
    Const Отпустить_Левую_Кнопку = &H4
    Const Нажать_Правою_Кнопку = &H8
    Const Отпустить_Правою_Кнопку = &H10

Как пользоваться:

Мышь(Нажать_Левую_Кнопку, 0, 0, 3, 3)
Мышь(Отпустить_Левую_Кнопку, 0, 0, 3, 3)
'1 клик левой кнопкой мыши

Так же и с правой кнопкой:

Мышь(Нажать_Правою_Кнопку, 0, 0, 3, 3)
Мышь(Отпустить_Правою_Кнопку, 0, 0, 3, 3)
'1 клик правой кнопкой мыши

Ну вот и всё!

Вот пример использования: КликМышью

Похожие записи:

  Метки:
  Gemorg
  Просмотров: 9 785
  Запись опубликована в 13:42

3 комментария

  • Moderator-Alex 26/01/2013 в 14:30

    При нажатии на кнопку(button1) происходит увиличение в размерах формы. Это таки должно быть или я что-то не понял?:(

    Ответить
  • Gemorg 26/01/2013 в 15:17

    Да именно это и должно происходить, при клике по кнопке курсор перемещается в верхний угол формы, нажимается левая кнопка мыши и растягивает форму на 100 пикс., затем отпускается левая кнопка мыши.

    Ответить
  • Moderator-Alex 26/01/2013 в 15:32

    Теперь ясно!) Спасибо.

    Ответить

Есть что сказать? Тогда действуй!