mirror of
https://github.com/reactos/reactos.git
synced 2024-09-10 21:04:26 +00:00
057a69972f
CORE-8176 #resolve #comment Trunk commit r63174 should fix this issue. I merged from trunk to bring it into Shell-experiments. svn path=/branches/shell-experiments/; revision=63175
45 lines
1.4 KiB
C
45 lines
1.4 KiB
C
/*
|
|
* PROJECT: PAINT for ReactOS
|
|
* LICENSE: LGPL
|
|
* FILE: base/applications/paint/registry.c
|
|
* PURPOSE: Offering functions dealing with registry values
|
|
* PROGRAMMERS: Benedikt Freisen
|
|
*/
|
|
|
|
/* INCLUDES *********************************************************/
|
|
|
|
#include "precomp.h"
|
|
|
|
#include <winreg.h>
|
|
|
|
/* FUNCTIONS ********************************************************/
|
|
|
|
void
|
|
SetWallpaper(TCHAR * FileName, DWORD dwStyle, DWORD dwTile) //FIXME: Has to be called 2x to apply the pattern (tiled/stretched) too
|
|
{
|
|
HKEY hDesktop;
|
|
TCHAR szStyle[3], szTile[3];
|
|
|
|
SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, (PVOID) FileName, SPIF_UPDATEINIFILE);
|
|
|
|
if ((dwStyle > 2) || (dwTile > 2))
|
|
return;
|
|
|
|
if (RegOpenKeyEx(HKEY_CURRENT_USER,
|
|
_T("Control Panel\\Desktop"), 0, KEY_READ | KEY_SET_VALUE, &hDesktop) == ERROR_SUCCESS)
|
|
{
|
|
RegSetValueEx(hDesktop, _T("Wallpaper"), 0, REG_SZ, (LPBYTE) FileName,
|
|
_tcslen(FileName) * sizeof(TCHAR));
|
|
|
|
_stprintf(szStyle, _T("%lu"), dwStyle);
|
|
_stprintf(szTile, _T("%lu"), dwTile);
|
|
|
|
RegSetValueEx(hDesktop, _T("WallpaperStyle"), 0, REG_SZ, (LPBYTE) szStyle,
|
|
_tcslen(szStyle) * sizeof(TCHAR));
|
|
RegSetValueEx(hDesktop, _T("TileWallpaper"), 0, REG_SZ, (LPBYTE) szTile,
|
|
_tcslen(szTile) * sizeof(TCHAR));
|
|
|
|
RegCloseKey(hDesktop);
|
|
}
|
|
}
|