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

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

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

Post by buniak_a_h » Sun 29 Sep, 2019 07:51

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

Начиная с этой версии я перестал выкладывать текст скрипта в сообщении (уж больно трудоёмко стало, т.к. он вырос). Тем более что “Select all” на сайте опять перестал работать. Теперь только во вложении в виде 7z-архива.


Вместе с файлом самого скрипта поставляются языковые файлы ClickToTitleDirRus.lng и ClickToTitleDirEng.lng и файл помощи ClickToTitleDirRus.hlf.

ClickToTitleDir-1.4.7.7z
(22.83 KiB) Downloaded 48 times
Last edited by HaRT on Wed 06 Nov, 2019 20:42, edited 62 times in total.

User avatar
HaRT
Moderator
Posts: 9142
Joined: Tue 30 Aug, 2005 17:21
Location: Санкт-Петербург
Has thanked: 90 times
Been thanked: 173 times

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

Post by HaRT » Thu 31 Oct, 2019 18:05

Latest post of the previous page:

buniak_a_h wrote:
Thu 31 Oct, 2019 17:48
изменённый кусок (если он компактный)
Собственно, их два: и
Фар есть инструмент, а не нянька. © 2009 DrKnS

buniak_a_h
Posts: 1218
Joined: Sat 20 Apr, 2013 00:17
Location: Питер
Has thanked: 88 times
Been thanked: 68 times
Contact:

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

Post by buniak_a_h » Thu 31 Oct, 2019 21:09

HaRT wrote:
Thu 31 Oct, 2019 14:22
@buniak_a_h, увы, в версии 1.4.3 при использовании меню из непосредственного режима макрос ломается — после этого он перестаёт срабатывать на щелчки по заголовку панели. В версии 1.4.1 такого ещё не было.

Если/когда соберётесь исправлять, у меня есть мелкие правки в Справку.
Исправил. Вынес функционал в функцию (симуляция конструкции try…finally, если понимаете, о чём я), вызов функции - через pcall, затем клауза finally. Не знаю, возможно этого же можно было проще достичь.

User avatar
John Doe
Бюрократ
Posts: 12519
Joined: Wed 27 Apr, 2005 20:42
Has thanked: 33 times
Been thanked: 228 times

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

Post by John Doe » Thu 31 Oct, 2019 21:13

mf.AddExitHandler

User avatar
HaRT
Moderator
Posts: 9142
Joined: Tue 30 Aug, 2005 17:21
Location: Санкт-Петербург
Has thanked: 90 times
Been thanked: 173 times

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

Post by HaRT » Thu 31 Oct, 2019 21:26

buniak_a_h wrote:
Thu 31 Oct, 2019 21:09
Исправил
Спасибо.

Ох, неаккуратно вы изменения в Справку применили — целую строку потеряли. Вот полный текст абзаца . Ну и после версии 1.4.4 третья пустая строка явно лишняя (в прочих секциях везде по две).

Ещё (артикль, кавычки). И хорошо бы строку-образец  Путь к каталогу  тоже вынести в языковые файлы, .

23:30 MSK
И по поводу [Far.GetConfig('Language.Help')=='Russian' and 'Что нового' or 'whatsnew'] — тогда уж надо What’s new, чтобы аналогично русскому.
Last edited by HaRT on Thu 31 Oct, 2019 21:31, edited 1 time in total.
Reason: Добавлен абзац про “What’s new”
Фар есть инструмент, а не нянька. © 2009 DrKnS

buniak_a_h
Posts: 1218
Joined: Sat 20 Apr, 2013 00:17
Location: Питер
Has thanked: 88 times
Been thanked: 68 times
Contact:

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

Post by buniak_a_h » Thu 31 Oct, 2019 21:31

John Doe wrote:
Thu 31 Oct, 2019 21:13
mf.AddExitHandler
Спасибо. Вот не думал, что такая нужная вещь не в языке, а в библиотеке от Far-а... Ну, на будущее... Пока я проверил - вроде, pcall(…) работает - оставил.

buniak_a_h
Posts: 1218
Joined: Sat 20 Apr, 2013 00:17
Location: Питер
Has thanked: 88 times
Been thanked: 68 times
Contact:

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

Post by buniak_a_h » Thu 31 Oct, 2019 21:37

HaRT wrote:
Thu 31 Oct, 2019 21:26
Ох, неаккуратно вы изменения в Справку применили — целую строку потеряли.
А я думал, что Вы её специально выбросили. Тем более, что она она не соответствовала и тогда, а теперь и отменена.

buniak_a_h
Posts: 1218
Joined: Sat 20 Apr, 2013 00:17
Location: Питер
Has thanked: 88 times
Been thanked: 68 times
Contact:

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

Post by buniak_a_h » Thu 31 Oct, 2019 21:44

HaRT wrote:
Thu 31 Oct, 2019 21:26
//[SampleText]
" П:\уть\к\каталогу "

//[SampleText]
" P:\ath\to\the\directory "
Слэши Вы предлагаете в тексте показывать? Или это escape-символ?

User avatar
HaRT
Moderator
Posts: 9142
Joined: Tue 30 Aug, 2005 17:21
Location: Санкт-Петербург
Has thanked: 90 times
Been thanked: 173 times

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

Post by HaRT » Thu 31 Oct, 2019 22:07

buniak_a_h wrote:
Thu 31 Oct, 2019 21:44
Слэши Вы предлагаете в тексте показывать?
Именно в тексте, чтобы форма соответствовала содержанию. А, возможно, их там надо удвоить, я эту подробность не помню.
Фар есть инструмент, а не нянька. © 2009 DrKnS

