Горячее
Лучшее
Свежее
Подписки
Сообщества
Блоги
Эксперты
Войти
Забыли пароль?
или продолжите с
Создать аккаунт
Я хочу получать рассылки с лучшими постами за неделю
или
Восстановление пароля
Восстановление пароля
Получить код в Telegram
Войти с Яндекс ID Войти через VK ID
Создавая аккаунт, я соглашаюсь с правилами Пикабу и даю согласие на обработку персональных данных.
ПромокодыРаботаКурсыРекламаИгрыПополнение Steam
Пикабу Игры +1000 бесплатных онлайн игр
Погружайтесь в загадочный мир подводных приключений с игрой

Тайна морей - Затерянные сокровища: Три в ряд

Три в ряд, Казуальные, Головоломки

Играть

Топ прошлой недели

  • Oskanov Oskanov 8 постов
  • AlexKud AlexKud 26 постов
  • StariiZoldatt StariiZoldatt 3 поста
Посмотреть весь топ

Лучшие посты недели

Рассылка Пикабу: отправляем самые рейтинговые материалы за 7 дней 🔥

Нажимая кнопку «Подписаться на рассылку», я соглашаюсь с Правилами Пикабу и даю согласие на обработку персональных данных.

Спасибо, что подписались!
Пожалуйста, проверьте почту 😊

Помощь Кодекс Пикабу Команда Пикабу Моб. приложение
Правила соцсети О рекомендациях О компании
Промокоды Биг Гик Промокоды Lamoda Промокоды МВидео Промокоды Яндекс Директ Промокоды Отелло Промокоды Aroma Butik Промокоды Яндекс Путешествия Постила Футбол сегодня

Скроллинг

С этим тегом используют

Пикабу Баг Баг на Пикабу Все
168 постов сначала свежее
2
DELETED
1 год назад

Скроллинг колесиком мышки⁠⁠

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

Компьютерная помощь Windows Баг Ремонт ноутбуков Мышь Компьютерная мышка Скроллинг USB Текст
16
1
Аноним
Аноним
1 год назад

Зачем эта печенья появляется⁠⁠

при скроллинге поста на Пикабу в обратную сторону?

Пикабу Печенье Скроллинг Нововведение Текст
3
3
Battleadaj
Battleadaj
1 год назад

Вот это длиииинопост⁠⁠

Длиннопост Скроллинг Как скучно я живу Видео Без звука Вертикальное видео
0
0
user5127162
user5127162
1 год назад

А что выбираешь ты?⁠⁠

А что выбираешь ты? Медитация, Скроллинг, Таймкиллер, Жизнь
Показать полностью 1
Медитация Скроллинг Таймкиллер Жизнь
4
Lagooroo
Lagooroo
1 год назад

Эм. Я просто чай пила и ленту листала⁠⁠

Эм. Я просто чай пила и ленту листала Грустный юмор, Скроллинг, Пикабу, Скриншот

Долисталась, получается

Грустный юмор Скроллинг Пикабу Скриншот
4
48
DELETED
1 год назад

Если ты с кем-то случайно перескся взглядом, то просто улыбнись!⁠⁠

Он, скорее всего, улыбнется в ответ и вы сделаете этот мир немного счастливее.

Если ты с кем-то случайно перескся взглядом, то просто улыбнись! Ответ, Взгляд, Картинки, Длиннопост, Скроллинг, Улыбка
Если ты с кем-то случайно перескся взглядом, то просто улыбнись! Ответ, Взгляд, Картинки, Длиннопост, Скроллинг, Улыбка
Если ты с кем-то случайно перескся взглядом, то просто улыбнись! Ответ, Взгляд, Картинки, Длиннопост, Скроллинг, Улыбка
Если ты с кем-то случайно перескся взглядом, то просто улыбнись! Ответ, Взгляд, Картинки, Длиннопост, Скроллинг, Улыбка
Если ты с кем-то случайно перескся взглядом, то просто улыбнись! Ответ, Взгляд, Картинки, Длиннопост, Скроллинг, Улыбка
Если ты с кем-то случайно перескся взглядом, то просто улыбнись! Ответ, Взгляд, Картинки, Длиннопост, Скроллинг, Улыбка

