]> git.saurik.com Git - wxWidgets.git/blame_incremental - src/msw/settings.cpp
don't test for WINVER inside the library, we do all the tests at run-time, not compil...
[wxWidgets.git] / src / msw / settings.cpp
... / ...
CommitLineData
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)
53class wxSystemSettingsModule : public wxModule
54{
55public:
56 virtual bool OnInit();
57 virtual void OnExit();
58
59private:
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
69static 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
86IMPLEMENT_DYNAMIC_CLASS(wxSystemSettingsModule, wxModule)
87
88bool wxSystemSettingsModule::OnInit()
89{
90 return true;
91}
92
93void wxSystemSettingsModule::OnExit()
94{
95 delete gs_fontDefault;
96 gs_fontDefault = NULL;
97}
98
99// ----------------------------------------------------------------------------
100// wxSystemSettingsNative
101// ----------------------------------------------------------------------------
102
103// ----------------------------------------------------------------------------
104// colours
105// ----------------------------------------------------------------------------
106
107wxColour 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
216wxFont 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#ifndef __WXWINCE__
229 // We want Windows 2000 or later to have new fonts even MS Shell Dlg
230 // is returned as default GUI font for compatibility
231 int verMaj;
232 if(index == DEFAULT_GUI_FONT && wxGetOsVersion(&verMaj) == wxWINDOWS_NT && verMaj >= 5)
233 wxStrcpy(info.lf.lfFaceName, wxT("MS Shell Dlg 2"));
234#endif
235 // Under MicroWindows we pass the HFONT as well
236 // because it's hard to convert HFONT -> LOGFONT -> HFONT
237 // It's OK to delete stock objects, the delete will be ignored.
238#ifdef __WXMICROWIN__
239 font.Create(info, (WXHFONT) hFont);
240#else
241 font.Create(info);
242#endif
243 }
244 else
245 {
246 wxFAIL_MSG( _T("failed to get LOGFONT") );
247 }
248 }
249 else // GetStockObject() failed
250 {
251 wxFAIL_MSG( _T("stock font not found") );
252 }
253
254 return font;
255}
256
257wxFont wxSystemSettingsNative::GetFont(wxSystemFont index)
258{
259#ifdef __WXWINCE__
260 // under CE only a single SYSTEM_FONT exists
261 index;
262
263 if ( !gs_fontDefault )
264 {
265 gs_fontDefault = new wxFont(wxCreateFontFromStockObject(SYSTEM_FONT));
266 }
267
268 return *gs_fontDefault;
269#else // !__WXWINCE__
270 // wxWindow ctor calls GetFont(wxSYS_DEFAULT_GUI_FONT) so we're
271 // called fairly often -- this is why we cache this particular font
272 const bool isDefaultRequested = index == wxSYS_DEFAULT_GUI_FONT;
273 if ( isDefaultRequested )
274 {
275 if ( gs_fontDefault )
276 return *gs_fontDefault;
277 }
278
279 wxFont font = wxCreateFontFromStockObject(index);
280
281 if ( isDefaultRequested )
282 {
283 // if we got here it means we hadn't cached it yet - do now
284 gs_fontDefault = new wxFont(font);
285 }
286
287 return font;
288#endif // __WXWINCE__/!__WXWINCE__
289}
290
291// ----------------------------------------------------------------------------
292// system metrics/features
293// ----------------------------------------------------------------------------
294
295// TODO: some of the "metrics" clearly should be features now that we have
296// HasFeature()!
297
298// the conversion table from wxSystemMetric enum to GetSystemMetrics() param
299//
300// if the constant is not defined, put -1 in the table to indicate that it is
301// unknown
302static const int gs_metricsMap[] =
303{
304 -1, // wxSystemMetric enums start at 1, so give a dummy value for pos 0.
305#if defined(__WIN32__) && !defined(__WXWINCE__)
306 SM_CMOUSEBUTTONS,
307#else
308 -1,
309#endif
310
311 SM_CXBORDER,
312 SM_CYBORDER,
313 SM_CXCURSOR,
314 SM_CYCURSOR,
315 SM_CXDOUBLECLK,
316 SM_CYDOUBLECLK,
317#if defined(__WIN32__) && defined(SM_CXDRAG)
318 SM_CXDRAG,
319 SM_CYDRAG,
320 SM_CXEDGE,
321 SM_CYEDGE,
322#else
323 -1, -1, -1, -1,
324#endif
325 SM_CXHSCROLL,
326 SM_CYHSCROLL,
327#ifdef SM_CXHTHUMB
328 SM_CXHTHUMB,
329#else
330 -1,
331#endif
332 SM_CXICON,
333 SM_CYICON,
334 SM_CXICONSPACING,
335 SM_CYICONSPACING,
336#ifdef SM_CXHTHUMB
337 SM_CXMIN,
338 SM_CYMIN,
339#else
340 -1, -1,
341#endif
342 SM_CXSCREEN,
343 SM_CYSCREEN,
344
345#if defined(__WIN32__) && defined(SM_CXSIZEFRAME)
346 SM_CXSIZEFRAME,
347 SM_CYSIZEFRAME,
348 SM_CXSMICON,
349 SM_CYSMICON,
350#else
351 -1, -1, -1, -1,
352#endif
353 SM_CYHSCROLL,
354 SM_CXVSCROLL,
355 SM_CXVSCROLL,
356 SM_CYVSCROLL,
357#ifdef SM_CYVTHUMB
358 SM_CYVTHUMB,
359#else
360 -1,
361#endif
362 SM_CYCAPTION,
363 SM_CYMENU,
364#if defined(__WIN32__) && defined(SM_NETWORK)
365 SM_NETWORK,
366#else
367 -1,
368#endif
369#ifdef SM_PENWINDOWS
370 SM_PENWINDOWS,
371#else
372 -1,
373#endif
374#if defined(__WIN32__) && defined(SM_SHOWSOUNDS)
375 SM_SHOWSOUNDS,
376#else
377 -1,
378#endif
379#ifdef SM_SWAPBUTTON
380 SM_SWAPBUTTON,
381#else
382 -1
383#endif
384};
385
386// Get a system metric, e.g. scrollbar size
387int wxSystemSettingsNative::GetMetric(wxSystemMetric index, wxWindow* WXUNUSED(win))
388{
389#ifdef __WXMICROWIN__
390 // TODO: probably use wxUniv themes functionality
391 return 0;
392#else // !__WXMICROWIN__
393 wxCHECK_MSG( index > 0 && (size_t)index < WXSIZEOF(gs_metricsMap), 0,
394 _T("invalid metric") );
395
396 int indexMSW = gs_metricsMap[index];
397 if ( indexMSW == -1 )
398 {
399 // not supported under current system
400 return -1;
401 }
402
403 int rc = ::GetSystemMetrics(indexMSW);
404 if ( index == wxSYS_NETWORK_PRESENT )
405 {
406 // only the last bit is significant according to the MSDN
407 rc &= 1;
408 }
409
410 return rc;
411#endif // __WXMICROWIN__/!__WXMICROWIN__
412}
413
414bool wxSystemSettingsNative::HasFeature(wxSystemFeature index)
415{
416 switch ( index )
417 {
418 case wxSYS_CAN_ICONIZE_FRAME:
419 case wxSYS_CAN_DRAW_FRAME_DECORATIONS:
420 return true;
421
422 default:
423 wxFAIL_MSG( _T("unknown system feature") );
424
425 return false;
426 }
427}
428
429// ----------------------------------------------------------------------------
430// function from wx/msw/wrapcctl.h: there is really no other place for it...
431// ----------------------------------------------------------------------------
432
433#if wxUSE_LISTCTRL || wxUSE_TREECTRL
434
435extern wxFont wxGetCCDefaultFont()
436{
437#ifndef __WXWINCE__
438 // under the systems enumerated below (anything released after Win98), the
439 // default font used for the common controls seems to be the desktop font
440 // which is also used for the icon titles and not the stock default GUI
441 // font
442 bool useIconFont;
443 int verMaj, verMin;
444 switch ( wxGetOsVersion(&verMaj, &verMin) )
445 {
446 case wxWIN95:
447 // 4.10 is Win98
448 useIconFont = verMaj == 4 && verMin >= 10;
449 break;
450
451 case wxWINDOWS_NT:
452 // 5.0 is Win2k
453 useIconFont = verMaj >= 5;
454 break;
455
456 default:
457 useIconFont = false;
458 }
459
460 if ( useIconFont )
461 {
462 LOGFONT lf;
463 if ( ::SystemParametersInfo
464 (
465 SPI_GETICONTITLELOGFONT,
466 sizeof(lf),
467 &lf,
468 0
469 ) )
470 {
471 return wxFont(wxCreateFontFromLogFont(&lf));
472 }
473 else
474 {
475 wxLogLastError(_T("SystemParametersInfo(SPI_GETICONTITLELOGFONT"));
476 }
477 }
478#endif // __WXWINCE__
479
480 // fall back to the default font for the normal controls
481 return wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT);
482}
483
484#endif // wxUSE_LISTCTRL || wxUSE_TREECTRL