buniak_a_h
Posts: 1218
Joined: Sat 20 Apr, 2013 00:17
Location: Питер
Has thanked: 88 times
Been thanked: 68 times
Contact:

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

Post by buniak_a_h » Thu 31 Oct, 2019 22:12

HaRT wrote:
Thu 31 Oct, 2019 22:07
А, возможно, их там надо удвоить, я эту подробность не помню.
Вы, наверно, и не можете помнить. GetMsg - это моя программа - расширитель стандартной. И в качестве выражения там может быть что угодно, лишь бы синтаксически валидное. Тае что либо слэши удваивать, либо не в кавычках, а в [[…]].

User avatar
HaRT
Moderator
Posts: 9142
Joined: Tue 30 Aug, 2005 17:21
Location: Санкт-Петербург
Has thanked: 90 times
Been thanked: 173 times

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

Post by HaRT » Thu 31 Oct, 2019 22:18

buniak_a_h wrote:
Thu 31 Oct, 2019 22:12
GetMsg - это моя программа - расширитель стандартной
Я говорил не про обработчик, а про формат языкового файла Фара, детали которого я не помню.
Фар есть инструмент, а не нянька. © 2009 DrKnS

buniak_a_h
Posts: 1218
Joined: Sat 20 Apr, 2013 00:17
Location: Питер
Has thanked: 88 times
Been thanked: 68 times
Contact:

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

Post by buniak_a_h » Thu 31 Oct, 2019 22:28

HaRT wrote:
Thu 31 Oct, 2019 22:18
Я говорил не про обработчик, а про формат языкового файла Фара, детали которого я не помню.
Так и формат - мой. Сделан по возможности совместимым со стандартом. Но если стандарт препятствует каким-то возможностям (например, многострочные строковые константы, вызов функций и т.п.), то приоритет за моими не-стандартами... :-) Хозяин-барин...
P/S. Вы первую строку в языковые файлы добавили. Моей программе не мешает, но и не требуется. Потому и не использовал…
Last edited by buniak_a_h on Thu 31 Oct, 2019 22:41, edited 2 times in total.

buniak_a_h
Posts: 1218
Joined: Sat 20 Apr, 2013 00:17
Location: Питер
Has thanked: 88 times
Been thanked: 68 times
Contact:

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

Post by buniak_a_h » Thu 31 Oct, 2019 22:49

John Doe wrote:
Thu 31 Oct, 2019 21:13
mf.AddExitHandler
Это, судя по документации, привязка к макросу. Я-то имел в виду языковую конструкцию, позволяющую по окончании любого блока выполнить некую последовательность. Думаю, оформление блока в виде function и вызов её через pcall - это нормальный путь.

User avatar
John Doe
Бюрократ
Posts: 12519
Joined: Wed 27 Apr, 2005 20:42
Has thanked: 33 times
Been thanked: 228 times

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

Post by John Doe » Thu 31 Oct, 2019 23:07

Нормальный, так и надо (хотя как именно используете вы - не смотрел).

AddExitHandler можно рассматривать как частный случай этого.

buniak_a_h
Posts: 1218
Joined: Sat 20 Apr, 2013 00:17
Location: Питер
Has thanked: 88 times
Been thanked: 68 times
Contact:

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

Post by buniak_a_h » Thu 31 Oct, 2019 23:42

HaRT wrote:
Thu 31 Oct, 2019 21:26
Спасибо.
(артикль, кавычки). И хорошо бы строку-образец Путь к каталогу тоже вынести в языковые файлы, .

23:30 MSK
И по поводу [Far.GetConfig('Language.Help')=='Russian' and 'Что нового' or 'whatsnew'] — тогда уж надо What’s new, чтобы аналогично русскому.
Всё принято.
citRiks wrote:
Thu 31 Oct, 2019 05:09
В диалоге настройки цвет меняется и запоминается. Но при этом в заголовке панели всё остаётся по-прежнему.
Судя по картинке, у Вас какие-то свои цвета. Уж не знаю, что влияет - изучать надо. Белым по чёрному - это не стандарт, надо искать... Может, есть какая-то цветовая схема?

citRiks
Posts: 68
Joined: Fri 25 Oct, 2019 18:18
Has thanked: 7 times
Been thanked: 2 times

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

Post by citRiks » Mon 04 Nov, 2019 20:24

buniak_a_h wrote:
Thu 31 Oct, 2019 23:42
Судя по картинке, у Вас какие-то свои цвета
Цвета лет 5 назад как последний раз настраивались и поэтому я уже не помню конкретику. Вот собрал в кучку записи, которые были взяты в своё время на форуме.

buniak_a_h
Posts: 1218
Joined: Sat 20 Apr, 2013 00:17
Location: Питер
Has thanked: 88 times
Been thanked: 68 times
Contact:

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

Post by buniak_a_h » Mon 04 Nov, 2019 21:41

citRiks, я в цветах н силён. Тем более, у Вас что-то очень древнее: сейчас все настройки хранятся не в реестре, а в базах, насколько я знаю… Могу и ошибаться, но база Colors существует.

citRiks
Posts: 68
Joined: Fri 25 Oct, 2019 18:18
Has thanked: 7 times
Been thanked: 2 times

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

Post by citRiks » Tue 05 Nov, 2019 03:28

buniak_a_h wrote:
Mon 04 Nov, 2019 21:41
сейчас все настройки хранятся не в реестре, а в базах
Не все. Сначала настраиваются цвета консоли. А её настройки хранятся в системной базе, т.е. в реестре. А вот настройки FarColorer уже в D2F36B62-A470-418D-83A3-ED7A3710E5B5.db и настройки ConEmu в 4B675D80-1D4A-4EA9-8436-FDC23F2FC14B.db. В "%FarProfile%\PluginsData\".

Post Reply

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