Total Commander :: Кнопка для создания файла

Кнопка для создания файла

through

FAQ

[^/[Print]\]
Goto page Previous 1, 2, 3 Next :| |:
Total Commander -> Автоматизация Total Commander

#16: Author: Tol!k, Location: Арзамас

Posted: Tue Jul 28, 2015 19:07
—
я бы вместо %pNewFile.txt использовал "%PNewFile.txt"

#17: Author: Avada, Location: Россия, Саратов

Posted: Tue Jul 28, 2015 20:16
—
Тема перенесена из "Общих вопросов" в "Автоматизацию".

#18: Author: Dioxin,

Posted: Wed Jul 29, 2015 15:43
—
Спасибо! Кавычки помогли. Теперь в любых папках всё корректно создается.

#19: Author: Афи, Location: Одесса

Posted: Thu Dec 29, 2016 21:29
—
Заметил еще одну тонкость.
Вместо AkelPad действительно можно подставлять и др. редакторы, например, PSPad или Notepad++. Все работает. Но именно PsPad не спрашивает подтверждение на создание файла даже с первоначальным вариантом скрипта от Batya (без поправки от Flasher).
И еще. Если использовать AkelPad, то он сначала создает файл, а потом, если нужно сохраняет. Поэтому, если передумать и нажать Esc, то все равно будем иметь пустой текстовый файл размером, естественно, 0 байт.
А вот с PSPad ситуация иная — если нажать Esc и отменить всю эту процедуру, то пустой файл не создается. Мне кажется, такой вариант лучше, чем удалять потом ненужный пустой файл.

#20: Author: Flasher, Location: Москва

Posted: Thu Dec 29, 2016 21:53
—

Афи wrote:

без поправки от Flasher

Она PsPad и не касалась.

Афи wrote:

Если использовать AkelPad, то он сначала создает файл, а потом, если нужно сохраняет.

Не подтверждаю. Может, версия старая?

#21: Author: Афи, Location: Одесса

Posted: Fri Dec 30, 2016 10:16
—
AkelPad последней версии — 4.9.8 х32.
Командная строка:

Code:

%Commander_path%\...\OpenWithNextNumber.vbs %COMMANDER_PATH%\...\AkelPad\AkelPad.exe

Параметры:

Code:

"%pReadMe.txt"

Скрипт OpenWithNextNumber.vbs (от Batya):

Code:

Dim Akelpad, FilePath, WS
Akelpad = WScript.Arguments(0)
FilePath = WScript.Arguments(1)
Set WS = WScript.CreateObject("WScript.Shell")
WS.Run """" & Akelpad & """ /C+ """ & NextName(FilePath) & """"
Set WS = Nothing
WScript.Quit()

Function NextName(pFilePath)
Dim FSO, Path, Name, Ext, i, Ending
Set FSO = CreateObject("Scripting.FileSystemObject")
Path = FSO.GetParentFolderName(pFilePath) & "\"
Name = FSO.GetBaseName(pFilePath)
Ext = FSO.GetExtensionName(pFilePath)
Do While FSO.FileExists(Path & Name & Ending & "." & Ext)
i = i + 1
Ending = Right("0" & i, 2)
Loop
Set FSO = Nothing
NextName = Path & Name & Ending & "." & Ext
End Function

TC: v. 9.0a x32
Windows: 7x64
Создается пустой файл и открывается в AkelPad на редактирование. Естественно, если нажать Esc и прервать процедуру, то пустой и ненужный файл остается Sad

#22: Author: Flasher, Location: Москва

Posted: Fri Dec 30, 2016 15:17
—

Афи wrote:

Естественно, если нажать Esc

В какой момент нажать, коли диалогов никаких не выводится?

Кстати говоря, функция тут плохая. Вот как это правильно делается.

#23: Author: Афи, Location: Одесса

