Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Desktop Wallpaper - Как ? [D5, D6]

Геннадий © (2002-08-14 19:03:00)
День добрый! Хочу написать свою программку, которая через заданный интервал времени изменяла бы картинку на рабочем столе. В справке по Win32 приводится информация, согласно которой вот это должно работать:

SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, PChar("C:\name.bmp"), NULL);

А вот НЕ работает! Пожалуйста, привидите пример РЕАЛЬНО работающего кода. У меня WinME, но желательно, чтоб везде работало...

Геннадий

Ученик (2002-08-15 16:33:00) [1]
http://www.users.gr.jp/ml/archive/Delphi/42096.asp

Геннадий (2002-08-15 16:24:00) [2]
А пример не подкинешь?

А то я в справке IActiveDesktop поискал и ничего не нашёл... :(

И как Jpeg устанавливать?

Ученик (2002-08-15 09:54:00) [3]
>Геннадий (15.08.02 09:47)
>И ещё у меня не получилось установить Jpeg-картинку.
Это доступно только на Active Desktop

>И ещё вопрос - а как программно включить/выключить Актив ?

Наверно, через IActiveDesktop

Геннадий (2002-08-15 09:47:00) [4]
Ну, в общем, ДА. А что?

Ну вот - выключил - и ЗАРАБОТАЛО! Ура! А почему с Актив не работает? И ещё у меня не получилось установить Jpeg-картинку.

Почему?

Спасибо за помощь!

И ещё вопрос - а как программно включить/выключить Актив ?

Ученик (2002-08-15 00:14:00) [5]
Может у тебя Active Desktop - Enabled ?

Геннадий (2002-08-14 22:23:00) [6]
Мигает, но оказывается, не обновляется. Путь к картинке должен быть прописан в

HKEY_CURRENT_USER
\SOFTWARE\Microsoft\Internet Explorer\Desktop\General

параметр Wallpaper (текстовый), затем на РабСтоле нажимаем F5 и появляется картинка.

Вопрос: Как программно нажать F5 на рабочем столе? Как его обновить?

(только сначала проверьте, а потом пишите! а то всегда понапишут, а ничего не работает!)

Геннадий (2002-08-14 21:39:00) [7]
А вот не хочет! РабСтол мигает, то есть обновляется, но картинка не появляется. А если задать несуществующий путь, то тогда и не мигает.

AL2002 (2002-08-14 19:22:00) [8]
>I__am
Не без.

TTCustomDelphiMaster (2002-08-14 19:21:00) [9]
SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, PChar("C:\name.bmp"), SPIF_SENDCHANGE);

I__am (2002-08-14 19:15:00) [10]
И потом принудительное обновление экрана!

AL2002 (2002-08-14 19:13:00) [11]
SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, PChar("c:\winnt\acd wallpaper.bmp"), SPIF_SENDCHANGE);

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »