переход по скрытым папкам

Столкнулись с проблемой в использовании макросов? Здесь можно получить помощь.
Post Reply
SeMa
Posts: 157
Joined: Thu 03 Nov, 2005 12:31

переход по скрытым папкам

Post by SeMa »

Можно ли сделать макрос-аналог CtrlShiftPgUpPgDn для сабжа c отключенным режимом показа скрытых папок/файлов?
Интерересуют варианты для Far2 и Far3.
Компьютер ─ устройство, разработанное для ускорения и автоматизации человеческих ошибок
User avatar
John Doe
Бюрократ
Posts: 13855
Joined: Wed 27 Apr, 2005 20:42
Has thanked: 73 times
Been thanked: 428 times
Contact:

переход по скрытым папкам

Post by John Doe »

SeMa wrote: Можно ли сделать макрос-аналог CtrlShiftPgUpPgDn
Вероятно. Зависит от того, чего вы от него хотите.
SeMa
Posts: 157
Joined: Thu 03 Nov, 2005 12:31

переход по скрытым папкам

Post by SeMa »

John Doe wrote: Вероятно. Зависит от того, чего вы от него хотите.
Переходить в следующую/предыдущую папку независимио от аттрибута "hidden" И режима отображения скрытых папок/файлов в панелях.
Компьютер ─ устройство, разработанное для ускорения и автоматизации человеческих ошибок
User avatar
John Doe
Бюрократ
Posts: 13855
Joined: Wed 27 Apr, 2005 20:42
Has thanked: 73 times
Been thanked: 428 times
Contact:

переход по скрытым папкам

Post by John Doe »

Значит в начале макроса надо включить отображение скрытых, а в конце выключить.
Справитесь?
SeMa
Posts: 157
Joined: Thu 03 Nov, 2005 12:31

переход по скрытым папкам

Post by SeMa »

John Doe wrote: Справитесь?
Да, спасибо за подсказку. Сначала подумал, что это сложнее, чем на самом деле :\.
Компьютер ─ устройство, разработанное для ускорения и автоматизации человеческих ошибок
SeMa
Posts: 157
Joined: Thu 03 Nov, 2005 12:31

переход по скрытым папкам

Post by SeMa »

А как сделать проверку, включен ли режим отображения скрытых папок/файлов, чтобы не получилась обратная ситуация?
Компьютер ─ устройство, разработанное для ускорения и автоматизации человеческих ошибок
User avatar
John Doe
Бюрократ
Posts: 13855
Joined: Wed 27 Apr, 2005 20:42
Has thanked: 73 times
Been thanked: 428 times
Contact:

переход по скрытым папкам

Post by John Doe »

Например так:

Code: Select all

    local toggleHidden = Far.GetConfig"Panel.ShowHidden" and "CtrlH"
    Keys(toggleHidden)
-- .......................
    Keys(toggleHidden)
SeMa
Posts: 157
Joined: Thu 03 Nov, 2005 12:31

переход по скрытым папкам

Post by SeMa »

Я не силён в макросах, а в луа и подавно...
Откорректировал Panel.CtrlShiftPgUpDn.lua так:

Code: Select all

Macro {
  area="Shell"; key="CtrlShiftPgUp"; flags=""; description="Jump to the previous folder on the same level"; action = function()
  local toggleHidden = Far.GetConfig"Panel.ShowHidden" and "CtrlH"
  Keys(toggleHidden)
  if not APanel.Root then Keys('CtrlPgUp') end
  if not APanel.Bof then
    Keys('Up')
    if APanel.Folder then Keys('CtrlPgDn') end
  end
  Keys(toggleHidden)
  end;
}

Macro {
  area="Shell"; key="CtrlShiftPgDn"; flags=""; description="Jump to the next folder on the same level"; action = function()
  local toggleHidden = Far.GetConfig"Panel.ShowHidden" and "CtrlH"
  Keys(toggleHidden)
  if not APanel.Root then Keys('CtrlPgUp') end
  if not APanel.Eof then
    Keys('Down')
    if APanel.Folder then Keys('CtrlPgDn') end
  end
  Keys(toggleHidden)
  end;
}
К сожалению, не работает :(

А для Far2 как сделать?
Компьютер ─ устройство, разработанное для ускорения и автоматизации человеческих ошибок
User avatar
John Doe
Бюрократ
Posts: 13855
Joined: Wed 27 Apr, 2005 20:42
Has thanked: 73 times
Been thanked: 428 times
Contact:

переход по скрытым папкам

Post by John Doe »

SeMa wrote: К сожалению, не работает
Обновите фар.
А для Far2 как сделать?
Аналогично, но без lua.
Пытайтесь самостоятельно, а у меня far 2 даже нет.
SeMa
Posts: 157
Joined: Thu 03 Nov, 2005 12:31

переход по скрытым папкам

Post by SeMa »

John Doe wrote: Обновите фар.
FAR 3.0.4332
Компьютер ─ устройство, разработанное для ускорения и автоматизации человеческих ошибок
User avatar
John Doe
Бюрократ
Posts: 13855
Joined: Wed 27 Apr, 2005 20:42
Has thanked: 73 times
Been thanked: 428 times
Contact:

переход по скрытым папкам

Post by John Doe »

local toggleHidden = not Far.GetConfig"Panel.ShowHidden" and "CtrlH"
SeMa
Posts: 157
Joined: Thu 03 Nov, 2005 12:31

переход по скрытым папкам

Post by SeMa »

John Doe, спасибо, работает.
Компьютер ─ устройство, разработанное для ускорения и автоматизации человеческих ошибок
Post Reply

Return to “Нужна помощь”