ClickToTitleDir — переход к папкам по щелчку на заголовке панели (и др.)

Здесь обсуждается всё, что касается макросов.
buniak_a_h
Posts: 2129
Joined: Sat 20 Apr, 2013 00:17
Location: Питер
Has thanked: 131 times
Been thanked: 211 times
Contact:

ClickToTitleDir — переход к папкам по щелчку на заголовке панели (и др.)

Post by buniak_a_h »

Макрос навеян этим:
PieApple wrote: Thu 23 Jan, 2014 12:57 Еще хотел бы поделиться идеей, реализованной в Проводнике с Windows 7, Total Commander, что если нажать мышкой на имя папки в адресной строке сверху, то происходит переход вверх на эту папку.
На самом деле получилось прикольно и, возможно, полезно (если Вы любите настольных грызунов).
Суть:
Клик мышой на заголовке панели, содержащей имя папки, вызывает переход (как в проводнике). А если клик приходится на разделитель (бэкслэш), то предоставляется выбор, в какую папку перейти.
Первоначальный макрос сваян «на коленке» за полчасика, потому не судите строго. Если будут отзывы и замечания — попробую «докрутить».

Начиная с этой версии я перестал выкладывать текст скрипта в сообщении (уж больно трудоёмко стало, т.к. он вырос). Тем более что “Select all” на сайте опять перестал работать. Теперь только во вложении в виде 7z-архива.
Сведения о версии:
Версия 1.4.8.
  1. При входе в диалоговый режим предусмотрено гашение выделения текста (неудачная попытка была предпринята в версии 1.4.6).
  2. Стилистические правки в файлах помощи и языковом
  3. Перекомпонован диалог настройки таким образом, чтоб всё помещалось
  4. В настроечном диалоге реализована краткая контекстная подсказка (аналог Hint, но не всплывающая, а выводимая в «подвале» формы.
Версия 1.4.9.
  • Исправлена ошибка, приводившая к "блокировке" скрипта в случае клика по рамке панели вне заголовка (вне «чувствительной зоны»).
    (Блокировка - неработоспособность скрипта до перезагрузки макросов командой macro:load)
Версия 1.4.10.
  • Изменён алгоритм синтаксического разбора строки заголовка для корректной обработки времени, заданного в американском формате (2:10 AM) при клике по правой панели
ClickToTitleDir-1.4.10.7z
(23.92 KiB) Downloaded 26 times

Вместе с файлом самого скрипта поставляются языковые файлы ClickToTitleDirRus.lng и ClickToTitleDirEng.lng и файл помощи ClickToTitleDirRus.hlf.
Last edited by buniak_a_h on Mon 04 May, 2020 12:18, edited 65 times in total.
User avatar
HaRT
Moderator
Posts: 9600
Joined: Tue 30 Aug, 2005 17:21
Location: Санкт-Петербург
Has thanked: 114 times
Been thanked: 233 times

ClickToTitleDir — переход к папкам по щелчку на заголовке панели (и др.)

Post by HaRT »

Latest post of the previous page:

buniak_a_h wrote: Mon 21 Oct, 2019 21:34Я тоже починил, добавив в ключевое слово <wrap>. Получилось так:
.Options CtrlStartPosChar=$<wrap>
Увы, в инструкции я ничего такого не нашёл.
Да, я эту опцию тоже применил по примеру справки самого Фара. Обращаю ваше внимание, что <wrap> не является ключевым словом или частью такового, это просто произвольная строка, выбранная авторами конкретного файла справки. Я поразмыслил и использовал в качестве такой строки символ <. Предлагаю оставить мой вариант, т.к. он, во-первых, куда более лаконичный и пригодный для повсеместного применения (в ClickToTitleDir) и, во-вторых, он уже последовательным образом применён ко всему файлу.
Фар есть инструмент, а не нянька. © 2009 DrKnS
buniak_a_h
Posts: 2129
Joined: Sat 20 Apr, 2013 00:17
Location: Питер
Has thanked: 131 times
Been thanked: 211 times
Contact:

ClickToTitleDir — переход к папкам по щелчку на заголовке панели (и др.)

Post by buniak_a_h »

HaRT wrote: Mon 21 Oct, 2019 21:37 Я поразмыслил и использовал в качестве такой строки символ <. Предлагаю оставить мой вариант,
Не вопрос. Если этот символ не используется в тексте... В этом есть недостаток "простых и коротких" кодовых сочетаний...
User avatar
HaRT
Moderator
Posts: 9600
Joined: Tue 30 Aug, 2005 17:21
Location: Санкт-Петербург
Has thanked: 114 times
Been thanked: 233 times

ClickToTitleDir — переход к папкам по щелчку на заголовке панели (и др.)

Post by HaRT »

buniak_a_h wrote: Mon 21 Oct, 2019 22:39 Если этот символ не используется в тексте...
Разумеется, я предварительно проверил. Ну а если в будущем понадобится, тогда и заменить будет несложно.
buniak_a_h wrote: Mon 21 Oct, 2019 22:39 недостаток "простых и коротких" кодовых сочетаний
К счастью, в Юникоде полным-полно редко используемых одиночных символов, и многие из них представлены в моноширинных шрифтах. :)

