Обои на Рабочий стол (служба)

[GrabbeR]

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

SystemParametersInfo(SPI_SetDeskWallPaper, 0, PChar('C:\1.jpg'), SPIF_UpdateiniFile);

[DIONISKA]

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 этого не происходит.