Стырено отсюда, после безуспешной попытки найти этот комикс, сначала на своëм мобильном телефоне, а затем и на пикабу.

Показать полностью 6
Ответ Взгляд Картинки Длиннопост Скроллинг Улыбка
4
3
khamitov.eldar
2 года назад

Что ты открываешь, когда проснулся?⁠⁠

Многолетние наблюдения показывают, что просыпаясь, я открываю сайт новостей на букву К и читаю их. Уже очень и очень давно, со времен кризиса 2014.

Но недавно, я заметил другую привычку: открываю на автомате авито и делаю 5-7 скроллов, как обычно это делают в инстаграме, абсолютно не осознавая эти действия, отдавшись на 100% мышечной памяти.


PS кстати забавно наблюдать за активными пользователями инсты, это выглядит как невроз

[моё] Скроллинг Разгильдяйство Текст
11
43
yabalak
2 года назад
MS, Libreoffice & Google docs

Панорамирование/скроллинг/рука в Office⁠⁠

UPD:

Ссылка на скрипт: https://gitflic.ru/project/yabalak/office-pan

В двух словах: перемещаем документ зажатым колесом мыши в Microsoft Office с помощью скрипта на Autohotkey.

Панорамирование/скроллинг/рука в Office Autohotkey, Microsoft Word, Microsoft Excel, Visio, Microsoft PowerPoint, Скрипт, Скроллинг, Длиннопост

Введение

При работе в дизайнерских программах, при просмотре карт или PDF-документов Вы можете передвигать чертёж/карту/документ при зажатой кнопке мыши. В CADах это обычно средняя кнопка, в PDF — левая, в 2gis — левая или правая.

Обычно за включение этого режима отвечает кнопка с иконкой руки (panning hand), вроде такой:

Панорамирование/скроллинг/рука в Office Autohotkey, Microsoft Word, Microsoft Excel, Visio, Microsoft PowerPoint, Скрипт, Скроллинг, Длиннопост

Однако в офисных приложениях нажатие на колесо вызывает режим прокрутки, когда документ начинает ползти в сторону перемещения мыши, что не всегда удобно. Попробуем вернуть «нормальное» поведение колеса в приложениях Microsoft Office.

Word

С word-ом проще всего. Функция «рука» встроена в ворд, она называется «Режим панорамирования»:

Панорамирование/скроллинг/рука в Office Autohotkey, Microsoft Word, Microsoft Excel, Visio, Microsoft PowerPoint, Скрипт, Скроллинг, Длиннопост

В этом режиме удобно редактировать графические элементы в word при большом увеличении. Если функция панорамирования в ворде нужна Вам периодически, то можно вынести её на панель быстрого доступа (см. картинку выше). А чтобы назначить эту функцию на среднюю кнопку мыши, используем следующий скрипт AHK:

#HotIf WinActive("ahk_class OpusApp") ; Когда открыт Word...

MButton:: WordPan()

WordPan(*) {

if !(wd := GetWord()) ; Если ворд не берётся,

return ; то выход

try {

WD.ActiveWindow.View.Panning := True ; рука вкл

Click "down" ; зажали ЛКМ

KeyWait "MButton" ; ждём отпускания колеса

Click "up" ; отжали лкм

WD.ActiveWindow.View.Panning := False ; рука выкл

}

}

GetWord(Force:=0) {

static wd := ""

return GetComApp(&wd, force, "Word.Application", "Word")

}

Скачать все скрипты из статьи

В скрипте используется функция GetComApp

Visio

В visio тоже несложно использовать «руку», но она активируется странным сочетанием Ctrl+Shift+Правая кнопка мыши. Поменяем на среднюю кнопку:

#HotIf WinActive("ahk_class VISIOA")

MButton:: {

SendInput "{Ctrl down}{Shift down}"

Sleep 20

Send "{Rbutton down}"

KeyWait "MButton"

Send "{Rbutton up}"

SendInput "{Ctrl up}{Shift up}"

}