P.S.
У меня есть для вас сюрприз про «выпадающее меню по ПКМ на директории» (а заодно и по кручению колеса над компонентом пути) — кажется, я знаю, как это устроить. Но надеюсь прежде получить исправленную версию. ;)
Фар есть инструмент, а не нянька. © 2009 DrKnS
buniak_a_h
Posts: 2129
Joined: Sat 20 Apr, 2013 00:17
Location: Питер
Has thanked: 131 times
Been thanked: 211 times
Contact:

ClickToTitleDir — переход к папкам по щелчку на заголовке панели (и др.)

Post by buniak_a_h »

HaRT wrote: Mon 21 Oct, 2019 19:33 (если будете смотреть изменения, то рекомендую на первом проходе отключить показ чисто пробельных различий).
У меня возник вопрос.
Там довольно большой кусок текста повторяется дважды: . Так и задумано?
Last edited by buniak_a_h on Mon 21 Oct, 2019 23:14, edited 1 time in total.
User avatar
HaRT
Moderator
Posts: 9600
Joined: Tue 30 Aug, 2005 17:21
Location: Санкт-Петербург
Has thanked: 114 times
Been thanked: 233 times

ClickToTitleDir — переход к папкам по щелчку на заголовке панели (и др.)

Post by HaRT »

buniak_a_h wrote: Mon 21 Oct, 2019 23:12 Так и задумано?
В целом да, но если вам это кажется лишним, то можно оставить его только в статье про настройки.
Фар есть инструмент, а не нянька. © 2009 DrKnS
buniak_a_h
Posts: 2129
Joined: Sat 20 Apr, 2013 00:17
Location: Питер
Has thanked: 131 times
Been thanked: 211 times
Contact:

ClickToTitleDir — переход к папкам по щелчку на заголовке панели (и др.)

Post by buniak_a_h »

HaRT wrote: Mon 21 Oct, 2019 21:37 использовал в качестве такой строки символ <.
Неудачный выбор... Приходится всё время переключать раскладку ;-)
User avatar
HaRT
Moderator
Posts: 9600
Joined: Tue 30 Aug, 2005 17:21
Location: Санкт-Петербург
Has thanked: 114 times
Been thanked: 233 times

ClickToTitleDir — переход к папкам по щелчку на заголовке панели (и др.)

Post by HaRT »

buniak_a_h wrote: Tue 22 Oct, 2019 00:20 Приходится всё время переключать раскладку
А с $<wrap> было бы проще? ;)
Ну и можно сперва всё написать, а затем в начале каждого сдвинутого абзаца вставить маркер.
Фар есть инструмент, а не нянька. © 2009 DrKnS
buniak_a_h
Posts: 2129
Joined: Sat 20 Apr, 2013 00:17
Location: Питер
Has thanked: 131 times
Been thanked: 211 times
Contact:

ClickToTitleDir — переход к папкам по щелчку на заголовке панели (и др.)

Post by buniak_a_h »

HaRT wrote: Tue 22 Oct, 2019 00:23 Ну и можно сперва всё написать, а затем в начале каждого сдвинутого абзаца вставить маркер.
buniak_a_h
Posts: 2129
Joined: Sat 20 Apr, 2013 00:17
Location: Питер
Has thanked: 131 times
Been thanked: 211 times
Contact:

ClickToTitleDir — переход к папкам по щелчку на заголовке панели (и др.)

Post by buniak_a_h »

HaRT wrote: Mon 21 Oct, 2019 22:42 У меня есть для вас сюрприз про «выпадающее меню по ПКМ на директории» (а заодно и по кручению колеса над компонентом пути) — кажется, я знаю, как это устроить. Но надеюсь прежде получить исправленную версию.
Напугали...
Версия 1.3.0 . DoMenu сильно переделана...
Исправлены ошибки, перечисленные HaRT Здесь, здесь и здесь:
  1. При состоянии настройки [?] Показывать скрытые каталоги при щелчке на разделителе выводятся подпапки текущей директории, а не той, чей разделитель щёлкнули.
  2. Исправлена ошибка, в результате которой при выключенной настройке «Зацикливать» выбор подкаталога происходил немедленный выход из меню без выбора целевого каталога.
  3. Переделана процедура формирования списка вложенных папок (рефакторинг)
User avatar
HaRT
Moderator
Posts: 9600
Joined: Tue 30 Aug, 2005 17:21
Location: Санкт-Петербург
Has thanked: 114 times
Been thanked: 233 times

