Total Commander Forum Index Total Commander
Форум поддержки пользователей Total Commander
Сайты: Все о Total Commander | Totalcmd.net | Ghisler.com | RU.TCKB
 
 RulesRules   SearchSearch   FAQFAQ   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Single Post  Topic: Переход в папку следом за текущей в родительском каталоге 
Author Message
sa



PostPosted: Fri Apr 12, 2019 23:19    Post subject: Reply with quote

Однокнопочный вариант:
Code:
TOTALCMD#BAR#DATA
%COMMANDER_PATH%\Utils\TCFS2\TCFS2.exe /ef "if(pressedShift, varset(4,1), varset(4,0)) if(pressedCtrl, varset(3,1), varset(3,0))
run_item(locktc,1) tcm(2002) tcm(524) tcm(3303) varset(2,msg($432,1004+msg($432,1000))) tcm(524) if(varget(2)>0, varset(1,msg($432,1006+msg($432,1000))-msg($432,1008+msg($432,1000)))+if(varget(4), varset(1,varget(1)-1)+if(varget(1)>=varget(2)||(varget(1)<0&&varget(3)), varset(1,varget(2)-1)), varset(1,varget(1)+1)+if(varget(3), if(varget(1)>=varget(2), varset(1,0)), if(varget(1)>varget(2), varset(1,0), if(varget(1)==varget(2), varset(1,varget(2)-1)))))+msg($433,2049,varget(1))) tcm(2003) run_item(locktc,0) redraw"
WCMICONS.DLL,80
Перейти к следующей или предыдущей (Shift+) папке в родительском каталоге |Ctrl+ разрешает переход от последней к первой и наоборот
Для отслеживания нажатия клавиш Shift и Ctrl кроме утилиты TCFS2 потребуется модуль TCFS2Tools.
Если TCFS2Tools не установлен в TC (или просто нет желания использовать совместно мышь и клавиатуру), то на основе предложенного варианта можно сделать отдельные кнопки (или назначить отдельные клавиши), в которых, для задания направления перехода к следующей/предыдущей папке, pressedShift заменить на 0/1, а для задания запрета/разрешения перехода от последней к первой и наоборот, pressedCtrl заменить на 0/1.
View user's profile Send private message


Powered by phpBB © 2001, 2005 phpBB Group