Реестр Windows :: Используем Active Desktop


Используем Active Desktop

Автор: Tarasov Costja
Пользуетесь ли Вы такой возможностью Рабочего стола - как Active Desktop? Скорее всего нет, а даже если он и включен, то только для того, чтобы выводить в качестве обоев рисунок в формате отличном от bmp. Если на Вашем рабочем столе так много значков, что новые уже не помещаются, то Вы можете использовать в качестве фона своего рабочего стола Web-страницу инструкции, по созданию которой даны ниже, тем самым загрузив работой Active Desktop по полной программе. Это не только позволит сделать работу за компьютером более комфортной, но и добавит больше интерактивности Рабочему столу, а также даст толчок Вашей фантазии в дальнейшем развитии этой темы.
Итак, начнем:
1. Запустите Ваш любимый текстовый редактор.
2. Создайте новый документ.
3. Вставьте в него приведенный ниже код.
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<META NAME="AUTHOR" Content="Tarasov Costja">
<TITLE>WebDesk</TITLE>
<SCRIPT ID=clientEventHandlersVBS LANGUAGE=vbscript>
<!--
Dim Iid
Sub bd_onload
Iid=setInterval("bd_onclick",interval)
bd_onclick
End Sub
Sub bd_onhelp
Dim hs, NL, x
NL = Chr(13) & Chr(10)
hs = "Quick Desktop v1.1" & NL
hs = hs & Chr(9) & "Author: Tarasov Costja"
hs = hs & Chr(9) & "Click me to change my background."
x = MsgBox(hs, 0, "About QuickDesktop")
End Sub
Sub bd_onunload
clearInterval Iid
End Sub
Sub bd_onclick
Randomize
Const PicPath = "file://path\"
Const PicLast = LastIndex
ReDim PP(PicLast)
PP(0)="picture0"
PP(1)="picture1"
PP(Index)="pictureN"
...
p=fix(rnd*PicLast*5)
bd.background=PicPath+PP(p mod (PicLast+1))
'bd.tracingsrc=PicPath+PP(p mod (PicLast+1))
End Sub
-->
</SCRIPT>
</HEAD>
<BODY id="bd" onclick="bd_onclick" onload="bd_onload"
onunload="bd_onunload" text="white" bgProperties=fixed leftMargin=0
topMargin =0 rightMargin=0 bottomMargin=0 vLink=fuchsia aLink=yellow
link=lime tracingsrc="file://DefaultBGpath" tracingopacity="50">
<TABLE>
<TR>
<TD width=175 height=200>
<A href="PathSys" target=BROWSE>Системные</A><BR>
<A href="PathUtil" target=BROWSE>Программы</A><BR>
<A href="PathGames" target=BROWSE>Игры</A><BR>
</TD>
<TD width=600><IFRAME NAME="BROWSE" SRC="PathSys" height=200
width=615 allowTransparency>
К сожалению ваш обозреватель не поддерживает плавающие
рамки.</IFRAME>
</TD>
</TR>
</TABLE>
</BODY>
</HTML>
4. Создайте папки "Системные", "Программы" и "Игры", а затем перенесите в
них соответствующие ярлыки с рабочего стола.
5. Замените ниже перечисленные выделенные в коде слова нужными Вам
значениями:
interval - на интервал смены обоев рабочего стола в миллисекундах (1
секунда = 1000 миллисекунд)
path - на путь к обоям рабочего стола
LastIndex - на количество используемых обоев МИНУС один
Picture0, Picture1, PictureN - на имя файла (с расширением) обоев для
рабочего стола
Index - на индекс обоев
... - на строки вида PP(индекс_обоев) = "имя_файла_обоев_(с_расширением)"
DefaultBGpath - на путь к обоям по умолчанию
PathSys - на путь к папке раздела "системные"
PathUtil - на путь к папке раздела "программы"
PathGames - на путь к папке раздела "игры"
5. Сохраните файл под любым именем, но обязательно с расширением .htm.
6. Щелкните правой кнопкой по пустому пространству рабочего стола.
7. В появившемся контекстном меню выберите пункт "Свойства".
8. Перейдите на вкладку "Веб" и убедитесь, что установлен флажок
"Отображать веб-содержимое на рабочем столе".
9. Перейдите на вкладку "Фон" и щелкните по кнопке "Обзор".
10. Выберите сохраненный в пункте 5 файл и нажмите кнопку "Открыть".
11. Нажмите кнопку "Ok" в окне "Свойства: Экран".
12. Щелкните правой кнопкой по пустому пространству рабочего стола.
13. В появившемся контекстном меню снимите галочку "Отображать значки рабочего стола".
Панель инструментов, созданная из папки содержащей папки разделов, может
заменить панель инструментов "Рабочий стол"
Если Вы хотите хранить такие обои в той же папке, что и папки разделов, то
файл обоев должен быть скрытым. Это предотвратит появление файла обоев в
меню панели инструментов.
Для удобства добавления ярлыков в созданные нами папки можно создать ярлыки на папки разделов в папке SendTo.
Комментарий от ведущего раздела: никто не мешает Вам разнообразить эту страницу различными скриптами. Так например я делал доступ к различным программам с помощью меню вверху экрана, добавлял календарь, часы, напоминалку и другие украшательства. Благо, различных скриптов на просторах интернет просто море и все ограничивается исключительно Вашей фантазией и желанием этим заниматься. Так что не держите приведенный выше шаблон страницы за догмат веры, а активно меняйте ее, настраивайте под себя, и у Вас получится очень удобный и функциональный Рабочий стол.

читать еще по теме