Распаковать в отдельный каталог...
Модераторы: Avada, CaptainFlint, Nik, d-view, Моторокер
Распаковать в отдельный каталог...
Можно ли сделать так что бы при распаковке (Alt+F6) опция "Распаковать каждый архив в отдельный каталог" была всегда включена??? Просто не понимаю зачем по умолчанию, тупо выкатываются все файлы из архива? ...никогда ещё этим не пользовался.
Это спрашивалось уже и не раз. И не только здесь, но и на оффоруме.
Пока можно использовать то, что когда-то предложил Батя (наверно он, не помню): Отредактировать соответствующую строку из русификации и поставить амперсанд & перед нужным символом РЯДОМ с F6 или F9. Т.е. можно будет сразу после Alt+F9 нажать, не отпуская alt, скажем, минус, и галка будет включена.
Пока можно использовать то, что когда-то предложил Батя (наверно он, не помню): Отредактировать соответствующую строку из русификации и поставить амперсанд & перед нужным символом РЯДОМ с F6 или F9. Т.е. можно будет сразу после Alt+F9 нажать, не отпуская alt, скажем, минус, и галка будет включена.
Но всё равно мне этот способ не нравится... хотя спасибо за ответ.
KarS
Нужно править не mnu-файл, а lng-файл.
Найди строку "5467=...". Амперсанд в строке означает, что в качестве горячей клавиши (используемой совмествно с Alt) будет использоваться символ, стоящий после него. В качестве такого символа для наиболее часто применяемых опций лучше всего использовать цифру, т.к. ввод цифры не зависит от раскладки.
Например, можно отредактировать подобным образом:
Здесь после символа "&" указан "ноль". Т.е. после нажатия Alt+F9 необходимо, не отпуская Alt, нажать "ноль". Тогда нужная галочка установится.
P.S. После редактирования lng-файла необходимо перезапустить TC или перевыбрать язык в настройках.
Нужно править не mnu-файл, а lng-файл.
Найди строку "5467=...". Амперсанд в строке означает, что в качестве горячей клавиши (используемой совмествно с Alt) будет использоваться символ, стоящий после него. В качестве такого символа для наиболее часто применяемых опций лучше всего использовать цифру, т.к. ввод цифры не зависит от раскладки.
Например, можно отредактировать подобным образом:
Код: Выделить всё
5467="Распаковать каждый архив в &0тдельный каталог (с именем архива)"P.S. После редактирования lng-файла необходимо перезапустить TC или перевыбрать язык в настройках.
Нет, я не сплю. Я просто медленно моргаю.
-
aLexx
- Сообщения: 442
- Зарегистрирован: Пн мар 14, 2005 08:33
- Откуда: Новокузнецк
- Контактная информация:
Вот, сочинил уже давно с кнопулей...
' File: UnpackSel.vbs
' Description: Распаковывает выделенные архивы (или архив под курсором), причем
' каждый архив в отдельную папку с именем, как у файла архива
' Requirements: WSH Helper for TC by Volniy
' Installation: Создайте для скрипта, например, кнопку на панели TC
' Copyright: (c) 2007, Volniy
Option Explicit
Dim WshShell, TCS, TCPath
Set TCS = CreateObject("TCSCRIPT.Helper")
Set WshShell = WScript.CreateObject("WScript.Shell")
TCS.Pause = 100
TCS.SendCommand ("cm_UnpackFiles")
'TCS.SendKeystroke "{BKSP}" 'Если распаковка нужна в ту же панель, убрать коммент
TCS.SendKeystroke "{TAB 4}"
TCS.SendKeystroke chr(32)
Set TCS = Nothing
Set TCPath = Nothing
Set WshShell = Nothing
WScript.Quit
' File: UnpackSel.vbs
' Description: Распаковывает выделенные архивы (или архив под курсором), причем
' каждый архив в отдельную папку с именем, как у файла архива
' Requirements: WSH Helper for TC by Volniy
' Installation: Создайте для скрипта, например, кнопку на панели TC
' Copyright: (c) 2007, Volniy
Option Explicit
Dim WshShell, TCS, TCPath
Set TCS = CreateObject("TCSCRIPT.Helper")
Set WshShell = WScript.CreateObject("WScript.Shell")
TCS.Pause = 100
TCS.SendCommand ("cm_UnpackFiles")
'TCS.SendKeystroke "{BKSP}" 'Если распаковка нужна в ту же панель, убрать коммент
TCS.SendKeystroke "{TAB 4}"
TCS.SendKeystroke chr(32)
Set TCS = Nothing
Set TCPath = Nothing
Set WshShell = Nothing
WScript.Quit
Тоже пытался применить похожий сценарий, только столкнулся с проблемой: он перестаёт корректно работать, если его повесить на Alt-F6 или Alt-F9. На Win-F6, например, всё нормально. Конечно, хотелось бы сохранить привычное назначение клавиш. С приведённым сценарием у меня та же песня.aLexx писал(а):Вот, сочинил уже давно с кнопулей...
Есть ли такая проблема и как её обойти, если есть?
Edit.
Обошёл проблему следующим скриптом:
Код: Выделить всё
'==================================================================
' Распаковать файлы (cm_UnpackFiles)" с включенной опцией "Распаковать
' каждый архив в отдельный каталог (с именем архива)".
'
' В TC внутреннюю cm_UnpackFiles переназначить на Ctrl+Alt+Shift+F6,
' а данный скрипт назначить на привычный Alt+F6.
'==================================================================
Dim WSH
Set WSH = WScript.CreateObject("WScript.Shell")
WSH.SendKeys "^%+{F6}{TAB 4} +{TAB 4}"
' Если не переназначать клавиши, то вместо предыдущей строки
' использовать WSH.SendKeys "%{F6}{TAB 4} +{TAB 4}"
Set WSH = Nothing
Wscript.Quit
лично я использую хоткей или кнопку
правда минус этой кнопки, что распаковывается только один архив под курсором, а не все выделенные.
Код: Выделить всё
TOTALCMD#BAR#DATA
WinRAR.exe
x %P%N "%P%O\"
C:\Program Files\WinRAR\WinRAR.exe
Распаковать (один архив) в каталог с именем архива
1
-1
я как раз хотел сейчас ссылку на эту тему кинутьBatya писал(а):А я подобное уже делал здесь.
пс. Batya, если не сложно доделай тот скрипт