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