Жесты мышкой, помогите настроить функцию

madmasles

Модератор

Глобальный модератор

Сообщения

7,790

Репутация

2,322

• 16 Янв 2011

• #41

Yashied
Спасибо огромное!
Очень красиво!

 

F

Fever

Скриптер

Сообщения

308

Репутация

112

• 16 Янв 2011

• #42

Это просто изумительно!
Отличная работа Yashied

 

Автор

S

Suppir

Продвинутый

Сообщения

967

Репутация

62

• 17 Янв 2011

• #43

Столкнулся с такой проблемой:

у некоторых пользователей стоят специальные драйверы на мышку (a4-tech, logitech). Эти драйверы висят в трее. Они перехватывают _IsPressed("04").

Т.е. когда эти драйверы включены, у AutoIt не срабатывает _IsPressed("04").

 

madmasles

Модератор

Глобальный модератор

Сообщения

7,790

Репутация

2,322

• 17 Янв 2011

• #44

Suppir
Попробуйте отслеживать нажатие средней кнопки с помощью MouseSetOnEvent - Обработка событии мышки. Там в архиве есть пример (Wheel - Paused_Not_Paused.au3).

 

Автор

S

Suppir

Продвинутый

Сообщения

967

Репутация

62

• 17 Янв 2011

• #45

madmasles

madmasles сказал(а):

Wheel - Paused_Not_Paused.au3

Нажмите, чтобы раскрыть...

У меня почему-то в семерке не работает ни $MOUSE_WHEELSCROLLDOWN_EVENT, ни $MOUSE_WHEELSCROLLUP_EVENT

 

madmasles

Модератор

Глобальный модератор

Сообщения

7,790

Репутация

2,322

• 17 Янв 2011

• #46

Suppir
Проверил на XP и 7-64. Работает и там, и там, правда обе мышки обычные.

 

Автор

S

Suppir

Продвинутый

Сообщения

967

Репутация

62

• 17 Янв 2011

• #47

madmasles
а можно ваш работающий пример кода с нажатием средней кнопки посмотреть?
может я что-то пишу не так.

 

V

Viktor217

Осваивающий

Сообщения

233

Репутация

31

• 17 Янв 2011

• #48

У меня мышка A4Tech X7, две боковые клавиши, всё работает отлично, специальные дрова стоят...

 

madmasles

Модератор

Глобальный модератор

Сообщения

7,790

Репутация

2,322

• 17 Янв 2011

• #49

Suppir [?]

а можно ваш работающий пример кода с нажатием средней кнопки посмотреть?

Нажмите, чтобы раскрыть...

Код:

#include "MouseOnEvent.au3"

$iPaused = False
ToolTip("Paused: " & $iPaused, 0, 0)
_MouseSetOnEvent($MOUSE_WHEELDOWN_EVENT, "PausePlay")
Sleep(10000)
_MouseSetOnEvent($MOUSE_WHEELDOWN_EVENT)

Func PausePlay()
	$iPaused = Not $iPaused
	ToolTip("Paused: " & $iPaused, 0, 0)
EndFunc   ;==>PausePlay

 

Zaramot

I ♥ AutoIt

Сообщения

1,160

Репутация

660

• 24 Окт 2011

• #50

Yashied,
Почему после запуска всех скриптов из этой темы, где есть функция _WinAPI_UpdateLayeredWindowEx(), выскакивает ошибка такого вида:


Обновление вашей библиотеке - не помогло :(

 

madmasles

Модератор

Глобальный модератор

Сообщения

7,790

Репутация

2,322

• 24 Окт 2011

• #51

Zaramot [?]

где есть функция _WinAPI_UpdateLayeredWindowEx(), выскакивает ошибка

Нажмите, чтобы раскрыть...

Измените ее параметры по примеру использования в справке к WinAPIEx.au3.
Ответ #102
Ответ #103

 

Yashied

Модератор

Команда форума

Глобальный модератор

Сообщения

5,379

Репутация

2,724

• 24 Окт 2011

• #52

Zaramot сказал(а):

Почему после запуска всех скриптов из этой темы, где есть функция _WinAPI_UpdateLayeredWindowEx(), выскакивает ошибка такого вида...

Нажмите, чтобы раскрыть...

Потому что эта функция изменилась. Нужно везде заменить

Код:

_WinAPI_UpdateLayeredWindowEx($hForm, ...)

на

Код:

_WinAPI_UpdateLayeredWindowEx($hForm, -1, -1, ...)