Страница 2 из 3

Добавлено: Вт ноя 22, 2016 16:45
Flasher
sa писал(а):Какие аргументы против?
Всё сразу становится обозримо (некрасиво).

Добавлено: Вт ноя 22, 2016 17:05
Dimsok
Версия ТСFS2 у тебя какая?
Последнюю поставил. Последний вариант вроде заработал. Потом попробую приспособить это дело всё же к askparam, чтобы был список предопределённых расширений, которые можно было бы быстро выбирать.

Добавлено спустя 4 минуты:

Только окно TC как-то странно себя ведёт, на фон куда-то уходит, если такого расширения не оказывается.

Добавлено: Вт ноя 22, 2016 17:14
Flasher
Dimsok
Последний релиз или бету? С бетой выше проблемка.
И чем тебя меню не устраивает? Можно создать команду в TCFS2.ini для этих дел. Зато удобнее пользоваться, иконки можно приспособить.
Dimsok писал(а):на фон куда-то уходит
Вообще-то должно появляться окно "Такие файлы не найдены".

Добавлено: Вт ноя 22, 2016 17:22
Dimsok
TCFS2_2.3.0.504

Добавлено: Вт ноя 22, 2016 18:02
Flasher
Эта годится.

Добавлено спустя 40 минут:
Dimsok писал(а):если такого расширения не оказывается
Скриптом можно проверять:

Код: Выделить всё

'===================== VBS =====================
' Перейти к первому файлу с заданным расширением
' Условие: путь запуска - пустой
' Параметр: <расширение>
'================ Путь к TCFS2 =================
TCFS2 = "%COMMANDER_PATH%\Utils\TCFS2\TCFS2.exe"
'===============================================
With CreateObject("WScript.Shell")
  Set Items = CreateObject("Shell.Application").NameSpace(.CurrentDirectory).Items
  Items.Filter 73920, "*." & WScript.Arguments(0)
  If Items.Count Then _
  .Exec TCFS2 & " /ef msg($0B,0) tcm(524) tcm(521,1) send(@`*.xml`,0) send({ENTER},0) " &_
  "eval(send_wait(,findwnd(`TMyListBox`))) tcm(2023) tcm(524) tcm(2050) msg($0B,1) tcm(540)"
End With

Добавлено: Вт ноя 22, 2016 18:06
sa
Flasher писал(а):Всё сразу становится обозримо (некрасиво).
Ты точно про убирание ,0 в команде send говоришь?

Добавлено: Вт ноя 22, 2016 18:11
Flasher
Угу.

Добавлено: Вт ноя 22, 2016 19:15
sa
Что-то видимо у меня со зрением не так или смотрю не там, но так и не увидел улучшения картинки при отключении проверки активности окна в команде send. Проверял на /ef tcm(2915) send(@.txt,0) send(`{Esc 2}`,0) для TCFS2 (вер. 504) и /ef tcm(2915) send(@.txt,-1) send(`{Esc 2}`,-1) для TCFS2 (вер. 510)

Добавлено: Вт ноя 22, 2016 19:59
Flasher
Ладно, не важно, всё равно вариант так себе. Вот новый без всяких окон:
TCFS2.exe /ef "msg($0B,0) tcm(2050) tcm(524) tem(`em_Sel *.ext`) tcm(2053) msg($0B,1) tcm(524)"

em_Sel: SELECTFILES: %A

Добавлено: Вт ноя 22, 2016 20:05
sa
Flasher писал(а):Ладно, не важно,
Ты отказываешься от своих слов (без отключения проверки активности окна "Всё сразу становится обозримо")?

Добавлено: Вт ноя 22, 2016 20:14
Flasher
"Не важно" и "отказываюсь" - это не синонимы.

Добавлено: Вт ноя 22, 2016 20:19
sa
Я потому и спрашиваю.

Добавлено: Вт ноя 22, 2016 20:23
Flasher
Не надо спрашивать. Раз прямого указания не было, значит, и подтверждения твоих слов по умолчанию нет.

Добавлено: Вт ноя 22, 2016 20:30
sa
Выходит, продолжаешь утверждать, что без отключения проверки активности окна Всё сразу становится обозримо (некрасиво).

Добавлено: Вт ноя 22, 2016 20:45
Flasher
Я продолжаю утверждать, что теперь мне уже всё равно.