View previous topic :: View next topic |
Author |
Message |
sergeich

Joined: 25 Apr 2006 Posts: 185 Location: Москва
|
(Separately) Posted: Tue Aug 21, 2007 18:38 Post subject: |
|
|
Новая версия 1.4
Добавлено: переключение режимов средней кнопкой мыши, автозагрузка программы... |
|
Back to top |
|
 |
funduk

Joined: 16 Aug 2005 Posts: 1513 Location: Санкт-Петербург
|
(Separately) Posted: Tue Aug 21, 2007 22:36 Post subject: |
|
|
Кстати, ты бы завёл себе профиль в вике, чтобы народ знал, кто из аддонописателей сам в список свои аддоны добавляет. |
|
Back to top |
|
 |
sergeich

Joined: 25 Apr 2006 Posts: 185 Location: Москва
|
(Separately) Posted: Tue Aug 21, 2007 22:47 Post subject: |
|
|
funduk wrote: | Кстати, ты бы завёл себе профиль в вике, чтобы народ знал, кто из аддонописателей сам в список свои аддоны добавляет. |
завел. надеюсь, народ теперь все знает  |
|
Back to top |
|
 |
JKT
Joined: 22 Sep 2009 Posts: 116 Location: Харьков
|
(Separately) Posted: Mon Apr 26, 2010 13:34 Post subject: |
|
|
Киньте плиз куданить на обменку - ссылка умерла |
|
Back to top |
|
 |
Bomm

Joined: 15 Jan 2005 Posts: 245 Location: Москва
|
|
Back to top |
|
 |
JKT
Joined: 22 Sep 2009 Posts: 116 Location: Харьков
|
(Separately) Posted: Mon Apr 26, 2010 17:45 Post subject: |
|
|
Спасибо
Эх, жаль, что там ненастраивается время этого удержания кнопки, частенько ложно срабатывает при перетаскивании, видать надо попривыкнуть, но всеравно удобно (любителям мышей) |
|
Back to top |
|
 |
Mailk
Joined: 16 Jan 2010 Posts: 251
|
(Separately) Posted: Mon Jul 01, 2013 22:45 Post subject: |
|
|
Где сама прога ? все ссылки битые . |
|
Back to top |
|
 |
Flasher

Joined: 06 Nov 2009 Posts: 14229 Location: Москва
|
(Separately) Posted: Fri Jul 05, 2013 18:02 Post subject: |
|
|
Добавил в лист. _________________ Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой. |
|
Back to top |
|
 |
mf-zl

Joined: 21 Aug 2005 Posts: 71 Location: BLR
|
(Separately) Posted: Fri Aug 02, 2013 15:05 Post subject: |
|
|
TotalMouseEX v0.1a by zL
AutoHotkey_L v1.1.1.00 Unicode
Зажатие левой кнопки - F3
Клик средней - F4
Code: | #SingleInstance force
#If WinActive("ahk_class TTOTAL_CMD") and MouseUnder("TMyListBox[12]")
~LButton::
If LPress {
LPress += 1
Return
} LPress = 1
SetTimer, LPress, On
Return
MButton::
Click
Send, {F4}
Return
LPress:
SetTimer, LPress, Off
If (LPress = 1)
{ KeyWait, LButton, T0.4
If (ErrorLevel && WinActive("ahk_class TTOTAL_CMD"))
{ Click
Send, {F3}
}
} LPress = 0
Return
MouseUnder(Controls) {
MouseGetPos,,,, Control
If RegExMatch(Control, Controls)
Return, True
} |
|
|
Back to top |
|
 |
Avada

Joined: 01 Aug 2008 Posts: 10420 Location: Россия, Саратов
|
(Separately) Posted: Sat Aug 03, 2013 10:31 Post subject: |
|
|
mf-zl
Интересное решение. Кстати, более удобно работает со средней кнопкой, чем утилита: там использование для других целей средней кнопки блокировалось в окне TC везде, здесь — только в файловых панелях.
А можно ли сделать вариант, где для средней кнопки — не клик, а зажатие, причём только при статичном положении мыши, без перетаскивания? Это позволило бы, например, также включать в файловых панелях TC функционал автоскроллинга или использовать прямоугольное выделение в стиле TWinKey. _________________ Даже самая богатая фантазия
Не представит себе наши безобразия. |
|
Back to top |
|
 |
mf-zl

Joined: 21 Aug 2005 Posts: 71 Location: BLR
|
(Separately) Posted: Sun Aug 04, 2013 00:46 Post subject: |
|
|
Avada, можно
Прилепил статику и на левую кнопку.
Также добавил пример двойного клика средней кнопкой - выделяет расширения под курсором
Code: | ; TotalMouseEX v0.3 by zL
; AutoHotkey_L v1.1.1.00 Unicode
#SingleInstance force
#If WinActive("ahk_class TTOTAL_CMD") and MouseUnder("TMyListBox[12]")
~LButton::
If LPress {
LPress += 1
Return
} LPress = 1
SetTimer, LPress, On
Return
~MButton::
If MPress {
MPress += 1
Return
} MPress = 1
SetTimer, MPress, On
Return
LPress:
SetTimer, LPress, Off
MouseGetPos, x0, y0
If (LPress = 1)
{ KeyWait, LButton, T0.4
MouseGetPos, x1, y1
If (ErrorLevel && WinActive("ahk_class TTOTAL_CMD") && (x0 = x1 && y0 = y1))
{ Click
Send, {F3}
}
} LPress = 0
Return
MPress:
SetTimer, MPress, Off
MouseGetPos, x0, y0
If (MPress = 1)
{ KeyWait, MButton, T0.4
MouseGetPos, x1, y1
If (ErrorLevel && WinActive("ahk_class TTOTAL_CMD") && (x0 = x1 && y0 = y1))
{ Click
Send, {F4}
}
} Else, If (MPress = 2)
{ Click
Send, !{NumpadAdd}
} MPress = 0
Return
MouseUnder(Controls) {
MouseGetPos,,,, Control
If RegExMatch(Control, Controls)
Return, True
} |
|
|
Back to top |
|
 |
