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

Здесь обсуждается всё, что касается макросов.
User avatar
buniak_a_h
Posts: 4259
Joined: Sat 20 Apr, 2013 00:17
Location: Санкт-Петробад
Has thanked: 222 times
Been thanked: 644 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.12.
  1. Исправлена ошибка процедуры настройки, возникшая из-за изменения интерфейса. Ошибка проявлялась при вызове настройки сликом средней клавиши (колёсиком) на заголовке панели.
  2. Сделана возможность вызова диалога настройки скрипта через меню настроек плагинов.
ClickToTitleDir-1.4.12.7z
(24.95 KiB) Downloaded 32 times

Вместе с файлом самого скрипта поставляются языковые файлы ClickToTitleDirRus.lng и ClickToTitleDirEng.lng и файл помощи ClickToTitleDirRus.hlf.
Last edited by buniak_a_h on Mon 25 Dec, 2023 02:15, edited 69 times in total.
User avatar
HaRT
Moderator
Posts: 10854
Joined: Tue 30 Aug, 2005 17:21
Has thanked: 221 times
Been thanked: 358 times

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

Post by HaRT »

Latest post of the previous page:

buniak_a_h wrote: Thu 31 Oct, 2019 17:48 изменённый кусок (если он компактный)
Собственно, их два: и
Фар есть инструмент, а не нянька. © 2009 DrKnS
User avatar
buniak_a_h
Posts: 4259
Joined: Sat 20 Apr, 2013 00:17
Location: Санкт-Петробад
Has thanked: 222 times
Been thanked: 644 times
Contact:

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

Post by buniak_a_h »

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: 13847
Joined: Wed 27 Apr, 2005 20:42
Has thanked: 73 times
Been thanked: 428 times
Contact:

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

Post by John Doe »

mf.AddExitHandler
User avatar
HaRT
Moderator
Posts: 10854
Joined: Tue 30 Aug, 2005 17:21
Has thanked: 221 times
Been thanked: 358 times

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

Post by HaRT »

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
User avatar
buniak_a_h
Posts: 4259
Joined: Sat 20 Apr, 2013 00:17
Location: Санкт-Петробад
Has thanked: 222 times
Been thanked: 644 times
Contact:

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

Post by buniak_a_h »

John Doe wrote: Thu 31 Oct, 2019 21:13 mf.AddExitHandler
Спасибо. Вот не думал, что такая нужная вещь не в языке, а в библиотеке от Far-а... Ну, на будущее... Пока я проверил - вроде, pcall(…) работает - оставил.
User avatar
buniak_a_h
Posts: 4259
Joined: Sat 20 Apr, 2013 00:17
Location: Санкт-Петробад
Has thanked: 222 times
Been thanked: 644 times
Contact:

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

Post by buniak_a_h »

HaRT wrote: Thu 31 Oct, 2019 21:26 Ох, неаккуратно вы изменения в Справку применили — целую строку потеряли.
А я думал, что Вы её специально выбросили. Тем более, что она она не соответствовала и тогда, а теперь и отменена.
User avatar
buniak_a_h
Posts: 4259
Joined: Sat 20 Apr, 2013 00:17
Location: Санкт-Петробад
Has thanked: 222 times
Been thanked: 644 times
Contact:

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

Post by buniak_a_h »

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

//[SampleText]
" P:\ath\to\the\directory "
Слэши Вы предлагаете в тексте показывать? Или это escape-символ?
User avatar
HaRT
Moderator
Posts: 10854
Joined: Tue 30 Aug, 2005 17:21
Has thanked: 221 times
Been thanked: 358 times

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

Post by HaRT »

buniak_a_h wrote: Thu 31 Oct, 2019 21:44 Слэши Вы предлагаете в тексте показывать?
Именно в тексте, чтобы форма соответствовала содержанию. А, возможно, их там надо удвоить, я эту подробность не помню.
Фар есть инструмент, а не нянька. © 2009 DrKnS
User avatar
buniak_a_h
Posts: 4259
Joined: Sat 20 Apr, 2013 00:17
Location: Санкт-Петробад
Has thanked: 222 times
Been thanked: 644 times
Contact:

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

Post by buniak_a_h »

HaRT wrote: Thu 31 Oct, 2019 22:07 А, возможно, их там надо удвоить, я эту подробность не помню.
Вы, наверно, и не можете помнить. GetMsg - это моя программа - расширитель стандартной. И в качестве выражения там может быть что угодно, лишь бы синтаксически валидное. Тае что либо слэши удваивать, либо не в кавычках, а в [[…]].
User avatar
HaRT
Moderator
Posts: 10854
Joined: Tue 30 Aug, 2005 17:21
Has thanked: 221 times
Been thanked: 358 times

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

Post by HaRT »

buniak_a_h wrote: Thu 31 Oct, 2019 22:12 GetMsg - это моя программа - расширитель стандартной
Я говорил не про обработчик, а про формат языкового файла Фара, детали которого я не помню.
Фар есть инструмент, а не нянька. © 2009 DrKnS
User avatar
buniak_a_h
Posts: 4259
Joined: Sat 20 Apr, 2013 00:17
Location: Санкт-Петробад
Has thanked: 222 times
Been thanked: 644 times
Contact:

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

Post by buniak_a_h »

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.
User avatar
buniak_a_h
Posts: 4259
Joined: Sat 20 Apr, 2013 00:17
Location: Санкт-Петробад
Has thanked: 222 times
Been thanked: 644 times
Contact:

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

Post by buniak_a_h »

John Doe wrote: Thu 31 Oct, 2019 21:13 mf.AddExitHandler
Это, судя по документации, привязка к макросу. Я-то имел в виду языковую конструкцию, позволяющую по окончании любого блока выполнить некую последовательность. Думаю, оформление блока в виде function и вызов её через pcall - это нормальный путь.
User avatar
John Doe
Бюрократ
Posts: 13847
Joined: Wed 27 Apr, 2005 20:42
Has thanked: 73 times
Been thanked: 428 times
Contact:

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

Post by John Doe »

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

AddExitHandler можно рассматривать как частный случай этого.
User avatar
buniak_a_h
Posts: 4259
Joined: Sat 20 Apr, 2013 00:17
Location: Санкт-Петробад
Has thanked: 222 times
Been thanked: 644 times
Contact:

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

Post by buniak_a_h »

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 В диалоге настройки цвет меняется и запоминается. Но при этом в заголовке панели всё остаётся по-прежнему.
Судя по картинке, у Вас какие-то свои цвета. Уж не знаю, что влияет - изучать надо. Белым по чёрному - это не стандарт, надо искать... Может, есть какая-то цветовая схема?
User avatar
citRiks
Posts: 1733
Joined: Fri 25 Oct, 2019 18:18
Has thanked: 610 times
Been thanked: 102 times

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

Post by citRiks »

buniak_a_h wrote: Thu 31 Oct, 2019 23:42 Судя по картинке, у Вас какие-то свои цвета
Цвета лет 5 назад как последний раз настраивались и поэтому я уже не помню конкретику. Вот собрал в кучку записи, которые были взяты в своё время на форуме.
User avatar
buniak_a_h
Posts: 4259
Joined: Sat 20 Apr, 2013 00:17
Location: Санкт-Петробад
Has thanked: 222 times
Been thanked: 644 times
Contact:

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

Post by buniak_a_h »

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

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