Context Menus for Total Commander

Название Контекстные меню для Total Commander
Имя файла tc_cm.powerpro
Описание Выполняет команды контекстного меню для директорий и архивов
Автор Robin Siebler
Параметры -
Вызываемые плагины win, file
Версия 1.1
Дата обновления 30.01.2009
@opposite
; open new tab in opposite pane 
if(activewindow("Total Co*")) do
    Keys {fast}{to Total Co*}+^{up}
    QUIT
endif

@this
; open new (active) tab in this pane 
if(activewindow("Total Co*")) do
    Keys {to Total Co*}^{up}
    QUIT
endif

@backg
; open new tab in this pane in the background 
if(activewindow("Total Co*")) do
    Keys {to Total Co*}^+T
    QUIT
endif

@extract_to
; extract to user specified path 
if(activewindow("Total Co*")) do
    LOCAL hFocus=WIN.GetFocus
    local extract_path = InputCancel("Extraction Path: ")
    WIN.SetFocus(hFocus)
    Wait.For(20000, activewindow("Total Co*"))
    Keys {to Total Co*}%{F9}
    Wait.For(20000, activewindow("Unpack*"))
    IF(NOT activewindow("Unpack*"))
    QUIT
    Keys {to Unpa*}{end}+{home}&(extract_path)\{enter}
endif

@extract_here
; extract archive into this subdir 
if(activewindow("Total Co*")) do
    Keys {to Total Co*}%{F9}
    Wait.Until(activewindow("Unpack*"))
    Keys {to Unpa*} {enter}
endif

@extract_opposite
; extract archive into active tab in opposite pane 
if(activewindow("Total Co*")) do
    Keys {to Total Co*}%{F9}
    Wait.Until(activewindow("Unpack*"))
    Keys {to Unpa*}{enter}
endif

@extract_subdir_current_pane
; extract archive into a subdir of the currently active pane 
if(activewindow("Total Co*")) do
    local filepath
    filepath = file.folder(_file_) ++ "\\" ++ file.name(_file_)
    Keys {to Total Co*}%{F9}
    Wait.Until(activewindow("Unpack*"))
    Keys {to Unpa*}&(filepath){enter}
endif

@extract_subdir_opposite_pane
; extract archive into a subdir of the opposite active pane 
if(activewindow("Total Co*")) do
    Keys {to Total Co*}%{F9}
    Wait.Until(activewindow("Unpack*"))
    Keys {to Unpa*}{end}&(file.name(_file_))\{enter}
endif

Комментарии

Для установки контекстных меню в Total Commander необходимо:

  1. Запустить PowerPro Configuration tool (pproconf.exe).
  2. На вкладке Setup нажать кнопку "Install Context Menu".
  3. Нажать "Import from text" и выбрать "Command List".
  4. В диалоге "Open" выбрать файл context.ini.
  5. Повторить шаги 3-4 для файла contextfolder.ini.
  6. Скопировать файл tc_cm.powerpro в директорию \PowerPro\scripts.
После перезапуска Total Commander при правом щелчке на директории будет выдано контекстное меню "Total Commander Tab options":

При правом щелчке на архиве появится контекстное меню "Total Commander Unpack options":

Архив (скрипт + 2 ini-файла + руководство)
На главную Все о Total Commander PowerPro Все скрипты