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

Пикабомбер

Аркады, Пиксельная, 2D

Играть

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

  • Oskanov Oskanov 8 постов
  • alekseyJHL alekseyJHL 6 постов
  • XpyMy XpyMy 1 пост
Посмотреть весь топ

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

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

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

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

Новости Пикабу Помощь Кодекс Пикабу Реклама О компании
Команда Пикабу Награды Контакты О проекте Зал славы
Промокоды Скидки Работа Курсы Блоги
Купоны Biggeek Купоны AliExpress Купоны М.Видео Купоны YandexTravel Купоны Lamoda
Мобильное приложение

Скролл

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

Пикабу Все
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
Информация
Помощь
Кодекс Пикабу
Награды
Команда Пикабу
Бан-лист
Конфиденциальность
Правила соцсети
О рекомендациях
Наши проекты
Блоги
Работа
Промокоды
Игры
Скидки
Курсы
Зал славы
Mobile
Мобильное приложение
Партнёры
Промокоды Biggeek
Промокоды Маркет Деливери
Промокоды Яндекс Путешествия
Промокоды М.Видео
Промокоды в Ленте Онлайн
Промокоды Тефаль
Промокоды Сбермаркет
Промокоды Спортмастер
Постила
Футбол сегодня
На информационном ресурсе Pikabu.ru применяются рекомендательные технологии