AHK: Прокрутка вкладок панелей колёсиком (тачем) мыши

Обсуждение вопросов автоматизации Total Commander с помощью сторонних программ и скриптовых технологий.

Модераторы: Avada, CaptainFlint, Nik, d-view, Моторокер

Аватара пользователя
Flasher
Сообщения: 14229
Зарегистрирован: Пт ноя 06, 2009 00:33
Откуда: Москва

Сообщение Flasher »

LonerD
Не, тишина. А ты окромя 8-ки на других системах пробовал?

Пример спойлера.
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
Аватара пользователя
LonerD
Сообщения: 1174
Зарегистрирован: Вт янв 04, 2011 03:56
Откуда: Макеевка
Контактная информация:

Сообщение LonerD »

На других системах не пробовал. Но объективных причин сбоев быть не вижу. Единственное что - функция GetBitness может неправильно срабатывать (функция определяет битность активной копии Тотала).
Попробуй строку

Код: Выделить всё

TCArch := GetBitness(TCPID)
заменить на

Код: Выделить всё

TCArch := "32"
если Тотал 32-х битный или соответственно "64" если 64-х битный.

И попробуй ещё эту же строку заменить на

Код: Выделить всё

TCArch := GetBitness(TCPID)
msgbox, % TCArch
чтобы проверить, какое именно значение возвращает функция.
Windows 11 | TC DreamLair eternal pre-α
Аватара пользователя
Flasher
Сообщения: 14229
Зарегистрирован: Пт ноя 06, 2009 00:33
Откуда: Москва

Сообщение Flasher »

Оно.
LonerD писал(а):чтобы проверить, какое именно значение возвращает функция
64 :lol:
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
Аватара пользователя
LonerD
Сообщения: 1174
Зарегистрирован: Вт янв 04, 2011 03:56
Откуда: Макеевка
Контактная информация:

Сообщение LonerD »

Flasher писал(а):Оно.
Отпишись, пожалуйста, на script-coding об этом - какая ОС, какой файл выдаёт какой результат.
Windows 11 | TC DreamLair eternal pre-α
Аватара пользователя
Flasher
Сообщения: 14229
Зарегистрирован: Пт ноя 06, 2009 00:33
Откуда: Москва

Сообщение Flasher »

LonerD
Надо сразу тогда разработчикам писать. Я проверил несколько версий, начиная с 7.56, из дистрибутива на XP/7 x86. Результат везде один.
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
Аватара пользователя
Flasher
Сообщения: 14229
Зарегистрирован: Пт ноя 06, 2009 00:33
Откуда: Москва

Сообщение Flasher »

Забыл написать, что у тебя логическая ошибка в манипуляции.
cmd := (key == "WheelUp" ? 3005 : 3006)
Надо местами поменять.
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
Аватара пользователя
LonerD
Сообщения: 1174
Зарегистрирован: Вт янв 04, 2011 03:56
Откуда: Макеевка
Контактная информация:

Сообщение LonerD »

Flasher писал(а):Забыл написать, что у тебя логическая ошибка в манипуляции.
cmd := (key == "WheelUp" ? 3005 : 3006)
Надо местами поменять.
Так и задумано, как раз таки согласно логике. Вверх - это движение вперёд (к предыдущей вкладке), вниз - это движение назад (к следующей вкладке). В Акелпаде, например так же сделано по дефолту в плагине прокрутки.
Windows 11 | TC DreamLair eternal pre-α
Аватара пользователя
Flasher
Сообщения: 14229
Зарегистрирован: Пт ноя 06, 2009 00:33
Откуда: Москва

Сообщение Flasher »

LonerD писал(а): как раз таки согласно логике
Это какая-то китайская логика. У нас движение вниз равнозначно движению вперёд по схеме "сверху вниз, слева направо". Везде в окнах горизонтальный скролл так и работает, как и переключение по вкладкам по Ctrl + Tab/Shift+Tab.
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
Аватара пользователя
LonerD
Сообщения: 1174
Зарегистрирован: Вт янв 04, 2011 03:56
Откуда: Макеевка
Контактная информация:

Сообщение LonerD »

Flasher писал(а):LonerD
Я проверил несколько версий, начиная с 7.56, из дистрибутива на XP/7 x86. Результат везде один.
То нехорошее чувство, когда понимаю, что сам балбес. :oops:
Спрашивается, зачем я проверяю битность процесса на 32-хбитной ОС?
Тем более я же сам и писал, что вначале нужно проверить битность системы...

Для полноценной работы скрипта нужно заменить

Код: Выделить всё

TCArch := GetBitness(TCPID)
на

Код: Выделить всё

if ( A_Is64bitOS != 0 )
  TCArch := 32
else
  TCArch := GetBitness(TCPID)
Windows 11 | TC DreamLair eternal pre-α
Аватара пользователя
Flasher
Сообщения: 14229
Зарегистрирован: Пт ноя 06, 2009 00:33
Откуда: Москва

Сообщение Flasher »

В 9.50+ теперь можно cm_MoveTabLeft/cm_MoveTabRight присовокупить.
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
Ответить