VBNet - Форум - Программная смена обоев

Вопрос: Программная смена обоев Добавлено: 29.10.03 05:28

Автор вопроса: Calhoon | Web-сайт: 4elovekssn.blog.ru | ICQ: 789764

Я программно меняю обою на раб. столе (HKCU\Desktop, "Wallpaper" = "<путь к картинке>"), иногда нужно только обновить экран, но иногда обоина не меняется, захоху в Свойства: Экран - обоя выделена. Щелкаю туда-сюда, нажимаю ОК, и работает. Как сделать, чтоб обоя сразу ставилась? (Ну, или хотя бы, чтоб только обновить экран надо было)
Ответить

Ответы Всего ответов: 6

Номер ответа: 1
Автор ответа:

Justas

ICQ: 259418212

Вопросов: 24
Ответов: 325

Web-сайт: justas.newmail.ru
Профиль | | #1

Добавлено: 29.10.03 05:54

Option Explicit
Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Any, ByVal fuWinIni As Long) As Long
Private Const SPI_SETDESKWALLPAPER = 20

Private Sub SetWallpaper(File As String)
SystemParametersInfo SPI_SETDESKWALLPAPER, 0, ByVal File, True
End Sub

Private Sub Form_Load()
SetWallpaper "C:\temp\123.bmp"
End Sub

Ответить

Номер ответа: 2 Автор ответа: Calhoon ICQ: 789764 Вопросов: 90 Ответов: 230	Web-сайт: 4elovekssn.blog.ru Профиль \| \| #2	Добавлено: 29.10.03 13:34
	Спасибо!!! А что значат параметры №2 и 4 (0 и True)? Ответить

Номер ответа: 3
Автор ответа:

boevik

Хранитель чата

ICQ: 137392264

Вопросов: 8
Ответов: 557

Web-сайт: www.hypertech.ru
Профиль | | #3

Добавлено: 29.10.03 13:51

параметр №2 - не используется в случае SPI_SETDESKWALLPAPER,

параметр №4 - Тrue - сохранить картинку и после restart, False - после restart востановить default

Ответить

Номер ответа: 4 Автор ответа: Calhoon ICQ: 789764 Вопросов: 90 Ответов: 230	Web-сайт: 4elovekssn.blog.ru Профиль \| \| #4	Добавлено: 29.10.03 16:45
	Ясно... А каким макаром мне поставить на раб. стол JPG (с включенным Active Desk, конечно)? А то тока BMP мне не очень нравится... Ответить

Номер ответа: 5
Автор ответа:

Justas

ICQ: 259418212

Вопросов: 24
Ответов: 325

Web-сайт: justas.newmail.ru
Профиль | | #5

Добавлено: 29.10.03 23:49

>"А каким макаром мне поставить на раб. стол JPG "

Сам - бы хотел узнать ( Как вариант, - сначала конвертить jpg в bmb, а потом класть на рабочий стол.

Ответить

Номер ответа: 6 Автор ответа: Павел Администратор ICQ: 326066673 Вопросов: 368 Ответов: 5968	Web-сайт: www.vbnet.ru Профиль \| \| #6	Добавлено: 30.10.03 09:44
	Кстати сама винда (по крайней мере XP) конвертит jpg в bmp и потом ставит обоями bmp. Так же делает ACDSee... Ответить

Страница: 1 |