View previous topic :: View next topic |
Author |
Message |
Andrey_A

Joined: 10 Apr 2009 Posts: 394 Location: Сочи
|
(Separately) Posted: Tue Sep 14, 2010 22:45 Post subject: Запуск Тотала с нужным файлом главного меню |
|
|
Сейчас у меня и у многих запуск Тотала происходит с загрузкой главного меню из файла Wcmd_Rus.mnu . Вопрос: Есть ли возможность запуска Тотала из уже открытого с другим файлом меню, к примеру, Wcmd_Rus_2.mnu? |
|
Back to top |
|
 |
CaptainFlint

Joined: 14 Dec 2004 Posts: 6192 Location: Москва
|
(Separately) Posted: Tue Sep 14, 2010 22:51 Post subject: |
|
|
Andrey_A
Прямой возможности нет. Можно держать или создавать дополнительный INI-файл, в котором будет прописан нужный ключ, и запускать Тотал с этим INI-файлом. _________________ Почему же, ё-моё, ты нигде не пишешь "ё"? |
|
Back to top |
|
 |
Andrey_A

Joined: 10 Apr 2009 Posts: 394 Location: Сочи
|
(Separately) Posted: Tue Sep 14, 2010 23:05 Post subject: |
|
|
CaptainFlint а к примеру какой он должен быть ini файл и какой нужный ключ должен прописан? |
|
Back to top |
|
 |
MVV

Joined: 15 Oct 2009 Posts: 4815 Location: Ростов-Дон
|
|
Back to top |
|
 |
Andrey_A

Joined: 10 Apr 2009 Posts: 394 Location: Сочи
|
(Separately) Posted: Thu Nov 25, 2010 23:13 Post subject: |
|
|
Недавно вновь вернулся к этому вопросу. Родился скрипт: Code: | '================ Описание =================
' Запуск Total Commander с теми же настройками, но с другим меню
'================ Параметры =================
'{Путь\сохранения\Wincmd_2.ini} {Путь\до\меню_2.mnu}
'================ Примеры ================
' "%%COMMANDER_PATH%%\Wincmd_Two.ini" "%%COMMANDER_PATH%%\LANGUAGE\WCMD_RUS_Two.mnu"
'
' Автор: Аверин Андрей (25.11.2010)
' Версия: 1.0
'==========================================
Dim FSO, WSH, TCS, WinCmd, WcmdMnu
Set TCS = CreateObject("TCSCRIPT.Helper")
Set FSO = CreateObject("Scripting.FileSystemObject")
Set WSH = WScript.CreateObject("WScript.Shell")
WinCmd = FSO.GetAbsolutePathName(WSH.ExpandEnvironmentStrings(WScript.Arguments(0)))
WcmdMnu = FSO.GetAbsolutePathName(WSH.ExpandEnvironmentStrings(WScript.Arguments(1)))
TCS.SendCommand "cm_ConfigSaveDirHistory" ' - сохранение настроек
FSO.CopyFile TCS.TCPath & "\Wincmd.ini", WinCmd, 1 ' - дубликат Wincmd.ini
TCS.INIWrite WinCmd, "Configuration", "Mainmenu", WcmdMnu ' - запись в дубликат путь открываемого меню
WSH.run chr(34) & TCS.TCPath & "\TOTALCMD.exe" & chr(34) & " " & "/i=" & chr(34) & WinCmd & chr(34)
Set TCS = Nothing
Set WSH = Nothing
Set FSO = Nothing
WScript.Quit |
Создайте любое меню в LANGUAGE\WCMD_RUS_Two.mnu |
|
Back to top |
|
 |
|