Как создать файл?
Модераторы: Моторокер, Avada, CaptainFlint, Nik, d-view
Как создать файл?
Как в Total Соmmander быстро создать новый файл ?
В основном меню программы такую вкладку не нашла.
Посоветуйте, как это сделать
Спасибо
[mod="Avada"]Перенесено в "Общие вопросы".[/mod]
В основном меню программы такую вкладку не нашла.
Посоветуйте, как это сделать
Спасибо
[mod="Avada"]Перенесено в "Общие вопросы".[/mod]
Раз пошла такая кухня...
...или как это обычно делаю я
: на любом файле нажимаешь Shift-F5 и вводишь новое имя.
Файлы очень большого размера лучше все-таки для этой цели не использовать.
Файлы очень большого размера лучше все-таки для этой цели не использовать.
- LocKtaR-o-DarK
- Сообщения: 349
- Зарегистрирован: Пт авг 12, 2005 04:20
- Откуда: Москва
- Контактная информация:
Пошел дальше и изобрел кое что похлеще 
- CaptainFlint
- Сообщения: 6243
- Зарегистрирован: Вт дек 14, 2004 22:34
- Контактная информация:
Пока семерка не вышла могу предложить скрипт:
Нужно сохранить содержимое в файл *.vbs, повесить вызов этого файла в меню "Запуск" TotalCommander-а, на этот пункт меню через настройки повесить горяч. клавишу Shift+F7.
Единственное ограничение - после создания нужно будет обновить вид панели вручную. (Можно, конечно, обновлять и скриптом, но не хотелось его сильно усложнять.)
Код: Выделить всё
'=================================================
' Создание папки в текущей панели TC с именем,
' похожем на имя текущей папки или файла
' В параметрах вызова из TC должно быть прописано
' (2 параметра через пробел):
' %P %N
'=================================================
Dim FSO, Fold, NewPath, Input, Mes
Set FSO = CreateObject("Scripting.FileSystemObject")
Set Fold = FSO.GetFolder(WScript.Arguments(0))
Input = InputBox("Введите имя создаваемой папки", "Создание папки", WScript.Arguments(1))
If Input <> "" Then
NewPath = Fold.Path & "\" & Input
If FSO.FolderExists(NewPath) or FSO.FileExists(NewPath) Then
Mes = MsgBox("Папка или файл с таким именем уже существуют", vbExclamation, "Создание папки")
Else
FSO.CreateFolder(NewPath)
End if
End if
Set FSO = Nothing
Set Fold = Nothing
Wscript.Quit()
Единственное ограничение - после создания нужно будет обновить вид панели вручную. (Можно, конечно, обновлять и скриптом, но не хотелось его сильно усложнять.)
- LocKtaR-o-DarK
- Сообщения: 349
- Зарегистрирован: Пт авг 12, 2005 04:20
- Откуда: Москва
- Контактная информация:
- LocKtaR-o-DarK
- Сообщения: 349
- Зарегистрирован: Пт авг 12, 2005 04:20
- Откуда: Москва
- Контактная информация:
- LocKtaR-o-DarK
- Сообщения: 349
- Зарегистрирован: Пт авг 12, 2005 04:20
- Откуда: Москва
- Контактная информация:
Если нужно мгновенное создание любого файла с последующим быстрым редактированием *, можно воспользоваться текстовым редактором Akelpad, создав, например, такую кнопку...zet писал(а):Как в Total Соmmander быстро создать новый файл ?
В основном меню программы такую вкладку не нашла.
Посоветуйте, как это сделать
Спасибо
Цветовая палитра:TOTALCMD#BAR#DATA
путь\к\файлу\Akelpad "описание.txt"
syssetup.dll,14
Создать и изменить текст
1. Фиолетовый - задается путь к файлу Akelpad **
2. Синий - любое необходимое вам название файла
3. Красный - нужный формат файла
4. Зеленый - понравившийся вам значок файла (работает на winnt)
5. Оранжевый - понятное вам описание
Примечание:
для версий Akelpad 3+ необходимо добавить параметр /c+
то есть строка будет выглядеть так
путь\к\файлу\Akelpad /c+ "описание.txt"
* - для повторного быстрого редактирования файла еще раз нажмите на кнопку, курсор будет точно на том месте, где вы редактировали файл ранее
** - если Akelpad стоит в системе вместо Notepad, то вместо длинного пути (фиолетовым цветом) пишем просто notepad
Если требуется быстрое создание нескольких видов файлов, создайте несколько кнопок с нужным названием по каждому типу файла отдельно...
Править основательно можно и нужно вашим любымым редактором ессно
Последний раз редактировалось LocKtaR-o-DarK Пт янв 12, 2007 06:52, всего редактировалось 3 раза.
- LocKtaR-o-DarK
- Сообщения: 349
- Зарегистрирован: Пт авг 12, 2005 04:20
- Откуда: Москва
- Контактная информация:
Обнаружил интересную особенность - если в параметрах вызова есть %L, то TC сам обновит панели после того, как отработает скрипт.LocKtaR-o-DarK писал(а):Batya
Обновление нужно, иначе нет скриптовой автоматики
И этому есть логическое объяснение - при наличии параметра %L создается временный файл, который живет, пока команда на кнопке полностью не отработает. После этого TC убивает этот файл и обновляет панели. Это очень удобно.
Т.о. при вызове указанного мной скрипта надо указать не 2, а 3 параметра:
%P %N %L
