Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 16.06.2017, 09:20   #1
GrabbeR
Пользователь
 
Регистрация: 17.03.2010
Сообщений: 43
По умолчанию Обои на Рабочий стол (служба)

Добрый день!
Собственно, проект Service Application. Обои устанавливаются, но при новом входе в учетную запись. Из простого приложения работает, а из службы - нет. Как сделать динамически, чтобы эффект был сразу?

Код:
SystemParametersInfo(SPI_SetDeskWallPaper, 0, PChar('C:\1.jpg'), SPIF_UpdateiniFile);
GrabbeR вне форума Ответить с цитированием
Старый 16.06.2017, 14:04   #2
DIONISKA
Форумчанин
 
Регистрация: 07.11.2011
Сообщений: 156
По умолчанию

Код:
SystemParametersInfo(SPI_SetDeskWallPaper, 0, PChar('C:\1.jpg'),SPIF_SENDWININICHANGE);
Цитата:
SPIF_SENDWININICHANGE Broadcasts the WM_SETTINGCHANGE message after updating the user profile.
Грубо говоря при использовании этого параметра(равно как и SPIF_SENDCHANGE ) система шлёт WM_SETTINGCHANGE всем окнам верхнего уровня, а при SPIF_UPDATEINIFILE этого не происходит.
DIONISKA вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
У кого какие обои на рабочий стол? AngelOfDeath Свободное общение 286 11.08.2019 18:38
рабочий стол igor 91 Операционные системы общие вопросы 8 08.03.2012 14:31
Обои на рабочий стол C@sper Мультимедиа в Delphi 2 23.04.2011 15:59
Рабочий стол shrek1993 Софт 6 27.02.2011 11:22
Рабочий стол maladoy Свободное общение 0 01.02.2009 13:07