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 

Переход в каталог а-ля Opera
Goto page 1, 2  Next
 
Post new topic   Reply to topic    Total Commander Forum Index -> Общие вопросы printer-friendly view
View previous topic :: View next topic  
Author Message
DoctorIkari



Joined: 28 Feb 2010
Posts: 53
Location: Nihon

Post (Separately) Posted: Fri Apr 16, 2010 18:13    Post subject: Переход в каталог а-ля Opera Reply with quote

Каким образом можно осуществить переход в каталог, путь которого хранится в буфере обмена.
Желательно, чтобы было так: Copy копируем путь, Ctrl+T новая вкладка, Ctrl+B переход в нужный каталог в текущей панели.

Как забиндить на хоткей через UltraTCEdidor известно, дело за малым)
Back to top
View user's profile Send private message Yahoo Messenger
D1P



Joined: 20 Dec 2004
Posts: 2973
Location: Тбилиси

Post (Separately) Posted: Fri Apr 16, 2010 18:21    Post subject: Reply with quote

Идея хорошая, но реализуется проще всего скриптами.
Я пока делаю так: копирую путь, в TC жму Home (курсор на [..]), F2, Ctrl+V, Enter.
_________________
База знаний о Total Commander
Блог
Back to top
View user's profile Send private message
CaptainFlint



Joined: 14 Dec 2004
Posts: 6193
Location: Москва

Post (Separately) Posted: Fri Apr 16, 2010 18:41    Post subject: Reply with quote

DoctorIkari
Я обычно жму Ctrl+T, cd, Пробел, Ctrl+V, Enter. Не самый оптимальный путь, но мне не настолько часто это требуется, чтобы скриптами заморачиваться. Разумеется, мой метод не сработает, если быстрый поиск используется в режиме "Только буква".
_________________
Почему же, ё-моё, ты нигде не пишешь "ё"?
Back to top
View user's profile Send private message
flm



Joined: 09 Dec 2007
Posts: 467

Post (Separately) Posted: Fri Apr 16, 2010 18:51    Post subject: Reply with quote

CaptainFlint wrote:
DoctorIkari
Я обычно жму Ctrl+T, cd, Пробел, Ctrl+V, Enter. Не самый оптимальный путь, но мне не настолько часто это требуется, чтобы скриптами заморачиваться. Разумеется, мой метод не сработает, если быстрый поиск используется в режиме "Только буква".

Аналогично. Только у меня комбинация выглядит как:
cd, пробел, shift+insert, enter, enter. Открывать новую вкладку обычно не надо; shift+insert ближе к enter'у и физически и исторически Smile; второй интер приходится нажимать из-за включенной опции "auto-complete paths".
_________________
cogito ergo sum
http://www.yakimchuk.ru/questions.htm - Как правильно задавать вопросы
Back to top
View user's profile Send private message
MVV



Joined: 15 Oct 2009
Posts: 4815
Location: Ростов-Дон

Post (Separately) Posted: Fri Apr 16, 2010 20:20    Post subject: Reply with quote

У меня настроено редактирование текущего пути в заголовке по Alt+Вверх, поэтому в моем случае смена пути новой вкладки - это Alt+Вверх, [Ctrl+V | Shift+Insert] и Enter. Но такие действия делать не приходится.
_________________
TCFS2 + TCFS2Tools: Полноэкранный режим и многое другое (обсуждение)
WINCMD.RU: AskParam, CopyTree, NTLinks, Sudo, VirtualPanel…
Back to top
View user's profile Send private message
Вахмурка



Joined: 27 Dec 2004
Posts: 2586
Location: Большая деревня Москва

Post (Separately) Posted: Fri Apr 16, 2010 21:04    Post subject: Reply with quote

http://powerpro.wincmd.ru/Scripts/GoClipped.htm
_________________
Сайт PowerPro+Total Commander
Скрипты PowerPro для Total Commander
* * *
«Не усматривайте злого умысла в том, что вполне объяснимо глупостью» (Р. Хэнлон)
Back to top
View user's profile Send private message
Tol!k



Joined: 01 Apr 2008
Posts: 1727
Location: Арзамас

Post (Separately) Posted: Fri Apr 16, 2010 21:56    Post subject: Reply with quote

Code:
Option Explicit
Dim TCS
Set TCS = CreateObject("TCScript.Helper")

If WScript.Arguments.Count <> 0 Then
  TCS.SendCommand "cm_OpenNewTab", False
End If

TCS.SendCommand "cm_FocusCmdLine", False
TCS.SendKeystroke "cd " & TCS.GetTextFromClip
TCS.SendKeystroke "{ENTER}"

Set TCS = Nothing
Wscript.Quit

Любой аргумент = новая вкладка, без аргументов = в текущей
Back to top
View user's profile Send private message
DoctorIkari



Joined: 28 Feb 2010
Posts: 53
Location: Nihon

Post (Separately) Posted: Fri Apr 16, 2010 23:09    Post subject: Reply with quote

Все понял. Всем спасибо.
Остановился на варианте Tol!k
В ПоверПро еще не разобрался, вероятно поэтому этим методом не получился запуск.
Скрипт забиндил на Ctrl+B ... все летает)
Только еще такой вопрос: как скрыть консольное окно, которое мигает при выполнении скрипта.
(Параметры ставил, т.е. открывает в фоновой вкладке)
Back to top
View user's profile Send private message Yahoo Messenger
MVV



Joined: 15 Oct 2009
Posts: 4815
Location: Ростов-Дон

