src/msw/settings.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        msw/settings.cpp
   3 // Purpose:     wxSystemSettingsNative implementation for MSW
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     04/01/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // ============================================================================
  13 // declarations
  14 // ============================================================================
  15
  16 // ----------------------------------------------------------------------------
  17 // headers
  18 // ----------------------------------------------------------------------------
  19
  20 // For compilers that support precompilation, includes "wx.h".
  21 #include "wx/wxprec.h"
  22
  23 #ifdef __BORLANDC__
  24     #pragma hdrstop
  25 #endif
  26
  27 #ifndef WX_PRECOMP
  28     #include "wx/utils.h"
  29     #include "wx/gdicmn.h"
  30 #endif
  31
  32 #include "wx/settings.h"
  33
  34 #include "wx/msw/private.h"
  35
  36 #ifndef SPI_GETFLATMENU
  37 #define SPI_GETFLATMENU                     0x1022
  38 #endif
  39
  40 #include "wx/module.h"
  41 #include "wx/fontutil.h"
  42
  43 #ifdef __WXWINCE__ // for SM_CXCURSOR and SM_CYCURSOR
  44 #include "wx/msw/wince/missing.h"
  45 #endif // __WXWINCE__
  46
  47 // ----------------------------------------------------------------------------
  48 // private classes
  49 // ----------------------------------------------------------------------------
  50
  51 // the module which is used to clean up wxSystemSettingsNative data (this is a
  52 // singleton class so it can't be done in the dtor)
  53 class wxSystemSettingsModule : public wxModule
  54 {
  55 public:
  56     virtual bool OnInit();
  57     virtual void OnExit();
  58
  59 private:
  60     DECLARE_DYNAMIC_CLASS(wxSystemSettingsModule)
  61 };
  62
  63 // ----------------------------------------------------------------------------
  64 // global data
  65 // ----------------------------------------------------------------------------
  66
  67 // the font returned by GetFont(wxSYS_DEFAULT_GUI_FONT): it is created when
  68 // GetFont() is called for the first time and deleted by wxSystemSettingsModule
  69 static wxFont *gs_fontDefault = NULL;
  70
  71 // ============================================================================
  72 // implementation
  73 // ============================================================================
  74
  75 // TODO: see ::SystemParametersInfo for all sorts of Windows settings.
  76 // Different args are required depending on the id. How does this differ
  77 // from GetSystemMetric, and should it? Perhaps call it GetSystemParameter
  78 // and pass an optional void* arg to get further info.
  79 // Should also have SetSystemParameter.
  80 // Also implement WM_WININICHANGE (NT) / WM_SETTINGCHANGE (Win95)
  81
  82 // ----------------------------------------------------------------------------
  83 // wxSystemSettingsModule
  84 // ----------------------------------------------------------------------------
  85
  86 IMPLEMENT_DYNAMIC_CLASS(wxSystemSettingsModule, wxModule)
  87
  88 bool wxSystemSettingsModule::OnInit()
  89 {
  90     return TRUE;
  91 }
  92
  93 void wxSystemSettingsModule::OnExit()
  94 {
  95     delete gs_fontDefault;
  96     gs_fontDefault = NULL;
  97 }
  98
  99 // ----------------------------------------------------------------------------
 100 // wxSystemSettingsNative
 101 // ----------------------------------------------------------------------------
 102
 103 // ----------------------------------------------------------------------------
 104 // colours
 105 // ----------------------------------------------------------------------------
 106
 107 wxColour wxSystemSettingsNative::GetColour(wxSystemColour index)
 108 {
 109     // we use 0 as the default value just to avoid compiler warnings, as there
 110     // is no invalid colour value we use hasCol as the real indicator of
 111     // whether colSys was initialized or not
 112     COLORREF colSys = 0;
 113     bool hasCol = FALSE;
 114
 115     // the default colours for the entries after BTNHIGHLIGHT
 116     static const COLORREF s_defaultSysColors[] =
 117     {
 118         0x000000,   // 3DDKSHADOW
 119         0xdfdfdf,   // 3DLIGHT
 120         0x000000,   // INFOTEXT
 121         0xe1ffff,   // INFOBK
 122
 123         0,          // filler - no std colour with this index
 124
 125         // TODO: please fill in the standard values of those, I don't have them
 126         0,          // HOTLIGHT
 127         0,          // GRADIENTACTIVECAPTION
 128         0,          // GRADIENTINACTIVECAPTION
 129         0,          // MENU
 130         0,          // MENUBAR (unused)
 131     };
 132
 133     if ( index == wxSYS_COLOUR_LISTBOX )
 134     {
 135         // there is no standard colour with this index, map to another one
 136         index = wxSYS_COLOUR_WINDOW;
 137     }
 138     else if ( index > wxSYS_COLOUR_BTNHIGHLIGHT )
 139     {
 140         // the indices before BTNHIGHLIGHT are understood by GetSysColor() in
 141         // all Windows version, for the other ones we have to check
 142         bool useDefault;
 143
 144         int verMaj, verMin;
 145         wxGetOsVersion(&verMaj, &verMin);
 146         if ( verMaj < 4 )
 147         {
 148             // NT 3.5
 149             useDefault = TRUE;
 150         }
 151         else if ( verMaj == 4 )
 152         {
 153             // Win95/NT 4.0
 154             useDefault = index > wxSYS_COLOUR_INFOBK;
 155         }
 156         else if ( verMaj == 5 && verMin == 0 )
 157         {
 158             // Win98/Win2K
 159             useDefault = index > wxSYS_COLOUR_GRADIENTINACTIVECAPTION;
 160         }
 161         else // >= 5.1
 162         {
 163             // 5.1 is Windows XP
 164             useDefault = FALSE;
 165                         // Determine if we are using flat menus, only then allow wxSYS_COLOUR_MENUBAR
 166                         if ( index == wxSYS_COLOUR_MENUBAR )
 167                         {
 168                                 BOOL isFlat ;
 169                                 if ( SystemParametersInfo( SPI_GETFLATMENU , 0 ,&isFlat, 0 ) )
 170                                 {
 171                                         if ( !isFlat )
 172                                                 index = wxSYS_COLOUR_MENU ;
 173                                 }
 174                         }
 175        }
 176
 177         if ( useDefault )
 178         {
 179             // special handling for MENUBAR colour: we use this in wxToolBar
 180             // and wxStatusBar to have correct bg colour under Windows XP
 181             // (which uses COLOR_MENUBAR for them) but they should still look
 182             // correctly under previous Windows versions as well
 183             if ( index == wxSYS_COLOUR_MENUBAR )
 184             {
 185                 index = wxSYS_COLOUR_3DFACE;
 186             }
 187             else // replace with default colour
 188             {
 189                 unsigned int n = index - wxSYS_COLOUR_BTNHIGHLIGHT;
 190
 191                 wxASSERT_MSG( n < WXSIZEOF(s_defaultSysColors),
 192                               _T("forgot tp update the default colours array") );
 193
 194                 colSys = s_defaultSysColors[n];
 195                 hasCol = TRUE;
 196             }
 197         }
 198     }
 199
 200     if ( !hasCol )
 201     {
 202 #ifdef __WXWINCE__
 203         colSys = ::GetSysColor(index|SYS_COLOR_INDEX_FLAG);
 204 #else
 205         colSys = ::GetSysColor(index);
 206 #endif
 207     }
 208
 209     return wxRGBToColour(colSys);
 210 }
 211
 212 // ----------------------------------------------------------------------------
 213 // fonts
 214 // ----------------------------------------------------------------------------
 215
 216 wxFont wxCreateFontFromStockObject(int index)
 217 {
 218     wxFont font;
 219
 220     HFONT hFont = (HFONT) ::GetStockObject(index);
 221     if ( hFont )
 222     {
 223         LOGFONT lf;
 224         if ( ::GetObject(hFont, sizeof(LOGFONT), &lf) != 0 )
 225         {
 226             wxNativeFontInfo info;
 227             info.lf = lf;
 228             // Under MicroWindows we pass the HFONT as well
 229             // because it's hard to convert HFONT -> LOGFONT -> HFONT
 230             // It's OK to delete stock objects, the delete will be ignored.
 231 #ifdef __WXMICROWIN__
 232             font.Create(info, (WXHFONT) hFont);
 233 #else
 234             font.Create(info);
 235 #endif
 236         }
 237         else
 238         {
 239             wxFAIL_MSG( _T("failed to get LOGFONT") );
 240         }
 241     }
 242     else // GetStockObject() failed
 243     {
 244         wxFAIL_MSG( _T("stock font not found") );
 245     }
 246
 247     return font;
 248 }
 249
 250 wxFont wxSystemSettingsNative::GetFont(wxSystemFont index)
 251 {
 252     // wxWindow ctor calls GetSystemFont(wxSYS_DEFAULT_GUI_FONT) so we're
 253     // called fairly often -- this is why we cache this particular font
 254     const bool isDefaultRequested = index == wxSYS_DEFAULT_GUI_FONT;
 255     if ( isDefaultRequested )
 256     {
 257         if ( gs_fontDefault )
 258             return *gs_fontDefault;
 259     }
 260
 261     wxFont font = wxCreateFontFromStockObject(index);
 262
 263     if ( isDefaultRequested )
 264     {
 265         // if we got here it means we hadn't cached it yet - do now
 266         gs_fontDefault = new wxFont(font);
 267     }
 268
 269     return font;
 270 }
 271
 272 // ----------------------------------------------------------------------------
 273 // system metrics/features
 274 // ----------------------------------------------------------------------------
 275
 276 // TODO: some of the "metrics" clearly should be features now that we have
 277 //       HasFeature()!
 278
 279 // the conversion table from wxSystemMetric enum to GetSystemMetrics() param
 280 //
 281 // if the constant is not defined, put -1 in the table to indicate that it is
 282 // unknown
 283 static const int gs_metricsMap[] =
 284 {
 285     -1,  // wxSystemMetric enums start at 1, so give a dummy value for pos 0.
 286 #if defined(__WIN32__) && !defined(__WXWINCE__)
 287     SM_CMOUSEBUTTONS,
 288 #else
 289     -1,
 290 #endif
 291
 292     SM_CXBORDER,
 293     SM_CYBORDER,
 294     SM_CXCURSOR,
 295     SM_CYCURSOR,
 296     SM_CXDOUBLECLK,
 297     SM_CYDOUBLECLK,
 298 #if defined(__WIN32__) && defined(SM_CXDRAG)
 299     SM_CXDRAG,
 300     SM_CYDRAG,
 301     SM_CXEDGE,
 302     SM_CYEDGE,
 303 #else
 304     -1, -1, -1, -1,
 305 #endif
 306     SM_CXHSCROLL,
 307     SM_CYHSCROLL,
 308 #ifdef SM_CXHTHUMB
 309     SM_CXHTHUMB,
 310 #else
 311     -1,
 312 #endif
 313     SM_CXICON,
 314     SM_CYICON,
 315     SM_CXICONSPACING,
 316     SM_CYICONSPACING,
 317 #ifdef SM_CXHTHUMB
 318     SM_CXMIN,
 319     SM_CYMIN,
 320 #else
 321     -1, -1,
 322 #endif
 323     SM_CXSCREEN,
 324     SM_CYSCREEN,
 325
 326 #if defined(__WIN32__) && defined(SM_CXSIZEFRAME)
 327     SM_CXSIZEFRAME,
 328     SM_CYSIZEFRAME,
 329     SM_CXSMICON,
 330     SM_CYSMICON,
 331 #else
 332     -1, -1, -1, -1,
 333 #endif
 334     SM_CYHSCROLL,
 335     SM_CXVSCROLL,
 336     SM_CXVSCROLL,
 337     SM_CYVSCROLL,
 338 #ifdef SM_CYVTHUMB
 339     SM_CYVTHUMB,
 340 #else
 341     -1,
 342 #endif
 343     SM_CYCAPTION,
 344     SM_CYMENU,
 345 #if defined(__WIN32__) && defined(SM_NETWORK)
 346     SM_NETWORK,
 347 #else
 348     -1,
 349 #endif
 350 #ifdef SM_PENWINDOWS
 351     SM_PENWINDOWS,
 352 #else
 353     -1,
 354 #endif
 355 #if defined(__WIN32__) && defined(SM_SHOWSOUNDS)
 356     SM_SHOWSOUNDS,
 357 #else
 358     -1,
 359 #endif
 360 #ifdef SM_SWAPBUTTON
 361     SM_SWAPBUTTON,
 362 #else
 363     -1
 364 #endif
 365 };
 366
 367 // Get a system metric, e.g. scrollbar size
 368 int wxSystemSettingsNative::GetMetric(wxSystemMetric index)
 369 {
 370 #ifdef __WXMICROWIN__
 371     // TODO: probably use wxUniv themes functionality
 372     return 0;
 373 #else // !__WXMICROWIN__
 374     wxCHECK_MSG( index > 0 && (size_t)index < WXSIZEOF(gs_metricsMap), 0,
 375                  _T("invalid metric") );
 376
 377     int indexMSW = gs_metricsMap[index];
 378     if ( indexMSW == -1 )
 379     {
 380         // not supported under current system
 381         return 0;
 382     }
 383
 384     int rc = ::GetSystemMetrics(indexMSW);
 385     if ( index == wxSYS_NETWORK_PRESENT )
 386     {
 387         // only the last bit is significant according to the MSDN
 388         rc &= 1;
 389     }
 390
 391     return rc;
 392 #endif // __WXMICROWIN__/!__WXMICROWIN__
 393 }
 394
 395 bool wxSystemSettingsNative::HasFeature(wxSystemFeature index)
 396 {
 397     switch ( index )
 398     {
 399         case wxSYS_CAN_ICONIZE_FRAME:
 400         case wxSYS_CAN_DRAW_FRAME_DECORATIONS:
 401             return TRUE;
 402
 403         default:
 404             wxFAIL_MSG( _T("unknown system feature") );
 405
 406             return FALSE;
 407     }
 408 }
 409
 410 // ----------------------------------------------------------------------------
 411 // function from wx/msw/wrapcctl.h: there is really no other place for it...
 412 // ----------------------------------------------------------------------------
 413
 414 #if wxUSE_LISTCTRL || wxUSE_TREECTRL
 415
 416 extern wxFont wxGetCCDefaultFont()
 417 {
 418 #ifndef __WXWINCE__
 419     // under the systems enumerated below (anything released after Win98), the
 420     // default font used for the common controls seems to be the desktop font
 421     // which is also used for the icon titles and not the stock default GUI
 422     // font
 423     bool useIconFont;
 424     int verMaj, verMin;
 425     switch ( wxGetOsVersion(&verMaj, &verMin) )
 426     {
 427         case wxWIN95:
 428             // 4.10 is Win98
 429             useIconFont = verMin == 4 && verMin >= 10;
 430             break;
 431
 432         case wxWINDOWS_NT:
 433             // 5.0 is Win2k
 434             useIconFont = verMaj >= 5;
 435             break;
 436
 437         default:
 438             useIconFont = false;
 439     }
 440
 441     if ( useIconFont )
 442     {
 443         LOGFONT lf;
 444         if ( ::SystemParametersInfo
 445                (
 446                     SPI_GETICONTITLELOGFONT,
 447                     sizeof(lf),
 448                     &lf,
 449                     0
 450                ) )
 451         {
 452             return wxFont(wxCreateFontFromLogFont(&lf));
 453         }
 454         else
 455         {
 456             wxLogLastError(_T("SystemParametersInfo(SPI_GETICONTITLELOGFONT"));
 457         }
 458     }
 459 #endif // __WXWINCE__
 460
 461     // fall back to the default font for the normal controls
 462     return wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT);
 463 }
 464
 465 #endif // wxUSE_LISTCTRL || wxUSE_TREECTRL