Для большего сходства с автокадом включите опцию «Панорамирование с помощью IntelliMouse» в настройках visio, чтобы поворот колеса менял увеличение:

Панорамирование/скроллинг/рука в Office Autohotkey, Microsoft Word, Microsoft Excel, Visio, Microsoft PowerPoint, Скрипт, Скроллинг, Длиннопост

Excel

А теперь начинается самое интересное. В экселе режима руки нет, хотя он был бы очень кстати для прокрутки широких таблиц влево-вправо. С другой стороны, в Excel имеется поддержка клавиши ScrollLock. Когда Scroll Lock активен (индикатор на клавиатуре горит), клавиши управления курсором ↑↓←→ не передвигают выделение, а осуществляют прокрутку листа, при этом выделение не сбивается. Попробуйте сами. Excel — одна из немногих программ, где работает Scroll Lock.

А ведь это решение! При зажатии колеса мыши мы будем активировать режим Scroll Lock, а при отжатии — снимать его. Останется периодически опрашивать положение мыши, и, если она передвинулась, сдвигать лист в соответствующую сторону клавишами ↑↓←→. Скрипт для Excel:

#HotIf WinActive("ahk_class XLMAIN") ; Excel

MButton:: ScrollLockPan ; Панорамирование СкроллЛоком

ScrollLockPan() {

static XT := 30 ; Порог обнаружения движения мыши (пикселей)

static YT := 30

static MPOLLING := 50 ; Частота опроса мыши, мс

mx0:=my0:=mx1:=my1 := 0 ; Начальные и конечные координаты мыши

MouseGetPos &mx0, &my0

SetScrollLockState 1 ; Скролл лок ВКЛ

Loop {

Sleep MPOLLING

if !GetKeyState("MButton", "P") { ; Если колесо отпущено,

SetScrollLockState 0 ; отключаем скролл лок

return ; и выходим

}

MouseGetPos &mx1, &my1

dx := mx1-mx0

dy := my1-my0

dx := round(dx/XT*1) ; Здесь значения можно подобрать по вкусу

dy := round(dy/YT*4) ; Я умножил на 4, чтобы по вертикали двигалось поживее

;tooltip "dx " dx " dy " dy

if dX > 0 {

Send "{Left " dX "}" ; Нажимаем «влево» нужное число раз (в dX — число)

} else if dX < 0 {

Send "{Right " abs(dX) "}"

}

if dY > 0 {

Send "{Up " dY "}"

} else if dY < 0 {

Send "{Down " abs(dY) "}"

}

mx0 := mx1

my0 := my1

}

}

Скачать все скрипты из статьи

Разумеется, перемещение листа будет не плавным, как в Word или Visio, а скачками: целыми колонками и строчками сразу. Также сдвиг не будет численно соответствовать количеству пикселей, на которые переместилась мышь. Да это и невозможно, ведь в общем случае все колонки имеют разную ширину, а строки отличаются по высоте.
Отрегулируйте параметры задержки (MPOLLING), порогов (XT, YT) и множители в формулах определения dX/dY так, как Вам будет удобнее.

PowerPoint

В PowerPoint тоже нет функции «рука». Действуем аналогично: опрашиваем положение мыши, вычисляем сдвиг, но вместо ScrollLock вызываем функцию SmallScroll, передавая в неё величину сдвигов:

#HotIf WinActive("ahk_class PPTFrameClass") ; PowerPoint 2010+

MButton:: ComPanP(GetPoint())

#HotIf WinActive("ahk_class PP12FrameClass") ; PowerPoint 2007

MButton:: ComPanP(GetPoint())

ComPanP(App) { ; Панорамирование для PowerPoint

static XT := 20 ; Это для панорамирования колёсиком

static YT := 20

static MPOLLING := 50

mx0:=mx1:=my0:=my1:=0

MouseGetPos &mx0, &my0

if !GetKeyState("MButton", "P")

return

loop {

sleep MPOLLING

MouseGetPos &mx1, &my1

dx := mx1-mx0

dy := my1-my0

if !GetKeyState("MButton", "P")

return

dx := round(dx/XT*2)

dy := round(dy/YT*4)

;tooltip "dx " dx " dy " dy

if (dX||dY) {

try {

App.ActiveWindow.SmallScroll -dY, dY, -dX, dX ; Отрицательные значения не воспринимает

} catch {

Tooltip "Отпустите кнопку и начните ещё раз!"

KeyWait "MButton"

Sleep 50

SendLevel 1

SendEvent "^+{MButton}"

SendLevel 0

Tooltip

return

}

mx0 := mx1

my0 := my1

}

}

}

