Flasher

|
Posted: Fri Apr 15, 2011 18:58 Post subject: |
|
|
Надоело постоянно отключать фильтр по Ctrl+F10, решил написать скрипт:
| Code: | ' Переключение между двумя фильтрами
' Параметры: %P%N %T%M %X%P%N %T%M%Z ">Имя_Шаблона1" ">Имя_Шаблона2" "em_ИмяКоманды1" "em_ИмяКоманды2"
' Необходима регистрация "Script helper ActiveX for TC"
' Автор - Flasher ©
'=================================
With CreateObject("TCScript.Helper")
If WScript.Arguments(0)=WScript.Arguments(1) Then
WScript.Quit
ElseIf WScript.Arguments(0)=WScript.Arguments(2) And _
.INIRead(.MainINI, "left", "userspec")=WScript.Arguments(4) Or _
WScript.Arguments(0)=WScript.Arguments(3) And _
.INIRead(.MainINI, "right", "userspec")=WScript.Arguments(4) Then
.UserCmd WScript.Arguments(7)
ElseIf WScript.Arguments(0)=WScript.Arguments(2) And _
.INIRead(.MainINI, "left", "userspec")=WScript.Arguments(5) Or _
WScript.Arguments(0)=WScript.Arguments(3) And _
.INIRead(.MainINI, "right", "userspec")=WScript.Arguments(5) Then
.UserCmd WScript.Arguments(6)
Else
WScript.Quit
End If
End With | Скрипт требует наличия двух созданных пользовательских команд, в каждой из которых прописано имя шаблона следующим образом: cd >Имя_шаблона
Таким образом вы можете, например, по одной кнопке/клавише включать/отключать заданный фильтр, предварительно создав команду отключения. Делается это просто: в диалоге поиска в поле "Искать файлы" пишем: *.* , переходим на вкладку /Шаблоны/ и жмём кнопку [Сохранить], пишем подходящее имя "Все файлы" - ОК. Потом в параметрах кнопки/команды вместо Имя_Шаблона2 пишем Все файлы, а вместо ИмяКоманды2, например, SrcAllFiles. Соответственно, в команде em_SrcAllFiles в поле "Команда" должно быть прописано: cd >Все файлы. По этой же аналогии разбираемся с реверсивной командой и шаблоном.
Естественно, параметры позволяют переключаться и между 2-мя любыми другими шаблонами фильтров. |
|