Latest post of the previous page:
John DoeНету ни каких проблем - прописываешь асоциацию и всё зашибись.
Алекс, год назад я уже пытался это сделать, но столкнулся с неразрешимой тогда проблемой.t-rex wrote: Нету ни каких проблем - прописываешь асоциацию и всё зашибись.
Глянь еще раз:Ну это не совсем баг так как для ассоциаций этот файл создаёться в %temp% только на время выполнения команды. Но наверно надо сделать так что если команда была префикс и открылась панель плагинва то держать %temp% до закрытия плагина. Но это пока что проблемно.
...
...
Короче пока что префиксы для таких вещей не предназначены, надо пользоваться стандартным входом в архив.
Code: Select all
%path = APanel.UNCPath;
%file = APanel.Current;
%p=index(%path,":");
$if( %p < 0 )
; Если нет двоеточия - выход,
$exit
$end
%prefix=substr(%path,0,%p+1);
$if( %prefix!="7-zip:" && %prefix!="ma:" )
; Если не в архиве - выход
$exit
$end
; Очистить командную строку!
Esc
; Путь без префикса
%path = substr(%path,%p+1,len(%path)-%p);
; Находимся ли в корне архива
%root = %path=="\\";
; Выходим из архива
$if( %root )
CtrlBackSlash
$else
CtrlBackSlash CtrlBackSlash
$end
; Меняем архиватор
$if(%prefix=="7-zip:")
$if( !%root )
; "лишние" символы у 7zip
%path = substr(%path,1,len(%path)-2);
$end
$text "ma:"
$else $if(%prefix=="ma:")
;%path = substr(%path,0,len(%path)-1);
$text "7-zip:"
$end $end
CtrlEnter Enter
$if( !%root )
$text "cd "
$text %path
Enter
$end
Panel.SetPos(0,%file)