View previous topic :: View next topic |
Author |
Message |
John Shade

Joined: 18 May 2009 Posts: 56
|
(Separately) Posted: Sat Aug 08, 2009 15:39 Post subject: WinRAR работа с файлами в одной панели |
|
|
Возник такой вопрос. Имеем установленный архиватор winrar и архив под курсором, который нужно извлечь в текущую папку, то есть туда же, где лежит собственно архив. Для этого хочется иметь кнопку, и при этом заставить ТС работать только с одной панелью. Это возможно?
Пояснения. Если для архива под курсором открыть контекстное меню правой кнопкой, там имеется команда winrar "извлечь в текущую папку". При ее отработке архив распаковывается, содержимое панели ТС перерисовывается (отображаются распакованные файлы архива), вторая панель ТС не затрагивается.
При попытке сделать кнопку ТС распаковывает архив в другую панель.
Code: | TOTALCMD#BAR#DATA
"c:\Program Files\WinRAR\WinRAR.exe"
x %P%N
c:\Program Files\WinRAR\WinRAR.exe
WinRAR пытаемся извлечь архив в текущую папку
c:\Program Files\WinRAR\
0
-1 |
Можно ли изменить это поведение? _________________ wbr |
|
Back to top |
|
 |
Tol!k

Joined: 01 Apr 2008 Posts: 1727 Location: Арзамас
|
(Separately) Posted: Sat Aug 08, 2009 16:38 Post subject: |
|
|
Code: | TOTALCMD#BAR#DATA
c:\Program Files\WinRAR\WinRAR.exe
x %P%N "%P"
c:\Program Files\WinRAR\WinRAR.exe
извлечь архив в текущую папку
-1 |
а лучше
' File: Unpack-Here-.vbs
' Description: Распаковывает выделенные архивы в ту же самую
' директорию, где расположены архивы
' Requirements: WSH Helper for TC by Volniy
' Installation: Создайте для скрипта, например, кнопку на панели TC
Option Explicit
Dim TCS
Set TCS=CreateObject("TCSCRIPT.Helper")
TCS.Pause=100
TCS.SendCommand "cm_UnpackFiles", False
TCS.SendKeystroke "{DELETE}"
TCS.SendKeystroke "{ENTER}"
Set TCS = Nothing
WScript.Quit |
|
Back to top |
|
 |
John Shade

Joined: 18 May 2009 Posts: 56
|
(Separately) Posted: Sun Aug 23, 2009 19:27 Post subject: |
|
|
Tol!k, с некоторым опозданием, хочу сказать спасибо.
Так я и знал, что упустил какой-то параметр (%P в данном случае). _________________ wbr |
|
Back to top |
|
 |
|