GetPoint(Force:=0) {

static pp := ""

return GetComApp(&pp, force, "PowerPoint.Application", "PowerPoint", "PP_")

}

Скачать все скрипты из статьи

Аналогично, параметры настраиваем по вкусу.

В powerpoint есть неприятная особенность: слайд переключатся на следующий, если прокрутить в самый низ или верх слайда. См. Как отключить переход к следующему слайду колёсиком в PowerPoint.

Другие программы

Использованный приём с регулярным опросом мыши можно распространить и на другие приложения, где Вам хотелось бы добавить панорамирование. Вопрос в том, как сообщать программе, что мы хотим сдвинуть её окно. Один из способов сделать это — послать окну программы сообщение о прокрутке:

PostMessage 0x114, 1, 0, ctrl, win

Здесь 0x114 — горизонтальная прокрутка (0x115 — вертикальная),
1 — направление,
ctrl — id элемента управления
win — HWND окна.

Узнать id элемента управления можно задав ClassNN, полученный с помощью утилиты Window spy из комплекта программы AutoHotKey:

Панорамирование/скроллинг/рука в Office Autohotkey, Microsoft Word, Microsoft Excel, Visio, Microsoft PowerPoint, Скрипт, Скроллинг, Длиннопост

Ниже пример скрипта для WordPad. Маловероятно, что Вам захочется панорамировать WordPad, но как пример подойдёт:

#HotIf WinActive("ahk_class WordPadClass") ; WordPad

MButton::PanWordPad()

PanWordPad(*) {

static XT := 30

static YT := 30

static MOUSEPOLLING := 50

mx0:=my0:=mx1:=my1:=0

win := WinGetID("A") ; получим id активного окна

ctrl := ControlGetHWND("RICHEDIT50W1", win) ; получим id основного элемента управления, который двигать будем

MouseGetPos &mx0, &my0

Loop {

Sleep MOUSEPOLLING

if !GetKeyState("MButton", "P") {

return

}

MouseGetPos &mx1, &my1

dx := mx1-mx0

dy := my1-my0

dx := -round(dx/XT*3)

dy := -round(dy/YT*1)

;tooltip "dx " dx " dy " dy

if (dX||dY) {

if dX > 0 {

loop dX

PostMessage 0x114, 1, 0, ctrl, win ; вправо

} else if dX < 0 {

loop abs(dX)

PostMessage 0x114, 0, 0, ctrl, win ; влево

}

if dY > 0 {

loop dY

PostMessage 0x115, 1, 0, ctrl, win ; вниз

} else if dY < 0 {

loop abs(dY)

PostMessage 0x115, 0, 0, ctrl, win ; вверх

}

}

mx0 := mx1

my0 := my1

}

}

Скачать все скрипты из статьи

Скрипты проверялись в AutoHotKey 2.0.2

Показать полностью 4
[моё] Autohotkey Microsoft Word Microsoft Excel Visio Microsoft PowerPoint Скрипт Скроллинг Длиннопост
7
Посты не найдены
О нас
О Пикабу Контакты Реклама Сообщить об ошибке Сообщить о нарушении законодательства Отзывы и предложения Новости Пикабу Мобильное приложение RSS
Информация
Помощь Кодекс Пикабу Команда Пикабу Конфиденциальность Правила соцсети О рекомендациях О компании
Наши проекты
Блоги Работа Промокоды Игры Курсы
Партнёры
Промокоды Биг Гик Промокоды Lamoda Промокоды Мвидео Промокоды Яндекс Директ Промокоды Отелло Промокоды Aroma Butik Промокоды Яндекс Путешествия Постила Футбол сегодня
На информационном ресурсе Pikabu.ru применяются рекомендательные технологии