Avada

Joined: 01 Aug 2008 Posts: 10420 Location: Россия, Саратов
|
(Separately) Posted: Sun Aug 04, 2013 11:07 Post subject: |
|
|
mf-zl
Спасибо. Сообщаю результаты тестирования.
С левой кнопкой всё OK, изменение со статикой подтверждаю.
Со средней — хуже. В чистом TC работа скрипта зависит от возможности автоскроллинга в текущей файловой панели (то есть есть ли куда крутить). Если прокрутка невозможна — срабатывают и одинарный, и двойной клик. Если возможна — средний клик сразу же включает режим автоскроллинга (появляется маркер), далее скрипт не срабатывает.
Одиночный длинный клик средней кнопкой в настроенном TC с включённым TWinKey (это мой штатный режим) в новой версии скрипта F4 не обрабатывает, только выделяется файл под курсором. Двойной щелчок (выделение по расширению) срабатывает, но почему-то со второго раза. Проверил настройки TWinKey, при отключении там опции, позволяющей средней кнопкой выставлять рамочное выделение, F4 начинает обрабатываться.
С отключённым (выгруженным по cm_UnloadPlugins) — TWinKey средняя кнопка работает ровно по тем же правилам, что в чистом TC.
То есть автоскроллинг работу скрипта явно блокирует. И "рамочная" фича TWinKey, похоже, тоже. Но её на крайний случай отключить можно, а автоскроллинг — нет. Такие дела.
P.S. И не надо было весь мой пост цитировать. _________________ Даже самая богатая фантазия
Не представит себе наши безобразия. |
|
Back to top |
|
 |
mf-zl

Joined: 21 Aug 2005 Posts: 71 Location: BLR
|
(Separately) Posted: Sun Aug 04, 2013 13:12 Post subject: |
|
|
Code: | #Persistent
#SingleInstance force
Prj = TotalMouseEX v0.5 by zL
Tray:
Menu Tray, Tip, % Prj
Menu Tray, Icon, main.cpl
Menu Tray, NoStandard
Menu Tray, Add, &About, About
Menu Tray, Add
Menu Tray, Add, E&xit, Quit
Menu Tray, Default, &About
Return
About:
MsgBox 8256, % Prj,
(LTrim
Long press left mouse button to view file in lister
Long press middle mouse button to edit file
Double click middle mouse button to select files with same extension
)
Return
Quit:
ExitApp
#If WinActive("ahk_class TTOTAL_CMD") and MouseUnder("TMyListBox[12]")
~LButton::
If LPress {
LPress += 1
Return
} LPress = 1
SetTimer, LPress, On
Return
MButton::
If MPress {
MPress += 1
Return
} MPress = 1
SetTimer, MPress, On
Return
LPress:
SetTimer, LPress, Off
MouseGetPos, x0, y0
If (LPress = 1)
{ KeyWait, LButton, T0.4
MouseGetPos, x1, y1
If (ErrorLevel && WinActive("ahk_class TTOTAL_CMD") && (x0 = x1 && y0 = y1))
{ Click
Send, {F3}
}
} LPress = 0
Return
MPress:
SetTimer, MPress, Off
MouseGetPos, x0, y0
If (MPress = 1)
{ KeyWait, MButton, T0.4
MouseGetPos, x1, y1
If (ErrorLevel && WinActive("ahk_class TTOTAL_CMD") && (x0 = x1 && y0 = y1))
{ Click
Send, {F4}
} Else, Send, {MButton}
} Else, If (MPress = 2)
{ Click
Send, !{NumpadAdd}
} MPress = 0
Return
MouseUnder(Controls) {
MouseGetPos,,,, Control
If RegExMatch(Control, Controls)
Return, True
} |
|
|
Back to top |
|
 |
Avada

Joined: 01 Aug 2008 Posts: 10420 Location: Россия, Саратов
|
(Separately) Posted: Sun Aug 04, 2013 15:56 Post subject: |
|
|
mf-zl
Прогресс есть. В TC, где не включено рамочное выделение TWinKey, длинный средний щелчок срабатывает нормально, автоскроллинг по короткому щелчку тоже работает. Конфликта нет. Двойной средний клик срабатывает почему-то со второго либо третьего раза (первый раз включается автосроллинг).
При включённом рамочном выделении теперь работает только скрипт. Он блокирует создание рамочного выделения (средняя кнопка при перетаскивании), а включённая — пусть и неработающая — фича TWinKey блокирует автоскроллинг (но последнее — отдельный вопрос не для этой темы). Двойной средний щелчок срабатывает всегда по второму разу.
Добавление мини-справки — это тоже хорошо.  _________________ Даже самая богатая фантазия
Не представит себе наши безобразия. |
|
Back to top |
|
 |
mf-zl

Joined: 21 Aug 2005 Posts: 71 Location: BLR
|
|
Back to top |
|
 |
|
|
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum
|
Powered by phpBB © 2001, 2005 phpBB Group
|