powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Отпустить клик
5 сообщений из 5, страница 1 из 1
Отпустить клик
    #35178245
Ммихалыч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
mouse_event, делает бесконечный клик наскоко понял ? Как его отпустить ?
...
Рейтинг: 0 / 0
Отпустить клик
    #35178416
Фотография VladConn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я не отвечу на ваш вопрос, эту функцию я не использовал. Единственно, могу сказать, Microsoft больше ее не рекомендует. Теперь "положено" использовать SendInput вместо mouse_event:

http://msdn2.microsoft.com/en-us/library/ms646310(VS.85).aspx
...
Рейтинг: 0 / 0
Отпустить клик
    #35178430
Фотография VladConn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А вообще-то, параметр MOUSEEVENTF_LEFTUP по идее должен отпускать левую клавишу...
...
Рейтинг: 0 / 0
Отпустить клик
    #35187326
Ммихалыч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
Public Sub PushTheButton()


    hWnd = FindWindow(vbNullString, "Adobe Illustrator")
    'PostMessage hwnd, WM_SETFOCUS, 0, 0
    lngRet = SetForegroundWindow(hWnd)
    'lngRet = BringWindowToTop(hwnd)
    'keybd_event VK_I, 0, 0, 0
    SendKeys "{i}", True
    


   SetCursorPos  600 ,  610 

mouse_event WM_LBUTTONDBLCLK Or MOUSEEVENTF_LEFTUP,  0 &,  0 &,  1 ,  0 


End Sub

Вот код, проблему, при обращении к иллюстратору (имитация нажатия любой клавиши) он как бы держит объект постоянно нажатым, так и не решил.
...
Рейтинг: 0 / 0
Отпустить клик
    #35188578
Ммихалыч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
кто-нибудь дайте пример с SendInput, пожалуйста.
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Отпустить клик
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]