reactos/dll/cpl/desk/appearance.c

   1 /* $Id$
   2  *
   3  * COPYRIGHT:       See COPYING in the top level directory
   4  * PROJECT:         ReactOS Display Control Panel
   5  * FILE:            lib/cpl/desk/appearance.c
   6  * PURPOSE:         Appearance property page
   7  *
   8  * PROGRAMMERS:     Trevor McCort (lycan359@gmail.com)
   9  *                  Timo Kreuzer (timo[dot]kreuzer[at]web[dot]de
  10  */
  11
  12 #include "desk.h"
  13 #include "appearance.h"
  14
  15 /******************************************************************************/
  16
  17 /* This const assigns the color and metric numbers to the elements from the elements list */
  18
  19 /* Size 1 (width)       Size 2 (height) Color 1                                 Color 2                                                 Font                    Fontcolor */
  20 const ASSIGNMENT g_Assignment[NUM_ELEMENTS] =
  21 { {-1,                          -1,                             COLOR_DESKTOP,                  -1,                                                             -1,                             -1},                            /* -Desktop */
  22   {SIZE_CAPTION_Y,      -1,                             COLOR_INACTIVECAPTION,  COLOR_GRADIENTINACTIVECAPTION,  FONT_CAPTION,   -1},                            /* inactive window caption */
  23   {SIZE_BORDER_X,       SIZE_BORDER_Y,  COLOR_INACTIVEBORDER,   -1,                                                             -1,                             -1},                            /* inactive window border */
  24   {SIZE_CAPTION_Y,      -1,                             COLOR_ACTIVECAPTION,    COLOR_GRADIENTACTIVECAPTION,    FONT_CAPTION,   COLOR_CAPTIONTEXT},     /* -active window caption */
  25   {SIZE_BORDER_X,       SIZE_BORDER_Y,  COLOR_ACTIVEBORDER,             -1,                                                             -1,                             -1},                            /* active window border */
  26   {SIZE_MENU_X,         SIZE_MENU_Y,    COLOR_MENU,                             -1,                                                     FONT_MENU,              COLOR_MENUTEXT},        /* menu */
  27   {SIZE_MENU_X,         SIZE_MENU_Y,    COLOR_HIGHLIGHT,                -1,                                                             FONT_HILIGHT,   COLOR_HIGHLIGHTTEXT},/* marked element */
  28   {-1,                          -1,                             COLOR_WINDOW,                   -1 /*COLOR_WINDOWFRAME*/,                               -1,                             COLOR_WINDOWTEXT},      /* window */
  29   {SIZE_SCROLL_X,       SIZE_SCROLL_Y,  COLOR_SCROLLBAR,                -1,                                                             -1,                             -1},                            /* scroll bar */
  30   {-1,                          -1,                             COLOR_3DFACE,                   -1,                                                             -1,                             COLOR_BTNTEXT},         /* 3d objects */
  31   {SIZE_SMCAPTION_Y,-1,                         -1,                                             -1,                                                             FONT_SMCAPTION, -1},                            /* palette window caption */
  32   {-1,                          -1,                             -1,                                             -1,                                                             -1,                             -1},                            /* symbol caption FIXME: Access? */
  33   {SIZE_CAPTION_Y,      -1,                             -1,                                             -1,                                                             -1,                             -1},                            /* caption bar */
  34   {-1,                          -1,                             -1,                                             -1,                                                             -1,                             COLOR_GRAYTEXT},        /* inactive menu item FIXME: Access? */
  35   {-1,                          -1,                             -1,                                             -1,                                                             FONT_DIALOG,    COLOR_WINDOWTEXT},      /* dialog */
  36   {-1,                          -1,                             -1,                                             -1,                                                             -1,                             -1},                            /* scrollbar controls FIXME: Access? */
  37   {-1,                          -1,                             COLOR_APPWORKSPACE,             -1,                                                             -1,                             -1},                            /* application background */
  38   {-1,                          -1,                             -1,                                             -1,                                                             -1,                             -1},                            /* small caption bar FIXME: Access? */
  39   {SIZE_ICON_SPC_X,     -1,                             -1,                                             -1,                                                             -1,                             -1},                            /* symbol distance horiz. */
  40   {SIZE_ICON_SPC_Y,     -1,                             -1,                                             -1,                                                             -1,                             -1},                            /* symbol distance vert. */
  41   {-1,                          -1,                             COLOR_INFOBK,                   -1,                                                             FONT_INFO,              COLOR_INFOTEXT},        /* quickinfo */
  42   {SIZE_ICON_X,         SIZE_ICON_Y,    -1,                                             -1,                                                             FONT_ICON,              -1}};                           /* symbol */
  43
  44 /* This is the list of names for the colors stored in the registry */
  45 const TCHAR g_RegColorNames[NUM_COLORS][MAX_COLORNAMELENGTH] =
  46         {TEXT("Scrollbar"),                             /* 00 = COLOR_SCROLLBAR */
  47         TEXT("Background"),                             /* 01 = COLOR_DESKTOP */
  48         TEXT("ActiveTitle"),                    /* 02 = COLOR_ACTIVECAPTION  */
  49         TEXT("InactiveTitle"),                  /* 03 = COLOR_INACTIVECAPTION */
  50         TEXT("Menu"),                                   /* 04 = COLOR_MENU */
  51         TEXT("Window"),                                 /* 05 = COLOR_WINDOW */
  52         TEXT("WindowFrame"),                    /* 06 = COLOR_WINDOWFRAME */
  53         TEXT("MenuText"),                               /* 07 = COLOR_MENUTEXT */
  54         TEXT("WindowText"),                     /* 08 = COLOR_WINDOWTEXT */
  55         TEXT("TitleText"),                              /* 09 = COLOR_CAPTIONTEXT */
  56         TEXT("ActiveBorder"),                   /* 10 = COLOR_ACTIVEBORDER */
  57         TEXT("InactiveBorder"),                 /* 11 = COLOR_INACTIVEBORDER */
  58         TEXT("AppWorkSpace"),                   /* 12 = COLOR_APPWORKSPACE */
  59         TEXT("Hilight"),                                /* 13 = COLOR_HIGHLIGHT */
  60         TEXT("HilightText"),                    /* 14 = COLOR_HIGHLIGHTTEXT */
  61         TEXT("ButtonFace"),                     /* 15 = COLOR_BTNFACE */
  62         TEXT("ButtonShadow"),                   /* 16 = COLOR_BTNSHADOW */
  63         TEXT("GrayText"),                               /* 17 = COLOR_GRAYTEXT */
  64         TEXT("ButtonText"),                     /* 18 = COLOR_BTNTEXT */
  65         TEXT("InactiveTitleText"),              /* 19 = COLOR_INACTIVECAPTIONTEXT */
  66         TEXT("ButtonHilight"),                  /* 20 = COLOR_BTNHIGHLIGHT */
  67         TEXT("ButtonDkShadow"),                 /* 21 = COLOR_3DDKSHADOW */
  68         TEXT("ButtonLight"),                    /* 22 = COLOR_3DLIGHT */
  69         TEXT("InfoText"),                               /* 23 = COLOR_INFOTEXT */
  70         TEXT("InfoWindow"),                     /* 24 = COLOR_INFOBK */
  71         TEXT("ButtonAlternateFace"),    /* 25 = COLOR_ALTERNATEBTNFACE */
  72         TEXT("HotTrackingColor"),               /* 26 = COLOR_HOTLIGHT */
  73         TEXT("GradientActiveTitle"),    /* 27 = COLOR_GRADIENTACTIVECAPTION */
  74         TEXT("GradientInactiveTitle"),  /* 28 = COLOR_GRADIENTINACTIVECAPTION */
  75         TEXT("MenuHilight"),                    /* 29 = COLOR_MENUHILIGHT */
  76         TEXT("MenuBar"),                                /* 30 = COLOR_MENUBAR */
  77 };
  78
  79 /* This is the list of used metrics and their numbers */
  80 const int g_SizeMetric[NUM_SIZES] =
  81 {
  82         SM_CXBORDER,
  83         SM_CYBORDER,
  84         SM_CYCAPTION,
  85         SM_CXICON,
  86         SM_CYICON,
  87         SM_CXICONSPACING,
  88         SM_CYICONSPACING,
  89         SM_CXMENUSIZE,
  90         SM_CYMENU,
  91         SM_CXVSCROLL,
  92         SM_CYHSCROLL,
  93         SM_CYSMCAPTION
  94 };
  95
  96 /******************************************************************************/
  97
  98 static VOID
  99 LoadCurrentTheme(GLOBALS* g)
 100 {
 101         INT i;
 102         NONCLIENTMETRICS NonClientMetrics;
 103
 104         g->Theme.bHasChanged = FALSE;
 105         /* FIXME: it may be custom! */
 106         g->Theme.bIsCustom = FALSE;
 107
 108         /* Load colors */
 109         for (i = 0; i <= 30; i++)
 110         {
 111                 g->ColorList[i] = i;
 112                 g->Theme.crColor[i] = (COLORREF)GetSysColor(i);
 113         }
 114
 115         /* Load sizes */
 116         for (i = 0; i <= 11; i++)
 117         {
 118                 g->Theme.Size[i] = GetSystemMetrics(g_SizeMetric[i]);
 119         }
 120
 121         /* Load fonts */
 122         NonClientMetrics.cbSize = sizeof(NONCLIENTMETRICS);
 123         SystemParametersInfo(SPI_GETNONCLIENTMETRICS, sizeof(NONCLIENTMETRICS), &NonClientMetrics, 0);
 124         g->Theme.lfFont[FONT_CAPTION] = NonClientMetrics.lfCaptionFont;
 125         g->Theme.lfFont[FONT_SMCAPTION] = NonClientMetrics.lfSmCaptionFont;
 126         g->Theme.lfFont[FONT_MENU] = NonClientMetrics.lfMenuFont;
 127         g->Theme.lfFont[FONT_INFO] = NonClientMetrics.lfStatusFont;
 128         g->Theme.lfFont[FONT_DIALOG] = NonClientMetrics.lfMessageFont;
 129         SystemParametersInfo(SPI_GETICONTITLELOGFONT, sizeof(LOGFONT), &g->Theme.lfFont[FONT_ICON], 0);
 130
 131     /* Effects */
 132    /* "Use the following transition effect for menus and tooltips" */
 133     SystemParametersInfo(SPI_GETMENUANIMATION, sizeof(BOOL), &g->Theme.Effects.bMenuAnimation, 0);
 134     SystemParametersInfo(SPI_GETMENUFADE, sizeof(BOOL), &g->Theme.Effects.bMenuFade, 0);
 135     /* FIXME: XP seems to use grayed checkboxes to reflect differences between menu and tooltips settings
 136      * Just keep them in sync for now:
 137      */
 138     g->Theme.Effects.bTooltipAnimation  = g->Theme.Effects.bMenuAnimation;
 139     g->Theme.Effects.bTooltipFade       = g->Theme.Effects.bMenuFade;
 140
 141     /* "Hide underlined letters for keyboard navigation until I press the Alt key" */
 142     SystemParametersInfo(SPI_GETKEYBOARDCUES, sizeof(BOOL), &g->Theme.Effects.bKeyboardCues, 0);
 143 }
 144
 145
 146 static BOOL
 147 LoadThemeFromReg(GLOBALS* g)
 148 {
 149         INT i;
 150         TCHAR strSizeName[20] = {TEXT("Sizes\\0")};
 151         TCHAR strValueName[10];
 152         HKEY hkNewSchemes, hkScheme, hkSize;
 153         DWORD dwType, dwLength;
 154         BOOL Ret = FALSE;
 155         INT iPreset = g->Theme.Id;
 156
 157         if(RegOpenKeyEx(HKEY_CURRENT_USER, TEXT("Control Panel\\Appearance\\New Schemes"),
 158                 0, KEY_READ, &hkNewSchemes) == ERROR_SUCCESS)
 159         {
 160                 if(RegOpenKeyEx(hkNewSchemes, g->ThemeTemplates[iPreset].strKeyName, 0, KEY_READ, &hkScheme) == ERROR_SUCCESS)
 161                 {
 162                         lstrcpyn(&strSizeName[6],g->ThemeTemplates[iPreset].strSizeName, 3);
 163                         if(RegOpenKeyEx(hkScheme, strSizeName, 0, KEY_READ, &hkSize) == ERROR_SUCCESS)
 164                         {
 165                                 Ret = TRUE;
 166
 167                                 dwLength = sizeof(DWORD);
 168                                 if (RegQueryValueEx(hkSize, TEXT("FlatMenus"), NULL, &dwType, (LPBYTE)&g->Theme.bFlatMenus, &dwLength) != ERROR_SUCCESS ||
 169                                     dwType != REG_DWORD || dwLength != sizeof(DWORD))
 170                                 {
 171                                         /* Failed to read registry value */
 172                                         g->Theme.bFlatMenus = FALSE;
 173                                         Ret = FALSE;
 174                                 }
 175
 176                                 for (i = 0; i <= 30; i++)
 177                                 {
 178                                         wsprintf(strValueName, TEXT("Color #%d"), i);
 179                                         dwLength = sizeof(COLORREF);
 180                                         if (RegQueryValueEx(hkSize, strValueName, NULL, &dwType, (LPBYTE)&g->Theme.crColor[i], &dwLength) != ERROR_SUCCESS ||
 181                                             dwType != REG_DWORD || dwLength != sizeof(COLORREF))
 182                                         {
 183                                                 /* Failed to read registry value, initialize with current setting for now */
 184                                                 g->Theme.crColor[i] = GetSysColor(i);
 185                                                 Ret = FALSE;
 186                                         }
 187                                 }
 188                                 for (i = 0; i <= 5; i++)
 189                                 {
 190                                         wsprintf(strValueName, TEXT("Font #%d"), i);
 191                                         dwLength = sizeof(LOGFONT);
 192                                         g->Theme.lfFont[i].lfFaceName[0] = 'x';
 193                                         if (RegQueryValueEx(hkSize, strValueName, NULL, &dwType, (LPBYTE)&g->Theme.lfFont[i], &dwLength) != ERROR_SUCCESS ||
 194                                             dwType != REG_BINARY || dwLength != sizeof(LOGFONT))
 195                                         {
 196                                                 /* Failed to read registry value */
 197                                                 Ret = FALSE;
 198                                         }
 199                                 }
 200                                 for (i = 0; i <= 8; i++)
 201                                 {
 202                                         wsprintf(strValueName, TEXT("Size #%d"), i);
 203                                         dwLength = sizeof(UINT64);
 204                                         if (RegQueryValueEx(hkSize, strValueName, NULL, &dwType, (LPBYTE)&g->Theme.Size[i], &dwLength) != ERROR_SUCCESS ||
 205                                             dwType != REG_QWORD || dwLength != sizeof(UINT64))
 206                                         {
 207                                                 /* Failed to read registry value, initialize with current setting for now */
 208                                                 g->Theme.Size[i] = GetSystemMetrics(g_SizeMetric[i]);
 209                                                 Ret = FALSE;
 210                                         }
 211                                 }
 212                                 RegCloseKey(hkScheme);
 213                         }
 214                         RegCloseKey(hkScheme);
 215                 }
 216                 RegCloseKey(hkNewSchemes);
 217         }
 218
 219         return Ret;
 220 }
 221
 222 static VOID
 223 _UpdateUserPref(UINT SpiGet,UINT SpiSet,BOOL *pbFlag)
 224 {
 225     SystemParametersInfo(SpiSet, 0, (PVOID)pbFlag, SPIF_UPDATEINIFILE|SPIF_SENDCHANGE);
 226 }
 227 #define UPDATE_USERPREF(NAME,pbFlag) _UpdateUserPref(SPI_GET ## NAME, SPI_SET ## NAME, pbFlag)
 228
 229 static VOID
 230 ApplyTheme(GLOBALS* g)
 231 {
 232         INT i, Result;
 233         HKEY hKey;
 234         DWORD dwDisposition = 0;
 235         TCHAR clText[16] = {0};
 236         NONCLIENTMETRICS NonClientMetrics;
 237         HFONT hMyFont;
 238         LOGFONT lfButtonFont;
 239
 240         if (!g->Theme.bHasChanged)
 241                 return;
 242
 243         /* Update some globals */
 244         g->crCOLOR_BTNFACE = g->Theme.crColor[COLOR_BTNFACE];
 245         g->crCOLOR_BTNTEXT = g->Theme.crColor[COLOR_BTNTEXT];
 246         g->crCOLOR_BTNSHADOW = g->Theme.crColor[COLOR_BTNSHADOW];
 247         g->crCOLOR_BTNHIGHLIGHT = g->Theme.crColor[COLOR_BTNHIGHLIGHT];
 248         lfButtonFont = g->Theme.lfFont[FONT_DIALOG];
 249
 250         /* Create new font for bold button */
 251         lfButtonFont.lfWeight = FW_BOLD;
 252         lfButtonFont.lfItalic = FALSE;
 253         hMyFont = CreateFontIndirect(&lfButtonFont);
 254         if (hMyFont)
 255         {
 256                 if (g->hBoldFont)
 257                         DeleteObject(g->hBoldFont);
 258                 g->hBoldFont = hMyFont;
 259         }
 260
 261         /* Create new font for italic button */
 262         lfButtonFont.lfWeight = FW_REGULAR;
 263         lfButtonFont.lfItalic = TRUE;
 264         hMyFont = CreateFontIndirect(&lfButtonFont);
 265         if (hMyFont)
 266         {
 267                 if (g->hItalicFont)
 268                         DeleteObject(g->hItalicFont);
 269                 g->hItalicFont = hMyFont;
 270         }
 271
 272         /* Apply Colors from global variable */
 273         SetSysColors(30, &g->ColorList[0], &g->Theme.crColor[0]);
 274
 275         /* Save colors to registry */
 276         Result = RegOpenKeyEx(HKEY_CURRENT_USER, TEXT("Control Panel\\Colors"), 0, KEY_ALL_ACCESS, &hKey);
 277         if (Result != ERROR_SUCCESS)
 278         {
 279                 /* Could not open the key, try to create it */
 280                 Result = RegCreateKeyEx(HKEY_CURRENT_USER, TEXT("Control Panel\\Colors"), 0, NULL, 0, KEY_ALL_ACCESS, NULL,&hKey, &dwDisposition);
 281         }
 282
 283         if (Result == ERROR_SUCCESS)
 284         {
 285                 for (i = 0; i <= 30; i++)
 286                 {
 287                         DWORD red   = GetRValue(g->Theme.crColor[i]);
 288                         DWORD green = GetGValue(g->Theme.crColor[i]);
 289                         DWORD blue  = GetBValue(g->Theme.crColor[i]);
 290                         wsprintf(clText, TEXT("%d %d %d"), red, green, blue);
 291                         RegSetValueEx(hKey, g_RegColorNames[i], 0, REG_SZ, (BYTE *)clText, lstrlen( clText )*sizeof(TCHAR) + sizeof(TCHAR));
 292                 }
 293
 294                 RegCloseKey(hKey);
 295         }
 296
 297         /* Apply the fonts */
 298         NonClientMetrics.cbSize = sizeof(NONCLIENTMETRICS);
 299         SystemParametersInfo(SPI_GETNONCLIENTMETRICS, sizeof(NONCLIENTMETRICS), &NonClientMetrics, 0);
 300         NonClientMetrics.lfCaptionFont = g->Theme.lfFont[FONT_CAPTION];
 301         NonClientMetrics.lfSmCaptionFont = g->Theme.lfFont[FONT_SMCAPTION];
 302         NonClientMetrics.lfMenuFont = g->Theme.lfFont[FONT_MENU];
 303         NonClientMetrics.lfStatusFont = g->Theme.lfFont[FONT_INFO];
 304         NonClientMetrics.lfMessageFont = g->Theme.lfFont[FONT_DIALOG];
 305         SystemParametersInfo(SPI_SETNONCLIENTMETRICS, sizeof(NONCLIENTMETRICS), &NonClientMetrics, 0);
 306         SystemParametersInfo(SPI_SETICONTITLELOGFONT, sizeof(LOGFONT), &g->Theme.lfFont[FONT_ICON], 0);
 307
 308         /* FIXME: Apply size metrics */
 309
 310         /* Save fonts and size metrics to registry */
 311         Result = RegOpenKeyEx(HKEY_CURRENT_USER, TEXT("Control Panel\\Desktop\\WindowMetrics"), 0, KEY_ALL_ACCESS, &hKey);
 312         if (Result != ERROR_SUCCESS)
 313         {
 314                 /* Could not open the key, try to create it */
 315                 Result = RegCreateKeyEx(HKEY_CURRENT_USER, TEXT("Control Panel\\Desktop\\WindowMetrics"), 0, NULL, 0, KEY_ALL_ACCESS, NULL,&hKey, &dwDisposition);
 316         }
 317
 318         if (Result == ERROR_SUCCESS)
 319         {
 320                 RegSetValueEx(hKey, TEXT("CaptionFont"), 0, REG_BINARY, (BYTE *)&g->Theme.lfFont[FONT_CAPTION], sizeof(LOGFONT));
 321                 RegSetValueEx(hKey, TEXT("SmCaptionFont"), 0, REG_BINARY, (BYTE *)&g->Theme.lfFont[FONT_SMCAPTION], sizeof(LOGFONT));
 322                 RegSetValueEx(hKey, TEXT("IconFont"), 0, REG_BINARY, (BYTE *)&g->Theme.lfFont[FONT_ICON], sizeof(LOGFONT));
 323                 RegSetValueEx(hKey, TEXT("MenuFont"), 0, REG_BINARY, (BYTE *)&g->Theme.lfFont[FONT_MENU], sizeof(LOGFONT));
 324                 RegSetValueEx(hKey, TEXT("StatusFont"), 0, REG_BINARY, (BYTE *)&g->Theme.lfFont[FONT_INFO], sizeof(LOGFONT));
 325                 RegSetValueEx(hKey, TEXT("MessageFont"), 0, REG_BINARY, (BYTE *)&g->Theme.lfFont[FONT_DIALOG], sizeof(LOGFONT));
 326
 327                 /* Save size metrics to registry */
 328                 wsprintf(clText, TEXT("%d"), -15 * g->Theme.Size[SIZE_BORDER_X]);
 329                 RegSetValueEx(hKey, TEXT("BorderWidth"), 0, REG_SZ, (BYTE *)clText, sizeof(clText));
 330                 wsprintf(clText, TEXT("%d"), -15 * g->Theme.Size[SIZE_CAPTION_Y]);
 331                 RegSetValueEx(hKey, TEXT("CaptionWidth"), 0, REG_SZ, (BYTE *)clText, sizeof(clText));
 332                 wsprintf(clText, TEXT("%d"), -15 * g->Theme.Size[SIZE_CAPTION_Y]);
 333                 RegSetValueEx(hKey, TEXT("CaptionHeight"), 0, REG_SZ, (BYTE *)clText, sizeof(clText));
 334                 wsprintf(clText, TEXT("%d"), -15 * g->Theme.Size[SIZE_SMCAPTION_Y]);
 335                 RegSetValueEx(hKey, TEXT("SmCaptionWidth"), 0, REG_SZ, (BYTE *)clText, sizeof(clText));
 336                 wsprintf(clText, TEXT("%d"), -15 * g->Theme.Size[SIZE_SMCAPTION_Y]);
 337                 RegSetValueEx(hKey, TEXT("SmCaptionHeight"), 0, REG_SZ, (BYTE *)clText, sizeof(clText));
 338                 wsprintf(clText, TEXT("%d"), -15 * g->Theme.Size[SIZE_ICON_SPC_X]);
 339                 RegSetValueEx(hKey, TEXT("IconSpacing"), 0, REG_SZ, (BYTE *)clText, sizeof(clText));
 340                 wsprintf(clText, TEXT("%d"), -15 * g->Theme.Size[SIZE_ICON_SPC_Y]);
 341                 RegSetValueEx(hKey, TEXT("IconVerticalSpacing"), 0, REG_SZ, (BYTE *)clText, sizeof(clText));
 342                 wsprintf(clText, TEXT("%d"), -15 * g->Theme.Size[SIZE_MENU_X]);
 343                 RegSetValueEx(hKey, TEXT("MenuWidth"), 0, REG_SZ, (BYTE *)clText, sizeof(clText));
 344                 wsprintf(clText, TEXT("%d"), -15 * g->Theme.Size[SIZE_MENU_Y]);
 345                 RegSetValueEx(hKey, TEXT("MenuHeight"), 0, REG_SZ, (BYTE *)clText, sizeof(clText));
 346                 wsprintf(clText, TEXT("%d"), -15 * g->Theme.Size[SIZE_SCROLL_X]);
 347                 RegSetValueEx(hKey, TEXT("ScrollWidth"), 0, REG_SZ, (BYTE *)clText, sizeof(clText));
 348                 wsprintf(clText, TEXT("%d"), -15 * g->Theme.Size[SIZE_SCROLL_Y]);
 349                 RegSetValueEx(hKey, TEXT("ScrollHeight"), 0, REG_SZ, (BYTE *)clText, sizeof(clText));
 350                 wsprintf(clText, TEXT("%d"), g->Theme.Size[SIZE_ICON_X]);
 351                 RegSetValueEx(hKey, TEXT("Shell Icon Sizet"), 0, REG_SZ, (BYTE *)clText, sizeof(clText));
 352
 353                 RegCloseKey(hKey);
 354         }
 355
 356     /* Effects, save only when needed: */
 357     /* FIXME: XP seems to use grayed checkboxes to reflect differences between menu and tooltips settings
 358      * Just keep them in sync for now.
 359      */
 360     g->Theme.Effects.bTooltipAnimation  = g->Theme.Effects.bMenuAnimation;
 361     g->Theme.Effects.bTooltipFade       = g->Theme.Effects.bMenuFade;
 362     UPDATE_USERPREF(KEYBOARDCUES, &g->Theme.Effects.bKeyboardCues);
 363     //UPDATE_USERPREF(ACTIVEWINDOWTRACKING, &g->Theme.Effects.bActiveWindowTracking);
 364     UPDATE_USERPREF(MENUANIMATION, &g->Theme.Effects.bMenuAnimation);
 365     //UPDATE_USERPREF(COMBOBOXANIMATION, &g->Theme.Effects.bComboBoxAnimation);
 366     //UPDATE_USERPREF(LISTBOXSMOOTHSCROLLING, &g->Theme.Effects.bListBoxSmoothScrolling);
 367     //UPDATE_USERPREF(GRADIENTCAPTIONS, &g->Theme.Effects.bGradientCaptions);
 368     //UPDATE_USERPREF(ACTIVEWNDTRKZORDER, &g->Theme.Effects.bActiveWndTrkZorder);
 369     //UPDATE_USERPREF(HOTTRACKING, &g->Theme.Effects.bHotTracking);
 370     UPDATE_USERPREF(MENUFADE, &g->Theme.Effects.bMenuFade);
 371     //UPDATE_USERPREF(SELECTIONFADE, &g->Theme.Effects.bSelectionFade);
 372     UPDATE_USERPREF(TOOLTIPANIMATION, &g->Theme.Effects.bTooltipAnimation);
 373     UPDATE_USERPREF(TOOLTIPFADE, &g->Theme.Effects.bTooltipFade);
 374     //UPDATE_USERPREF(CURSORSHADOW, &g->Theme.Effects.bCursorShadow);
 375     //UPDATE_USERPREF(UIEFFECTS, &g->Theme.Effects.bUiEffects);
 376         /* Save ThemeId */
 377         Result = RegOpenKeyEx(HKEY_CURRENT_USER, TEXT("Control Panel\\Appearance\\New Schemes"), 0, KEY_ALL_ACCESS, &hKey);
 378         if (Result == ERROR_SUCCESS)
 379         {
 380                 lstrcpy(clText, g->ThemeTemplates[g->Theme.Id].strKeyName);
 381                 RegSetValueEx(hKey, TEXT("SelectedStyle"), 0, REG_SZ, (BYTE *)clText, (lstrlen(clText)+1) * sizeof (TCHAR));
 382                 RegCloseKey(hKey);
 383         }
 384 }
 385
 386
 387 static INT_PTR
 388 AppearancePage_OnInit(HWND hwndDlg, GLOBALS *g)
 389 {
 390         HKEY hkNewSchemes, hkScheme, hkSizes, hkSize;
 391         FILETIME ftLastWriteTime;
 392         TCHAR strSelectedStyle[4];
 393         DWORD dwLength, dwType;
 394         DWORD dwDisposition = 0;
 395         INT iStyle, iSize, iTemplateIndex, iListIndex = 0;
 396         INT Result;
 397
 398         g = (GLOBALS*)malloc(sizeof(GLOBALS));
 399         if (g == NULL)
 400         {
 401                 return FALSE;
 402         }
 403
 404         SetWindowLongPtr(hwndDlg, DWLP_USER, (LONG_PTR)g);
 405
 406         LoadCurrentTheme(g);
 407
 408         /* Fill color schemes combo */
 409         Result = RegOpenKeyEx(HKEY_CURRENT_USER, TEXT("Control Panel\\Appearance\\New Schemes"),
 410                 0, KEY_READ, &hkNewSchemes);
 411         if (Result != ERROR_SUCCESS)
 412         {
 413                 /* Could not open the key, try to create it */
 414                 Result = RegCreateKeyEx(HKEY_CURRENT_USER, TEXT("Control Panel\\Appearance\\New Schemes"), 0, NULL, 0, KEY_ALL_ACCESS, NULL,&hkNewSchemes, &dwDisposition);
 415                 if (Result == ERROR_SUCCESS)
 416                 {
 417                         /* FIXME: We have created it new, so let's put somethig there */
 418                 }
 419         }
 420         if (Result == ERROR_SUCCESS)
 421         {
 422                 /* First find out the currently selected template */
 423                 dwLength = 8;
 424                 RegQueryValueEx(hkNewSchemes, TEXT("SelectedStyle"), NULL, &dwType, (LPBYTE)&strSelectedStyle, &dwLength);
 425                 iTemplateIndex = 0;
 426                 iStyle = 0;
 427                 dwLength = MAX_TEMPLATENAMELENTGH;
 428                 while((RegEnumKeyEx(hkNewSchemes, iStyle, g->ThemeTemplates[iTemplateIndex].strKeyName, &dwLength,
 429                         NULL, NULL, NULL, &ftLastWriteTime) == ERROR_SUCCESS) && (iTemplateIndex < MAX_TEMPLATES))
 430                 {
 431                         /* is it really a template or one of the other entries */
 432                         if (dwLength < 5)
 433                         {
 434                                 if (RegOpenKeyEx(hkNewSchemes, g->ThemeTemplates[iTemplateIndex].strKeyName, 0, KEY_READ, &hkScheme) == ERROR_SUCCESS)
 435                                 {
 436                                         if(RegOpenKeyEx(hkScheme, TEXT("Sizes"), 0, KEY_READ, &hkSizes) == ERROR_SUCCESS)
 437                                         {
 438                                                 iSize = 0;
 439                                                 dwLength = 3;
 440                                                 while((RegEnumKeyEx(hkSizes, iSize, g->ThemeTemplates[iTemplateIndex].strSizeName, &dwLength,
 441                                                         NULL, NULL, NULL, &ftLastWriteTime) == ERROR_SUCCESS) && (iSize <= 4))
 442                                                 {
 443                                                         if(RegOpenKeyEx(hkSizes, g->ThemeTemplates[iTemplateIndex].strSizeName, 0, KEY_READ, &hkSize) == ERROR_SUCCESS)
 444                                                         {
 445                                                                 dwLength = MAX_TEMPLATENAMELENTGH;
 446                                                                 RegQueryValueEx(hkSize, TEXT("DisplayName"), NULL, &dwType, (LPBYTE)&g->ThemeTemplates[iTemplateIndex].strDisplayName, &dwLength);
 447                                                                 dwLength = MAX_TEMPLATENAMELENTGH;
 448                                                                 RegQueryValueEx(hkSize, TEXT("LegacyName"), NULL, &dwType, (LPBYTE)&g->ThemeTemplates[iTemplateIndex].strLegacyName, &dwLength);
 449                                                                 RegCloseKey(hkSize);
 450                                                         }
 451                                                         iListIndex = SendDlgItemMessage(hwndDlg, IDC_APPEARANCE_COLORSCHEME, CB_ADDSTRING, 0, (LPARAM)g->ThemeTemplates[iTemplateIndex].strLegacyName);
 452                                                         SendDlgItemMessage(hwndDlg, IDC_APPEARANCE_COLORSCHEME, CB_SETITEMDATA, iListIndex, iTemplateIndex);
 453                                                         if (lstrcmp(g->ThemeTemplates[iTemplateIndex].strKeyName, strSelectedStyle) == 0)
 454                                                         {
 455                                                                 SendDlgItemMessage(hwndDlg, IDC_APPEARANCE_COLORSCHEME, CB_SETCURSEL, (WPARAM)iListIndex, 0);
 456                                                         }
 457                                                         iSize++;
 458                                                         iTemplateIndex++;
 459                                                         dwLength = 3;
 460                                                 }
 461                                                 RegCloseKey(hkSizes);
 462                                         }
 463                                         RegCloseKey(hkScheme);
 464                                 }
 465                         }
 466                         iStyle++;
 467                         dwLength = MAX_TEMPLATENAMELENTGH;
 468                 }
 469                 RegCloseKey(hkNewSchemes);
 470         }
 471         SendMessage(GetDlgItem(hwndDlg, IDC_APPEARANCE_COLORSCHEME), LB_SETCURSEL, 0, 0);
 472
 473         return FALSE;
 474 }
 475
 476
 477 static INT_PTR
 478 AppearancePage_OnDestroy(HWND hwndDlg, GLOBALS *g)
 479 {
 480         free(g);
 481         return TRUE;
 482 }
 483
 484
 485 INT_PTR CALLBACK
 486 AppearancePageProc(HWND hwndDlg, UINT uMsg, WPARAM wParam, LPARAM lParam)
 487 {
 488         INT i;
 489         GLOBALS *g;
 490         LPNMHDR lpnm;
 491
 492         g = (GLOBALS*)GetWindowLongPtr(hwndDlg, DWLP_USER);
 493
 494         switch (uMsg)
 495         {
 496                 case WM_INITDIALOG:
 497                         return AppearancePage_OnInit(hwndDlg, g);
 498
 499                 case WM_DESTROY:
 500                         return AppearancePage_OnDestroy(hwndDlg, g);
 501
 502                 case WM_COMMAND:
 503                         switch (LOWORD(wParam))
 504                         {
 505                                 case IDC_APPEARANCE_EFFECTS:
 506                                         DialogBoxParam(hApplet, (LPCTSTR)IDD_EFFAPPEARANCE,
 507                                                 hwndDlg, EffAppearanceDlgProc, (LPARAM)g);
 508
 509                                         /* Was anything changed in the effects appearance dialog? */
 510                                         if (memcmp(&g->Theme, &g->ThemeAdv, sizeof(THEME)) != 0)
 511                                         {
 512                                                 PropSheet_Changed(GetParent(hwndDlg), hwndDlg);
 513                                                 g->Theme = g->ThemeAdv;
 514                                                 g->Theme.bHasChanged = TRUE;
 515                                         }
 516                                         break;
 517
 518                                 case IDC_APPEARANCE_ADVANCED:
 519                                         DialogBoxParam(hApplet, (LPCTSTR)IDD_ADVAPPEARANCE,
 520                                                 hwndDlg, AdvAppearanceDlgProc, (LPARAM)g);
 521
 522                                         /* Was anything changed in the advanced appearance dialog? */
 523                                         if (memcmp(&g->Theme, &g->ThemeAdv, sizeof(THEME)) != 0)
 524                                         {
 525                                                 PropSheet_Changed(GetParent(hwndDlg), hwndDlg);
 526                                                 g->Theme = g->ThemeAdv;
 527                                                 g->Theme.bHasChanged = TRUE;
 528                                         }
 529                                         break;
 530
 531                                 case IDC_APPEARANCE_COLORSCHEME:
 532                                         if(HIWORD(wParam) == CBN_SELCHANGE)
 533                                         {
 534                                                 PropSheet_Changed(GetParent(hwndDlg), hwndDlg);
 535                                                 g->Theme.bHasChanged = TRUE;
 536                                                 i = SendDlgItemMessage(hwndDlg, IDC_APPEARANCE_COLORSCHEME, CB_GETCURSEL, 0, 0);
 537                                                 g->Theme.Id = SendDlgItemMessage(hwndDlg, IDC_APPEARANCE_COLORSCHEME, CB_GETITEMDATA, (WPARAM)i, 0);
 538                                                 LoadThemeFromReg(g);
 539                                         }
 540                                         break;
 541
 542                                 default:
 543                                         return FALSE;
 544                         }
 545                         return TRUE;
 546
 547                 case WM_NOTIFY:
 548                         lpnm = (LPNMHDR)lParam;
 549                         switch (lpnm->code)
 550                         {
 551                                 case PSN_APPLY:
 552                                         if (g->Theme.bHasChanged)
 553                                         {
 554                                                 ApplyTheme(g);
 555                                         }
 556                                         return TRUE;
 557
 558                                 default:
 559                                         return FALSE;
 560                         }
 561                         return TRUE;
 562
 563                 default:
 564                         return FALSE;
 565         }
 566
 567         return TRUE;
 568 }