ClickToTitleDir — переход к папкам по щелчку на заголовке панели (и др.)

Post by HaRT »

buniak_a_h wrote: Tue 22 Oct, 2019 07:39 Версия 1.3.0
Спасибо, сегодня посмотрю.
Несколько мелочей по lng-файлу сразу:
1. Предлагаю первой строкой вставить .Language=Russian,Russian (Русский) — это и лучше формально отражает, для какого языка файл, и даёт правильную раскраску (в частности, горячих клавиш).
2. Предлагаю для кнопки Cancel использовать слово «Отменить», а то «Отказ» вызывает совершенно неправильные ассоциации, да и по форме не вписывается в ряд «Сохранить», «Сбросить». (Кстати, в самом Фаре используются именно «Отмена»/«Отменить».)
3. Предлагаю задать для кнопки Default горячую клавишу: "Сбросит&ь".

Фар есть инструмент, а не нянька. © 2009 DrKnS
User avatar
HaRT
Moderator
Posts: 9600
Joined: Tue 30 Aug, 2005 17:21
Location: Санкт-Петербург
Has thanked: 114 times
Been thanked: 233 times

ClickToTitleDir — переход к папкам по щелчку на заголовке панели (и др.)

Post by HaRT »

buniak_a_h wrote: Tue 22 Oct, 2019 07:39 Версия 1.3.0 . DoMenu сильно переделана...
И, увы, сломано позиционирование на следующий компонент пути, добавленное в версии 1.0.4, — по меньшей мере при [ ] «Зацикливать» выбор подкаталога и [x] Показывать скрытые каталоги.
Фар есть инструмент, а не нянька. © 2009 DrKnS
buniak_a_h
Posts: 2129
Joined: Sat 20 Apr, 2013 00:17
Location: Питер
Has thanked: 131 times
Been thanked: 211 times
Contact:

ClickToTitleDir — переход к папкам по щелчку на заголовке панели (и др.)

Post by buniak_a_h »

HaRT wrote: Tue 22 Oct, 2019 17:01 не используете «ёлочки»
Что такое "ёлочки"? Если имеется в виду кавычки вида «,», то на основной работе я пишу в Delphi-7 (не-юникодная) и на Харборе (вообще OEM). И не хочу пере-привыкать. Когда вспоминаю - печатаю «».
HaRT wrote: Tue 22 Oct, 2019 17:34 сломано позиционирование на следующий компонент пути
Видимо, имеется в виду первый вызов выпадающего меню. В дальнейшем при брожении туда-сюда позиционируется (при выборе ..).
Всё, перечисленное Вами, вроде, исправлено. При этом структура программы ещё сильно упростилась.
User avatar
HaRT
Moderator
Posts: 9600
Joined: Tue 30 Aug, 2005 17:21
Location: Санкт-Петербург
Has thanked: 114 times
Been thanked: 233 times

ClickToTitleDir — переход к папкам по щелчку на заголовке панели (и др.)

Post by HaRT »

buniak_a_h wrote: Tue 22 Oct, 2019 22:40 Видимо, имеется в виду первый вызов выпадающего меню.
Да, я же специально написал в багрепорте про опцию [ ] «Зацикливать» выбор подкаталога.
buniak_a_h wrote: Tue 22 Oct, 2019 22:40 Всё, перечисленное Вами, вроде, исправлено.
Где? Я в шапке вижу по-прежнему версию 1.3.0.
Фар есть инструмент, а не нянька. © 2009 DrKnS
buniak_a_h
Posts: 2129
Joined: Sat 20 Apr, 2013 00:17
Location: Питер
Has thanked: 131 times
Been thanked: 211 times
Contact:

ClickToTitleDir — переход к папкам по щелчку на заголовке панели (и др.)

Post by buniak_a_h »

HaRT wrote: Tue 22 Oct, 2019 22:49Где?
Хелп дописываю... Ещё минут 10...
buniak_a_h
Posts: 2129
Joined: Sat 20 Apr, 2013 00:17
Location: Питер
Has thanked: 131 times
Been thanked: 211 times
Contact:

ClickToTitleDir — переход к папкам по щелчку на заголовке панели (и др.)

Post by buniak_a_h »

HaRT, готово...
User avatar
HaRT
Moderator
Posts: 9600
Joined: Tue 30 Aug, 2005 17:21
Location: Санкт-Петербург
Has thanked: 114 times
Been thanked: 233 times

ClickToTitleDir — переход к папкам по щелчку на заголовке панели (и др.)

Post by HaRT »

buniak_a_h wrote: Tue 22 Oct, 2019 23:03готово
Спасибо.
Небольшое обновление:

И ещё багрепорт: если в непосредственном режиме крутнуть колесо над диском (или двоеточием), то происходит переход, а не показ директорий в корне диска.
Post Reply

Return to “Обсуждение макросов”