Post (Separately) Posted: Fri Apr 16, 2010 23:15    Post subject: Reply with quote

Создай ярлык для него и пропиши в нем запуск в свернутом виде. И бинди на Ctrl+B запуск ярлыка. Или же просто в юзеркоманде поставь запуск в свернутом виде.
_________________
TCFS2 + TCFS2Tools: Полноэкранный режим и многое другое (обсуждение)
WINCMD.RU: AskParam, CopyTree, NTLinks, Sudo, VirtualPanel…
Back to top
View user's profile Send private message
Вахмурка



Joined: 27 Dec 2004
Posts: 2586
Location: Большая деревня Москва

Post (Separately) Posted: Fri Apr 16, 2010 23:38    Post subject: Reply with quote

Так, на всякий случай, напомню - Ctrl+B по умолчанию соответствует cm_DirBranch. Осторожней надо с "родными" хоткеями. А то, к примеру, тебе напишут привычно "жми Ctrl+B", а ты и нажмешь... Может, Alt+B лучше?
_________________
Сайт PowerPro+Total Commander
Скрипты PowerPro для Total Commander
* * *
«Не усматривайте злого умысла в том, что вполне объяснимо глупостью» (Р. Хэнлон)
Back to top
View user's profile Send private message
DoctorIkari



Joined: 28 Feb 2010
Posts: 53
Location: Nihon

Post (Separately) Posted: Sat Apr 17, 2010 07:05    Post subject: Reply with quote

)) Дык ясно это. Я привык "по-Оперовскому" контрол-б... а комбинацию ТК "все файлы без папок" перенес на шифт-б
------------
К тому же на Alt у меня стоит сокрытие/показ панели инструментов. Так что тут вопрос только в удобстве Smile
Back to top
View user's profile Send private message Yahoo Messenger
DoctorIkari



Joined: 28 Feb 2010
Posts: 53
Location: Nihon

Post (Separately) Posted: Sun Jun 13, 2010 13:26    Post subject: Reply with quote

Давно появился вопрос, но руки не доходили написать.
Проблема: скрипт выполняется только при ЕНГ-раскладке, при русской же либо выдает: "файл не найден", либо открывает вкладку диска на котором нах. пункт назначения с одновременным открытием окна закрузки (иногда происходит еще и в противоположной панели)
Как исправить?
_________________
The right man in the wrong place can make all the difference in the world... (hl2)
Back to top
View user's profile Send private message Yahoo Messenger
Flasher



Joined: 06 Nov 2009
Posts: 14229
Location: Москва

Post (Separately) Posted: Sun Jun 13, 2010 15:37    Post subject: Reply with quote

DoctorIkari
Это объясняется тем, что команда TCS.SendKeystroke вводит не заданные буквы, в имитирует нажатия заданных клавиш вне зависимости от раскладки. Поэтому "cd" и прописывается как "св". Я, честно говоря, не понимаю, зачем, находясь в Тотале, нужно копировать отдельно путь самому. Было бы логичней открывать активную папку в новой вкладке, либо в новой вкладке другой панели. У меня момент с "св" решается автокорректором текста/раскладки (в сети таких несколько). Только, чтобы он успел изменить текст на нужный, желательно перед TCS.SendKeystroke "{ENTER}" поставить TCS.Pause = 400 , ну или больше. Например, как у меня
Code:
'Открыть новую вкладку с путём активного каталога
Dim TCS
Set TCS = CreateObject("TCScript.Helper")
TCS.LockTC True
TCS.SendCommand "cm_CopySrcPathToClip"
TCS.SendCommand "cm_OpenNewTab"
TCS.SendCommand "cm_FocusCmdLine"
TCS.SendKeystroke "cd " & TCS.GetTextFromClip
TCS.Pause = 400
TCS.SendKeystroke "{ENTER}"
TCS.ClearClip
Set TCS = Nothing
Wscript.Quit
Back to top
View user's profile Send private message
DoctorIkari



Joined: 28 Feb 2010
Posts: 53
Location: Nihon

Post (Separately) Posted: Sun Jun 13, 2010 18:16    Post subject: Reply with quote

Flasher, это мне нужно в основном для взаимосвязи uTorrent и TC.
Поясню: пункт меню "открыть папку" для торрента в uT открывает через проводник. Например, мне нужно просмотреть файлы, которые скачал (естественно, не через проводник!). Тогда открываю папку, копирую адрес, вставляю в тотал, дальше все ясно (жаль, что не нашел решения для автоперехода по "открыть папку" в TC). Т.о. нужно избавиться от рутинной работы.

А насчет авторедактора: не нашел ничего) Пытаюсь подстроить ПунтоСвитчер.
_________________
The right man in the wrong place can make all the difference in the world... (hl2)
Back to top
View user's profile Send private message Yahoo Messenger
Flasher



Joined: 06 Nov 2009
Posts: 14229
Location: Москва

Post (Separately) Posted: Sun Jun 13, 2010 19:31    Post subject: Reply with quote

DoctorIkari
Ситуация ясна. Тогда конечно вариант Tol!k остаётся в силе с указанной мной строкой.
DoctorIkari wrote:
А насчет авторедактора: не нашел ничего)
Тут я немного наоффтопил по теме. Wink
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    Total Commander Forum Index -> Общие вопросы All times are GMT + 4 Hours
Goto page 1, 2  Next
Page 1 of 2

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Powered by phpBB © 2001, 2005 phpBB Group