]> git.saurik.com Git - wxWidgets.git/blame - src/msw/utilsgui.cpp
avoid leaking allocated tooltips
[wxWidgets.git] / src / msw / utilsgui.cpp
CommitLineData
e2478fde
VZ
1///////////////////////////////////////////////////////////////////////////////
2// Name: msw/utilsgui.cpp
3// Purpose: Various utility functions only available in GUI
4// Author: Vadim Zeitlin
5// Modified by:
6// Created: 21.06.2003 (extracted from msw/utils.cpp)
7// RCS-ID: $Id$
8// Copyright: (c) Julian Smart
65571936 9// License: wxWindows licence
e2478fde
VZ
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/cursor.h"
42d54220 29 #include "wx/window.h"
e2478fde
VZ
30 #include "wx/utils.h"
31#endif //WX_PRECOMP
32
5f6475c1
VZ
33#include "wx/dynlib.h"
34
e2478fde 35#include "wx/msw/private.h" // includes <windows.h>
50a2e26f
FM
36#include "wx/msw/registry.h"
37#include <shellapi.h> // needed for SHELLEXECUTEINFO
38
e2478fde
VZ
39
40// ============================================================================
41// implementation
42// ============================================================================
43
e2478fde
VZ
44// ---------------------------------------------------------------------------
45// helper functions for showing a "busy" cursor
46// ---------------------------------------------------------------------------
47
48static HCURSOR gs_wxBusyCursor = 0; // new, busy cursor
49static HCURSOR gs_wxBusyCursorOld = 0; // old cursor
50static int gs_wxBusyCursorCount = 0;
51
52extern HCURSOR wxGetCurrentBusyCursor()
53{
54 return gs_wxBusyCursor;
55}
56
57// Set the cursor to the busy cursor for all windows
f516d986 58void wxBeginBusyCursor(const wxCursor *cursor)
e2478fde
VZ
59{
60 if ( gs_wxBusyCursorCount++ == 0 )
61 {
62 gs_wxBusyCursor = (HCURSOR)cursor->GetHCURSOR();
63#ifndef __WXMICROWIN__
64 gs_wxBusyCursorOld = ::SetCursor(gs_wxBusyCursor);
65#endif
66 }
67 //else: nothing to do, already set
68}
69
70// Restore cursor to normal
71void wxEndBusyCursor()
72{
73 wxCHECK_RET( gs_wxBusyCursorCount > 0,
74 wxT("no matching wxBeginBusyCursor() for wxEndBusyCursor()") );
75
76 if ( --gs_wxBusyCursorCount == 0 )
77 {
78#ifndef __WXMICROWIN__
79 ::SetCursor(gs_wxBusyCursorOld);
80#endif
81 gs_wxBusyCursorOld = 0;
82 }
83}
84
27d2dbbc 85// true if we're between the above two calls
e2478fde
VZ
86bool wxIsBusy()
87{
88 return gs_wxBusyCursorCount > 0;
89}
90
91// Check whether this window wants to process messages, e.g. Stop button
92// in long calculations.
93bool wxCheckForInterrupt(wxWindow *wnd)
94{
27d2dbbc 95 wxCHECK( wnd, false );
e2478fde
VZ
96
97 MSG msg;
98 while ( ::PeekMessage(&msg, GetHwndOf(wnd), 0, 0, PM_REMOVE) )
99 {
100 ::TranslateMessage(&msg);
101 ::DispatchMessage(&msg);
102 }
103
27d2dbbc 104 return true;
e2478fde
VZ
105}
106
107// MSW only: get user-defined resource from the .res file.
108// Returns NULL or newly-allocated memory, so use delete[] to clean up.
109
110#ifndef __WXMICROWIN__
111wxChar *wxLoadUserResource(const wxString& resourceName, const wxString& resourceType)
112{
e0a050e3
VS
113 HRSRC hResource = ::FindResource(wxGetInstance(),
114 resourceName.wx_str(),
115 resourceType.wx_str());
e2478fde
VZ
116 if ( hResource == 0 )
117 return NULL;
118
119 HGLOBAL hData = ::LoadResource(wxGetInstance(), hResource);
120 if ( hData == 0 )
121 return NULL;
122
123 wxChar *theText = (wxChar *)::LockResource(hData);
124 if ( !theText )
125 return NULL;
126
127 // Not all compilers put a zero at the end of the resource (e.g. BC++ doesn't).
128 // so we need to find the length of the resource.
e408bf52
VZ
129 int len = ::SizeofResource(wxGetInstance(), hResource) + 1;
130 wxChar *s = new wxChar[len];
131 wxStrlcpy(s, theText, len);
e2478fde 132
e2478fde
VZ
133 // Obsolete in WIN32
134#ifndef __WIN32__
135 UnlockResource(hData);
136#endif
137
138 // No need??
139 // GlobalFree(hData);
140
141 return s;
142}
143#endif // __WXMICROWIN__
144
145// ----------------------------------------------------------------------------
146// get display info
147// ----------------------------------------------------------------------------
148
149// See also the wxGetMousePosition in window.cpp
150// Deprecated: use wxPoint wxGetMousePosition() instead
151void wxGetMousePosition( int* x, int* y )
152{
153 POINT pt;
154 GetCursorPos( & pt );
155 if ( x ) *x = pt.x;
156 if ( y ) *y = pt.y;
259c43f6 157}
e2478fde 158
27d2dbbc 159// Return true if we have a colour display
e2478fde
VZ
160bool wxColourDisplay()
161{
162#ifdef __WXMICROWIN__
163 // MICROWIN_TODO
27d2dbbc 164 return true;
e2478fde
VZ
165#else
166 // this function is called from wxDC ctor so it is called a *lot* of times
3103e8a9 167 // hence we optimize it a bit but doing the check only once
e2478fde
VZ
168 //
169 // this should be MT safe as only the GUI thread (holding the GUI mutex)
170 // can call us
171 static int s_isColour = -1;
172
173 if ( s_isColour == -1 )
174 {
175 ScreenHDC dc;
176 int noCols = ::GetDeviceCaps(dc, NUMCOLORS);
177
178 s_isColour = (noCols == -1) || (noCols > 2);
179 }
180
181 return s_isColour != 0;
182#endif
183}
184
185// Returns depth of screen
186int wxDisplayDepth()
187{
188 ScreenHDC dc;
189 return GetDeviceCaps(dc, PLANES) * GetDeviceCaps(dc, BITSPIXEL);
190}
191
192// Get size of display
193void wxDisplaySize(int *width, int *height)
194{
195#ifdef __WXMICROWIN__
196 RECT rect;
197 HWND hWnd = GetDesktopWindow();
198 ::GetWindowRect(hWnd, & rect);
199
200 if ( width )
201 *width = rect.right - rect.left;
202 if ( height )
203 *height = rect.bottom - rect.top;
204#else // !__WXMICROWIN__
205 ScreenHDC dc;
206
207 if ( width )
208 *width = ::GetDeviceCaps(dc, HORZRES);
209 if ( height )
210 *height = ::GetDeviceCaps(dc, VERTRES);
211#endif // __WXMICROWIN__/!__WXMICROWIN__
212}
213
214void wxDisplaySizeMM(int *width, int *height)
215{
216#ifdef __WXMICROWIN__
217 // MICROWIN_TODO
218 if ( width )
219 *width = 0;
220 if ( height )
221 *height = 0;
222#else
223 ScreenHDC dc;
224
225 if ( width )
226 *width = ::GetDeviceCaps(dc, HORZSIZE);
227 if ( height )
228 *height = ::GetDeviceCaps(dc, VERTSIZE);
229#endif
230}
231
232void wxClientDisplayRect(int *x, int *y, int *width, int *height)
233{
3a5bcc4d 234#if defined(__WXMICROWIN__)
e2478fde
VZ
235 *x = 0; *y = 0;
236 wxDisplaySize(width, height);
237#else
238 // Determine the desktop dimensions minus the taskbar and any other
239 // special decorations...
240 RECT r;
241
242 SystemParametersInfo(SPI_GETWORKAREA, 0, &r, 0);
243 if (x) *x = r.left;
244 if (y) *y = r.top;
245 if (width) *width = r.right - r.left;
246 if (height) *height = r.bottom - r.top;
247#endif
248}
249
250// ---------------------------------------------------------------------------
251// window information functions
252// ---------------------------------------------------------------------------
253
254wxString WXDLLEXPORT wxGetWindowText(WXHWND hWnd)
255{
256 wxString str;
257
258 if ( hWnd )
259 {
260 int len = GetWindowTextLength((HWND)hWnd) + 1;
de564874 261 ::GetWindowText((HWND)hWnd, wxStringBuffer(str, len), len);
e2478fde
VZ
262 }
263
264 return str;
265}
266
267wxString WXDLLEXPORT wxGetWindowClass(WXHWND hWnd)
268{
269 wxString str;
270
271 // MICROWIN_TODO
272#ifndef __WXMICROWIN__
273 if ( hWnd )
274 {
275 int len = 256; // some starting value
276
277 for ( ;; )
278 {
de564874 279 int count = ::GetClassName((HWND)hWnd, wxStringBuffer(str, len), len);
e2478fde 280
e2478fde
VZ
281 if ( count == len )
282 {
283 // the class name might have been truncated, retry with larger
284 // buffer
285 len *= 2;
286 }
287 else
288 {
289 break;
290 }
291 }
292 }
293#endif // !__WXMICROWIN__
294
295 return str;
296}
297
6756a5f8 298int WXDLLEXPORT wxGetWindowId(WXHWND hWnd)
e2478fde 299{
6756a5f8 300 return ::GetWindowLong((HWND)hWnd, GWL_ID);
e2478fde
VZ
301}
302
303// ----------------------------------------------------------------------------
304// Metafile helpers
305// ----------------------------------------------------------------------------
306
307extern void PixelToHIMETRIC(LONG *x, LONG *y)
308{
309 ScreenHDC hdcRef;
310
311 int iWidthMM = GetDeviceCaps(hdcRef, HORZSIZE),
312 iHeightMM = GetDeviceCaps(hdcRef, VERTSIZE),
313 iWidthPels = GetDeviceCaps(hdcRef, HORZRES),
314 iHeightPels = GetDeviceCaps(hdcRef, VERTRES);
315
316 *x *= (iWidthMM * 100);
317 *x /= iWidthPels;
318 *y *= (iHeightMM * 100);
319 *y /= iHeightPels;
320}
321
322extern void HIMETRICToPixel(LONG *x, LONG *y)
323{
324 ScreenHDC hdcRef;
325
326 int iWidthMM = GetDeviceCaps(hdcRef, HORZSIZE),
327 iHeightMM = GetDeviceCaps(hdcRef, VERTSIZE),
328 iWidthPels = GetDeviceCaps(hdcRef, HORZRES),
329 iHeightPels = GetDeviceCaps(hdcRef, VERTRES);
330
331 *x *= iWidthPels;
332 *x /= (iWidthMM * 100);
333 *y *= iHeightPels;
334 *y /= (iHeightMM * 100);
335}
336
4676948b
JS
337void wxDrawLine(HDC hdc, int x1, int y1, int x2, int y2)
338{
339#ifdef __WXWINCE__
340 POINT points[2];
341 points[0].x = x1;
342 points[0].y = y1;
343 points[1].x = x2;
344 points[1].y = y2;
345 Polyline(hdc, points, 2);
346#else
347 MoveToEx(hdc, x1, y1, NULL); LineTo((HDC) hdc, x2, y2);
348#endif
349}
350
e2478fde 351
5f6475c1
VZ
352// ----------------------------------------------------------------------------
353// Shell API wrappers
354// ----------------------------------------------------------------------------
355
356extern bool wxEnableFileNameAutoComplete(HWND hwnd)
357{
40e0cf48 358#if wxUSE_DYNLIB_CLASS
5f6475c1
VZ
359 typedef HRESULT (WINAPI *SHAutoComplete_t)(HWND, DWORD);
360
361 static SHAutoComplete_t s_pfnSHAutoComplete = NULL;
362 static bool s_initialized = false;
363
364 if ( !s_initialized )
365 {
366 s_initialized = true;
367
368 wxLogNull nolog;
369 wxDynamicLibrary dll(_T("shlwapi.dll"));
370 if ( dll.IsLoaded() )
371 {
372 s_pfnSHAutoComplete =
373 (SHAutoComplete_t)dll.GetSymbol(_T("SHAutoComplete"));
374 if ( s_pfnSHAutoComplete )
375 {
376 // won't be unloaded until the process termination, no big deal
377 dll.Detach();
378 }
379 }
380 }
381
382 if ( !s_pfnSHAutoComplete )
383 return false;
384
385 HRESULT hr = s_pfnSHAutoComplete(hwnd, 0x10 /* SHACF_FILESYS_ONLY */);
386 if ( FAILED(hr) )
387 {
388 wxLogApiError(_T("SHAutoComplete"), hr);
389 return false;
390 }
391
392 return true;
40e0cf48
VZ
393#else
394 wxUnusedVar(hwnd);
395 return false;
396#endif // wxUSE_DYNLIB_CLASS/!wxUSE_DYNLIB_CLASS
5f6475c1
VZ
397}
398
50a2e26f
FM
399// ----------------------------------------------------------------------------
400// Launch document with default app
401// ----------------------------------------------------------------------------
402
403bool wxLaunchDefaultApplication(const wxString& document, int flags)
404{
405 wxUnusedVar(flags);
406
407 WinStruct<SHELLEXECUTEINFO> sei;
408 sei.lpFile = document.wx_str();
409 sei.lpVerb = _T("open");
410#ifdef __WXWINCE__
411 sei.nShow = SW_SHOWNORMAL; // SW_SHOWDEFAULT not defined under CE (#10216)
412#else
413 sei.nShow = SW_SHOWDEFAULT;
414#endif
415
416 // avoid Windows message box in case of error for consistency with
417 // wxLaunchDefaultBrowser() even if don't show the error ourselves in this
418 // function
419 sei.fMask = SEE_MASK_FLAG_NO_UI;
420
421 if ( ::ShellExecuteEx(&sei) )
422 return true;
423
424 return false;
425}
426
427// ----------------------------------------------------------------------------
428// Launch default browser
429// ----------------------------------------------------------------------------
430
431bool wxDoLaunchDefaultBrowser(const wxString& url, const wxString& scheme, int flags)
432{
433 wxUnusedVar(flags);
434
435#if wxUSE_IPC
436 if ( flags & wxBROWSER_NEW_WINDOW )
437 {
438 // ShellExecuteEx() opens the URL in an existing window by default so
439 // we can't use it if we need a new window
440 wxRegKey key(wxRegKey::HKCR, scheme + _T("\\shell\\open"));
441 if ( !key.Exists() )
442 {
443 // try the default browser, it must be registered at least for http URLs
444 key.SetName(wxRegKey::HKCR, _T("http\\shell\\open"));
445 }
446
447 if ( key.Exists() )
448 {
449 wxRegKey keyDDE(key, wxT("DDEExec"));
450 if ( keyDDE.Exists() )
451 {
452 // we only know the syntax of WWW_OpenURL DDE request for IE,
453 // optimistically assume that all other browsers are compatible
454 // with it
455 static const wxChar *TOPIC_OPEN_URL = wxT("WWW_OpenURL");
456 wxString ddeCmd;
457 wxRegKey keyTopic(keyDDE, wxT("topic"));
458 bool ok = keyTopic.Exists() &&
459 keyTopic.QueryDefaultValue() == TOPIC_OPEN_URL;
460 if ( ok )
461 {
462 ddeCmd = keyDDE.QueryDefaultValue();
463 ok = !ddeCmd.empty();
464 }
465
466 if ( ok )
467 {
468 // for WWW_OpenURL, the index of the window to open the URL
469 // in is -1 (meaning "current") by default, replace it with
470 // 0 which means "new" (see KB article 160957)
471 ok = ddeCmd.Replace(wxT("-1"), wxT("0"),
472 false /* only first occurrence */) == 1;
473 }
474
475 if ( ok )
476 {
477 // and also replace the parameters: the topic should
478 // contain a placeholder for the URL
479 ok = ddeCmd.Replace(wxT("%1"), url, false) == 1;
480 }
481
482 if ( ok )
483 {
484 // try to send it the DDE request now but ignore the errors
485 wxLogNull noLog;
486
487 const wxString ddeServer = wxRegKey(keyDDE, wxT("application"));
488 if ( wxExecuteDDE(ddeServer, TOPIC_OPEN_URL, ddeCmd) )
489 return true;
490
491 // this is not necessarily an error: maybe browser is
492 // simply not running, but no matter, in any case we're
493 // going to launch it using ShellExecuteEx() below now and
494 // we shouldn't try to open a new window if we open a new
495 // browser anyhow
496 }
497 }
498 }
499 }
500#endif // wxUSE_IPC
501
502 WinStruct<SHELLEXECUTEINFO> sei;
503 sei.lpFile = url.c_str();
504 sei.lpVerb = _T("open");
505 sei.nShow = SW_SHOWNORMAL;
506 sei.fMask = SEE_MASK_FLAG_NO_UI; // we give error message ourselves
507
508 if ( ::ShellExecuteEx(&sei) )
509 return true;
510
511 return false;
512}