removed Win16 code (patch 905241), last version with remains of Win16 support tagged...
[wxWidgets.git] / 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 #ifndef __WXWINCE__
253 // this one is special: we don't get it from GetStockObject()
254 if ( index == wxSYS_ICONTITLE_FONT )
255 {
256 LOGFONT lf;
257 SystemParametersInfo(SPI_GETICONTITLELOGFONT, sizeof(lf), &lf, 0);
258 return wxCreateFontFromLogFont(&lf);
259 }
260 #endif // __WXWINCE__
261
262 // wxWindow ctor calls GetSystemFont(wxSYS_DEFAULT_GUI_FONT) so we're
263 // called fairly often - this is why we cache this particular font
264 bool isDefaultRequested = index == wxSYS_DEFAULT_GUI_FONT;
265 if ( isDefaultRequested && gs_fontDefault )
266 {
267 return *gs_fontDefault;
268 }
269
270 wxFont font = wxCreateFontFromStockObject(index);
271
272 if ( isDefaultRequested )
273 {
274 // if we got here it means we hadn't cached it yet - do now
275 gs_fontDefault = new wxFont(font);
276 }
277
278 return font;
279 }
280
281 // ----------------------------------------------------------------------------
282 // system metrics/features
283 // ----------------------------------------------------------------------------
284
285 // TODO: some of the "metrics" clearly should be features now that we have
286 // HasFeature()!
287
288 // the conversion table from wxSystemMetric enum to GetSystemMetrics() param
289 //
290 // if the constant is not defined, put -1 in the table to indicate that it is
291 // unknown
292 static const int gs_metricsMap[] =
293 {
294 -1, // wxSystemMetric enums start at 1, so give a dummy value for pos 0.
295 #if defined(__WIN32__) && !defined(__WXWINCE__)
296 SM_CMOUSEBUTTONS,
297 #else
298 -1,
299 #endif
300
301 SM_CXBORDER,
302 SM_CYBORDER,
303 SM_CXCURSOR,
304 SM_CYCURSOR,
305 SM_CXDOUBLECLK,
306 SM_CYDOUBLECLK,
307 #if defined(__WIN32__) && defined(SM_CXDRAG)
308 SM_CXDRAG,
309 SM_CYDRAG,
310 SM_CXEDGE,
311 SM_CYEDGE,
312 #else
313 -1, -1, -1, -1,
314 #endif
315 SM_CXHSCROLL,
316 SM_CYHSCROLL,
317 #ifdef SM_CXHTHUMB
318 SM_CXHTHUMB,
319 #else
320 -1,
321 #endif
322 SM_CXICON,
323 SM_CYICON,
324 SM_CXICONSPACING,
325 SM_CYICONSPACING,
326 #ifdef SM_CXHTHUMB
327 SM_CXMIN,
328 SM_CYMIN,
329 #else
330 -1, -1,
331 #endif
332 SM_CXSCREEN,
333 SM_CYSCREEN,
334
335 #if defined(__WIN32__) && defined(SM_CXSIZEFRAME)
336 SM_CXSIZEFRAME,
337 SM_CYSIZEFRAME,
338 SM_CXSMICON,
339 SM_CYSMICON,
340 #else
341 -1, -1, -1, -1,
342 #endif
343 SM_CYHSCROLL,
344 SM_CXVSCROLL,
345 SM_CXVSCROLL,
346 SM_CYVSCROLL,
347 #ifdef SM_CYVTHUMB
348 SM_CYVTHUMB,
349 #else
350 -1,
351 #endif
352 SM_CYCAPTION,
353 SM_CYMENU,
354 #if defined(__WIN32__) && defined(SM_NETWORK)
355 SM_NETWORK,
356 #else
357 -1,
358 #endif
359 #ifdef SM_PENWINDOWS
360 SM_PENWINDOWS,
361 #else
362 -1,
363 #endif
364 #if defined(__WIN32__) && defined(SM_SHOWSOUNDS)
365 SM_SHOWSOUNDS,
366 #else
367 -1,
368 #endif
369 #ifdef SM_SWAPBUTTON
370 SM_SWAPBUTTON,
371 #else
372 -1
373 #endif
374 };
375
376 // Get a system metric, e.g. scrollbar size
377 int wxSystemSettingsNative::GetMetric(wxSystemMetric index)
378 {
379 #ifdef __WXMICROWIN__
380 // TODO: probably use wxUniv themes functionality
381 return 0;
382 #else // !__WXMICROWIN__
383 wxCHECK_MSG( index > 0 && (size_t)index < WXSIZEOF(gs_metricsMap), 0,
384 _T("invalid metric") );
385
386 int indexMSW = gs_metricsMap[index];
387 if ( indexMSW == -1 )
388 {
389 // not supported under current system
390 return 0;
391 }
392
393 int rc = ::GetSystemMetrics(indexMSW);
394 if ( index == wxSYS_NETWORK_PRESENT )
395 {
396 // only the last bit is significant according to the MSDN
397 rc &= 1;
398 }
399
400 return rc;
401 #endif // __WXMICROWIN__/!__WXMICROWIN__
402 }
403
404 bool wxSystemSettingsNative::HasFeature(wxSystemFeature index)
405 {
406 switch ( index )
407 {
408 case wxSYS_CAN_ICONIZE_FRAME:
409 case wxSYS_CAN_DRAW_FRAME_DECORATIONS:
410 return TRUE;
411
412 default:
413 wxFAIL_MSG( _T("unknown system feature") );
414
415 return FALSE;
416 }
417 }