Переход к следующему расширению

[sa]

Кнопка с морганием - да, но не скрипт.

Про скорость первого скрипта по сравнению со старым. У меня один результат, у тебя противоположный: нужен кто-то третий.

[Flasher]

нужен кто-то третий

Мне что-то не особо нужен, да и не дождёмся мы его. Кроме нас ветка вообще, судя по всему, никому не интересна.
Совет по кнопке: после tcm(525) добавить tcm(3305), чтобы переход осуществлялся только по файлам. Папки - это всё-таки один формат.

[sa]

Совет по кнопке: после tcm(525) добавить tcm(3305), чтобы переход осуществлялся только по файлам.

Это всё на любителя: я добавил бы в начало команду снятия выделения и с папок и с файлов tcm(524), чтобы условия при первом вызове скрипта были как при последующих. Так что добавляем к традиционной основе, кому что нравится. Выкладывал кнопку ради “моргания без выделения”.

[sa]

Немного ускорил старый скрипт, уменьшив стандартную задержку для всех последующих операций с 70 до 0:

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

'  Description:  Перейти к следующему расширению
'  Requirements: WSH Helper for TC by Volniy
'  Installation: Создайте для скрипта, например, кнопку на панели инструментов TC

Option Explicit
Dim TCS
Set TCS = CreateObject("TCScript.Helper")
TCS.LockTC True
TCS.Pause = 0
TCS.SendCommand 527 'cm_SelectCurrentExtension
TCS.SendCommand 525 'cm_ExchangeSelection
TCS.SendCommand 2053 'cm_GotoNextSelected
TCS.SendCommand 524 'cm_ClearAll
TCS.LockTC False
Set TCS = Nothing
Wscript.Quit

[Flasher]

Это всё на любителя

Да, на любителя логики. Потому как у такого нет желания, чтобы курсор прыгал по папкам, чередующимся наличием и отсутствием точек в их именах.

[sa]

Потому как у такого нет желания, чтобы курсор прыгал по папкам, чередующимся наличием и отсутствием точек в их именах.

Наверное, я чего-то недопонимаю, возможно, поведение зависит от настроек ТК. Объясни, пожалуйста, поподробнее при каких условиях бывает такое прыгание.

[Flasher]

Объясни, пожалуйста, поподробнее при каких условиях бывает такое прыгание.

Ответ перед глазами:

наличием и отсутствием точек в их именах.

Зайди в папку, где есть каталоги с точками в имени или сформируй подобный список, там и протестируй.
Проще говоря, достаточно прочесть описание команды cm_SelectCurrentExtension.
ИМХО, такое явление для папок смехотворно. Откуда у них расширения? Расширение иллюстрирует принадлежность к какому-то формату и типу данных. А у папок кроме атрибутов ничего и нет, но к расширениям они (атрибуты) отношения вообще не имеют.

[sa]

Flasher

возможно, поведение зависит от настроек ТК

Так и есть. У меня ключ MarkDirectories (Настройки > Основные операции > Выделять (по Num + и др.) равен 0, а у тебя, наверное 1: потому у меня и не скачет. Так что для пользователей с твоей установкой MarkDirectories, категорически не желающих переходить по расширениям папок (если эти расширения или их признаки у них имеются), а желающих вместо этого непосредственно из скрипта переходить к первому файлу в списке, твой совет будет очень кстати.

[Flasher]

Вот так наблюдение. А уточнять про эти "др." Гислер и стал. А очень зря.

[Avada]

У Гислера никакого "и др." вообще нет.

Selection (with Num +)
Select files only When pressing Num +, CTRL+Num +, or Num *, only files and no directories are selected.
Also select directories Directories can also be selected with the Num keys (numeric keypad)

Выделять (Num + и др.)
Только файлы При использовании таких клавиш и клавиатурных сочетаний, как Num *, Alt+Num +, Ctrl+A, выделяются только файлы, но не каталоги.
Файлы и каталоги При использовании вышеуказанных клавиш будут выделяться и файлы, и каталоги.

Мы, во-первых, дали другой набор примеров, включая Ctrl+A (эта комбинация из пояснения Гислера вообще не следует), а во-вторых, изменили жёсткую формулировку "это, это или это" на более мягкую "такие, как", подразумевающую наличие других вариантов, кроме названных.