Posted: Fri Dec 30, 2016 16:55
—
Верно, диалоговых окон нет. Я имею в виду, если нажать Esc сразу же после запуска AkelPad. Программа запущена, чистая страница, курсор мигает в начале верхней строки. И в этот момент, не набирая никакого текста, нажать Esc. Остается пустой файл ReadMe.txt (в моем случае).

Quote:

Вот как это правильно делается.

Хороший скрипт. Но у меня почему-то при его выполнении активируется клавиша Num Lock.

Last edited by Афи on Fri Dec 30, 2016 17:14; edited 1 time in total

#24: Author: Flasher, Location: Москва

Posted: Fri Dec 30, 2016 17:10
—
Так всё логично. После запуска созданный файл открывается. В заголовке окна видим его имя. Esc только лишь закрывает вкладку открытого файла и больше ничего. Какое ещё может ожидаться поведение? PsPad же не удаляет файл с закрытием вкладки. Правда ведь? Wink

Афи wrote:

Но у меня почему-то при его выполнении активируется клавиша Num Lock.

На Ctrl (+ Shift) + R ничего такого не назначено?

#25: Author: Афи, Location: Одесса

Posted: Fri Dec 30, 2016 17:31
—
Действительно, все логично. Но иногда не очень удобно.
И как бы странно это не звучало, с PsPad получается странная история. Запускаю, получаю такое:

Смотрю на диск — файла нету! В строке заголовка в PsPad он есть, но на диске его нету! Нажимаю Esc — и, вуаля! — ничего нет! Понимаю, поведение, нелогичное, но удобно! Как это оно так делается, не знаю. Я бы с удовольствием перешел на AkelPad (легче он, запускается быстрее, да и, так сказать, производителя своего поддержать), но у него поведение логичное Smile

Странно, да?

Quote:

На Ctrl (+ Shift) + R ничего такого не назначено?

В TC или глобально в Windows? В Windows ничего такого, а в TC — стандартное сочетание:
CTRL+R — Reread source directory

#26: Author: Flasher, Location: Москва

Posted: Fri Dec 30, 2016 17:57
—
PsPad, как я понял, просто добавляет в квадратные скобки заголовка последний параметр (хоть "блаблабла") комстроки. Если там нет пути, то с подтверждением сохранит в корень своей папки, если есть, то в него.
В общем, к скриптам всё это дело отношения не имеет. Это касается исключительно поведения редакторов (на вкус и цвет). Но для скрипта стоит задача создавать файл с открытием редактора, а не просто открывать редактор.

Афи wrote:

В Windows ничего такого, а в TC — стандартное сочетание:

А если без скобок?

Last edited by Flasher on Fri Dec 30, 2016 18:21; edited 1 time in total

#27: Author: Афи, Location: Одесса

Posted: Fri Dec 30, 2016 18:05
—

Quote:

А если без скобок?

Не совсем понял... Имеется в виду Ctrl+Shift+R? Если да, то в ТС на это сочетание ничего не подвешено...

#28: Author: Flasher, Location: Москва

Posted: Fri Dec 30, 2016 18:10
—
При такой правке изменится поведение?

#29: Author: Афи, Location: Одесса

Posted: Sat Dec 31, 2016 20:50
—

Quote:

При такой правке изменится поведение?

Еще как!
Все работает, классный скрипт! Но, смотрю, почему-то сортировка в панели изменилась. У меня была по типу и вдруг стала по имени. Значит, Ctrl+F3 нажалось Wink

Flasher, спасибо вам за хороший скрипт (я посмотрю на досуге, может, что подправлю, хотя и позабывал всё уже...).
С Новым Годом! Very Happy

#30: Author: Flasher, Location: Москва

Posted: Sat Dec 31, 2016 22:13
—

Афи wrote:

У меня была по типу и вдруг стала по имени. Значит, Ctrl+F3 нажалось

Ерунда какая-то. А что за система-то?
С Новым!

Total Commander -> Автоматизация Total Commander

output generated using printer-friendly topic mod. All times are GMT + 4 Hours

Goto page Previous 1, 2, 3 Next :| |: Page 2 of 3