Страница 1 из 1
Запуск Тотала с нужным файлом главного меню
Добавлено: Вт сен 14, 2010 22:45
Andrey_A
Сейчас у меня и у многих запуск Тотала происходит с загрузкой главного меню из файла Wcmd_Rus.mnu . Вопрос: Есть ли возможность запуска Тотала из уже открытого с другим файлом меню, к примеру, Wcmd_Rus_2.mnu?
Добавлено: Вт сен 14, 2010 22:51
CaptainFlint
Andrey_A
Прямой возможности нет. Можно держать или создавать дополнительный INI-файл, в котором будет прописан нужный ключ, и запускать Тотал с этим INI-файлом.
Добавлено: Вт сен 14, 2010 23:05
Andrey_A
CaptainFlint а к примеру какой он должен быть ini файл и какой нужный ключ должен прописан?
Добавлено: Ср сен 15, 2010 00:20
MVV
Как обычно, секция 4.b файла TOTALCMD.chm:
[Configuration]
Mainmenu= Contains custom main menu location and file name
То есть, для запуска тотала с другим файлом главного меню нужно просто прописать этот файл меню в конфигурационный файл, а затем запустить тотал.
Добавлено: Чт ноя 25, 2010 22:13
Andrey_A
Недавно вновь вернулся к этому вопросу. Родился скрипт:
Код: Выделить всё
'================ Описание =================
' Запуск 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