Включение/выключения эскизов

Рассмотрим практический пример создания собственной команды в меню Проводника.

Если вы предпочитаете просматривать файлы в режиме Значки, то заметили, что, например, значки картинок отображаются в виде эскизов. В настройках папки можно изменить данное поведение и отключить показ эскизов.

Включать или отключать эти настройки очень утомительно. Судите сами – сначала надо нажать клавишу Alt, чтобы появилась строка меню у Проводника, далее выбираем меню Сервис ► Параметры папок... . Теперь нужно переключиться на вкладку Вид и поставить или убрать флажок у команды Все-

гда отображать значки, а не эскизы. Упростим за-

дачу при помощи реестра и небольшого VBS-сцена- рия, который циклически меняет значения параме-

тра IconsOnly в разделе HKCU\Software\Microsoft \Windows\CurrentVersion\Explorer\Advanced.

Создадим новый раздел ToggleThumb в разделе

HKCU\ Software\Classes\Directory\Background\Shell

и присвоим параметру по умолчанию строковое значе-

ние Включить/ Выключить эскизы. Тем самым мы создали новую команду для контекстного меню папки в Проводнике. Обратите внимание, что теперь мы ис-

пользуем раздел HKCU, чтобы действие примера рас-

пространялось только на одного пользователя.

В только что созданном подразделе ToggleThumb cоздаем подраздел command и прописываем в параметре по умолчанию строку wscript.exe «%WinDir% \togglethumbs.vbs» (рис. 4.27).

Рис. 4.27. Настройка для выполнения сценария Теперь создадим сценарий, который будет переклю-

чать режим показа эскизов.

Листинг 4.1. Сценарий для включения и выключения эскизов

Set WscripthShell = CreateObject(«WScript.Shell») strRegPath = «HKCU\Software\Microsoft\Windows

\CurrentVersion\ Explorer\Advanced\IconsOnly» strParIconsOnly =

WscripthShell.RegRead(strRegPath) If strParIconsOnly = 0 Then scripthShell.RegWrite

strRegPath,1,"REG_DWORD"

Else scripthShell.RegWrite

strRegPath,0,"REG_DWORD" End If WscripthShell.SendKeys «{F5}»

Сохраните сценарий под именем togglethumbs.vbs и скопируйте его в папку Windows.

Теперь можно открыть Проводник и проверить работу новой команды. Для удобства я сначала выбрал режим Крупные значки, которые отображаются в виде эскизов (рис. 4.28).

Далее я выбрал в контекстном меню пункт Вклю-

чить/Выключить эскизы и получил следующий ре-

зультат – вместо эскизов я увидел значки программы Adobe Photoshop, ознакомительную версию которой я поставил несколько дней назад на своем компьютере

(рис.4.29).