If context menu not handled, treat as left click instead.
[wxWidgets.git] / src / msw / window.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/msw/window.cpp
3 // Purpose: wxWindowMSW
4 // Author: Julian Smart
5 // Modified by: VZ on 13.05.99: no more Default(), MSWOnXXX() reorganisation
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/msw/wrapwin.h"
29 #include "wx/window.h"
30 #include "wx/accel.h"
31 #include "wx/menu.h"
32 #include "wx/dc.h"
33 #include "wx/dcclient.h"
34 #include "wx/dcmemory.h"
35 #include "wx/utils.h"
36 #include "wx/app.h"
37 #include "wx/layout.h"
38 #include "wx/dialog.h"
39 #include "wx/frame.h"
40 #include "wx/listbox.h"
41 #include "wx/button.h"
42 #include "wx/msgdlg.h"
43 #include "wx/settings.h"
44 #include "wx/statbox.h"
45 #include "wx/sizer.h"
46 #endif
47
48 #if wxUSE_OWNER_DRAWN && !defined(__WXUNIVERSAL__)
49 #include "wx/ownerdrw.h"
50 #endif
51
52 #include "wx/evtloop.h"
53 #include "wx/module.h"
54 #include "wx/sysopt.h"
55
56 #if wxUSE_DRAG_AND_DROP
57 #include "wx/dnd.h"
58 #endif
59
60 #if wxUSE_ACCESSIBILITY
61 #include "wx/access.h"
62 #include <ole2.h>
63 #include <oleacc.h>
64 #ifndef WM_GETOBJECT
65 #define WM_GETOBJECT 0x003D
66 #endif
67 #ifndef OBJID_CLIENT
68 #define OBJID_CLIENT 0xFFFFFFFC
69 #endif
70 #endif
71
72 #include "wx/menuitem.h"
73 #include "wx/log.h"
74
75 #include "wx/msw/private.h"
76
77 #if wxUSE_TOOLTIPS
78 #include "wx/tooltip.h"
79 #endif
80
81 #if wxUSE_CARET
82 #include "wx/caret.h"
83 #endif // wxUSE_CARET
84
85 #if wxUSE_SPINCTRL
86 #include "wx/spinctrl.h"
87 #endif // wxUSE_SPINCTRL
88
89 #include "wx/intl.h"
90 #include "wx/log.h"
91
92 #include "wx/textctrl.h"
93 #include "wx/notebook.h"
94 #include "wx/listctrl.h"
95
96 #include <string.h>
97
98 #if (!defined(__GNUWIN32_OLD__) && !defined(__WXMICROWIN__) /* && !defined(__WXWINCE__) */ ) || defined(__CYGWIN10__)
99 #include <shellapi.h>
100 #include <mmsystem.h>
101 #endif
102
103 #ifdef __WIN32__
104 #include <windowsx.h>
105 #endif
106
107 #include <commctrl.h>
108
109 #include "wx/msw/missing.h"
110
111 #if defined(__WXWINCE__)
112 #include "wx/msw/wince/missing.h"
113 #ifdef __POCKETPC__
114 #include <windows.h>
115 #include <shellapi.h>
116 #include <ole2.h>
117 #include <aygshell.h>
118 #endif
119 #endif
120
121 #if defined(TME_LEAVE) && defined(WM_MOUSELEAVE)
122 #define HAVE_TRACKMOUSEEVENT
123 #endif // everything needed for TrackMouseEvent()
124
125 // if this is set to 1, we use deferred window sizing to reduce flicker when
126 // resizing complicated window hierarchies, but this can in theory result in
127 // different behaviour than the old code so we keep the possibility to use it
128 // by setting this to 0 (in the future this should be removed completely)
129 #ifdef __WXWINCE__
130 #define USE_DEFERRED_SIZING 0
131 #else
132 #define USE_DEFERRED_SIZING 1
133 #endif
134
135 // set this to 1 to filter out duplicate mouse events, e.g. mouse move events
136 // when mouse position didnd't change
137 #ifdef __WXWINCE__
138 #define wxUSE_MOUSEEVENT_HACK 0
139 #else
140 #define wxUSE_MOUSEEVENT_HACK 1
141 #endif
142
143 // ---------------------------------------------------------------------------
144 // global variables
145 // ---------------------------------------------------------------------------
146
147 #if wxUSE_MENUS_NATIVE
148 wxMenu *wxCurrentPopupMenu = NULL;
149 #endif // wxUSE_MENUS_NATIVE
150
151 #ifdef __WXWINCE__
152 extern wxChar *wxCanvasClassName;
153 #else
154 extern const wxChar *wxCanvasClassName;
155 #endif
156
157 // true if we had already created the std colour map, used by
158 // wxGetStdColourMap() and wxWindow::OnSysColourChanged() (FIXME-MT)
159 static bool gs_hasStdCmap = false;
160
161 // last mouse event information we need to filter out the duplicates
162 #if wxUSE_MOUSEEVENT_HACK
163 static struct MouseEventInfoDummy
164 {
165 // mouse position (in screen coordinates)
166 wxPoint pos;
167
168 // last mouse event type
169 wxEventType type;
170 } gs_lastMouseEvent;
171 #endif // wxUSE_MOUSEEVENT_HACK
172
173 // ---------------------------------------------------------------------------
174 // private functions
175 // ---------------------------------------------------------------------------
176
177 // the window proc for all our windows
178 LRESULT WXDLLEXPORT APIENTRY _EXPORT wxWndProc(HWND hWnd, UINT message,
179 WPARAM wParam, LPARAM lParam);
180
181
182 #ifdef __WXDEBUG__
183 const wxChar *wxGetMessageName(int message);
184 #endif //__WXDEBUG__
185
186 void wxRemoveHandleAssociation(wxWindowMSW *win);
187 extern void wxAssociateWinWithHandle(HWND hWnd, wxWindowMSW *win);
188 wxWindow *wxFindWinFromHandle(WXHWND hWnd);
189
190 // get the text metrics for the current font
191 static TEXTMETRIC wxGetTextMetrics(const wxWindowMSW *win);
192
193 #ifdef __WXWINCE__
194 // find the window for the mouse event at the specified position
195 static wxWindowMSW *FindWindowForMouseEvent(wxWindowMSW *win, int *x, int *y);
196 #endif // __WXWINCE__
197
198 // wrapper around BringWindowToTop() API
199 static inline void wxBringWindowToTop(HWND hwnd)
200 {
201 #ifdef __WXMICROWIN__
202 // It seems that MicroWindows brings the _parent_ of the window to the top,
203 // which can be the wrong one.
204
205 // activate (set focus to) specified window
206 ::SetFocus(hwnd);
207 #endif
208
209 // raise top level parent to top of z order
210 if (!::SetWindowPos(hwnd, HWND_TOP, 0, 0, 0, 0, SWP_NOMOVE | SWP_NOSIZE))
211 {
212 wxLogLastError(_T("SetWindowPos"));
213 }
214 }
215
216 #ifndef __WXWINCE__
217
218 // ensure that all our parent windows have WS_EX_CONTROLPARENT style
219 static void EnsureParentHasControlParentStyle(wxWindow *parent)
220 {
221 /*
222 If we have WS_EX_CONTROLPARENT flag we absolutely *must* set it for our
223 parent as well as otherwise several Win32 functions using
224 GetNextDlgTabItem() to iterate over all controls such as
225 IsDialogMessage() or DefDlgProc() would enter an infinite loop: indeed,
226 all of them iterate over all the controls starting from the currently
227 focused one and stop iterating when they get back to the focus but
228 unless all parents have WS_EX_CONTROLPARENT bit set, they would never
229 get back to the initial (focused) window: as we do have this style,
230 GetNextDlgTabItem() will leave this window and continue in its parent,
231 but if the parent doesn't have it, it wouldn't recurse inside it later
232 on and so wouldn't have a chance of getting back to this window either.
233 */
234 while ( parent && !parent->IsTopLevel() )
235 {
236 LONG exStyle = ::GetWindowLong(GetHwndOf(parent), GWL_EXSTYLE);
237 if ( !(exStyle & WS_EX_CONTROLPARENT) )
238 {
239 // force the parent to have this style
240 ::SetWindowLong(GetHwndOf(parent), GWL_EXSTYLE,
241 exStyle | WS_EX_CONTROLPARENT);
242 }
243
244 parent = parent->GetParent();
245 }
246 }
247
248 #endif // !__WXWINCE__
249
250 #ifdef __WXWINCE__
251 // On Windows CE, GetCursorPos can return an error, so use this function
252 // instead
253 bool GetCursorPosWinCE(POINT* pt)
254 {
255 if (!GetCursorPos(pt))
256 {
257 DWORD pos = GetMessagePos();
258 pt->x = LOWORD(pos);
259 pt->y = HIWORD(pos);
260 }
261 return true;
262 }
263 #endif
264
265 // ---------------------------------------------------------------------------
266 // event tables
267 // ---------------------------------------------------------------------------
268
269 // in wxUniv/MSW this class is abstract because it doesn't have DoPopupMenu()
270 // method
271 #ifdef __WXUNIVERSAL__
272 IMPLEMENT_ABSTRACT_CLASS(wxWindowMSW, wxWindowBase)
273 #else // __WXMSW__
274 #if wxUSE_EXTENDED_RTTI
275
276 // windows that are created from a parent window during its Create method, eg. spin controls in a calendar controls
277 // must never been streamed out separately otherwise chaos occurs. Right now easiest is to test for negative ids, as
278 // windows with negative ids never can be recreated anyway
279
280 bool wxWindowStreamingCallback( const wxObject *object, wxWriter * , wxPersister * , wxxVariantArray & )
281 {
282 const wxWindow * win = dynamic_cast<const wxWindow*>(object) ;
283 if ( win && win->GetId() < 0 )
284 return false ;
285 return true ;
286 }
287
288 IMPLEMENT_DYNAMIC_CLASS_XTI_CALLBACK(wxWindow, wxWindowBase,"wx/window.h", wxWindowStreamingCallback)
289
290 // make wxWindowList known before the property is used
291
292 wxCOLLECTION_TYPE_INFO( wxWindow* , wxWindowList ) ;
293
294 template<> void wxCollectionToVariantArray( wxWindowList const &theList, wxxVariantArray &value)
295 {
296 wxListCollectionToVariantArray<wxWindowList::compatibility_iterator>( theList , value ) ;
297 }
298
299 WX_DEFINE_FLAGS( wxWindowStyle )
300
301 wxBEGIN_FLAGS( wxWindowStyle )
302 // new style border flags, we put them first to
303 // use them for streaming out
304
305 wxFLAGS_MEMBER(wxBORDER_SIMPLE)
306 wxFLAGS_MEMBER(wxBORDER_SUNKEN)
307 wxFLAGS_MEMBER(wxBORDER_DOUBLE)
308 wxFLAGS_MEMBER(wxBORDER_RAISED)
309 wxFLAGS_MEMBER(wxBORDER_STATIC)
310 wxFLAGS_MEMBER(wxBORDER_NONE)
311
312 // old style border flags
313 wxFLAGS_MEMBER(wxSIMPLE_BORDER)
314 wxFLAGS_MEMBER(wxSUNKEN_BORDER)
315 wxFLAGS_MEMBER(wxDOUBLE_BORDER)
316 wxFLAGS_MEMBER(wxRAISED_BORDER)
317 wxFLAGS_MEMBER(wxSTATIC_BORDER)
318 wxFLAGS_MEMBER(wxBORDER)
319
320 // standard window styles
321 wxFLAGS_MEMBER(wxTAB_TRAVERSAL)
322 wxFLAGS_MEMBER(wxCLIP_CHILDREN)
323 wxFLAGS_MEMBER(wxTRANSPARENT_WINDOW)
324 wxFLAGS_MEMBER(wxWANTS_CHARS)
325 wxFLAGS_MEMBER(wxFULL_REPAINT_ON_RESIZE)
326 wxFLAGS_MEMBER(wxALWAYS_SHOW_SB )
327 wxFLAGS_MEMBER(wxVSCROLL)
328 wxFLAGS_MEMBER(wxHSCROLL)
329
330 wxEND_FLAGS( wxWindowStyle )
331
332 wxBEGIN_PROPERTIES_TABLE(wxWindow)
333 wxEVENT_PROPERTY( Close , wxEVT_CLOSE_WINDOW , wxCloseEvent)
334 wxEVENT_PROPERTY( Create , wxEVT_CREATE , wxWindowCreateEvent )
335 wxEVENT_PROPERTY( Destroy , wxEVT_DESTROY , wxWindowDestroyEvent )
336 // Always constructor Properties first
337
338 wxREADONLY_PROPERTY( Parent,wxWindow*, GetParent, EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
339 wxPROPERTY( Id,wxWindowID, SetId, GetId, -1 /*wxID_ANY*/ , 0 /*flags*/ , wxT("Helpstring") , wxT("group") )
340 wxPROPERTY( Position,wxPoint, SetPosition , GetPosition, wxDefaultPosition , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // pos
341 wxPROPERTY( Size,wxSize, SetSize, GetSize, wxDefaultSize , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // size
342 wxPROPERTY( WindowStyle , long , SetWindowStyleFlag , GetWindowStyleFlag , EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // style
343
344 // Then all relations of the object graph
345
346 wxREADONLY_PROPERTY_COLLECTION( Children , wxWindowList , wxWindowBase* , GetWindowChildren , wxPROP_OBJECT_GRAPH /*flags*/ , wxT("Helpstring") , wxT("group"))
347
348 // and finally all other properties
349
350 wxPROPERTY( ExtraStyle , long , SetExtraStyle , GetExtraStyle , EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // extstyle
351 wxPROPERTY( BackgroundColour , wxColour , SetBackgroundColour , GetBackgroundColour , EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // bg
352 wxPROPERTY( ForegroundColour , wxColour , SetForegroundColour , GetForegroundColour , EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // fg
353 wxPROPERTY( Enabled , bool , Enable , IsEnabled , wxxVariant((bool)true) , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
354 wxPROPERTY( Shown , bool , Show , IsShown , wxxVariant((bool)true) , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
355 #if 0
356 // possible property candidates (not in xrc) or not valid in all subclasses
357 wxPROPERTY( Title,wxString, SetTitle, GetTitle, wxEmptyString )
358 wxPROPERTY( Font , wxFont , SetFont , GetWindowFont , )
359 wxPROPERTY( Label,wxString, SetLabel, GetLabel, wxEmptyString )
360 // MaxHeight, Width , MinHeight , Width
361 // TODO switch label to control and title to toplevels
362
363 wxPROPERTY( ThemeEnabled , bool , SetThemeEnabled , GetThemeEnabled , )
364 //wxPROPERTY( Cursor , wxCursor , SetCursor , GetCursor , )
365 // wxPROPERTY( ToolTip , wxString , SetToolTip , GetToolTipText , )
366 wxPROPERTY( AutoLayout , bool , SetAutoLayout , GetAutoLayout , )
367
368
369
370 #endif
371 wxEND_PROPERTIES_TABLE()
372
373 wxBEGIN_HANDLERS_TABLE(wxWindow)
374 wxEND_HANDLERS_TABLE()
375
376 wxCONSTRUCTOR_DUMMY(wxWindow)
377
378 #else
379 IMPLEMENT_DYNAMIC_CLASS(wxWindow, wxWindowBase)
380 #endif
381 #endif // __WXUNIVERSAL__/__WXMSW__
382
383 BEGIN_EVENT_TABLE(wxWindowMSW, wxWindowBase)
384 EVT_SYS_COLOUR_CHANGED(wxWindowMSW::OnSysColourChanged)
385 EVT_ERASE_BACKGROUND(wxWindowMSW::OnEraseBackground)
386 #ifdef __WXWINCE__
387 EVT_INIT_DIALOG(wxWindowMSW::OnInitDialog)
388 #endif
389 END_EVENT_TABLE()
390
391 // ===========================================================================
392 // implementation
393 // ===========================================================================
394
395 // ---------------------------------------------------------------------------
396 // wxWindow utility functions
397 // ---------------------------------------------------------------------------
398
399 // Find an item given the MS Windows id
400 wxWindow *wxWindowMSW::FindItem(long id) const
401 {
402 #if wxUSE_CONTROLS
403 wxControl *item = wxDynamicCastThis(wxControl);
404 if ( item )
405 {
406 // is it us or one of our "internal" children?
407 if ( item->GetId() == id
408 #ifndef __WXUNIVERSAL__
409 || (item->GetSubcontrols().Index(id) != wxNOT_FOUND)
410 #endif // __WXUNIVERSAL__
411 )
412 {
413 return item;
414 }
415 }
416 #endif // wxUSE_CONTROLS
417
418 wxWindowList::compatibility_iterator current = GetChildren().GetFirst();
419 while (current)
420 {
421 wxWindow *childWin = current->GetData();
422
423 wxWindow *wnd = childWin->FindItem(id);
424 if ( wnd )
425 return wnd;
426
427 current = current->GetNext();
428 }
429
430 return NULL;
431 }
432
433 // Find an item given the MS Windows handle
434 wxWindow *wxWindowMSW::FindItemByHWND(WXHWND hWnd, bool controlOnly) const
435 {
436 wxWindowList::compatibility_iterator current = GetChildren().GetFirst();
437 while (current)
438 {
439 wxWindow *parent = current->GetData();
440
441 // Do a recursive search.
442 wxWindow *wnd = parent->FindItemByHWND(hWnd);
443 if ( wnd )
444 return wnd;
445
446 if ( !controlOnly
447 #if wxUSE_CONTROLS
448 || parent->IsKindOf(CLASSINFO(wxControl))
449 #endif // wxUSE_CONTROLS
450 )
451 {
452 wxWindow *item = current->GetData();
453 if ( item->GetHWND() == hWnd )
454 return item;
455 else
456 {
457 if ( item->ContainsHWND(hWnd) )
458 return item;
459 }
460 }
461
462 current = current->GetNext();
463 }
464 return NULL;
465 }
466
467 // Default command handler
468 bool wxWindowMSW::MSWCommand(WXUINT WXUNUSED(param), WXWORD WXUNUSED(id))
469 {
470 return false;
471 }
472
473 // ----------------------------------------------------------------------------
474 // constructors and such
475 // ----------------------------------------------------------------------------
476
477 void wxWindowMSW::Init()
478 {
479 // MSW specific
480 m_isBeingDeleted = false;
481 m_oldWndProc = NULL;
482 m_mouseInWindow = false;
483 m_lastKeydownProcessed = false;
484
485 m_childrenDisabled = NULL;
486 m_frozenness = 0;
487
488 m_hWnd = 0;
489 m_hDWP = 0;
490
491 m_xThumbSize = 0;
492 m_yThumbSize = 0;
493
494 m_pendingPosition = wxDefaultPosition;
495 m_pendingSize = wxDefaultSize;
496
497 #ifdef __POCKETPC__
498 m_contextMenuEnabled = false;
499 #endif
500 }
501
502 // Destructor
503 wxWindowMSW::~wxWindowMSW()
504 {
505 m_isBeingDeleted = true;
506
507 #ifndef __WXUNIVERSAL__
508 // VS: make sure there's no wxFrame with last focus set to us:
509 for ( wxWindow *win = GetParent(); win; win = win->GetParent() )
510 {
511 wxTopLevelWindow *frame = wxDynamicCast(win, wxTopLevelWindow);
512 if ( frame )
513 {
514 if ( frame->GetLastFocus() == this )
515 {
516 frame->SetLastFocus(NULL);
517 }
518
519 // apparently sometimes we can end up with our grand parent
520 // pointing to us as well: this is surely a bug in focus handling
521 // code but it's not clear where it happens so for now just try to
522 // fix it here by not breaking out of the loop
523 //break;
524 }
525 }
526 #endif // __WXUNIVERSAL__
527
528 // VS: destroy children first and _then_ detach *this from its parent.
529 // If we did it the other way around, children wouldn't be able
530 // find their parent frame (see above).
531 DestroyChildren();
532
533 if ( m_hWnd )
534 {
535 // VZ: test temp removed to understand what really happens here
536 //if (::IsWindow(GetHwnd()))
537 {
538 if ( !::DestroyWindow(GetHwnd()) )
539 wxLogLastError(wxT("DestroyWindow"));
540 }
541
542 // remove hWnd <-> wxWindow association
543 wxRemoveHandleAssociation(this);
544 }
545
546 delete m_childrenDisabled;
547
548 }
549
550 // real construction (Init() must have been called before!)
551 bool wxWindowMSW::Create(wxWindow *parent,
552 wxWindowID id,
553 const wxPoint& pos,
554 const wxSize& size,
555 long style,
556 const wxString& name)
557 {
558 wxCHECK_MSG( parent, false, wxT("can't create wxWindow without parent") );
559
560 if ( !CreateBase(parent, id, pos, size, style, wxDefaultValidator, name) )
561 return false;
562
563 parent->AddChild(this);
564
565 WXDWORD exstyle;
566 DWORD msflags = MSWGetCreateWindowFlags(&exstyle);
567
568 #ifdef __WXUNIVERSAL__
569 // no borders, we draw them ourselves
570 exstyle &= ~(WS_EX_DLGMODALFRAME |
571 WS_EX_STATICEDGE |
572 WS_EX_CLIENTEDGE |
573 WS_EX_WINDOWEDGE);
574 msflags &= ~WS_BORDER;
575 #endif // wxUniversal
576
577 if ( IsShown() )
578 {
579 msflags |= WS_VISIBLE;
580 }
581
582 if ( !MSWCreate(wxCanvasClassName, NULL, pos, size, msflags, exstyle) )
583 return false;
584
585 InheritAttributes();
586
587 return true;
588 }
589
590 // ---------------------------------------------------------------------------
591 // basic operations
592 // ---------------------------------------------------------------------------
593
594 void wxWindowMSW::SetFocus()
595 {
596 HWND hWnd = GetHwnd();
597 wxCHECK_RET( hWnd, _T("can't set focus to invalid window") );
598
599 #if !defined(__WXMICROWIN__) && !defined(__WXWINCE__)
600 ::SetLastError(0);
601 #endif
602
603 if ( !::SetFocus(hWnd) )
604 {
605 #if defined(__WXDEBUG__) && !defined(__WXMICROWIN__)
606 // was there really an error?
607 DWORD dwRes = ::GetLastError();
608 if ( dwRes )
609 {
610 HWND hwndFocus = ::GetFocus();
611 if ( hwndFocus != hWnd )
612 {
613 wxLogApiError(_T("SetFocus"), dwRes);
614 }
615 }
616 #endif // Debug
617 }
618 }
619
620 void wxWindowMSW::SetFocusFromKbd()
621 {
622 // when the focus is given to the control with DLGC_HASSETSEL style from
623 // keyboard its contents should be entirely selected: this is what
624 // ::IsDialogMessage() does and so we should do it as well to provide the
625 // same LNF as the native programs
626 if ( ::SendMessage(GetHwnd(), WM_GETDLGCODE, 0, 0) & DLGC_HASSETSEL )
627 {
628 ::SendMessage(GetHwnd(), EM_SETSEL, 0, -1);
629 }
630
631 // do this after (maybe) setting the selection as like this when
632 // wxEVT_SET_FOCUS handler is called, the selection would have been already
633 // set correctly -- this may be important
634 wxWindowBase::SetFocusFromKbd();
635 }
636
637 // Get the window with the focus
638 wxWindow *wxWindowBase::DoFindFocus()
639 {
640 HWND hWnd = ::GetFocus();
641 if ( hWnd )
642 {
643 return wxGetWindowFromHWND((WXHWND)hWnd);
644 }
645
646 return NULL;
647 }
648
649 bool wxWindowMSW::Enable(bool enable)
650 {
651 if ( !wxWindowBase::Enable(enable) )
652 return false;
653
654 HWND hWnd = GetHwnd();
655 if ( hWnd )
656 ::EnableWindow(hWnd, (BOOL)enable);
657
658 // the logic below doesn't apply to the top level windows -- otherwise
659 // showing a modal dialog would result in total greying out (and ungreying
660 // out later) of everything which would be really ugly
661 if ( IsTopLevel() )
662 return true;
663
664 // when the parent is disabled, all of its children should be disabled as
665 // well but when it is enabled back, only those of the children which
666 // hadn't been already disabled in the beginning should be enabled again,
667 // so we have to keep the list of those children
668 for ( wxWindowList::compatibility_iterator node = GetChildren().GetFirst();
669 node;
670 node = node->GetNext() )
671 {
672 wxWindow *child = node->GetData();
673 if ( child->IsTopLevel() )
674 {
675 // the logic below doesn't apply to top level children
676 continue;
677 }
678
679 if ( enable )
680 {
681 // re-enable the child unless it had been disabled before us
682 if ( !m_childrenDisabled || !m_childrenDisabled->Find(child) )
683 child->Enable();
684 }
685 else // we're being disabled
686 {
687 if ( child->IsEnabled() )
688 {
689 // disable it as children shouldn't stay enabled while the
690 // parent is not
691 child->Disable();
692 }
693 else // child already disabled, remember it
694 {
695 // have we created the list of disabled children already?
696 if ( !m_childrenDisabled )
697 m_childrenDisabled = new wxWindowList;
698
699 m_childrenDisabled->Append(child);
700 }
701 }
702 }
703
704 if ( enable && m_childrenDisabled )
705 {
706 // we don't need this list any more, don't keep unused memory
707 delete m_childrenDisabled;
708 m_childrenDisabled = NULL;
709 }
710
711 return true;
712 }
713
714 bool wxWindowMSW::Show(bool show)
715 {
716 if ( !wxWindowBase::Show(show) )
717 return false;
718
719 HWND hWnd = GetHwnd();
720
721 // we could be called before the underlying window is created (this is
722 // actually useful to prevent it from being initially shown), e.g.
723 //
724 // wxFoo *foo = new wxFoo;
725 // foo->Hide();
726 // foo->Create(parent, ...);
727 //
728 // should work without errors
729 if ( hWnd )
730 {
731 ::ShowWindow(hWnd, show ? SW_SHOW : SW_HIDE);
732 }
733
734 return true;
735 }
736
737 // Raise the window to the top of the Z order
738 void wxWindowMSW::Raise()
739 {
740 wxBringWindowToTop(GetHwnd());
741 }
742
743 // Lower the window to the bottom of the Z order
744 void wxWindowMSW::Lower()
745 {
746 ::SetWindowPos(GetHwnd(), HWND_BOTTOM, 0, 0, 0, 0,
747 SWP_NOMOVE | SWP_NOSIZE | SWP_NOACTIVATE);
748 }
749
750 void wxWindowMSW::DoCaptureMouse()
751 {
752 HWND hWnd = GetHwnd();
753 if ( hWnd )
754 {
755 ::SetCapture(hWnd);
756 }
757 }
758
759 void wxWindowMSW::DoReleaseMouse()
760 {
761 if ( !::ReleaseCapture() )
762 {
763 wxLogLastError(_T("ReleaseCapture"));
764 }
765 }
766
767 /* static */ wxWindow *wxWindowBase::GetCapture()
768 {
769 HWND hwnd = ::GetCapture();
770 return hwnd ? wxFindWinFromHandle((WXHWND)hwnd) : (wxWindow *)NULL;
771 }
772
773 bool wxWindowMSW::SetFont(const wxFont& font)
774 {
775 if ( !wxWindowBase::SetFont(font) )
776 {
777 // nothing to do
778 return false;
779 }
780
781 HWND hWnd = GetHwnd();
782 if ( hWnd != 0 )
783 {
784 WXHANDLE hFont = m_font.GetResourceHandle();
785
786 wxASSERT_MSG( hFont, wxT("should have valid font") );
787
788 ::SendMessage(hWnd, WM_SETFONT, (WPARAM)hFont, MAKELPARAM(TRUE, 0));
789 }
790
791 return true;
792 }
793 bool wxWindowMSW::SetCursor(const wxCursor& cursor)
794 {
795 if ( !wxWindowBase::SetCursor(cursor) )
796 {
797 // no change
798 return false;
799 }
800
801 if ( m_cursor.Ok() )
802 {
803 HWND hWnd = GetHwnd();
804
805 // Change the cursor NOW if we're within the correct window
806 POINT point;
807 #ifdef __WXWINCE__
808 ::GetCursorPosWinCE(&point);
809 #else
810 ::GetCursorPos(&point);
811 #endif
812
813 RECT rect = wxGetWindowRect(hWnd);
814
815 if ( ::PtInRect(&rect, point) && !wxIsBusy() )
816 ::SetCursor(GetHcursorOf(m_cursor));
817 }
818
819 return true;
820 }
821
822 void wxWindowMSW::WarpPointer(int x, int y)
823 {
824 ClientToScreen(&x, &y);
825
826 if ( !::SetCursorPos(x, y) )
827 {
828 wxLogLastError(_T("SetCursorPos"));
829 }
830 }
831
832 void wxWindowMSW::MSWUpdateUIState(int action, int state)
833 {
834 // WM_CHANGEUISTATE only appeared in Windows 2000 so it can do us no good
835 // to use it on older systems -- and could possibly do some harm
836 static int s_needToUpdate = -1;
837 if ( s_needToUpdate == -1 )
838 {
839 int verMaj, verMin;
840 s_needToUpdate = wxGetOsVersion(&verMaj, &verMin) == wxWINDOWS_NT &&
841 verMaj >= 5;
842 }
843
844 if ( s_needToUpdate )
845 {
846 // we send WM_CHANGEUISTATE so if nothing needs changing then the system
847 // won't send WM_UPDATEUISTATE
848 ::SendMessage(GetHwnd(), WM_CHANGEUISTATE, MAKEWPARAM(action, state), 0);
849 }
850 }
851
852 // ---------------------------------------------------------------------------
853 // scrolling stuff
854 // ---------------------------------------------------------------------------
855
856 inline int GetScrollPosition(HWND hWnd, int wOrient)
857 {
858 #ifdef __WXMICROWIN__
859 return ::GetScrollPosWX(hWnd, wOrient);
860 #else
861 WinStruct<SCROLLINFO> scrollInfo;
862 scrollInfo.cbSize = sizeof(SCROLLINFO);
863 scrollInfo.fMask = SIF_POS;
864 ::GetScrollInfo(hWnd, wOrient, &scrollInfo );
865
866 return scrollInfo.nPos;
867
868 #endif
869 }
870
871 int wxWindowMSW::GetScrollPos(int orient) const
872 {
873 HWND hWnd = GetHwnd();
874 wxCHECK_MSG( hWnd, 0, _T("no HWND in GetScrollPos") );
875
876 return GetScrollPosition(hWnd, orient == wxHORIZONTAL ? SB_HORZ : SB_VERT);
877 }
878
879 // This now returns the whole range, not just the number
880 // of positions that we can scroll.
881 int wxWindowMSW::GetScrollRange(int orient) const
882 {
883 int maxPos;
884 HWND hWnd = GetHwnd();
885 if ( !hWnd )
886 return 0;
887 #if 0
888 ::GetScrollRange(hWnd, orient == wxHORIZONTAL ? SB_HORZ : SB_VERT,
889 &minPos, &maxPos);
890 #endif
891 WinStruct<SCROLLINFO> scrollInfo;
892 scrollInfo.fMask = SIF_RANGE;
893 if ( !::GetScrollInfo(hWnd,
894 orient == wxHORIZONTAL ? SB_HORZ : SB_VERT,
895 &scrollInfo) )
896 {
897 // Most of the time this is not really an error, since the return
898 // value can also be zero when there is no scrollbar yet.
899 // wxLogLastError(_T("GetScrollInfo"));
900 }
901 maxPos = scrollInfo.nMax;
902
903 // undo "range - 1" done in SetScrollbar()
904 return maxPos + 1;
905 }
906
907 int wxWindowMSW::GetScrollThumb(int orient) const
908 {
909 return orient == wxHORIZONTAL ? m_xThumbSize : m_yThumbSize;
910 }
911
912 void wxWindowMSW::SetScrollPos(int orient, int pos, bool refresh)
913 {
914 HWND hWnd = GetHwnd();
915 wxCHECK_RET( hWnd, _T("SetScrollPos: no HWND") );
916
917 WinStruct<SCROLLINFO> info;
918 info.nPage = 0;
919 info.nMin = 0;
920 info.nPos = pos;
921 info.fMask = SIF_POS;
922 if ( HasFlag(wxALWAYS_SHOW_SB) )
923 {
924 // disable scrollbar instead of removing it then
925 info.fMask |= SIF_DISABLENOSCROLL;
926 }
927
928 ::SetScrollInfo(hWnd, orient == wxHORIZONTAL ? SB_HORZ : SB_VERT,
929 &info, refresh);
930 }
931
932 // New function that will replace some of the above.
933 void wxWindowMSW::SetScrollbar(int orient,
934 int pos,
935 int pageSize,
936 int range,
937 bool refresh)
938 {
939 WinStruct<SCROLLINFO> info;
940 info.nPage = pageSize;
941 info.nMin = 0; // range is nMax - nMin + 1
942 info.nMax = range - 1; // as both nMax and nMax are inclusive
943 info.nPos = pos;
944 info.fMask = SIF_RANGE | SIF_PAGE | SIF_POS;
945 if ( HasFlag(wxALWAYS_SHOW_SB) )
946 {
947 // disable scrollbar instead of removing it then
948 info.fMask |= SIF_DISABLENOSCROLL;
949 }
950
951 HWND hWnd = GetHwnd();
952 if ( hWnd )
953 {
954 // We have to set the variables here to make them valid in events
955 // triggered by ::SetScrollInfo()
956 *(orient == wxHORIZONTAL ? &m_xThumbSize : &m_yThumbSize) = pageSize;
957
958 ::SetScrollInfo(hWnd, orient == wxHORIZONTAL ? SB_HORZ : SB_VERT,
959 &info, refresh);
960 }
961 }
962
963 void wxWindowMSW::ScrollWindow(int dx, int dy, const wxRect *prect)
964 {
965 RECT rect;
966 RECT *pr;
967 if ( prect )
968 {
969 rect.left = prect->x;
970 rect.top = prect->y;
971 rect.right = prect->x + prect->width;
972 rect.bottom = prect->y + prect->height;
973 pr = &rect;
974 }
975 else
976 {
977 pr = NULL;
978
979 }
980
981 #ifdef __WXWINCE__
982 // FIXME: is this the exact equivalent of the line below?
983 ::ScrollWindowEx(GetHwnd(), dx, dy, pr, pr, 0, 0, SW_SCROLLCHILDREN|SW_ERASE|SW_INVALIDATE);
984 #else
985 ::ScrollWindow(GetHwnd(), dx, dy, pr, pr);
986 #endif
987 }
988
989 static bool ScrollVertically(HWND hwnd, int kind, int count)
990 {
991 int posStart = GetScrollPosition(hwnd, SB_VERT);
992
993 int pos = posStart;
994 for ( int n = 0; n < count; n++ )
995 {
996 ::SendMessage(hwnd, WM_VSCROLL, kind, 0);
997
998 int posNew = GetScrollPosition(hwnd, SB_VERT);
999 if ( posNew == pos )
1000 {
1001 // don't bother to continue, we're already at top/bottom
1002 break;
1003 }
1004
1005 pos = posNew;
1006 }
1007
1008 return pos != posStart;
1009 }
1010
1011 bool wxWindowMSW::ScrollLines(int lines)
1012 {
1013 bool down = lines > 0;
1014
1015 return ScrollVertically(GetHwnd(),
1016 down ? SB_LINEDOWN : SB_LINEUP,
1017 down ? lines : -lines);
1018 }
1019
1020 bool wxWindowMSW::ScrollPages(int pages)
1021 {
1022 bool down = pages > 0;
1023
1024 return ScrollVertically(GetHwnd(),
1025 down ? SB_PAGEDOWN : SB_PAGEUP,
1026 down ? pages : -pages);
1027 }
1028
1029 // ---------------------------------------------------------------------------
1030 // subclassing
1031 // ---------------------------------------------------------------------------
1032
1033 void wxWindowMSW::SubclassWin(WXHWND hWnd)
1034 {
1035 wxASSERT_MSG( !m_oldWndProc, wxT("subclassing window twice?") );
1036
1037 HWND hwnd = (HWND)hWnd;
1038 wxCHECK_RET( ::IsWindow(hwnd), wxT("invalid HWND in SubclassWin") );
1039
1040 wxAssociateWinWithHandle(hwnd, this);
1041
1042 m_oldWndProc = (WXFARPROC)wxGetWindowProc((HWND)hWnd);
1043
1044 // we don't need to subclass the window of our own class (in the Windows
1045 // sense of the word)
1046 if ( !wxCheckWindowWndProc(hWnd, (WXFARPROC)wxWndProc) )
1047 {
1048 wxSetWindowProc(hwnd, wxWndProc);
1049 }
1050 else
1051 {
1052 // don't bother restoring it either: this also makes it easy to
1053 // implement IsOfStandardClass() method which returns true for the
1054 // standard controls and false for the wxWidgets own windows as it can
1055 // simply check m_oldWndProc
1056 m_oldWndProc = NULL;
1057 }
1058 }
1059
1060 void wxWindowMSW::UnsubclassWin()
1061 {
1062 wxRemoveHandleAssociation(this);
1063
1064 // Restore old Window proc
1065 HWND hwnd = GetHwnd();
1066 if ( hwnd )
1067 {
1068 SetHWND(0);
1069
1070 wxCHECK_RET( ::IsWindow(hwnd), wxT("invalid HWND in UnsubclassWin") );
1071
1072 if ( m_oldWndProc )
1073 {
1074 if ( !wxCheckWindowWndProc((WXHWND)hwnd, m_oldWndProc) )
1075 {
1076 wxSetWindowProc(hwnd, (WNDPROC)m_oldWndProc);
1077 }
1078
1079 m_oldWndProc = NULL;
1080 }
1081 }
1082 }
1083
1084 void wxWindowMSW::AssociateHandle(WXWidget handle)
1085 {
1086 if ( m_hWnd )
1087 {
1088 if ( !::DestroyWindow(GetHwnd()) )
1089 wxLogLastError(wxT("DestroyWindow"));
1090 }
1091
1092 WXHWND wxhwnd = (WXHWND)handle;
1093
1094 SetHWND(wxhwnd);
1095 SubclassWin(wxhwnd);
1096 }
1097
1098 void wxWindowMSW::DissociateHandle()
1099 {
1100 // this also calls SetHWND(0) for us
1101 UnsubclassWin();
1102 }
1103
1104
1105 bool wxCheckWindowWndProc(WXHWND hWnd,
1106 WXFARPROC WXUNUSED(wndProc))
1107 {
1108 // TODO: This list of window class names should be factored out so they can be
1109 // managed in one place and then accessed from here and other places, such as
1110 // wxApp::RegisterWindowClasses() and wxApp::UnregisterWindowClasses()
1111
1112 #ifdef __WXWINCE__
1113 extern wxChar *wxCanvasClassName;
1114 extern wxChar *wxCanvasClassNameNR;
1115 #else
1116 extern const wxChar *wxCanvasClassName;
1117 extern const wxChar *wxCanvasClassNameNR;
1118 #endif
1119 extern const wxChar *wxMDIFrameClassName;
1120 extern const wxChar *wxMDIFrameClassNameNoRedraw;
1121 extern const wxChar *wxMDIChildFrameClassName;
1122 extern const wxChar *wxMDIChildFrameClassNameNoRedraw;
1123 wxString str(wxGetWindowClass(hWnd));
1124 if (str == wxCanvasClassName ||
1125 str == wxCanvasClassNameNR ||
1126 #if wxUSE_GLCANVAS
1127 str == _T("wxGLCanvasClass") ||
1128 str == _T("wxGLCanvasClassNR") ||
1129 #endif // wxUSE_GLCANVAS
1130 str == wxMDIFrameClassName ||
1131 str == wxMDIFrameClassNameNoRedraw ||
1132 str == wxMDIChildFrameClassName ||
1133 str == wxMDIChildFrameClassNameNoRedraw ||
1134 str == _T("wxTLWHiddenParent"))
1135 return true; // Effectively means don't subclass
1136 else
1137 return false;
1138 }
1139
1140 // ----------------------------------------------------------------------------
1141 // Style handling
1142 // ----------------------------------------------------------------------------
1143
1144 void wxWindowMSW::SetWindowStyleFlag(long flags)
1145 {
1146 long flagsOld = GetWindowStyleFlag();
1147 if ( flags == flagsOld )
1148 return;
1149
1150 // update the internal variable
1151 wxWindowBase::SetWindowStyleFlag(flags);
1152
1153 // now update the Windows style as well if needed - and if the window had
1154 // been already created
1155 if ( !GetHwnd() )
1156 return;
1157
1158 WXDWORD exstyle, exstyleOld;
1159 long style = MSWGetStyle(flags, &exstyle),
1160 styleOld = MSWGetStyle(flagsOld, &exstyleOld);
1161
1162 if ( style != styleOld )
1163 {
1164 // some flags (e.g. WS_VISIBLE or WS_DISABLED) should not be changed by
1165 // this function so instead of simply setting the style to the new
1166 // value we clear the bits which were set in styleOld but are set in
1167 // the new one and set the ones which were not set before
1168 long styleReal = ::GetWindowLong(GetHwnd(), GWL_STYLE);
1169 styleReal &= ~styleOld;
1170 styleReal |= style;
1171
1172 ::SetWindowLong(GetHwnd(), GWL_STYLE, styleReal);
1173 }
1174
1175 // and the extended style
1176 if ( exstyle != exstyleOld )
1177 {
1178 long exstyleReal = ::GetWindowLong(GetHwnd(), GWL_EXSTYLE);
1179 exstyleReal &= ~exstyleOld;
1180 exstyleReal |= exstyle;
1181
1182 ::SetWindowLong(GetHwnd(), GWL_EXSTYLE, exstyleReal);
1183
1184 // we must call SetWindowPos() to flush the cached extended style and
1185 // also to make the change to wxSTAY_ON_TOP style take effect: just
1186 // setting the style simply doesn't work
1187 if ( !::SetWindowPos(GetHwnd(),
1188 exstyleReal & WS_EX_TOPMOST ? HWND_TOPMOST
1189 : HWND_NOTOPMOST,
1190 0, 0, 0, 0,
1191 SWP_NOMOVE | SWP_NOSIZE) )
1192 {
1193 wxLogLastError(_T("SetWindowPos"));
1194 }
1195 }
1196 }
1197
1198 WXDWORD wxWindowMSW::MSWGetStyle(long flags, WXDWORD *exstyle) const
1199 {
1200 // translate common wxWidgets styles to Windows ones
1201
1202 // most of windows are child ones, those which are not (such as
1203 // wxTopLevelWindow) should remove WS_CHILD in their MSWGetStyle()
1204 WXDWORD style = WS_CHILD;
1205
1206 // using this flag results in very significant reduction in flicker,
1207 // especially with controls inside the static boxes (as the interior of the
1208 // box is not redrawn twice), but sometimes results in redraw problems, so
1209 // optionally allow the old code to continue to use it provided a special
1210 // system option is turned on
1211 if ( !wxSystemOptions::GetOptionInt(wxT("msw.window.no-clip-children"))
1212 || (flags & wxCLIP_CHILDREN) )
1213 style |= WS_CLIPCHILDREN;
1214
1215 // it doesn't seem useful to use WS_CLIPSIBLINGS here as we officially
1216 // don't support overlapping windows and it only makes sense for them and,
1217 // presumably, gives the system some extra work (to manage more clipping
1218 // regions), so avoid it alltogether
1219
1220
1221 if ( flags & wxVSCROLL )
1222 style |= WS_VSCROLL;
1223
1224 if ( flags & wxHSCROLL )
1225 style |= WS_HSCROLL;
1226
1227 const wxBorder border = GetBorder(flags);
1228
1229 // WS_BORDER is only required for wxBORDER_SIMPLE
1230 if ( border == wxBORDER_SIMPLE )
1231 style |= WS_BORDER;
1232
1233 // now deal with ext style if the caller wants it
1234 if ( exstyle )
1235 {
1236 *exstyle = 0;
1237
1238 #ifndef __WXWINCE__
1239 if ( flags & wxTRANSPARENT_WINDOW )
1240 *exstyle |= WS_EX_TRANSPARENT;
1241 #endif
1242
1243 switch ( border )
1244 {
1245 default:
1246 case wxBORDER_DEFAULT:
1247 wxFAIL_MSG( _T("unknown border style") );
1248 // fall through
1249
1250 case wxBORDER_NONE:
1251 case wxBORDER_SIMPLE:
1252 break;
1253
1254 case wxBORDER_STATIC:
1255 *exstyle |= WS_EX_STATICEDGE;
1256 break;
1257
1258 case wxBORDER_RAISED:
1259 *exstyle |= WS_EX_DLGMODALFRAME;
1260 break;
1261
1262 case wxBORDER_SUNKEN:
1263 *exstyle |= WS_EX_CLIENTEDGE;
1264 style &= ~WS_BORDER;
1265 break;
1266
1267 case wxBORDER_DOUBLE:
1268 *exstyle |= WS_EX_DLGMODALFRAME;
1269 break;
1270 }
1271
1272 // wxUniv doesn't use Windows dialog navigation functions at all
1273 #if !defined(__WXUNIVERSAL__) && !defined(__WXWINCE__)
1274 // to make the dialog navigation work with the nested panels we must
1275 // use this style (top level windows such as dialogs don't need it)
1276 if ( (flags & wxTAB_TRAVERSAL) && !IsTopLevel() )
1277 {
1278 *exstyle |= WS_EX_CONTROLPARENT;
1279 }
1280 #endif // __WXUNIVERSAL__
1281 }
1282
1283 return style;
1284 }
1285
1286 // Setup background and foreground colours correctly
1287 void wxWindowMSW::SetupColours()
1288 {
1289 if ( GetParent() )
1290 SetBackgroundColour(GetParent()->GetBackgroundColour());
1291 }
1292
1293 bool wxWindowMSW::IsMouseInWindow() const
1294 {
1295 // get the mouse position
1296 POINT pt;
1297 #ifdef __WXWINCE__
1298 ::GetCursorPosWinCE(&pt);
1299 #else
1300 ::GetCursorPos(&pt);
1301 #endif
1302
1303 // find the window which currently has the cursor and go up the window
1304 // chain until we find this window - or exhaust it
1305 HWND hwnd = ::WindowFromPoint(pt);
1306 while ( hwnd && (hwnd != GetHwnd()) )
1307 hwnd = ::GetParent(hwnd);
1308
1309 return hwnd != NULL;
1310 }
1311
1312 void wxWindowMSW::OnInternalIdle()
1313 {
1314 #ifndef HAVE_TRACKMOUSEEVENT
1315 // Check if we need to send a LEAVE event
1316 if ( m_mouseInWindow )
1317 {
1318 // note that we should generate the leave event whether the window has
1319 // or doesn't have mouse capture
1320 if ( !IsMouseInWindow() )
1321 {
1322 GenerateMouseLeave();
1323 }
1324 }
1325 #endif // !HAVE_TRACKMOUSEEVENT
1326
1327 if (wxUpdateUIEvent::CanUpdate(this))
1328 UpdateWindowUI(wxUPDATE_UI_FROMIDLE);
1329 }
1330
1331 // Set this window to be the child of 'parent'.
1332 bool wxWindowMSW::Reparent(wxWindowBase *parent)
1333 {
1334 if ( !wxWindowBase::Reparent(parent) )
1335 return false;
1336
1337 HWND hWndChild = GetHwnd();
1338 HWND hWndParent = GetParent() ? GetWinHwnd(GetParent()) : (HWND)0;
1339
1340 ::SetParent(hWndChild, hWndParent);
1341
1342 #ifndef __WXWINCE__
1343 if ( ::GetWindowLong(hWndChild, GWL_EXSTYLE) & WS_EX_CONTROLPARENT )
1344 {
1345 EnsureParentHasControlParentStyle(GetParent());
1346 }
1347 #endif // !__WXWINCE__
1348
1349 return true;
1350 }
1351
1352 static inline void SendSetRedraw(HWND hwnd, bool on)
1353 {
1354 #ifndef __WXMICROWIN__
1355 ::SendMessage(hwnd, WM_SETREDRAW, (WPARAM)on, 0);
1356 #endif
1357 }
1358
1359 void wxWindowMSW::Freeze()
1360 {
1361 if ( !m_frozenness++ )
1362 {
1363 if ( IsShown() )
1364 SendSetRedraw(GetHwnd(), false);
1365 }
1366 }
1367
1368 void wxWindowMSW::Thaw()
1369 {
1370 wxASSERT_MSG( m_frozenness > 0, _T("Thaw() without matching Freeze()") );
1371
1372 if ( --m_frozenness == 0 )
1373 {
1374 if ( IsShown() )
1375 {
1376 SendSetRedraw(GetHwnd(), true);
1377
1378 // we need to refresh everything or otherwise the invalidated area
1379 // is not going to be repainted
1380 Refresh();
1381 }
1382 }
1383 }
1384
1385 void wxWindowMSW::Refresh(bool eraseBack, const wxRect *rect)
1386 {
1387 HWND hWnd = GetHwnd();
1388 if ( hWnd )
1389 {
1390 RECT mswRect;
1391 const RECT *pRect;
1392 if ( rect )
1393 {
1394 mswRect.left = rect->x;
1395 mswRect.top = rect->y;
1396 mswRect.right = rect->x + rect->width;
1397 mswRect.bottom = rect->y + rect->height;
1398
1399 pRect = &mswRect;
1400 }
1401 else
1402 {
1403 pRect = NULL;
1404 }
1405
1406 // RedrawWindow not available on SmartPhone or eVC++ 3
1407 #if !defined(__SMARTPHONE__) && !(defined(_WIN32_WCE) && _WIN32_WCE < 400)
1408 UINT flags = RDW_INVALIDATE | RDW_ALLCHILDREN;
1409 if ( eraseBack )
1410 flags |= RDW_ERASE;
1411
1412 ::RedrawWindow(hWnd, pRect, NULL, flags);
1413 #else
1414 ::InvalidateRect(hWnd, pRect, eraseBack);
1415 #endif
1416 }
1417 }
1418
1419 void wxWindowMSW::Update()
1420 {
1421 if ( !::UpdateWindow(GetHwnd()) )
1422 {
1423 wxLogLastError(_T("UpdateWindow"));
1424 }
1425
1426 #if !defined(__WXMICROWIN__) && !defined(__WXWINCE__)
1427 // just calling UpdateWindow() is not enough, what we did in our WM_PAINT
1428 // handler needs to be really drawn right now
1429 (void)::GdiFlush();
1430 #endif // __WIN32__
1431 }
1432
1433 // ---------------------------------------------------------------------------
1434 // drag and drop
1435 // ---------------------------------------------------------------------------
1436
1437 // we need to lower the sibling static boxes so controls contained within can be
1438 // a drop target
1439 static inline void AdjustStaticBoxZOrder(wxWindow *parent)
1440 {
1441 // no sibling static boxes if we have no parent (ie TLW)
1442 if ( !parent )
1443 return;
1444
1445 for ( wxWindowList::compatibility_iterator node = parent->GetChildren().GetFirst();
1446 node;
1447 node = node->GetNext() )
1448 {
1449 wxStaticBox *statbox = wxDynamicCast(node->GetData(), wxStaticBox);
1450 if ( statbox )
1451 {
1452 ::SetWindowPos(GetHwndOf(statbox), HWND_BOTTOM, 0, 0, 0, 0,
1453 SWP_NOMOVE | SWP_NOSIZE | SWP_NOACTIVATE);
1454 }
1455 }
1456 }
1457
1458 #if wxUSE_DRAG_AND_DROP
1459 void wxWindowMSW::SetDropTarget(wxDropTarget *pDropTarget)
1460 {
1461 if ( m_dropTarget != 0 ) {
1462 m_dropTarget->Revoke(m_hWnd);
1463 delete m_dropTarget;
1464 }
1465
1466 m_dropTarget = pDropTarget;
1467 if ( m_dropTarget != 0 )
1468 {
1469 AdjustStaticBoxZOrder(GetParent());
1470 m_dropTarget->Register(m_hWnd);
1471 }
1472 }
1473 #endif // wxUSE_DRAG_AND_DROP
1474
1475 // old-style file manager drag&drop support: we retain the old-style
1476 // DragAcceptFiles in parallel with SetDropTarget.
1477 void wxWindowMSW::DragAcceptFiles(bool WXUNUSED_IN_WINCE(accept))
1478 {
1479 #ifndef __WXWINCE__
1480 HWND hWnd = GetHwnd();
1481 if ( hWnd )
1482 {
1483 AdjustStaticBoxZOrder(GetParent());
1484 ::DragAcceptFiles(hWnd, (BOOL)accept);
1485 }
1486 #endif
1487 }
1488
1489 // ----------------------------------------------------------------------------
1490 // tooltips
1491 // ----------------------------------------------------------------------------
1492
1493 #if wxUSE_TOOLTIPS
1494
1495 void wxWindowMSW::DoSetToolTip(wxToolTip *tooltip)
1496 {
1497 wxWindowBase::DoSetToolTip(tooltip);
1498
1499 if ( m_tooltip )
1500 m_tooltip->SetWindow((wxWindow *)this);
1501 }
1502
1503 #endif // wxUSE_TOOLTIPS
1504
1505 // ---------------------------------------------------------------------------
1506 // moving and resizing
1507 // ---------------------------------------------------------------------------
1508
1509 bool wxWindowMSW::IsSizeDeferred() const
1510 {
1511 #if USE_DEFERRED_SIZING
1512 if ( m_pendingPosition != wxDefaultPosition ||
1513 m_pendingSize != wxDefaultSize )
1514 return true;
1515 #endif // USE_DEFERRED_SIZING
1516
1517 return false;
1518 }
1519
1520 // Get total size
1521 void wxWindowMSW::DoGetSize(int *x, int *y) const
1522 {
1523 // if SetSize() had been called at wx level but not realized at Windows
1524 // level yet (i.e. EndDeferWindowPos() not called), we still should return
1525 // the new and not the old position to the other wx code
1526 if ( m_pendingSize != wxDefaultSize )
1527 {
1528 if ( x )
1529 *x = m_pendingSize.x;
1530 if ( y )
1531 *y = m_pendingSize.y;
1532 }
1533 else // use current size
1534 {
1535 RECT rect = wxGetWindowRect(GetHwnd());
1536
1537 if ( x )
1538 *x = rect.right - rect.left;
1539 if ( y )
1540 *y = rect.bottom - rect.top;
1541 }
1542 }
1543
1544 // Get size *available for subwindows* i.e. excluding menu bar etc.
1545 void wxWindowMSW::DoGetClientSize(int *x, int *y) const
1546 {
1547 #if USE_DEFERRED_SIZING
1548 if ( IsTopLevel() || m_pendingSize == wxDefaultSize )
1549 #endif
1550 { // top level windows resizing is never deferred, so we can safely use
1551 // the current size here
1552 RECT rect = wxGetClientRect(GetHwnd());
1553
1554 if ( x )
1555 *x = rect.right;
1556 if ( y )
1557 *y = rect.bottom;
1558 }
1559 #if USE_DEFERRED_SIZING
1560 else // non top level and using deferred sizing
1561 {
1562 // we need to calculate the *pending* client size here
1563 RECT rect;
1564 rect.left = m_pendingPosition.x;
1565 rect.top = m_pendingPosition.y;
1566 rect.right = rect.left + m_pendingSize.x;
1567 rect.bottom = rect.top + m_pendingSize.y;
1568
1569 ::SendMessage(GetHwnd(), WM_NCCALCSIZE, FALSE, (LPARAM)&rect);
1570
1571 if ( x )
1572 *x = rect.right - rect.left;
1573 if ( y )
1574 *y = rect.bottom - rect.top;
1575 }
1576 #endif
1577 }
1578
1579 void wxWindowMSW::DoGetPosition(int *x, int *y) const
1580 {
1581 wxWindow * const parent = GetParent();
1582
1583 wxPoint pos;
1584 if ( m_pendingPosition != wxDefaultPosition )
1585 {
1586 pos = m_pendingPosition;
1587 }
1588 else // use current position
1589 {
1590 RECT rect = wxGetWindowRect(GetHwnd());
1591
1592 POINT point;
1593 point.x = rect.left;
1594 point.y = rect.top;
1595
1596 // we do the adjustments with respect to the parent only for the "real"
1597 // children, not for the dialogs/frames
1598 if ( !IsTopLevel() )
1599 {
1600 // Since we now have the absolute screen coords, if there's a
1601 // parent we must subtract its top left corner
1602 if ( parent )
1603 {
1604 ::ScreenToClient(GetHwndOf(parent), &point);
1605 }
1606 }
1607
1608 pos.x = point.x;
1609 pos.y = point.y;
1610 }
1611
1612 // we also must adjust by the client area offset: a control which is just
1613 // under a toolbar could be at (0, 30) in Windows but at (0, 0) in wx
1614 if ( parent && !IsTopLevel() )
1615 {
1616 const wxPoint pt(parent->GetClientAreaOrigin());
1617 pos.x -= pt.x;
1618 pos.y -= pt.y;
1619 }
1620
1621 if ( x )
1622 *x = pos.x;
1623 if ( y )
1624 *y = pos.y;
1625 }
1626
1627 void wxWindowMSW::DoScreenToClient(int *x, int *y) const
1628 {
1629 POINT pt;
1630 if ( x )
1631 pt.x = *x;
1632 if ( y )
1633 pt.y = *y;
1634
1635 ::ScreenToClient(GetHwnd(), &pt);
1636
1637 if ( x )
1638 *x = pt.x;
1639 if ( y )
1640 *y = pt.y;
1641 }
1642
1643 void wxWindowMSW::DoClientToScreen(int *x, int *y) const
1644 {
1645 POINT pt;
1646 if ( x )
1647 pt.x = *x;
1648 if ( y )
1649 pt.y = *y;
1650
1651 ::ClientToScreen(GetHwnd(), &pt);
1652
1653 if ( x )
1654 *x = pt.x;
1655 if ( y )
1656 *y = pt.y;
1657 }
1658
1659 bool
1660 wxWindowMSW::DoMoveSibling(WXHWND hwnd, int x, int y, int width, int height)
1661 {
1662 #if USE_DEFERRED_SIZING
1663 // if our parent had prepared a defer window handle for us, use it (unless
1664 // we are a top level window)
1665 wxWindowMSW * const parent = IsTopLevel() ? NULL : GetParent();
1666
1667 HDWP hdwp = parent ? (HDWP)parent->m_hDWP : NULL;
1668 if ( hdwp )
1669 {
1670 hdwp = ::DeferWindowPos(hdwp, (HWND)hwnd, NULL, x, y, width, height,
1671 SWP_NOZORDER | SWP_NOOWNERZORDER | SWP_NOACTIVATE);
1672 if ( !hdwp )
1673 {
1674 wxLogLastError(_T("DeferWindowPos"));
1675 }
1676 }
1677
1678 if ( parent )
1679 {
1680 // hdwp must be updated as it may have been changed
1681 parent->m_hDWP = (WXHANDLE)hdwp;
1682 }
1683
1684 if ( hdwp )
1685 {
1686 // did deferred move, remember new coordinates of the window as they're
1687 // different from what Windows would return for it
1688 return true;
1689 }
1690
1691 // otherwise (or if deferring failed) move the window in place immediately
1692 #endif // USE_DEFERRED_SIZING
1693 if ( !::MoveWindow((HWND)hwnd, x, y, width, height, IsShown()) )
1694 {
1695 wxLogLastError(wxT("MoveWindow"));
1696 }
1697
1698 // if USE_DEFERRED_SIZING, indicates that we didn't use deferred move,
1699 // ignored otherwise
1700 return false;
1701 }
1702
1703 void wxWindowMSW::DoMoveWindow(int x, int y, int width, int height)
1704 {
1705 // TODO: is this consistent with other platforms?
1706 // Still, negative width or height shouldn't be allowed
1707 if (width < 0)
1708 width = 0;
1709 if (height < 0)
1710 height = 0;
1711
1712 if ( DoMoveSibling(m_hWnd, x, y, width, height) )
1713 {
1714 #if USE_DEFERRED_SIZING
1715 m_pendingPosition = wxPoint(x, y);
1716 m_pendingSize = wxSize(width, height);
1717 #endif // USE_DEFERRED_SIZING
1718 }
1719 }
1720
1721 // set the size of the window: if the dimensions are positive, just use them,
1722 // but if any of them is equal to -1, it means that we must find the value for
1723 // it ourselves (unless sizeFlags contains wxSIZE_ALLOW_MINUS_ONE flag, in
1724 // which case -1 is a valid value for x and y)
1725 //
1726 // If sizeFlags contains wxSIZE_AUTO_WIDTH/HEIGHT flags (default), we calculate
1727 // the width/height to best suit our contents, otherwise we reuse the current
1728 // width/height
1729 void wxWindowMSW::DoSetSize(int x, int y, int width, int height, int sizeFlags)
1730 {
1731 // get the current size and position...
1732 int currentX, currentY;
1733 int currentW, currentH;
1734
1735 GetPosition(&currentX, &currentY);
1736 GetSize(&currentW, &currentH);
1737
1738 // ... and don't do anything (avoiding flicker) if it's already ok unless
1739 // we're forced to resize the window
1740 if ( x == currentX && y == currentY &&
1741 width == currentW && height == currentH &&
1742 !(sizeFlags & wxSIZE_FORCE) )
1743 {
1744 return;
1745 }
1746
1747 if ( x == wxDefaultCoord && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE) )
1748 x = currentX;
1749 if ( y == wxDefaultCoord && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE) )
1750 y = currentY;
1751
1752 AdjustForParentClientOrigin(x, y, sizeFlags);
1753
1754 wxSize size = wxDefaultSize;
1755 if ( width == wxDefaultCoord )
1756 {
1757 if ( sizeFlags & wxSIZE_AUTO_WIDTH )
1758 {
1759 size = DoGetBestSize();
1760 width = size.x;
1761 }
1762 else
1763 {
1764 // just take the current one
1765 width = currentW;
1766 }
1767 }
1768
1769 if ( height == wxDefaultCoord )
1770 {
1771 if ( sizeFlags & wxSIZE_AUTO_HEIGHT )
1772 {
1773 if ( size.x == wxDefaultCoord )
1774 {
1775 size = DoGetBestSize();
1776 }
1777 //else: already called DoGetBestSize() above
1778
1779 height = size.y;
1780 }
1781 else
1782 {
1783 // just take the current one
1784 height = currentH;
1785 }
1786 }
1787
1788 DoMoveWindow(x, y, width, height);
1789 }
1790
1791 void wxWindowMSW::DoSetClientSize(int width, int height)
1792 {
1793 // setting the client size is less obvious than it could have been
1794 // because in the result of changing the total size the window scrollbar
1795 // may [dis]appear and/or its menubar may [un]wrap (and AdjustWindowRect()
1796 // doesn't take neither into account) and so the client size will not be
1797 // correct as the difference between the total and client size changes --
1798 // so we keep changing it until we get it right
1799 //
1800 // normally this loop shouldn't take more than 3 iterations (usually 1 but
1801 // if scrollbars [dis]appear as the result of the first call, then 2 and it
1802 // may become 3 if the window had 0 size originally and so we didn't
1803 // calculate the scrollbar correction correctly during the first iteration)
1804 // but just to be on the safe side we check for it instead of making it an
1805 // "infinite" loop (i.e. leaving break inside as the only way to get out)
1806 for ( int i = 0; i < 4; i++ )
1807 {
1808 RECT rectClient;
1809 ::GetClientRect(GetHwnd(), &rectClient);
1810
1811 // if the size is already ok, stop here (NB: rectClient.left = top = 0)
1812 if ( (rectClient.right == width || width == wxDefaultCoord) &&
1813 (rectClient.bottom == height || height == wxDefaultCoord) )
1814 {
1815 break;
1816 }
1817
1818 // Find the difference between the entire window (title bar and all)
1819 // and the client area; add this to the new client size to move the
1820 // window
1821 RECT rectWin;
1822 ::GetWindowRect(GetHwnd(), &rectWin);
1823
1824 const int widthWin = rectWin.right - rectWin.left,
1825 heightWin = rectWin.bottom - rectWin.top;
1826
1827 // MoveWindow positions the child windows relative to the parent, so
1828 // adjust if necessary
1829 if ( !IsTopLevel() )
1830 {
1831 wxWindow *parent = GetParent();
1832 if ( parent )
1833 {
1834 ::ScreenToClient(GetHwndOf(parent), (POINT *)&rectWin);
1835 }
1836 }
1837
1838 // don't call DoMoveWindow() because we want to move window immediately
1839 // and not defer it here as otherwise the value returned by
1840 // GetClient/WindowRect() wouldn't change as the window wouldn't be
1841 // really resized
1842 if ( !::MoveWindow(GetHwnd(),
1843 rectWin.left,
1844 rectWin.top,
1845 width + widthWin - rectClient.right,
1846 height + heightWin - rectClient.bottom,
1847 TRUE) )
1848 {
1849 wxLogLastError(_T("MoveWindow"));
1850 }
1851 }
1852 }
1853
1854 // ---------------------------------------------------------------------------
1855 // text metrics
1856 // ---------------------------------------------------------------------------
1857
1858 int wxWindowMSW::GetCharHeight() const
1859 {
1860 return wxGetTextMetrics(this).tmHeight;
1861 }
1862
1863 int wxWindowMSW::GetCharWidth() const
1864 {
1865 // +1 is needed because Windows apparently adds it when calculating the
1866 // dialog units size in pixels
1867 #if wxDIALOG_UNIT_COMPATIBILITY
1868 return wxGetTextMetrics(this).tmAveCharWidth;
1869 #else
1870 return wxGetTextMetrics(this).tmAveCharWidth + 1;
1871 #endif
1872 }
1873
1874 void wxWindowMSW::GetTextExtent(const wxString& string,
1875 int *x, int *y,
1876 int *descent, int *externalLeading,
1877 const wxFont *theFont) const
1878 {
1879 wxASSERT_MSG( !theFont || theFont->Ok(),
1880 _T("invalid font in GetTextExtent()") );
1881
1882 wxFont fontToUse;
1883 if (theFont)
1884 fontToUse = *theFont;
1885 else
1886 fontToUse = GetFont();
1887
1888 WindowHDC hdc(GetHwnd());
1889 SelectInHDC selectFont(hdc, GetHfontOf(fontToUse));
1890
1891 SIZE sizeRect;
1892 TEXTMETRIC tm;
1893 ::GetTextExtentPoint32(hdc, string, string.length(), &sizeRect);
1894 GetTextMetrics(hdc, &tm);
1895
1896 if ( x )
1897 *x = sizeRect.cx;
1898 if ( y )
1899 *y = sizeRect.cy;
1900 if ( descent )
1901 *descent = tm.tmDescent;
1902 if ( externalLeading )
1903 *externalLeading = tm.tmExternalLeading;
1904 }
1905
1906 // ---------------------------------------------------------------------------
1907 // popup menu
1908 // ---------------------------------------------------------------------------
1909
1910 #if wxUSE_MENUS_NATIVE
1911
1912 // yield for WM_COMMAND events only, i.e. process all WM_COMMANDs in the queue
1913 // immediately, without waiting for the next event loop iteration
1914 //
1915 // NB: this function should probably be made public later as it can almost
1916 // surely replace wxYield() elsewhere as well
1917 static void wxYieldForCommandsOnly()
1918 {
1919 // peek all WM_COMMANDs (it will always return WM_QUIT too but we don't
1920 // want to process it here)
1921 MSG msg;
1922 while ( ::PeekMessage(&msg, (HWND)0, WM_COMMAND, WM_COMMAND, PM_REMOVE) )
1923 {
1924 if ( msg.message == WM_QUIT )
1925 {
1926 // if we retrieved a WM_QUIT, insert back into the message queue.
1927 ::PostQuitMessage(0);
1928 break;
1929 }
1930
1931 // luckily (as we don't have access to wxEventLoopImpl method from here
1932 // anyhow...) we don't need to pre process WM_COMMANDs so dispatch it
1933 // immediately
1934 ::TranslateMessage(&msg);
1935 ::DispatchMessage(&msg);
1936 }
1937 }
1938
1939 bool wxWindowMSW::DoPopupMenu(wxMenu *menu, int x, int y)
1940 {
1941 menu->SetInvokingWindow(this);
1942 menu->UpdateUI();
1943
1944 if ( x == wxDefaultCoord && y == wxDefaultCoord )
1945 {
1946 wxPoint mouse = ScreenToClient(wxGetMousePosition());
1947 x = mouse.x; y = mouse.y;
1948 }
1949
1950 HWND hWnd = GetHwnd();
1951 HMENU hMenu = GetHmenuOf(menu);
1952 POINT point;
1953 point.x = x;
1954 point.y = y;
1955 ::ClientToScreen(hWnd, &point);
1956 wxCurrentPopupMenu = menu;
1957 #if defined(__WXWINCE__)
1958 UINT flags = 0;
1959 #else
1960 UINT flags = TPM_RIGHTBUTTON;
1961 #endif
1962 ::TrackPopupMenu(hMenu, flags, point.x, point.y, 0, hWnd, NULL);
1963
1964 // we need to do it right now as otherwise the events are never going to be
1965 // sent to wxCurrentPopupMenu from HandleCommand()
1966 //
1967 // note that even eliminating (ugly) wxCurrentPopupMenu global wouldn't
1968 // help and we'd still need wxYieldForCommandsOnly() as the menu may be
1969 // destroyed as soon as we return (it can be a local variable in the caller
1970 // for example) and so we do need to process the event immediately
1971 wxYieldForCommandsOnly();
1972
1973 wxCurrentPopupMenu = NULL;
1974
1975 menu->SetInvokingWindow(NULL);
1976
1977 return true;
1978 }
1979
1980 #endif // wxUSE_MENUS_NATIVE
1981
1982 // ===========================================================================
1983 // pre/post message processing
1984 // ===========================================================================
1985
1986 WXLRESULT wxWindowMSW::MSWDefWindowProc(WXUINT nMsg, WXWPARAM wParam, WXLPARAM lParam)
1987 {
1988 if ( m_oldWndProc )
1989 return ::CallWindowProc(CASTWNDPROC m_oldWndProc, GetHwnd(), (UINT) nMsg, (WPARAM) wParam, (LPARAM) lParam);
1990 else
1991 return ::DefWindowProc(GetHwnd(), nMsg, wParam, lParam);
1992 }
1993
1994 bool wxWindowMSW::MSWProcessMessage(WXMSG* pMsg)
1995 {
1996 // wxUniversal implements tab traversal itself
1997 #ifndef __WXUNIVERSAL__
1998 if ( m_hWnd != 0 && (GetWindowStyleFlag() & wxTAB_TRAVERSAL) )
1999 {
2000 // intercept dialog navigation keys
2001 MSG *msg = (MSG *)pMsg;
2002
2003 // here we try to do all the job which ::IsDialogMessage() usually does
2004 // internally
2005 if ( msg->message == WM_KEYDOWN )
2006 {
2007 bool bCtrlDown = wxIsCtrlDown();
2008 bool bShiftDown = wxIsShiftDown();
2009
2010 // WM_GETDLGCODE: ask the control if it wants the key for itself,
2011 // don't process it if it's the case (except for Ctrl-Tab/Enter
2012 // combinations which are always processed)
2013 LONG lDlgCode = 0;
2014 if ( !bCtrlDown )
2015 {
2016 lDlgCode = ::SendMessage(msg->hwnd, WM_GETDLGCODE, 0, 0);
2017
2018 // surprizingly, DLGC_WANTALLKEYS bit mask doesn't contain the
2019 // DLGC_WANTTAB nor DLGC_WANTARROWS bits although, logically,
2020 // it, of course, implies them
2021 if ( lDlgCode & DLGC_WANTALLKEYS )
2022 {
2023 lDlgCode |= DLGC_WANTTAB | DLGC_WANTARROWS;
2024 }
2025 }
2026
2027 bool bForward = true,
2028 bWindowChange = false,
2029 bFromTab = false;
2030
2031 // should we process this message specially?
2032 bool bProcess = true;
2033 switch ( msg->wParam )
2034 {
2035 case VK_TAB:
2036 if ( lDlgCode & DLGC_WANTTAB ) {
2037 bProcess = false;
2038 }
2039 else {
2040 // Ctrl-Tab cycles thru notebook pages
2041 bWindowChange = bCtrlDown;
2042 bForward = !bShiftDown;
2043 bFromTab = true;
2044 }
2045 break;
2046
2047 case VK_UP:
2048 case VK_LEFT:
2049 if ( (lDlgCode & DLGC_WANTARROWS) || bCtrlDown )
2050 bProcess = false;
2051 else
2052 bForward = false;
2053 break;
2054
2055 case VK_DOWN:
2056 case VK_RIGHT:
2057 if ( (lDlgCode & DLGC_WANTARROWS) || bCtrlDown )
2058 bProcess = false;
2059 break;
2060
2061 case VK_RETURN:
2062 {
2063 if ( (lDlgCode & DLGC_WANTMESSAGE) && !bCtrlDown )
2064 {
2065 // control wants to process Enter itself, don't
2066 // call IsDialogMessage() which would interpret
2067 // it
2068 return false;
2069 }
2070
2071 // currently active button should get enter press even
2072 // if there is a default button elsewhere
2073 if ( lDlgCode & DLGC_DEFPUSHBUTTON )
2074 {
2075 // let IsDialogMessage() handle this for all
2076 // buttons except the owner-drawn ones which it
2077 // just seems to ignore
2078 long style = ::GetWindowLong(msg->hwnd, GWL_STYLE);
2079 if ( (style & BS_OWNERDRAW) == BS_OWNERDRAW )
2080 {
2081 // emulate the button click
2082 wxWindow *
2083 btn = wxFindWinFromHandle((WXHWND)msg->hwnd);
2084 if ( btn )
2085 btn->MSWCommand(BN_CLICKED, 0 /* unused */);
2086 }
2087
2088 bProcess = false;
2089 }
2090 else // not a button itself
2091 {
2092 #if wxUSE_BUTTON
2093 wxButton *btn = wxDynamicCast(GetDefaultItem(),
2094 wxButton);
2095 if ( btn && btn->IsEnabled() )
2096 {
2097 // if we do have a default button, do press it
2098 btn->MSWCommand(BN_CLICKED, 0 /* unused */);
2099
2100 return true;
2101 }
2102 else // no default button
2103 #endif // wxUSE_BUTTON
2104 {
2105 #ifdef __WXWINCE__
2106 wxJoystickEvent event(wxEVT_JOY_BUTTON_DOWN);
2107 event.SetEventObject(this);
2108 if(GetEventHandler()->ProcessEvent(event))
2109 return true;
2110 #endif
2111 // this is a quick and dirty test for a text
2112 // control
2113 if ( !(lDlgCode & DLGC_HASSETSEL) )
2114 {
2115 // don't process Enter, the control might
2116 // need it for itself and don't let
2117 // ::IsDialogMessage() have it as it can
2118 // eat the Enter events sometimes
2119 return false;
2120 }
2121 else if (!IsTopLevel())
2122 {
2123 // if not a top level window, let parent
2124 // handle it
2125 return false;
2126 }
2127 //else: treat Enter as TAB: pass to the next
2128 // control as this is the best thing to do
2129 // if the text doesn't handle Enter itself
2130 }
2131 }
2132 }
2133 break;
2134
2135 default:
2136 bProcess = false;
2137 }
2138
2139 if ( bProcess )
2140 {
2141 wxNavigationKeyEvent event;
2142 event.SetDirection(bForward);
2143 event.SetWindowChange(bWindowChange);
2144 event.SetFromTab(bFromTab);
2145 event.SetEventObject(this);
2146
2147 if ( GetEventHandler()->ProcessEvent(event) )
2148 {
2149 // as we don't call IsDialogMessage(), which would take of
2150 // this by default, we need to manually send this message
2151 // so that controls can change their UI state if needed
2152 MSWUpdateUIState(UIS_CLEAR, UISF_HIDEFOCUS);
2153
2154 return true;
2155 }
2156 }
2157 }
2158
2159 // don't let IsDialogMessage() get VK_ESCAPE as it _always_ eats the
2160 // message even when there is no cancel button and when the message is
2161 // needed by the control itself: in particular, it prevents the tree in
2162 // place edit control from being closed with Escape in a dialog
2163 if ( msg->message != WM_KEYDOWN || msg->wParam != VK_ESCAPE )
2164 {
2165 // ::IsDialogMessage() is broken and may sometimes hang the
2166 // application by going into an infinite loop, so we try to detect
2167 // [some of] the situations when this may happen and not call it
2168 // then
2169
2170 // assume we can call it by default
2171 bool canSafelyCallIsDlgMsg = true;
2172
2173 HWND hwndFocus = ::GetFocus();
2174
2175 // if the currently focused window itself has WS_EX_CONTROLPARENT style, ::IsDialogMessage() will also enter
2176 // an infinite loop, because it will recursively check the child
2177 // windows but not the window itself and so if none of the children
2178 // accepts focus it loops forever (as it only stops when it gets
2179 // back to the window it started from)
2180 //
2181 // while it is very unusual that a window with WS_EX_CONTROLPARENT
2182 // style has the focus, it can happen. One such possibility is if
2183 // all windows are either toplevel, wxDialog, wxPanel or static
2184 // controls and no window can actually accept keyboard input.
2185 #if !defined(__WXWINCE__)
2186 if ( ::GetWindowLong(hwndFocus, GWL_EXSTYLE) & WS_EX_CONTROLPARENT )
2187 {
2188 // pessimistic by default
2189 canSafelyCallIsDlgMsg = false;
2190 for ( wxWindowList::compatibility_iterator node = GetChildren().GetFirst();
2191 node;
2192 node = node->GetNext() )
2193 {
2194 wxWindow * const win = node->GetData();
2195 if ( win->AcceptsFocus() &&
2196 !(::GetWindowLong(GetHwndOf(win), GWL_EXSTYLE) &
2197 WS_EX_CONTROLPARENT) )
2198 {
2199 // it shouldn't hang...
2200 canSafelyCallIsDlgMsg = true;
2201
2202 break;
2203 }
2204 }
2205 }
2206 #endif // !__WXWINCE__
2207
2208 if ( canSafelyCallIsDlgMsg )
2209 {
2210 // ::IsDialogMessage() can enter in an infinite loop when the
2211 // currently focused window is disabled or hidden and its
2212 // parent has WS_EX_CONTROLPARENT style, so don't call it in
2213 // this case
2214 while ( hwndFocus )
2215 {
2216 if ( !::IsWindowEnabled(hwndFocus) ||
2217 !::IsWindowVisible(hwndFocus) )
2218 {
2219 // it would enter an infinite loop if we do this!
2220 canSafelyCallIsDlgMsg = false;
2221
2222 break;
2223 }
2224
2225 if ( !(::GetWindowLong(hwndFocus, GWL_STYLE) & WS_CHILD) )
2226 {
2227 // it's a top level window, don't go further -- e.g. even
2228 // if the parent of a dialog is disabled, this doesn't
2229 // break navigation inside the dialog
2230 break;
2231 }
2232
2233 hwndFocus = ::GetParent(hwndFocus);
2234 }
2235 }
2236
2237 // let IsDialogMessage() have the message if it's safe to call it
2238 if ( canSafelyCallIsDlgMsg && ::IsDialogMessage(GetHwnd(), msg) )
2239 {
2240 // IsDialogMessage() did something...
2241 return true;
2242 }
2243 }
2244 }
2245 #endif // __WXUNIVERSAL__
2246
2247 #if wxUSE_TOOLTIPS
2248 if ( m_tooltip )
2249 {
2250 // relay mouse move events to the tooltip control
2251 MSG *msg = (MSG *)pMsg;
2252 if ( msg->message == WM_MOUSEMOVE )
2253 m_tooltip->RelayEvent(pMsg);
2254 }
2255 #endif // wxUSE_TOOLTIPS
2256
2257 return false;
2258 }
2259
2260 bool wxWindowMSW::MSWTranslateMessage(WXMSG* pMsg)
2261 {
2262 #if wxUSE_ACCEL && !defined(__WXUNIVERSAL__)
2263 return m_acceleratorTable.Translate(this, pMsg);
2264 #else
2265 (void) pMsg;
2266 return false;
2267 #endif // wxUSE_ACCEL
2268 }
2269
2270 bool wxWindowMSW::MSWShouldPreProcessMessage(WXMSG* WXUNUSED(pMsg))
2271 {
2272 // preprocess all messages by default
2273 return true;
2274 }
2275
2276 // ---------------------------------------------------------------------------
2277 // message params unpackers
2278 // ---------------------------------------------------------------------------
2279
2280 void wxWindowMSW::UnpackCommand(WXWPARAM wParam, WXLPARAM lParam,
2281 WORD *id, WXHWND *hwnd, WORD *cmd)
2282 {
2283 *id = LOWORD(wParam);
2284 *hwnd = (WXHWND)lParam;
2285 *cmd = HIWORD(wParam);
2286 }
2287
2288 void wxWindowMSW::UnpackActivate(WXWPARAM wParam, WXLPARAM lParam,
2289 WXWORD *state, WXWORD *minimized, WXHWND *hwnd)
2290 {
2291 *state = LOWORD(wParam);
2292 *minimized = HIWORD(wParam);
2293 *hwnd = (WXHWND)lParam;
2294 }
2295
2296 void wxWindowMSW::UnpackScroll(WXWPARAM wParam, WXLPARAM lParam,
2297 WXWORD *code, WXWORD *pos, WXHWND *hwnd)
2298 {
2299 *code = LOWORD(wParam);
2300 *pos = HIWORD(wParam);
2301 *hwnd = (WXHWND)lParam;
2302 }
2303
2304 void wxWindowMSW::UnpackCtlColor(WXWPARAM wParam, WXLPARAM lParam,
2305 WXHDC *hdc, WXHWND *hwnd)
2306 {
2307 *hwnd = (WXHWND)lParam;
2308 *hdc = (WXHDC)wParam;
2309 }
2310
2311 void wxWindowMSW::UnpackMenuSelect(WXWPARAM wParam, WXLPARAM lParam,
2312 WXWORD *item, WXWORD *flags, WXHMENU *hmenu)
2313 {
2314 *item = (WXWORD)wParam;
2315 *flags = HIWORD(wParam);
2316 *hmenu = (WXHMENU)lParam;
2317 }
2318
2319 // ---------------------------------------------------------------------------
2320 // Main wxWidgets window proc and the window proc for wxWindow
2321 // ---------------------------------------------------------------------------
2322
2323 // Hook for new window just as it's being created, when the window isn't yet
2324 // associated with the handle
2325 static wxWindowMSW *gs_winBeingCreated = NULL;
2326
2327 // implementation of wxWindowCreationHook class: it just sets gs_winBeingCreated to the
2328 // window being created and insures that it's always unset back later
2329 wxWindowCreationHook::wxWindowCreationHook(wxWindowMSW *winBeingCreated)
2330 {
2331 gs_winBeingCreated = winBeingCreated;
2332 }
2333
2334 wxWindowCreationHook::~wxWindowCreationHook()
2335 {
2336 gs_winBeingCreated = NULL;
2337 }
2338
2339 // Main window proc
2340 LRESULT WXDLLEXPORT APIENTRY _EXPORT wxWndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
2341 {
2342 // trace all messages - useful for the debugging
2343 #ifdef __WXDEBUG__
2344 wxLogTrace(wxTraceMessages,
2345 wxT("Processing %s(hWnd=%08lx, wParam=%8lx, lParam=%8lx)"),
2346 wxGetMessageName(message), (long)hWnd, (long)wParam, lParam);
2347 #endif // __WXDEBUG__
2348
2349 wxWindowMSW *wnd = wxFindWinFromHandle((WXHWND) hWnd);
2350
2351 // when we get the first message for the HWND we just created, we associate
2352 // it with wxWindow stored in gs_winBeingCreated
2353 if ( !wnd && gs_winBeingCreated )
2354 {
2355 wxAssociateWinWithHandle(hWnd, gs_winBeingCreated);
2356 wnd = gs_winBeingCreated;
2357 gs_winBeingCreated = NULL;
2358 wnd->SetHWND((WXHWND)hWnd);
2359 }
2360
2361 LRESULT rc;
2362
2363 if ( wnd && wxEventLoop::AllowProcessing(wnd) )
2364 rc = wnd->MSWWindowProc(message, wParam, lParam);
2365 else
2366 rc = ::DefWindowProc(hWnd, message, wParam, lParam);
2367
2368 return rc;
2369 }
2370
2371 WXLRESULT wxWindowMSW::MSWWindowProc(WXUINT message, WXWPARAM wParam, WXLPARAM lParam)
2372 {
2373 // did we process the message?
2374 bool processed = false;
2375
2376 // the return value
2377 union
2378 {
2379 bool allow;
2380 WXLRESULT result;
2381 WXHBRUSH hBrush;
2382 } rc;
2383
2384 // for most messages we should return 0 when we do process the message
2385 rc.result = 0;
2386
2387 switch ( message )
2388 {
2389 case WM_CREATE:
2390 {
2391 bool mayCreate;
2392 processed = HandleCreate((WXLPCREATESTRUCT)lParam, &mayCreate);
2393 if ( processed )
2394 {
2395 // return 0 to allow window creation
2396 rc.result = mayCreate ? 0 : -1;
2397 }
2398 }
2399 break;
2400
2401 case WM_DESTROY:
2402 // never set processed to true and *always* pass WM_DESTROY to
2403 // DefWindowProc() as Windows may do some internal cleanup when
2404 // processing it and failing to pass the message along may cause
2405 // memory and resource leaks!
2406 (void)HandleDestroy();
2407 break;
2408
2409 case WM_SIZE:
2410 processed = HandleSize(LOWORD(lParam), HIWORD(lParam), wParam);
2411 break;
2412
2413 case WM_MOVE:
2414 processed = HandleMove(GET_X_LPARAM(lParam), GET_Y_LPARAM(lParam));
2415 break;
2416
2417 #if !defined(__WXWINCE__)
2418 case WM_MOVING:
2419 {
2420 LPRECT pRect = (LPRECT)lParam;
2421 wxRect rc;
2422 rc.SetLeft(pRect->left);
2423 rc.SetTop(pRect->top);
2424 rc.SetRight(pRect->right);
2425 rc.SetBottom(pRect->bottom);
2426 processed = HandleMoving(rc);
2427 if (processed) {
2428 pRect->left = rc.GetLeft();
2429 pRect->top = rc.GetTop();
2430 pRect->right = rc.GetRight();
2431 pRect->bottom = rc.GetBottom();
2432 }
2433 }
2434 break;
2435
2436 case WM_SIZING:
2437 {
2438 LPRECT pRect = (LPRECT)lParam;
2439 wxRect rc;
2440 rc.SetLeft(pRect->left);
2441 rc.SetTop(pRect->top);
2442 rc.SetRight(pRect->right);
2443 rc.SetBottom(pRect->bottom);
2444 processed = HandleSizing(rc);
2445 if (processed) {
2446 pRect->left = rc.GetLeft();
2447 pRect->top = rc.GetTop();
2448 pRect->right = rc.GetRight();
2449 pRect->bottom = rc.GetBottom();
2450 }
2451 }
2452 break;
2453 #endif // !__WXWINCE__
2454
2455 #if !defined(__WXMICROWIN__) && !defined(__WXWINCE__)
2456 case WM_ACTIVATEAPP:
2457 // This implicitly sends a wxEVT_ACTIVATE_APP event
2458 wxTheApp->SetActive(wParam != 0, FindFocus());
2459 break;
2460 #endif
2461
2462 case WM_ACTIVATE:
2463 {
2464 WXWORD state, minimized;
2465 WXHWND hwnd;
2466 UnpackActivate(wParam, lParam, &state, &minimized, &hwnd);
2467
2468 processed = HandleActivate(state, minimized != 0, (WXHWND)hwnd);
2469 }
2470 break;
2471
2472 case WM_SETFOCUS:
2473 processed = HandleSetFocus((WXHWND)(HWND)wParam);
2474 break;
2475
2476 case WM_KILLFOCUS:
2477 processed = HandleKillFocus((WXHWND)(HWND)wParam);
2478 break;
2479
2480 case WM_PRINTCLIENT:
2481 processed = HandlePrintClient((WXHDC)wParam);
2482 break;
2483
2484 case WM_PAINT:
2485 if ( wParam )
2486 {
2487 wxPaintDCEx dc((wxWindow *)this, (WXHDC)wParam);
2488
2489 processed = HandlePaint();
2490 }
2491 else // no DC given
2492 {
2493 processed = HandlePaint();
2494 }
2495 break;
2496
2497 case WM_CLOSE:
2498 #ifdef __WXUNIVERSAL__
2499 // Universal uses its own wxFrame/wxDialog, so we don't receive
2500 // close events unless we have this.
2501 Close();
2502 #endif // __WXUNIVERSAL__
2503
2504 // don't let the DefWindowProc() destroy our window - we'll do it
2505 // ourselves in ~wxWindow
2506 processed = true;
2507 rc.result = TRUE;
2508 break;
2509
2510 case WM_SHOWWINDOW:
2511 processed = HandleShow(wParam != 0, (int)lParam);
2512 break;
2513
2514 case WM_MOUSEMOVE:
2515 processed = HandleMouseMove(GET_X_LPARAM(lParam),
2516 GET_Y_LPARAM(lParam),
2517 wParam);
2518 break;
2519
2520 #ifdef HAVE_TRACKMOUSEEVENT
2521 case WM_MOUSELEAVE:
2522 // filter out excess WM_MOUSELEAVE events sent after PopupMenu() (on XP at least)
2523 if ( m_mouseInWindow )
2524 {
2525 GenerateMouseLeave();
2526 }
2527
2528 // always pass processed back as false, this allows the window
2529 // manager to process the message too. This is needed to
2530 // ensure windows XP themes work properly as the mouse moves
2531 // over widgets like buttons. So don't set processed to true here.
2532 break;
2533 #endif // HAVE_TRACKMOUSEEVENT
2534
2535 #if wxUSE_MOUSEWHEEL
2536 case WM_MOUSEWHEEL:
2537 processed = HandleMouseWheel(wParam, lParam);
2538 break;
2539 #endif
2540
2541 case WM_LBUTTONDOWN:
2542 case WM_LBUTTONUP:
2543 case WM_LBUTTONDBLCLK:
2544 case WM_RBUTTONDOWN:
2545 case WM_RBUTTONUP:
2546 case WM_RBUTTONDBLCLK:
2547 case WM_MBUTTONDOWN:
2548 case WM_MBUTTONUP:
2549 case WM_MBUTTONDBLCLK:
2550 {
2551 #ifdef __WXMICROWIN__
2552 // MicroWindows seems to ignore the fact that a window is
2553 // disabled. So catch mouse events and throw them away if
2554 // necessary.
2555 wxWindowMSW* win = this;
2556 for ( ;; )
2557 {
2558 if (!win->IsEnabled())
2559 {
2560 processed = true;
2561 break;
2562 }
2563
2564 win = win->GetParent();
2565 if ( !win || win->IsTopLevel() )
2566 break;
2567 }
2568
2569 if ( processed )
2570 break;
2571
2572 #endif // __WXMICROWIN__
2573 int x = GET_X_LPARAM(lParam),
2574 y = GET_Y_LPARAM(lParam);
2575
2576 #ifdef __WXWINCE__
2577 // redirect the event to a static control if necessary by
2578 // finding one under mouse because under CE the static controls
2579 // don't generate mouse events (even with SS_NOTIFY)
2580 wxWindowMSW *win;
2581 if ( GetCapture() == this )
2582 {
2583 // but don't do it if the mouse is captured by this window
2584 // because then it should really get this event itself
2585 win = this;
2586 }
2587 else
2588 {
2589 win = FindWindowForMouseEvent(this, &x, &y);
2590
2591 // this should never happen
2592 wxCHECK_MSG( win, 0,
2593 _T("FindWindowForMouseEvent() returned NULL") );
2594 }
2595 #ifdef __POCKETPC__
2596 if (IsContextMenuEnabled() && message == WM_LBUTTONDOWN)
2597 {
2598 SHRGINFO shrgi = {0};
2599
2600 shrgi.cbSize = sizeof(SHRGINFO);
2601 shrgi.hwndClient = (HWND) GetHWND();
2602 shrgi.ptDown.x = x;
2603 shrgi.ptDown.y = y;
2604
2605 shrgi.dwFlags = SHRG_RETURNCMD;
2606 // shrgi.dwFlags = SHRG_NOTIFYPARENT;
2607
2608 if (GN_CONTEXTMENU == ::SHRecognizeGesture(&shrgi))
2609 {
2610 wxPoint pt(x, y);
2611 pt = ClientToScreen(pt);
2612
2613 wxContextMenuEvent evtCtx(wxEVT_CONTEXT_MENU, GetId(), pt);
2614
2615 evtCtx.SetEventObject(this);
2616 if (GetEventHandler()->ProcessEvent(evtCtx))
2617 {
2618 processed = true;
2619 return true;
2620 }
2621 }
2622 }
2623 #endif
2624
2625 #else // !__WXWINCE__
2626 wxWindowMSW *win = this;
2627 #endif // __WXWINCE__/!__WXWINCE__
2628
2629 processed = win->HandleMouseEvent(message, x, y, wParam);
2630
2631 // if the app didn't eat the event, handle it in the default
2632 // way, that is by giving this window the focus
2633 if ( !processed )
2634 {
2635 // for the standard classes their WndProc sets the focus to
2636 // them anyhow and doing it from here results in some weird
2637 // problems, so don't do it for them (unnecessary anyhow)
2638 if ( !win->IsOfStandardClass() )
2639 {
2640 if ( message == WM_LBUTTONDOWN && win->AcceptsFocus() )
2641 win->SetFocus();
2642 }
2643 }
2644 }
2645 break;
2646
2647 #ifdef MM_JOY1MOVE
2648 case MM_JOY1MOVE:
2649 case MM_JOY2MOVE:
2650 case MM_JOY1ZMOVE:
2651 case MM_JOY2ZMOVE:
2652 case MM_JOY1BUTTONDOWN:
2653 case MM_JOY2BUTTONDOWN:
2654 case MM_JOY1BUTTONUP:
2655 case MM_JOY2BUTTONUP:
2656 processed = HandleJoystickEvent(message,
2657 GET_X_LPARAM(lParam),
2658 GET_Y_LPARAM(lParam),
2659 wParam);
2660 break;
2661 #endif // __WXMICROWIN__
2662
2663 case WM_COMMAND:
2664 {
2665 WORD id, cmd;
2666 WXHWND hwnd;
2667 UnpackCommand(wParam, lParam, &id, &hwnd, &cmd);
2668
2669 processed = HandleCommand(id, cmd, hwnd);
2670 }
2671 break;
2672
2673 case WM_NOTIFY:
2674 processed = HandleNotify((int)wParam, lParam, &rc.result);
2675 break;
2676
2677 // we only need to reply to WM_NOTIFYFORMAT manually when using MSLU,
2678 // otherwise DefWindowProc() does it perfectly fine for us, but MSLU
2679 // apparently doesn't always behave properly and needs some help
2680 #if wxUSE_UNICODE_MSLU && defined(NF_QUERY)
2681 case WM_NOTIFYFORMAT:
2682 if ( lParam == NF_QUERY )
2683 {
2684 processed = true;
2685 rc.result = NFR_UNICODE;
2686 }
2687 break;
2688 #endif // wxUSE_UNICODE_MSLU
2689
2690 // for these messages we must return true if process the message
2691 #ifdef WM_DRAWITEM
2692 case WM_DRAWITEM:
2693 case WM_MEASUREITEM:
2694 {
2695 int idCtrl = (UINT)wParam;
2696 if ( message == WM_DRAWITEM )
2697 {
2698 processed = MSWOnDrawItem(idCtrl,
2699 (WXDRAWITEMSTRUCT *)lParam);
2700 }
2701 else
2702 {
2703 processed = MSWOnMeasureItem(idCtrl,
2704 (WXMEASUREITEMSTRUCT *)lParam);
2705 }
2706
2707 if ( processed )
2708 rc.result = TRUE;
2709 }
2710 break;
2711 #endif // defined(WM_DRAWITEM)
2712
2713 case WM_GETDLGCODE:
2714 if ( !IsOfStandardClass() )
2715 {
2716 // we always want to get the char events
2717 rc.result = DLGC_WANTCHARS;
2718
2719 if ( GetWindowStyleFlag() & wxWANTS_CHARS )
2720 {
2721 // in fact, we want everything
2722 rc.result |= DLGC_WANTARROWS |
2723 DLGC_WANTTAB |
2724 DLGC_WANTALLKEYS;
2725 }
2726
2727 processed = true;
2728 }
2729 //else: get the dlg code from the DefWindowProc()
2730 break;
2731
2732 case WM_SYSKEYDOWN:
2733 case WM_KEYDOWN:
2734 // If this has been processed by an event handler, return 0 now
2735 // (we've handled it).
2736 m_lastKeydownProcessed = HandleKeyDown((WORD) wParam, lParam);
2737 if ( m_lastKeydownProcessed )
2738 {
2739 processed = true;
2740 }
2741
2742 if ( !processed )
2743 {
2744 switch ( wParam )
2745 {
2746 // we consider these messages "not interesting" to OnChar, so
2747 // just don't do anything more with them
2748 case VK_SHIFT:
2749 case VK_CONTROL:
2750 case VK_MENU:
2751 case VK_CAPITAL:
2752 case VK_NUMLOCK:
2753 case VK_SCROLL:
2754 processed = true;
2755 break;
2756
2757 // avoid duplicate messages to OnChar for these ASCII keys:
2758 // they will be translated by TranslateMessage() and received
2759 // in WM_CHAR
2760 case VK_ESCAPE:
2761 case VK_SPACE:
2762 case VK_RETURN:
2763 case VK_BACK:
2764 case VK_TAB:
2765 case VK_ADD:
2766 case VK_SUBTRACT:
2767 case VK_MULTIPLY:
2768 case VK_DIVIDE:
2769 case VK_OEM_1:
2770 case VK_OEM_2:
2771 case VK_OEM_3:
2772 case VK_OEM_4:
2773 case VK_OEM_5:
2774 case VK_OEM_6:
2775 case VK_OEM_7:
2776 case VK_OEM_PLUS:
2777 case VK_OEM_COMMA:
2778 case VK_OEM_MINUS:
2779 case VK_OEM_PERIOD:
2780 // but set processed to false, not true to still pass them
2781 // to the control's default window proc - otherwise
2782 // built-in keyboard handling won't work
2783 processed = false;
2784 break;
2785
2786 #ifdef VK_APPS
2787 // special case of VK_APPS: treat it the same as right mouse
2788 // click because both usually pop up a context menu
2789 case VK_APPS:
2790 processed = HandleMouseEvent(WM_RBUTTONDOWN, -1, -1, 0);
2791 break;
2792 #endif // VK_APPS
2793
2794 default:
2795 // do generate a CHAR event
2796 processed = HandleChar((WORD)wParam, lParam);
2797 }
2798 }
2799 if (message == WM_SYSKEYDOWN) // Let Windows still handle the SYSKEYs
2800 processed = false;
2801 break;
2802
2803 case WM_SYSKEYUP:
2804 case WM_KEYUP:
2805 #ifdef VK_APPS
2806 // special case of VK_APPS: treat it the same as right mouse button
2807 if ( wParam == VK_APPS )
2808 {
2809 processed = HandleMouseEvent(WM_RBUTTONUP, -1, -1, 0);
2810 }
2811 else
2812 #endif // VK_APPS
2813 {
2814 processed = HandleKeyUp((WORD) wParam, lParam);
2815 }
2816 break;
2817
2818 case WM_SYSCHAR:
2819 case WM_CHAR: // Always an ASCII character
2820 if ( m_lastKeydownProcessed )
2821 {
2822 // The key was handled in the EVT_KEY_DOWN and handling
2823 // a key in an EVT_KEY_DOWN handler is meant, by
2824 // design, to prevent EVT_CHARs from happening
2825 m_lastKeydownProcessed = false;
2826 processed = true;
2827 }
2828 else
2829 {
2830 processed = HandleChar((WORD)wParam, lParam, true);
2831 }
2832 break;
2833
2834 #if wxUSE_HOTKEY
2835 case WM_HOTKEY:
2836 processed = HandleHotKey((WORD)wParam, lParam);
2837 break;
2838 #endif // wxUSE_HOTKEY
2839
2840 case WM_HSCROLL:
2841 case WM_VSCROLL:
2842 {
2843 WXWORD code, pos;
2844 WXHWND hwnd;
2845 UnpackScroll(wParam, lParam, &code, &pos, &hwnd);
2846
2847 processed = MSWOnScroll(message == WM_HSCROLL ? wxHORIZONTAL
2848 : wxVERTICAL,
2849 code, pos, hwnd);
2850 }
2851 break;
2852
2853 // CTLCOLOR messages are sent by children to query the parent for their
2854 // colors
2855 #ifndef __WXMICROWIN__
2856 case WM_CTLCOLORMSGBOX:
2857 case WM_CTLCOLOREDIT:
2858 case WM_CTLCOLORLISTBOX:
2859 case WM_CTLCOLORBTN:
2860 case WM_CTLCOLORDLG:
2861 case WM_CTLCOLORSCROLLBAR:
2862 case WM_CTLCOLORSTATIC:
2863 {
2864 WXHDC hdc;
2865 WXHWND hwnd;
2866 UnpackCtlColor(wParam, lParam, &hdc, &hwnd);
2867
2868 processed = HandleCtlColor(&rc.hBrush, (WXHDC)hdc, (WXHWND)hwnd);
2869 }
2870 break;
2871 #endif // !__WXMICROWIN__
2872
2873 case WM_SYSCOLORCHANGE:
2874 // the return value for this message is ignored
2875 processed = HandleSysColorChange();
2876 break;
2877
2878 #if !defined(__WXWINCE__)
2879 case WM_DISPLAYCHANGE:
2880 processed = HandleDisplayChange();
2881 break;
2882 #endif
2883
2884 case WM_PALETTECHANGED:
2885 processed = HandlePaletteChanged((WXHWND) (HWND) wParam);
2886 break;
2887
2888 case WM_CAPTURECHANGED:
2889 processed = HandleCaptureChanged((WXHWND) (HWND) lParam);
2890 break;
2891
2892 case WM_SETTINGCHANGE:
2893 processed = HandleSettingChange(wParam, lParam);
2894 break;
2895
2896 case WM_QUERYNEWPALETTE:
2897 processed = HandleQueryNewPalette();
2898 break;
2899
2900 case WM_ERASEBKGND:
2901 processed = HandleEraseBkgnd((WXHDC)(HDC)wParam);
2902 if ( processed )
2903 {
2904 // we processed the message, i.e. erased the background
2905 rc.result = TRUE;
2906 }
2907 break;
2908
2909 #if !defined(__WXWINCE__)
2910 case WM_DROPFILES:
2911 processed = HandleDropFiles(wParam);
2912 break;
2913 #endif
2914
2915 case WM_INITDIALOG:
2916 processed = HandleInitDialog((WXHWND)(HWND)wParam);
2917
2918 if ( processed )
2919 {
2920 // we never set focus from here
2921 rc.result = FALSE;
2922 }
2923 break;
2924
2925 #if !defined(__WXWINCE__)
2926 case WM_QUERYENDSESSION:
2927 processed = HandleQueryEndSession(lParam, &rc.allow);
2928 break;
2929
2930 case WM_ENDSESSION:
2931 processed = HandleEndSession(wParam != 0, lParam);
2932 break;
2933
2934 case WM_GETMINMAXINFO:
2935 processed = HandleGetMinMaxInfo((MINMAXINFO*)lParam);
2936 break;
2937 #endif
2938
2939 case WM_SETCURSOR:
2940 processed = HandleSetCursor((WXHWND)(HWND)wParam,
2941 LOWORD(lParam), // hit test
2942 HIWORD(lParam)); // mouse msg
2943
2944 if ( processed )
2945 {
2946 // returning TRUE stops the DefWindowProc() from further
2947 // processing this message - exactly what we need because we've
2948 // just set the cursor.
2949 rc.result = TRUE;
2950 }
2951 break;
2952
2953 #if wxUSE_ACCESSIBILITY
2954 case WM_GETOBJECT:
2955 {
2956 //WPARAM dwFlags = (WPARAM) (DWORD) wParam;
2957 LPARAM dwObjId = (LPARAM) (DWORD) lParam;
2958
2959 if (dwObjId == (LPARAM)OBJID_CLIENT && GetOrCreateAccessible())
2960 {
2961 return LresultFromObject(IID_IAccessible, wParam, (IUnknown*) GetAccessible()->GetIAccessible());
2962 }
2963 break;
2964 }
2965 #endif
2966
2967 #if defined(WM_HELP)
2968 case WM_HELP:
2969 {
2970 // HELPINFO doesn't seem to be supported on WinCE.
2971 #ifndef __WXWINCE__
2972 HELPINFO* info = (HELPINFO*) lParam;
2973 // Don't yet process menu help events, just windows
2974 if (info->iContextType == HELPINFO_WINDOW)
2975 {
2976 #endif
2977 wxWindowMSW* subjectOfHelp = this;
2978 bool eventProcessed = false;
2979 while (subjectOfHelp && !eventProcessed)
2980 {
2981 wxHelpEvent helpEvent(wxEVT_HELP,
2982 subjectOfHelp->GetId(),
2983 #ifdef __WXWINCE__
2984 wxPoint(0,0)
2985 #else
2986 wxPoint(info->MousePos.x, info->MousePos.y)
2987 #endif
2988 );
2989
2990 helpEvent.SetEventObject(this);
2991 eventProcessed =
2992 GetEventHandler()->ProcessEvent(helpEvent);
2993
2994 // Go up the window hierarchy until the event is
2995 // handled (or not)
2996 subjectOfHelp = subjectOfHelp->GetParent();
2997 }
2998
2999 processed = eventProcessed;
3000 #ifndef __WXWINCE__
3001 }
3002 else if (info->iContextType == HELPINFO_MENUITEM)
3003 {
3004 wxHelpEvent helpEvent(wxEVT_HELP, info->iCtrlId);
3005 helpEvent.SetEventObject(this);
3006 processed = GetEventHandler()->ProcessEvent(helpEvent);
3007
3008 }
3009 //else: processed is already false
3010 #endif
3011 }
3012 break;
3013 #endif
3014
3015 #if !defined(__WXWINCE__)
3016 case WM_CONTEXTMENU:
3017 {
3018 // we don't convert from screen to client coordinates as
3019 // the event may be handled by a parent window
3020 wxPoint pt(GET_X_LPARAM(lParam), GET_Y_LPARAM(lParam));
3021
3022 wxContextMenuEvent evtCtx(wxEVT_CONTEXT_MENU, GetId(), pt);
3023
3024 // we could have got an event from our child, reflect it back
3025 // to it if this is the case
3026 wxWindowMSW *win = NULL;
3027 if ( (WXHWND)wParam != m_hWnd )
3028 {
3029 win = FindItemByHWND((WXHWND)wParam);
3030 }
3031
3032 if ( !win )
3033 win = this;
3034
3035 evtCtx.SetEventObject(win);
3036 processed = win->GetEventHandler()->ProcessEvent(evtCtx);
3037 }
3038 break;
3039 #endif
3040
3041 case WM_MENUCHAR:
3042 // we're only interested in our own menus, not MF_SYSMENU
3043 if ( HIWORD(wParam) == MF_POPUP )
3044 {
3045 // handle menu chars for ownerdrawn menu items
3046 int i = HandleMenuChar(toupper(LOWORD(wParam)), lParam);
3047 if ( i != wxNOT_FOUND )
3048 {
3049 rc.result = MAKELRESULT(i, MNC_EXECUTE);
3050 processed = true;
3051 }
3052 }
3053 break;
3054 }
3055
3056 if ( !processed )
3057 {
3058 #ifdef __WXDEBUG__
3059 wxLogTrace(wxTraceMessages, wxT("Forwarding %s to DefWindowProc."),
3060 wxGetMessageName(message));
3061 #endif // __WXDEBUG__
3062 rc.result = MSWDefWindowProc(message, wParam, lParam);
3063 }
3064
3065 return rc.result;
3066 }
3067
3068 // ----------------------------------------------------------------------------
3069 // wxWindow <-> HWND map
3070 // ----------------------------------------------------------------------------
3071
3072 wxWinHashTable *wxWinHandleHash = NULL;
3073
3074 wxWindow *wxFindWinFromHandle(WXHWND hWnd)
3075 {
3076 return (wxWindow*)wxWinHandleHash->Get((long)hWnd);
3077 }
3078
3079 void wxAssociateWinWithHandle(HWND hWnd, wxWindowMSW *win)
3080 {
3081 // adding NULL hWnd is (first) surely a result of an error and
3082 // (secondly) breaks menu command processing
3083 wxCHECK_RET( hWnd != (HWND)NULL,
3084 wxT("attempt to add a NULL hWnd to window list ignored") );
3085
3086 wxWindow *oldWin = wxFindWinFromHandle((WXHWND) hWnd);
3087 #ifdef __WXDEBUG__
3088 if ( oldWin && (oldWin != win) )
3089 {
3090 wxLogDebug(wxT("HWND %X already associated with another window (%s)"),
3091 (int) hWnd, win->GetClassInfo()->GetClassName());
3092 }
3093 else
3094 #endif // __WXDEBUG__
3095 if (!oldWin)
3096 {
3097 wxWinHandleHash->Put((long)hWnd, (wxWindow *)win);
3098 }
3099 }
3100
3101 void wxRemoveHandleAssociation(wxWindowMSW *win)
3102 {
3103 wxWinHandleHash->Delete((long)win->GetHWND());
3104 }
3105
3106 // ----------------------------------------------------------------------------
3107 // various MSW speciic class dependent functions
3108 // ----------------------------------------------------------------------------
3109
3110 // Default destroyer - override if you destroy it in some other way
3111 // (e.g. with MDI child windows)
3112 void wxWindowMSW::MSWDestroyWindow()
3113 {
3114 }
3115
3116 bool wxWindowMSW::MSWGetCreateWindowCoords(const wxPoint& pos,
3117 const wxSize& size,
3118 int& x, int& y,
3119 int& w, int& h) const
3120 {
3121 // yes, those are just some arbitrary hardcoded numbers
3122 static const int DEFAULT_Y = 200;
3123
3124 bool nonDefault = false;
3125
3126 if ( pos.x == wxDefaultCoord )
3127 {
3128 // if x is set to CW_USEDEFAULT, y parameter is ignored anyhow so we
3129 // can just as well set it to CW_USEDEFAULT as well
3130 x =
3131 y = CW_USEDEFAULT;
3132 }
3133 else
3134 {
3135 // OTOH, if x is not set to CW_USEDEFAULT, y shouldn't be set to it
3136 // neither because it is not handled as a special value by Windows then
3137 // and so we have to choose some default value for it
3138 x = pos.x;
3139 y = pos.y == wxDefaultCoord ? DEFAULT_Y : pos.y;
3140
3141 nonDefault = true;
3142 }
3143
3144 /*
3145 NB: there used to be some code here which set the initial size of the
3146 window to the client size of the parent if no explicit size was
3147 specified. This was wrong because wxWidgets programs often assume
3148 that they get a WM_SIZE (EVT_SIZE) upon creation, however this broke
3149 it. To see why, you should understand that Windows sends WM_SIZE from
3150 inside ::CreateWindow() anyhow. However, ::CreateWindow() is called
3151 from some base class ctor and so this WM_SIZE is not processed in the
3152 real class' OnSize() (because it's not fully constructed yet and the
3153 event goes to some base class OnSize() instead). So the WM_SIZE we
3154 rely on is the one sent when the parent frame resizes its children
3155 but here is the problem: if the child already has just the right
3156 size, nothing will happen as both wxWidgets and Windows check for
3157 this and ignore any attempts to change the window size to the size it
3158 already has - so no WM_SIZE would be sent.
3159 */
3160
3161
3162 // we don't use CW_USEDEFAULT here for several reasons:
3163 //
3164 // 1. it results in huge frames on modern screens (1000*800 is not
3165 // uncommon on my 1280*1024 screen) which is way too big for a half
3166 // empty frame of most of wxWidgets samples for example)
3167 //
3168 // 2. it is buggy for frames with wxFRAME_TOOL_WINDOW style for which
3169 // the default is for whatever reason 8*8 which breaks client <->
3170 // window size calculations (it would be nice if it didn't, but it
3171 // does and the simplest way to fix it seemed to change the broken
3172 // default size anyhow)
3173 //
3174 // 3. there is just no advantage in doing it: with x and y it is
3175 // possible that [future versions of] Windows position the new top
3176 // level window in some smart way which we can't do, but we can
3177 // guess a reasonably good size for a new window just as well
3178 // ourselves
3179
3180 // However, on PocketPC devices, we must use the default
3181 // size if possible.
3182 #ifdef _WIN32_WCE
3183 if (size.x == wxDefaultCoord)
3184 w = CW_USEDEFAULT;
3185 else
3186 w = size.x;
3187 if (size.y == wxDefaultCoord)
3188 h = CW_USEDEFAULT;
3189 else
3190 h = size.y;
3191 #else
3192 if ( size.x == wxDefaultCoord || size.y == wxDefaultCoord)
3193 {
3194 nonDefault = true;
3195 }
3196 w = WidthDefault(size.x);
3197 h = HeightDefault(size.y);
3198 #endif
3199
3200 AdjustForParentClientOrigin(x, y);
3201
3202 return nonDefault;
3203 }
3204
3205 WXHWND wxWindowMSW::MSWGetParent() const
3206 {
3207 return m_parent ? m_parent->GetHWND() : WXHWND(NULL);
3208 }
3209
3210 bool wxWindowMSW::MSWCreate(const wxChar *wclass,
3211 const wxChar *title,
3212 const wxPoint& pos,
3213 const wxSize& size,
3214 WXDWORD style,
3215 WXDWORD extendedStyle)
3216 {
3217 // choose the position/size for the new window
3218 int x, y, w, h;
3219 (void)MSWGetCreateWindowCoords(pos, size, x, y, w, h);
3220
3221 // controlId is menu handle for the top level windows, so set it to 0
3222 // unless we're creating a child window
3223 int controlId = style & WS_CHILD ? GetId() : 0;
3224
3225 // for each class "Foo" we have we also have "FooNR" ("no repaint") class
3226 // which is the same but without CS_[HV]REDRAW class styles so using it
3227 // ensures that the window is not fully repainted on each resize
3228 wxString className(wclass);
3229 if ( !HasFlag(wxFULL_REPAINT_ON_RESIZE) )
3230 {
3231 className += wxT("NR");
3232 }
3233
3234 // do create the window
3235 wxWindowCreationHook hook(this);
3236
3237 m_hWnd = (WXHWND)::CreateWindowEx
3238 (
3239 extendedStyle,
3240 className,
3241 title ? title : m_windowName.c_str(),
3242 style,
3243 x, y, w, h,
3244 (HWND)MSWGetParent(),
3245 (HMENU)controlId,
3246 wxGetInstance(),
3247 NULL // no extra data
3248 );
3249
3250 if ( !m_hWnd )
3251 {
3252 wxLogSysError(_("Can't create window of class %s"), className.c_str());
3253
3254 return false;
3255 }
3256
3257 SubclassWin(m_hWnd);
3258
3259 return true;
3260 }
3261
3262 // ===========================================================================
3263 // MSW message handlers
3264 // ===========================================================================
3265
3266 // ---------------------------------------------------------------------------
3267 // WM_NOTIFY
3268 // ---------------------------------------------------------------------------
3269
3270 bool wxWindowMSW::HandleNotify(int idCtrl, WXLPARAM lParam, WXLPARAM *result)
3271 {
3272 #ifndef __WXMICROWIN__
3273 LPNMHDR hdr = (LPNMHDR)lParam;
3274 HWND hWnd = hdr->hwndFrom;
3275 wxWindow *win = wxFindWinFromHandle((WXHWND)hWnd);
3276
3277 // if the control is one of our windows, let it handle the message itself
3278 if ( win )
3279 {
3280 return win->MSWOnNotify(idCtrl, lParam, result);
3281 }
3282
3283 // VZ: why did we do it? normally this is unnecessary and, besides, it
3284 // breaks the message processing for the toolbars because the tooltip
3285 // notifications were being forwarded to the toolbar child controls
3286 // (if it had any) before being passed to the toolbar itself, so in my
3287 // example the tooltip for the combobox was always shown instead of the
3288 // correct button tooltips
3289 #if 0
3290 // try all our children
3291 wxWindowList::compatibility_iterator node = GetChildren().GetFirst();
3292 while ( node )
3293 {
3294 wxWindow *child = node->GetData();
3295 if ( child->MSWOnNotify(idCtrl, lParam, result) )
3296 {
3297 return true;
3298 }
3299
3300 node = node->GetNext();
3301 }
3302 #endif // 0
3303
3304 // by default, handle it ourselves
3305 return MSWOnNotify(idCtrl, lParam, result);
3306 #else // __WXMICROWIN__
3307 return false;
3308 #endif
3309 }
3310
3311 #if wxUSE_TOOLTIPS
3312
3313 bool wxWindowMSW::HandleTooltipNotify(WXUINT code,
3314 WXLPARAM lParam,
3315 const wxString& ttip)
3316 {
3317 // I don't know why it happens, but the versions of comctl32.dll starting
3318 // from 4.70 sometimes send TTN_NEEDTEXTW even to ANSI programs (normally,
3319 // this message is supposed to be sent to Unicode programs only) -- hence
3320 // we need to handle it as well, otherwise no tooltips will be shown in
3321 // this case
3322 #ifndef __WXWINCE__
3323 if ( !(code == (WXUINT) TTN_NEEDTEXTA || code == (WXUINT) TTN_NEEDTEXTW)
3324 || ttip.empty() )
3325 {
3326 // not a tooltip message or no tooltip to show anyhow
3327 return false;
3328 }
3329 #endif
3330
3331 LPTOOLTIPTEXT ttText = (LPTOOLTIPTEXT)lParam;
3332
3333 // We don't want to use the szText buffer because it has a limit of 80
3334 // bytes and this is not enough, especially for Unicode build where it
3335 // limits the tooltip string length to only 40 characters
3336 //
3337 // The best would be, of course, to not impose any length limitations at
3338 // all but then the buffer would have to be dynamic and someone would have
3339 // to free it and we don't have the tooltip owner object here any more, so
3340 // for now use our own static buffer with a higher fixed max length.
3341 //
3342 // Note that using a static buffer should not be a problem as only a single
3343 // tooltip can be shown at the same time anyhow.
3344 #if !wxUSE_UNICODE
3345 if ( code == (WXUINT) TTN_NEEDTEXTW )
3346 {
3347 // We need to convert tooltip from multi byte to Unicode on the fly.
3348 static wchar_t buf[513];
3349
3350 // Truncate tooltip length if needed as otherwise we might not have
3351 // enough space for it in the buffer and MultiByteToWideChar() would
3352 // return an error
3353 size_t tipLength = wxMin(ttip.Len(), WXSIZEOF(buf) - 1);
3354
3355 // Convert to WideChar without adding the NULL character. The NULL
3356 // character is added afterwards (this is more efficient).
3357 int len = ::MultiByteToWideChar
3358 (
3359 CP_ACP,
3360 0, // no flags
3361 ttip,
3362 tipLength,
3363 buf,
3364 WXSIZEOF(buf) - 1
3365 );
3366
3367 if ( !len )
3368 {
3369 wxLogLastError(_T("MultiByteToWideChar()"));
3370 }
3371
3372 buf[len] = L'\0';
3373 ttText->lpszText = (LPSTR) buf;
3374 }
3375 else // TTN_NEEDTEXTA
3376 #endif // !wxUSE_UNICODE
3377 {
3378 // we get here if we got TTN_NEEDTEXTA (only happens in ANSI build) or
3379 // if we got TTN_NEEDTEXTW in Unicode build: in this case we just have
3380 // to copy the string we have into the buffer
3381 static wxChar buf[513];
3382 wxStrncpy(buf, ttip.c_str(), WXSIZEOF(buf) - 1);
3383 buf[WXSIZEOF(buf) - 1] = _T('\0');
3384 ttText->lpszText = buf;
3385 }
3386
3387 return true;
3388 }
3389
3390 #endif // wxUSE_TOOLTIPS
3391
3392 bool wxWindowMSW::MSWOnNotify(int WXUNUSED(idCtrl),
3393 WXLPARAM lParam,
3394 WXLPARAM* WXUNUSED(result))
3395 {
3396 #if wxUSE_TOOLTIPS
3397 if ( m_tooltip )
3398 {
3399 NMHDR* hdr = (NMHDR *)lParam;
3400 if ( HandleTooltipNotify(hdr->code, lParam, m_tooltip->GetTip()))
3401 {
3402 // processed
3403 return true;
3404 }
3405 }
3406 #else
3407 wxUnusedVar(lParam);
3408 #endif // wxUSE_TOOLTIPS
3409
3410 return false;
3411 }
3412
3413 // ---------------------------------------------------------------------------
3414 // end session messages
3415 // ---------------------------------------------------------------------------
3416
3417 bool wxWindowMSW::HandleQueryEndSession(long logOff, bool *mayEnd)
3418 {
3419 #ifdef ENDSESSION_LOGOFF
3420 wxCloseEvent event(wxEVT_QUERY_END_SESSION, wxID_ANY);
3421 event.SetEventObject(wxTheApp);
3422 event.SetCanVeto(true);
3423 event.SetLoggingOff(logOff == (long)ENDSESSION_LOGOFF);
3424
3425 bool rc = wxTheApp->ProcessEvent(event);
3426
3427 if ( rc )
3428 {
3429 // we may end only if the app didn't veto session closing (double
3430 // negation...)
3431 *mayEnd = !event.GetVeto();
3432 }
3433
3434 return rc;
3435 #else
3436 wxUnusedVar(logOff);
3437 wxUnusedVar(mayEnd);
3438 return false;
3439 #endif
3440 }
3441
3442 bool wxWindowMSW::HandleEndSession(bool endSession, long logOff)
3443 {
3444 #ifdef ENDSESSION_LOGOFF
3445 // do nothing if the session isn't ending
3446 if ( !endSession )
3447 return false;
3448
3449 // only send once
3450 if ( (this != wxTheApp->GetTopWindow()) )
3451 return false;
3452
3453 wxCloseEvent event(wxEVT_END_SESSION, wxID_ANY);
3454 event.SetEventObject(wxTheApp);
3455 event.SetCanVeto(false);
3456 event.SetLoggingOff( (logOff == (long)ENDSESSION_LOGOFF) );
3457
3458 return wxTheApp->ProcessEvent(event);
3459 #else
3460 wxUnusedVar(endSession);
3461 wxUnusedVar(logOff);
3462 return false;
3463 #endif
3464 }
3465
3466 // ---------------------------------------------------------------------------
3467 // window creation/destruction
3468 // ---------------------------------------------------------------------------
3469
3470 bool wxWindowMSW::HandleCreate(WXLPCREATESTRUCT WXUNUSED_IN_WINCE(cs),
3471 bool *mayCreate)
3472 {
3473 // VZ: why is this commented out for WinCE? If it doesn't support
3474 // WS_EX_CONTROLPARENT at all it should be somehow handled globally,
3475 // not with multiple #ifdef's!
3476 #ifndef __WXWINCE__
3477 if ( ((CREATESTRUCT *)cs)->dwExStyle & WS_EX_CONTROLPARENT )
3478 EnsureParentHasControlParentStyle(GetParent());
3479 #endif // !__WXWINCE__
3480
3481 // TODO: should generate this event from WM_NCCREATE
3482 wxWindowCreateEvent event((wxWindow *)this);
3483 (void)GetEventHandler()->ProcessEvent(event);
3484
3485 *mayCreate = true;
3486
3487 return true;
3488 }
3489
3490 bool wxWindowMSW::HandleDestroy()
3491 {
3492 SendDestroyEvent();
3493
3494 // delete our drop target if we've got one
3495 #if wxUSE_DRAG_AND_DROP
3496 if ( m_dropTarget != NULL )
3497 {
3498 m_dropTarget->Revoke(m_hWnd);
3499
3500 delete m_dropTarget;
3501 m_dropTarget = NULL;
3502 }
3503 #endif // wxUSE_DRAG_AND_DROP
3504
3505 // WM_DESTROY handled
3506 return true;
3507 }
3508
3509 // ---------------------------------------------------------------------------
3510 // activation/focus
3511 // ---------------------------------------------------------------------------
3512
3513 bool wxWindowMSW::HandleActivate(int state,
3514 bool WXUNUSED(minimized),
3515 WXHWND WXUNUSED(activate))
3516 {
3517 wxActivateEvent event(wxEVT_ACTIVATE,
3518 (state == WA_ACTIVE) || (state == WA_CLICKACTIVE),
3519 m_windowId);
3520 event.SetEventObject(this);
3521
3522 return GetEventHandler()->ProcessEvent(event);
3523 }
3524
3525 bool wxWindowMSW::HandleSetFocus(WXHWND hwnd)
3526 {
3527 // Strangly enough, some controls get set focus events when they are being
3528 // deleted, even if they already had focus before.
3529 if ( m_isBeingDeleted )
3530 {
3531 return false;
3532 }
3533
3534 // notify the parent keeping track of focus for the kbd navigation
3535 // purposes that we got it
3536 wxChildFocusEvent eventFocus((wxWindow *)this);
3537 (void)GetEventHandler()->ProcessEvent(eventFocus);
3538
3539 #if wxUSE_CARET
3540 // Deal with caret
3541 if ( m_caret )
3542 {
3543 m_caret->OnSetFocus();
3544 }
3545 #endif // wxUSE_CARET
3546
3547 #if wxUSE_TEXTCTRL
3548 // If it's a wxTextCtrl don't send the event as it will be done
3549 // after the control gets to process it from EN_FOCUS handler
3550 if ( wxDynamicCastThis(wxTextCtrl) )
3551 {
3552 return false;
3553 }
3554 #endif // wxUSE_TEXTCTRL
3555
3556 wxFocusEvent event(wxEVT_SET_FOCUS, m_windowId);
3557 event.SetEventObject(this);
3558
3559 // wxFindWinFromHandle() may return NULL, it is ok
3560 event.SetWindow(wxFindWinFromHandle(hwnd));
3561
3562 return GetEventHandler()->ProcessEvent(event);
3563 }
3564
3565 bool wxWindowMSW::HandleKillFocus(WXHWND hwnd)
3566 {
3567 #if wxUSE_CARET
3568 // Deal with caret
3569 if ( m_caret )
3570 {
3571 m_caret->OnKillFocus();
3572 }
3573 #endif // wxUSE_CARET
3574
3575 #if wxUSE_TEXTCTRL
3576 // If it's a wxTextCtrl don't send the event as it will be done
3577 // after the control gets to process it.
3578 wxTextCtrl *ctrl = wxDynamicCastThis(wxTextCtrl);
3579 if ( ctrl )
3580 {
3581 return false;
3582 }
3583 #endif
3584
3585 // Don't send the event when in the process of being deleted. This can
3586 // only cause problems if the event handler tries to access the object.
3587 if ( m_isBeingDeleted )
3588 {
3589 return false;
3590 }
3591
3592 wxFocusEvent event(wxEVT_KILL_FOCUS, m_windowId);
3593 event.SetEventObject(this);
3594
3595 // wxFindWinFromHandle() may return NULL, it is ok
3596 event.SetWindow(wxFindWinFromHandle(hwnd));
3597
3598 return GetEventHandler()->ProcessEvent(event);
3599 }
3600
3601 // ---------------------------------------------------------------------------
3602 // labels
3603 // ---------------------------------------------------------------------------
3604
3605 void wxWindowMSW::SetLabel( const wxString& label)
3606 {
3607 SetWindowText(GetHwnd(), label.c_str());
3608 }
3609
3610 wxString wxWindowMSW::GetLabel() const
3611 {
3612 return wxGetWindowText(GetHWND());
3613 }
3614
3615 // ---------------------------------------------------------------------------
3616 // miscellaneous
3617 // ---------------------------------------------------------------------------
3618
3619 bool wxWindowMSW::HandleShow(bool show, int WXUNUSED(status))
3620 {
3621 wxShowEvent event(GetId(), show);
3622 event.SetEventObject(this);
3623
3624 return GetEventHandler()->ProcessEvent(event);
3625 }
3626
3627 bool wxWindowMSW::HandleInitDialog(WXHWND WXUNUSED(hWndFocus))
3628 {
3629 wxInitDialogEvent event(GetId());
3630 event.SetEventObject(this);
3631
3632 return GetEventHandler()->ProcessEvent(event);
3633 }
3634
3635 bool wxWindowMSW::HandleDropFiles(WXWPARAM wParam)
3636 {
3637 #if defined (__WXMICROWIN__) || defined(__WXWINCE__)
3638 wxUnusedVar(wParam);
3639 return false;
3640 #else // __WXMICROWIN__
3641 HDROP hFilesInfo = (HDROP) wParam;
3642
3643 // Get the total number of files dropped
3644 UINT gwFilesDropped = ::DragQueryFile
3645 (
3646 (HDROP)hFilesInfo,
3647 (UINT)-1,
3648 (LPTSTR)0,
3649 (UINT)0
3650 );
3651
3652 wxString *files = new wxString[gwFilesDropped];
3653 for ( UINT wIndex = 0; wIndex < gwFilesDropped; wIndex++ )
3654 {
3655 // first get the needed buffer length (+1 for terminating NUL)
3656 size_t len = ::DragQueryFile(hFilesInfo, wIndex, NULL, 0) + 1;
3657
3658 // and now get the file name
3659 ::DragQueryFile(hFilesInfo, wIndex,
3660 wxStringBuffer(files[wIndex], len), len);
3661 }
3662 DragFinish (hFilesInfo);
3663
3664 wxDropFilesEvent event(wxEVT_DROP_FILES, gwFilesDropped, files);
3665 event.SetEventObject(this);
3666
3667 POINT dropPoint;
3668 DragQueryPoint(hFilesInfo, (LPPOINT) &dropPoint);
3669 event.m_pos.x = dropPoint.x;
3670 event.m_pos.y = dropPoint.y;
3671
3672 return GetEventHandler()->ProcessEvent(event);
3673 #endif
3674 }
3675
3676
3677 bool wxWindowMSW::HandleSetCursor(WXHWND WXUNUSED(hWnd),
3678 short nHitTest,
3679 int WXUNUSED(mouseMsg))
3680 {
3681 #ifndef __WXMICROWIN__
3682 // the logic is as follows:
3683 // -1. don't set cursor for non client area, including but not limited to
3684 // the title bar, scrollbars, &c
3685 // 0. allow the user to override default behaviour by using EVT_SET_CURSOR
3686 // 1. if we have the cursor set it unless wxIsBusy()
3687 // 2. if we're a top level window, set some cursor anyhow
3688 // 3. if wxIsBusy(), set the busy cursor, otherwise the global one
3689
3690 if ( nHitTest != HTCLIENT )
3691 {
3692 return false;
3693 }
3694
3695 HCURSOR hcursor = 0;
3696
3697 // first ask the user code - it may wish to set the cursor in some very
3698 // specific way (for example, depending on the current position)
3699 POINT pt;
3700 #ifdef __WXWINCE__
3701 if ( !::GetCursorPosWinCE(&pt))
3702 #else
3703 if ( !::GetCursorPos(&pt) )
3704 #endif
3705 {
3706 wxLogLastError(wxT("GetCursorPos"));
3707 }
3708
3709 int x = pt.x,
3710 y = pt.y;
3711 ScreenToClient(&x, &y);
3712 wxSetCursorEvent event(x, y);
3713
3714 bool processedEvtSetCursor = GetEventHandler()->ProcessEvent(event);
3715 if ( processedEvtSetCursor && event.HasCursor() )
3716 {
3717 hcursor = GetHcursorOf(event.GetCursor());
3718 }
3719
3720 if ( !hcursor )
3721 {
3722 bool isBusy = wxIsBusy();
3723
3724 // the test for processedEvtSetCursor is here to prevent using m_cursor
3725 // if the user code caught EVT_SET_CURSOR() and returned nothing from
3726 // it - this is a way to say that our cursor shouldn't be used for this
3727 // point
3728 if ( !processedEvtSetCursor && m_cursor.Ok() )
3729 {
3730 hcursor = GetHcursorOf(m_cursor);
3731 }
3732
3733 if ( !GetParent() )
3734 {
3735 if ( isBusy )
3736 {
3737 hcursor = wxGetCurrentBusyCursor();
3738 }
3739 else if ( !hcursor )
3740 {
3741 const wxCursor *cursor = wxGetGlobalCursor();
3742 if ( cursor && cursor->Ok() )
3743 {
3744 hcursor = GetHcursorOf(*cursor);
3745 }
3746 }
3747 }
3748 }
3749
3750 if ( hcursor )
3751 {
3752 // wxLogDebug("HandleSetCursor: Setting cursor %ld", (long) hcursor);
3753
3754 ::SetCursor(hcursor);
3755
3756 // cursor set, stop here
3757 return true;
3758 }
3759 #endif // __WXMICROWIN__
3760
3761 // pass up the window chain
3762 return false;
3763 }
3764
3765 // ---------------------------------------------------------------------------
3766 // owner drawn stuff
3767 // ---------------------------------------------------------------------------
3768
3769 #if (wxUSE_OWNER_DRAWN && wxUSE_MENUS_NATIVE) || \
3770 (wxUSE_CONTROLS && !defined(__WXUNIVERSAL__))
3771 #define WXUNUSED_UNLESS_ODRAWN(param) param
3772 #else
3773 #define WXUNUSED_UNLESS_ODRAWN(param)
3774 #endif
3775
3776 bool
3777 wxWindowMSW::MSWOnDrawItem(int WXUNUSED_UNLESS_ODRAWN(id),
3778 WXDRAWITEMSTRUCT * WXUNUSED_UNLESS_ODRAWN(itemStruct))
3779 {
3780 #if wxUSE_OWNER_DRAWN
3781
3782 #if wxUSE_MENUS_NATIVE
3783 // is it a menu item?
3784 DRAWITEMSTRUCT *pDrawStruct = (DRAWITEMSTRUCT *)itemStruct;
3785 if ( id == 0 && pDrawStruct->CtlType == ODT_MENU )
3786 {
3787 wxMenuItem *pMenuItem = (wxMenuItem *)(pDrawStruct->itemData);
3788
3789 // see comment before the same test in MSWOnMeasureItem() below
3790 if ( !pMenuItem )
3791 return false;
3792
3793 wxCHECK_MSG( wxDynamicCast(pMenuItem, wxMenuItem),
3794 false, _T("MSWOnDrawItem: bad wxMenuItem pointer") );
3795
3796 // prepare to call OnDrawItem(): notice using of wxDCTemp to prevent
3797 // the DC from being released
3798 wxDCTemp dc((WXHDC)pDrawStruct->hDC);
3799 wxRect rect(pDrawStruct->rcItem.left, pDrawStruct->rcItem.top,
3800 pDrawStruct->rcItem.right - pDrawStruct->rcItem.left,
3801 pDrawStruct->rcItem.bottom - pDrawStruct->rcItem.top);
3802
3803 return pMenuItem->OnDrawItem
3804 (
3805 dc,
3806 rect,
3807 (wxOwnerDrawn::wxODAction)pDrawStruct->itemAction,
3808 (wxOwnerDrawn::wxODStatus)pDrawStruct->itemState
3809 );
3810 }
3811 #endif // wxUSE_MENUS_NATIVE
3812
3813 #endif // USE_OWNER_DRAWN
3814
3815 #if wxUSE_CONTROLS && !defined(__WXUNIVERSAL__)
3816
3817 #if wxUSE_OWNER_DRAWN
3818 wxControl *item = wxDynamicCast(FindItem(id), wxControl);
3819 #else // !wxUSE_OWNER_DRAWN
3820 // we may still have owner-drawn buttons internally because we have to make
3821 // them owner-drawn to support colour change
3822 wxControl *item =
3823 # if wxUSE_BUTTON
3824 wxDynamicCast(FindItem(id), wxButton)
3825 # else
3826 NULL
3827 # endif
3828 ;
3829 #endif // USE_OWNER_DRAWN
3830
3831 if ( item )
3832 {
3833 return item->MSWOnDraw(itemStruct);
3834 }
3835
3836 #endif // wxUSE_CONTROLS
3837
3838 return false;
3839 }
3840
3841 bool
3842 wxWindowMSW::MSWOnMeasureItem(int id, WXMEASUREITEMSTRUCT *itemStruct)
3843 {
3844 #if wxUSE_OWNER_DRAWN && wxUSE_MENUS_NATIVE
3845 // is it a menu item?
3846 MEASUREITEMSTRUCT *pMeasureStruct = (MEASUREITEMSTRUCT *)itemStruct;
3847 if ( id == 0 && pMeasureStruct->CtlType == ODT_MENU )
3848 {
3849 wxMenuItem *pMenuItem = (wxMenuItem *)(pMeasureStruct->itemData);
3850
3851 // according to Carsten Fuchs the pointer may be NULL under XP if an
3852 // MDI child frame is initially maximized, see this for more info:
3853 // http://article.gmane.org/gmane.comp.lib.wxwidgets.general/27745
3854 //
3855 // so silently ignore it instead of asserting
3856 if ( !pMenuItem )
3857 return false;
3858
3859 wxCHECK_MSG( wxDynamicCast(pMenuItem, wxMenuItem),
3860 false, _T("MSWOnMeasureItem: bad wxMenuItem pointer") );
3861
3862 size_t w, h;
3863 bool rc = pMenuItem->OnMeasureItem(&w, &h);
3864
3865 pMeasureStruct->itemWidth = w;
3866 pMeasureStruct->itemHeight = h;
3867
3868 return rc;
3869 }
3870
3871 wxControl *item = wxDynamicCast(FindItem(id), wxControl);
3872 if ( item )
3873 {
3874 return item->MSWOnMeasure(itemStruct);
3875 }
3876 #else
3877 wxUnusedVar(id);
3878 wxUnusedVar(itemStruct);
3879 #endif // wxUSE_OWNER_DRAWN && wxUSE_MENUS_NATIVE
3880
3881 return false;
3882 }
3883
3884 // ---------------------------------------------------------------------------
3885 // colours and palettes
3886 // ---------------------------------------------------------------------------
3887
3888 bool wxWindowMSW::HandleSysColorChange()
3889 {
3890 wxSysColourChangedEvent event;
3891 event.SetEventObject(this);
3892
3893 (void)GetEventHandler()->ProcessEvent(event);
3894
3895 // always let the system carry on the default processing to allow the
3896 // native controls to react to the colours update
3897 return false;
3898 }
3899
3900 bool wxWindowMSW::HandleDisplayChange()
3901 {
3902 wxDisplayChangedEvent event;
3903 event.SetEventObject(this);
3904
3905 return GetEventHandler()->ProcessEvent(event);
3906 }
3907
3908 #ifndef __WXMICROWIN__
3909
3910 bool wxWindowMSW::HandleCtlColor(WXHBRUSH *brush, WXHDC hDC, WXHWND hWnd)
3911 {
3912 #if !wxUSE_CONTROLS || defined(__WXUNIVERSAL__)
3913 wxUnusedVar(hDC);
3914 wxUnusedVar(hWnd);
3915 #else
3916 wxControl *item = wxDynamicCast(FindItemByHWND(hWnd, true), wxControl);
3917
3918 if ( item )
3919 *brush = item->MSWControlColor(hDC, hWnd);
3920 else
3921 #endif // wxUSE_CONTROLS
3922 *brush = NULL;
3923
3924 return *brush != NULL;
3925 }
3926
3927 #endif // __WXMICROWIN__
3928
3929 bool wxWindowMSW::HandlePaletteChanged(WXHWND hWndPalChange)
3930 {
3931 #if wxUSE_PALETTE
3932 // same as below except we don't respond to our own messages
3933 if ( hWndPalChange != GetHWND() )
3934 {
3935 // check to see if we our our parents have a custom palette
3936 wxWindowMSW *win = this;
3937 while ( win && !win->HasCustomPalette() )
3938 {
3939 win = win->GetParent();
3940 }
3941
3942 if ( win && win->HasCustomPalette() )
3943 {
3944 // realize the palette to see whether redrawing is needed
3945 HDC hdc = ::GetDC((HWND) hWndPalChange);
3946 win->m_palette.SetHPALETTE((WXHPALETTE)
3947 ::SelectPalette(hdc, GetHpaletteOf(win->m_palette), FALSE));
3948
3949 int result = ::RealizePalette(hdc);
3950
3951 // restore the palette (before releasing the DC)
3952 win->m_palette.SetHPALETTE((WXHPALETTE)
3953 ::SelectPalette(hdc, GetHpaletteOf(win->m_palette), FALSE));
3954 ::RealizePalette(hdc);
3955 ::ReleaseDC((HWND) hWndPalChange, hdc);
3956
3957 // now check for the need to redraw
3958 if (result > 0)
3959 ::InvalidateRect((HWND) hWndPalChange, NULL, TRUE);
3960 }
3961
3962 }
3963 #endif // wxUSE_PALETTE
3964
3965 wxPaletteChangedEvent event(GetId());
3966 event.SetEventObject(this);
3967 event.SetChangedWindow(wxFindWinFromHandle(hWndPalChange));
3968
3969 return GetEventHandler()->ProcessEvent(event);
3970 }
3971
3972 bool wxWindowMSW::HandleCaptureChanged(WXHWND hWndGainedCapture)
3973 {
3974 wxMouseCaptureChangedEvent event(GetId(), wxFindWinFromHandle(hWndGainedCapture));
3975 event.SetEventObject(this);
3976
3977 return GetEventHandler()->ProcessEvent(event);
3978 }
3979
3980 bool wxWindowMSW::HandleSettingChange(WXWPARAM wParam, WXLPARAM lParam)
3981 {
3982 // despite MSDN saying "(This message cannot be sent directly to a window.)"
3983 // we need to send this to child windows (it is only sent to top-level
3984 // windows) so {list,tree}ctrls can adjust their font size if necessary
3985 // this is exactly how explorer does it to enable the font size changes
3986
3987 wxWindowList::compatibility_iterator node = GetChildren().GetFirst();
3988 while ( node )
3989 {
3990 // top-level windows already get this message from the system
3991 wxWindow *win = node->GetData();
3992 if ( !win->IsTopLevel() )
3993 {
3994 ::SendMessage(GetHwndOf(win), WM_SETTINGCHANGE, wParam, lParam);
3995 }
3996
3997 node = node->GetNext();
3998 }
3999
4000 // let the system handle it
4001 return false;
4002 }
4003
4004 bool wxWindowMSW::HandleQueryNewPalette()
4005 {
4006
4007 #if wxUSE_PALETTE
4008 // check to see if we our our parents have a custom palette
4009 wxWindowMSW *win = this;
4010 while (!win->HasCustomPalette() && win->GetParent()) win = win->GetParent();
4011 if (win->HasCustomPalette()) {
4012 /* realize the palette to see whether redrawing is needed */
4013 HDC hdc = ::GetDC((HWND) GetHWND());
4014 win->m_palette.SetHPALETTE( (WXHPALETTE)
4015 ::SelectPalette(hdc, (HPALETTE) win->m_palette.GetHPALETTE(), FALSE) );
4016
4017 int result = ::RealizePalette(hdc);
4018 /* restore the palette (before releasing the DC) */
4019 win->m_palette.SetHPALETTE( (WXHPALETTE)
4020 ::SelectPalette(hdc, (HPALETTE) win->m_palette.GetHPALETTE(), TRUE) );
4021 ::RealizePalette(hdc);
4022 ::ReleaseDC((HWND) GetHWND(), hdc);
4023 /* now check for the need to redraw */
4024 if (result > 0)
4025 ::InvalidateRect((HWND) GetHWND(), NULL, TRUE);
4026 }
4027 #endif // wxUSE_PALETTE
4028
4029 wxQueryNewPaletteEvent event(GetId());
4030 event.SetEventObject(this);
4031
4032 return GetEventHandler()->ProcessEvent(event) && event.GetPaletteRealized();
4033 }
4034
4035 // Responds to colour changes: passes event on to children.
4036 void wxWindowMSW::OnSysColourChanged(wxSysColourChangedEvent& WXUNUSED(event))
4037 {
4038 // the top level window also reset the standard colour map as it might have
4039 // changed (there is no need to do it for the non top level windows as we
4040 // only have to do it once)
4041 if ( IsTopLevel() )
4042 {
4043 // FIXME-MT
4044 gs_hasStdCmap = false;
4045 }
4046 wxWindowList::compatibility_iterator node = GetChildren().GetFirst();
4047 while ( node )
4048 {
4049 // Only propagate to non-top-level windows because Windows already
4050 // sends this event to all top-level ones
4051 wxWindow *win = node->GetData();
4052 if ( !win->IsTopLevel() )
4053 {
4054 // we need to send the real WM_SYSCOLORCHANGE and not just trigger
4055 // EVT_SYS_COLOUR_CHANGED call because the latter wouldn't work for
4056 // the standard controls
4057 ::SendMessage(GetHwndOf(win), WM_SYSCOLORCHANGE, 0, 0);
4058 }
4059
4060 node = node->GetNext();
4061 }
4062 }
4063
4064 extern wxCOLORMAP *wxGetStdColourMap()
4065 {
4066 static COLORREF s_stdColours[wxSTD_COL_MAX];
4067 static wxCOLORMAP s_cmap[wxSTD_COL_MAX];
4068
4069 if ( !gs_hasStdCmap )
4070 {
4071 static bool s_coloursInit = false;
4072
4073 if ( !s_coloursInit )
4074 {
4075 // When a bitmap is loaded, the RGB values can change (apparently
4076 // because Windows adjusts them to care for the old programs always
4077 // using 0xc0c0c0 while the transparent colour for the new Windows
4078 // versions is different). But we do this adjustment ourselves so
4079 // we want to avoid Windows' "help" and for this we need to have a
4080 // reference bitmap which can tell us what the RGB values change
4081 // to.
4082 wxLogNull logNo; // suppress error if we couldn't load the bitmap
4083 wxBitmap stdColourBitmap(_T("wxBITMAP_STD_COLOURS"));
4084 if ( stdColourBitmap.Ok() )
4085 {
4086 // the pixels in the bitmap must correspond to wxSTD_COL_XXX!
4087 wxASSERT_MSG( stdColourBitmap.GetWidth() == wxSTD_COL_MAX,
4088 _T("forgot to update wxBITMAP_STD_COLOURS!") );
4089
4090 wxMemoryDC memDC;
4091 memDC.SelectObject(stdColourBitmap);
4092
4093 wxColour colour;
4094 for ( size_t i = 0; i < WXSIZEOF(s_stdColours); i++ )
4095 {
4096 memDC.GetPixel(i, 0, &colour);
4097 s_stdColours[i] = wxColourToRGB(colour);
4098 }
4099 }
4100 else // wxBITMAP_STD_COLOURS couldn't be loaded
4101 {
4102 s_stdColours[0] = RGB(000,000,000); // black
4103 s_stdColours[1] = RGB(128,128,128); // dark grey
4104 s_stdColours[2] = RGB(192,192,192); // light grey
4105 s_stdColours[3] = RGB(255,255,255); // white
4106 //s_stdColours[4] = RGB(000,000,255); // blue
4107 //s_stdColours[5] = RGB(255,000,255); // magenta
4108 }
4109
4110 s_coloursInit = true;
4111 }
4112
4113 gs_hasStdCmap = true;
4114
4115 // create the colour map
4116 #define INIT_CMAP_ENTRY(col) \
4117 s_cmap[wxSTD_COL_##col].from = s_stdColours[wxSTD_COL_##col]; \
4118 s_cmap[wxSTD_COL_##col].to = ::GetSysColor(COLOR_##col)
4119
4120 INIT_CMAP_ENTRY(BTNTEXT);
4121 INIT_CMAP_ENTRY(BTNSHADOW);
4122 INIT_CMAP_ENTRY(BTNFACE);
4123 INIT_CMAP_ENTRY(BTNHIGHLIGHT);
4124
4125 #undef INIT_CMAP_ENTRY
4126 }
4127
4128 return s_cmap;
4129 }
4130
4131 // ---------------------------------------------------------------------------
4132 // painting
4133 // ---------------------------------------------------------------------------
4134
4135 bool wxWindowMSW::HandlePaint()
4136 {
4137 HRGN hRegion = ::CreateRectRgn(0, 0, 0, 0); // Dummy call to get a handle
4138 if ( !hRegion )
4139 wxLogLastError(wxT("CreateRectRgn"));
4140 if ( ::GetUpdateRgn(GetHwnd(), hRegion, FALSE) == ERROR )
4141 wxLogLastError(wxT("GetUpdateRgn"));
4142
4143 m_updateRegion = wxRegion((WXHRGN) hRegion);
4144
4145 wxPaintEvent event(m_windowId);
4146 event.SetEventObject(this);
4147
4148 bool processed = GetEventHandler()->ProcessEvent(event);
4149
4150 // note that we must generate NC event after the normal one as otherwise
4151 // BeginPaint() will happily overwrite our decorations with the background
4152 // colour
4153 wxNcPaintEvent eventNc(m_windowId);
4154 eventNc.SetEventObject(this);
4155 GetEventHandler()->ProcessEvent(eventNc);
4156
4157 return processed;
4158 }
4159
4160 // Can be called from an application's OnPaint handler
4161 void wxWindowMSW::OnPaint(wxPaintEvent& event)
4162 {
4163 #ifdef __WXUNIVERSAL__
4164 event.Skip();
4165 #else
4166 HDC hDC = (HDC) wxPaintDC::FindDCInCache((wxWindow*) event.GetEventObject());
4167 if (hDC != 0)
4168 {
4169 MSWDefWindowProc(WM_PAINT, (WPARAM) hDC, 0);
4170 }
4171 #endif
4172 }
4173
4174 bool wxWindowMSW::HandleEraseBkgnd(WXHDC hdc)
4175 {
4176 wxDCTemp dc(hdc);
4177
4178 dc.SetHDC(hdc);
4179 dc.SetWindow((wxWindow *)this);
4180
4181 wxEraseEvent event(m_windowId, &dc);
4182 event.SetEventObject(this);
4183 bool rc = GetEventHandler()->ProcessEvent(event);
4184
4185 // must be called manually as ~wxDC doesn't do anything for wxDCTemp
4186 dc.SelectOldObjects(hdc);
4187
4188 return rc;
4189 }
4190
4191 void wxWindowMSW::OnEraseBackground(wxEraseEvent& event)
4192 {
4193 // standard non top level controls (i.e. except the dialogs) always erase
4194 // their background themselves in HandleCtlColor() or have some control-
4195 // specific ways to set the colours (common controls)
4196 if ( IsOfStandardClass() && !IsTopLevel() )
4197 {
4198 event.Skip();
4199 return;
4200 }
4201
4202 if ( GetBackgroundStyle() == wxBG_STYLE_CUSTOM )
4203 {
4204 // don't skip the event here, custom background means that the app
4205 // is drawing it itself in its OnPaint(), so don't draw it at all
4206 // now to avoid flicker
4207 return;
4208 }
4209
4210
4211 // do default background painting
4212 if ( !DoEraseBackground(GetHdcOf(*event.GetDC())) )
4213 {
4214 // let the system paint the background
4215 event.Skip();
4216 }
4217 }
4218
4219 bool wxWindowMSW::DoEraseBackground(WXHDC hDC)
4220 {
4221 HBRUSH hbr = (HBRUSH)MSWGetBgBrush(hDC);
4222 if ( !hbr )
4223 return false;
4224
4225 wxFillRect(GetHwnd(), (HDC)hDC, hbr);
4226
4227 return true;
4228 }
4229
4230 WXHBRUSH
4231 wxWindowMSW::MSWGetBgBrushForChild(WXHDC WXUNUSED(hDC), WXHWND hWnd)
4232 {
4233 if ( m_hasBgCol )
4234 {
4235 // our background colour applies to:
4236 // 1. this window itself, always
4237 // 2. all children unless the colour is "not inheritable"
4238 // 3. even if it is not inheritable, our immediate transparent
4239 // children should still inherit it -- but not any transparent
4240 // children because it would look wrong if a child of non
4241 // transparent child would show our bg colour when the child itself
4242 // does not
4243 wxWindow *win = wxFindWinFromHandle(hWnd);
4244 if ( win == this ||
4245 m_inheritBgCol ||
4246 (win && win->HasTransparentBackground() &&
4247 win->GetParent() == this) )
4248 {
4249 // draw children with the same colour as the parent
4250 wxBrush *
4251 brush = wxTheBrushList->FindOrCreateBrush(GetBackgroundColour());
4252
4253 return (WXHBRUSH)GetHbrushOf(*brush);
4254 }
4255 }
4256
4257 return 0;
4258 }
4259
4260 WXHBRUSH wxWindowMSW::MSWGetBgBrush(WXHDC hDC, WXHWND hWndToPaint)
4261 {
4262 if ( !hWndToPaint )
4263 hWndToPaint = GetHWND();
4264
4265 for ( wxWindowMSW *win = this; win; win = win->GetParent() )
4266 {
4267 WXHBRUSH hBrush = win->MSWGetBgBrushForChild(hDC, hWndToPaint);
4268 if ( hBrush )
4269 return hBrush;
4270
4271 // background is not inherited beyond top level windows
4272 if ( win->IsTopLevel() )
4273 break;
4274 }
4275
4276 return 0;
4277 }
4278
4279 bool wxWindowMSW::HandlePrintClient(WXHDC hDC)
4280 {
4281 // we receive this message when DrawThemeParentBackground() is
4282 // called from def window proc of several controls under XP and we
4283 // must draw properly themed background here
4284 //
4285 // note that naively I'd expect filling the client rect with the
4286 // brush returned by MSWGetBgBrush() work -- but for some reason it
4287 // doesn't and we have to call parents MSWPrintChild() which is
4288 // supposed to call DrawThemeBackground() with appropriate params
4289 //
4290 // also note that in this case lParam == PRF_CLIENT but we're
4291 // clearly expected to paint the background and nothing else!
4292
4293 if ( IsTopLevel() || InheritsBackgroundColour() )
4294 return false;
4295
4296 // sometimes we don't want the parent to handle it at all, instead
4297 // return whatever value this window wants
4298 if ( !MSWShouldPropagatePrintChild() )
4299 return MSWPrintChild(hDC, (wxWindow *)this);
4300
4301 for ( wxWindow *win = GetParent(); win; win = win->GetParent() )
4302 {
4303 if ( win->MSWPrintChild(hDC, (wxWindow *)this) )
4304 return true;
4305
4306 if ( win->IsTopLevel() || win->InheritsBackgroundColour() )
4307 break;
4308 }
4309
4310 return false;
4311 }
4312
4313 // ---------------------------------------------------------------------------
4314 // moving and resizing
4315 // ---------------------------------------------------------------------------
4316
4317 bool wxWindowMSW::HandleMinimize()
4318 {
4319 wxIconizeEvent event(m_windowId);
4320 event.SetEventObject(this);
4321
4322 return GetEventHandler()->ProcessEvent(event);
4323 }
4324
4325 bool wxWindowMSW::HandleMaximize()
4326 {
4327 wxMaximizeEvent event(m_windowId);
4328 event.SetEventObject(this);
4329
4330 return GetEventHandler()->ProcessEvent(event);
4331 }
4332
4333 bool wxWindowMSW::HandleMove(int x, int y)
4334 {
4335 wxPoint point(x,y);
4336 wxMoveEvent event(point, m_windowId);
4337 event.SetEventObject(this);
4338
4339 return GetEventHandler()->ProcessEvent(event);
4340 }
4341
4342 bool wxWindowMSW::HandleMoving(wxRect& rect)
4343 {
4344 wxMoveEvent event(rect, m_windowId);
4345 event.SetEventObject(this);
4346
4347 bool rc = GetEventHandler()->ProcessEvent(event);
4348 if (rc)
4349 rect = event.GetRect();
4350 return rc;
4351 }
4352
4353 bool wxWindowMSW::HandleSize(int WXUNUSED(w), int WXUNUSED(h), WXUINT wParam)
4354 {
4355 #if USE_DEFERRED_SIZING
4356 // when we resize this window, its children are probably going to be
4357 // repositioned as well, prepare to use DeferWindowPos() for them
4358 int numChildren = 0;
4359 for ( HWND child = ::GetWindow(GetHwndOf(this), GW_CHILD);
4360 child;
4361 child = ::GetWindow(child, GW_HWNDNEXT) )
4362 {
4363 numChildren ++;
4364 }
4365
4366 // Protect against valid m_hDWP being overwritten
4367 bool useDefer = false;
4368
4369 if ( numChildren > 1 )
4370 {
4371 if (!m_hDWP)
4372 {
4373 m_hDWP = (WXHANDLE)::BeginDeferWindowPos(numChildren);
4374 if ( !m_hDWP )
4375 {
4376 wxLogLastError(_T("BeginDeferWindowPos"));
4377 }
4378 if (m_hDWP)
4379 useDefer = true;
4380 }
4381 }
4382 #endif // USE_DEFERRED_SIZING
4383
4384 // update this window size
4385 bool processed = false;
4386 switch ( wParam )
4387 {
4388 default:
4389 wxFAIL_MSG( _T("unexpected WM_SIZE parameter") );
4390 // fall through nevertheless
4391
4392 case SIZE_MAXHIDE:
4393 case SIZE_MAXSHOW:
4394 // we're not interested in these messages at all
4395 break;
4396
4397 case SIZE_MINIMIZED:
4398 processed = HandleMinimize();
4399 break;
4400
4401 case SIZE_MAXIMIZED:
4402 /* processed = */ HandleMaximize();
4403 // fall through to send a normal size event as well
4404
4405 case SIZE_RESTORED:
4406 // don't use w and h parameters as they specify the client size
4407 // while according to the docs EVT_SIZE handler is supposed to
4408 // receive the total size
4409 wxSizeEvent event(GetSize(), m_windowId);
4410 event.SetEventObject(this);
4411
4412 processed = GetEventHandler()->ProcessEvent(event);
4413 }
4414
4415 #if USE_DEFERRED_SIZING
4416 // and finally change the positions of all child windows at once
4417 if ( useDefer && m_hDWP )
4418 {
4419 // reset m_hDWP to NULL so that child windows don't try to use our
4420 // m_hDWP after we call EndDeferWindowPos() on it (this shouldn't
4421 // happen anyhow normally but who knows what weird flow of control we
4422 // may have depending on what the users EVT_SIZE handler does...)
4423 HDWP hDWP = (HDWP)m_hDWP;
4424 m_hDWP = NULL;
4425
4426 // do put all child controls in place at once
4427 if ( !::EndDeferWindowPos(hDWP) )
4428 {
4429 wxLogLastError(_T("EndDeferWindowPos"));
4430 }
4431
4432 // Reset our children's pending pos/size values.
4433 for ( wxWindowList::compatibility_iterator node = GetChildren().GetFirst();
4434 node;
4435 node = node->GetNext() )
4436 {
4437 wxWindowMSW *child = node->GetData();
4438 child->m_pendingPosition = wxDefaultPosition;
4439 child->m_pendingSize = wxDefaultSize;
4440 }
4441 }
4442 #endif // USE_DEFERRED_SIZING
4443
4444 return processed;
4445 }
4446
4447 bool wxWindowMSW::HandleSizing(wxRect& rect)
4448 {
4449 wxSizeEvent event(rect, m_windowId);
4450 event.SetEventObject(this);
4451
4452 bool rc = GetEventHandler()->ProcessEvent(event);
4453 if (rc)
4454 rect = event.GetRect();
4455 return rc;
4456 }
4457
4458 bool wxWindowMSW::HandleGetMinMaxInfo(void *WXUNUSED_IN_WINCE(mmInfo))
4459 {
4460 #ifdef __WXWINCE__
4461 return false;
4462 #else
4463 MINMAXINFO *info = (MINMAXINFO *)mmInfo;
4464
4465 bool rc = false;
4466
4467 int minWidth = GetMinWidth(),
4468 minHeight = GetMinHeight(),
4469 maxWidth = GetMaxWidth(),
4470 maxHeight = GetMaxHeight();
4471
4472 if ( minWidth != wxDefaultCoord )
4473 {
4474 info->ptMinTrackSize.x = minWidth;
4475 rc = true;
4476 }
4477
4478 if ( minHeight != wxDefaultCoord )
4479 {
4480 info->ptMinTrackSize.y = minHeight;
4481 rc = true;
4482 }
4483
4484 if ( maxWidth != wxDefaultCoord )
4485 {
4486 info->ptMaxTrackSize.x = maxWidth;
4487 rc = true;
4488 }
4489
4490 if ( maxHeight != wxDefaultCoord )
4491 {
4492 info->ptMaxTrackSize.y = maxHeight;
4493 rc = true;
4494 }
4495
4496 return rc;
4497 #endif
4498 }
4499
4500 // ---------------------------------------------------------------------------
4501 // command messages
4502 // ---------------------------------------------------------------------------
4503
4504 bool wxWindowMSW::HandleCommand(WXWORD id, WXWORD cmd, WXHWND control)
4505 {
4506 #if wxUSE_MENUS_NATIVE
4507 if ( !cmd && wxCurrentPopupMenu )
4508 {
4509 wxMenu *popupMenu = wxCurrentPopupMenu;
4510 wxCurrentPopupMenu = NULL;
4511
4512 return popupMenu->MSWCommand(cmd, id);
4513 }
4514 #endif // wxUSE_MENUS_NATIVE
4515
4516 wxWindow *win = NULL;
4517
4518 // first try to find it from HWND - this works even with the broken
4519 // programs using the same ids for different controls
4520 if ( control )
4521 {
4522 win = wxFindWinFromHandle(control);
4523 }
4524
4525 // try the id
4526 if ( !win )
4527 {
4528 // must cast to a signed type before comparing with other ids!
4529 win = FindItem((signed short)id);
4530 }
4531
4532 if ( win )
4533 {
4534 return win->MSWCommand(cmd, id);
4535 }
4536
4537 // the messages sent from the in-place edit control used by the treectrl
4538 // for label editing have id == 0, but they should _not_ be treated as menu
4539 // messages (they are EN_XXX ones, in fact) so don't translate anything
4540 // coming from a control to wxEVT_COMMAND_MENU_SELECTED
4541 if ( !control )
4542 {
4543 // If no child window, it may be an accelerator, e.g. for a popup menu
4544 // command
4545
4546 wxCommandEvent event(wxEVT_COMMAND_MENU_SELECTED);
4547 event.SetEventObject(this);
4548 event.SetId(id);
4549 event.SetInt(id);
4550
4551 return GetEventHandler()->ProcessEvent(event);
4552 }
4553 else
4554 {
4555 #if wxUSE_SPINCTRL && !defined(__WXUNIVERSAL__)
4556 // the text ctrl which is logically part of wxSpinCtrl sends WM_COMMAND
4557 // notifications to its parent which we want to reflect back to
4558 // wxSpinCtrl
4559 wxSpinCtrl *spin = wxSpinCtrl::GetSpinForTextCtrl(control);
4560 if ( spin && spin->ProcessTextCommand(cmd, id) )
4561 return true;
4562 #endif // wxUSE_SPINCTRL
4563
4564 #if wxUSE_CHOICE && defined(__SMARTPHONE__)
4565 // the listbox ctrl which is logically part of wxChoice sends WM_COMMAND
4566 // notifications to its parent which we want to reflect back to
4567 // wxChoice
4568 wxChoice *choice = wxChoice::GetChoiceForListBox(control);
4569 if ( choice && choice->MSWCommand(cmd, id) )
4570 return true;
4571 #endif
4572 }
4573
4574 return false;
4575 }
4576
4577 // ---------------------------------------------------------------------------
4578 // mouse events
4579 // ---------------------------------------------------------------------------
4580
4581 void wxWindowMSW::InitMouseEvent(wxMouseEvent& event,
4582 int x, int y,
4583 WXUINT flags)
4584 {
4585 // our client coords are not quite the same as Windows ones
4586 wxPoint pt = GetClientAreaOrigin();
4587 event.m_x = x - pt.x;
4588 event.m_y = y - pt.y;
4589
4590 event.m_shiftDown = (flags & MK_SHIFT) != 0;
4591 event.m_controlDown = (flags & MK_CONTROL) != 0;
4592 event.m_leftDown = (flags & MK_LBUTTON) != 0;
4593 event.m_middleDown = (flags & MK_MBUTTON) != 0;
4594 event.m_rightDown = (flags & MK_RBUTTON) != 0;
4595 event.m_altDown = ::GetKeyState(VK_MENU) < 0;
4596
4597 #ifndef __WXWINCE__
4598 event.SetTimestamp(::GetMessageTime());
4599 #endif
4600
4601 event.SetEventObject(this);
4602 event.SetId(GetId());
4603
4604 #if wxUSE_MOUSEEVENT_HACK
4605 gs_lastMouseEvent.pos = ClientToScreen(wxPoint(x, y));
4606 gs_lastMouseEvent.type = event.GetEventType();
4607 #endif // wxUSE_MOUSEEVENT_HACK
4608 }
4609
4610 #ifdef __WXWINCE__
4611 // Windows doesn't send the mouse events to the static controls (which are
4612 // transparent in the sense that their WM_NCHITTEST handler returns
4613 // HTTRANSPARENT) at all but we want all controls to receive the mouse events
4614 // and so we manually check if we don't have a child window under mouse and if
4615 // we do, send the event to it instead of the window Windows had sent WM_XXX
4616 // to.
4617 //
4618 // Notice that this is not done for the mouse move events because this could
4619 // (would?) be too slow, but only for clicks which means that the static texts
4620 // still don't get move, enter nor leave events.
4621 static wxWindowMSW *FindWindowForMouseEvent(wxWindowMSW *win, int *x, int *y)
4622 {
4623 wxCHECK_MSG( x && y, win, _T("NULL pointer in FindWindowForMouseEvent") );
4624
4625 // first try to find a non transparent child: this allows us to send events
4626 // to a static text which is inside a static box, for example
4627 POINT pt = { *x, *y };
4628 HWND hwnd = GetHwndOf(win),
4629 hwndUnderMouse;
4630
4631 #ifdef __WXWINCE__
4632 hwndUnderMouse = ::ChildWindowFromPoint
4633 (
4634 hwnd,
4635 pt
4636 );
4637 #else
4638 hwndUnderMouse = ::ChildWindowFromPointEx
4639 (
4640 hwnd,
4641 pt,
4642 CWP_SKIPINVISIBLE |
4643 CWP_SKIPDISABLED |
4644 CWP_SKIPTRANSPARENT
4645 );
4646 #endif
4647
4648 if ( !hwndUnderMouse || hwndUnderMouse == hwnd )
4649 {
4650 // now try any child window at all
4651 hwndUnderMouse = ::ChildWindowFromPoint(hwnd, pt);
4652 }
4653
4654 // check that we have a child window which is susceptible to receive mouse
4655 // events: for this it must be shown and enabled
4656 if ( hwndUnderMouse &&
4657 hwndUnderMouse != hwnd &&
4658 ::IsWindowVisible(hwndUnderMouse) &&
4659 ::IsWindowEnabled(hwndUnderMouse) )
4660 {
4661 wxWindow *winUnderMouse = wxFindWinFromHandle((WXHWND)hwndUnderMouse);
4662 if ( winUnderMouse )
4663 {
4664 // translate the mouse coords to the other window coords
4665 win->ClientToScreen(x, y);
4666 winUnderMouse->ScreenToClient(x, y);
4667
4668 win = winUnderMouse;
4669 }
4670 }
4671
4672 return win;
4673 }
4674 #endif // __WXWINCE__
4675
4676 bool wxWindowMSW::HandleMouseEvent(WXUINT msg, int x, int y, WXUINT flags)
4677 {
4678 // the mouse events take consecutive IDs from WM_MOUSEFIRST to
4679 // WM_MOUSELAST, so it's enough to subtract WM_MOUSEMOVE == WM_MOUSEFIRST
4680 // from the message id and take the value in the table to get wxWin event
4681 // id
4682 static const wxEventType eventsMouse[] =
4683 {
4684 wxEVT_MOTION,
4685 wxEVT_LEFT_DOWN,
4686 wxEVT_LEFT_UP,
4687 wxEVT_LEFT_DCLICK,
4688 wxEVT_RIGHT_DOWN,
4689 wxEVT_RIGHT_UP,
4690 wxEVT_RIGHT_DCLICK,
4691 wxEVT_MIDDLE_DOWN,
4692 wxEVT_MIDDLE_UP,
4693 wxEVT_MIDDLE_DCLICK
4694 };
4695
4696 wxMouseEvent event(eventsMouse[msg - WM_MOUSEMOVE]);
4697 InitMouseEvent(event, x, y, flags);
4698
4699 return GetEventHandler()->ProcessEvent(event);
4700 }
4701
4702 bool wxWindowMSW::HandleMouseMove(int x, int y, WXUINT flags)
4703 {
4704 if ( !m_mouseInWindow )
4705 {
4706 // it would be wrong to assume that just because we get a mouse move
4707 // event that the mouse is inside the window: although this is usually
4708 // true, it is not if we had captured the mouse, so we need to check
4709 // the mouse coordinates here
4710 if ( !HasCapture() || IsMouseInWindow() )
4711 {
4712 // Generate an ENTER event
4713 m_mouseInWindow = true;
4714
4715 #ifdef HAVE_TRACKMOUSEEVENT
4716 WinStruct<TRACKMOUSEEVENT> trackinfo;
4717
4718 trackinfo.dwFlags = TME_LEAVE;
4719 trackinfo.hwndTrack = GetHwnd();
4720
4721 // Use the commctrl.h _TrackMouseEvent(), which will call the real
4722 // TrackMouseEvent() if available or emulate it
4723 _TrackMouseEvent(&trackinfo);
4724 #endif // HAVE_TRACKMOUSEEVENT
4725
4726 wxMouseEvent event(wxEVT_ENTER_WINDOW);
4727 InitMouseEvent(event, x, y, flags);
4728
4729 (void)GetEventHandler()->ProcessEvent(event);
4730 }
4731 }
4732 #ifdef HAVE_TRACKMOUSEEVENT
4733 else
4734 {
4735 // Check if we need to send a LEAVE event
4736 // Windows doesn't send WM_MOUSELEAVE if the mouse has been captured so
4737 // send it here if we are using native mouse leave tracking
4738 if ( HasCapture() && !IsMouseInWindow() )
4739 {
4740 GenerateMouseLeave();
4741 }
4742 }
4743 #endif // HAVE_TRACKMOUSEEVENT
4744
4745 #if wxUSE_MOUSEEVENT_HACK
4746 // Windows often generates mouse events even if mouse position hasn't
4747 // changed (http://article.gmane.org/gmane.comp.lib.wxwidgets.devel/66576)
4748 //
4749 // Filter this out as it can result in unexpected behaviour compared to
4750 // other platforms
4751 if ( gs_lastMouseEvent.type == wxEVT_RIGHT_DOWN ||
4752 gs_lastMouseEvent.type == wxEVT_LEFT_DOWN ||
4753 gs_lastMouseEvent.type == wxEVT_MIDDLE_DOWN ||
4754 gs_lastMouseEvent.type == wxEVT_MOTION )
4755 {
4756 if ( ClientToScreen(wxPoint(x, y)) == gs_lastMouseEvent.pos )
4757 {
4758 gs_lastMouseEvent.type = wxEVT_MOTION;
4759
4760 return false;
4761 }
4762 }
4763 #endif // wxUSE_MOUSEEVENT_HACK
4764
4765 return HandleMouseEvent(WM_MOUSEMOVE, x, y, flags);
4766 }
4767
4768
4769 bool wxWindowMSW::HandleMouseWheel(WXWPARAM wParam, WXLPARAM lParam)
4770 {
4771 #if wxUSE_MOUSEWHEEL
4772 // notice that WM_MOUSEWHEEL position is in screen coords (as it's
4773 // forwarded up to the parent by DefWindowProc()) and not in the client
4774 // ones as all the other messages, translate them to the client coords for
4775 // consistency
4776 const wxPoint
4777 pt = ScreenToClient(wxPoint(GET_X_LPARAM(lParam), GET_Y_LPARAM(lParam)));
4778 wxMouseEvent event(wxEVT_MOUSEWHEEL);
4779 InitMouseEvent(event, pt.x, pt.y, LOWORD(wParam));
4780 event.m_wheelRotation = (short)HIWORD(wParam);
4781 event.m_wheelDelta = WHEEL_DELTA;
4782
4783 static int s_linesPerRotation = -1;
4784 if ( s_linesPerRotation == -1 )
4785 {
4786 if ( !::SystemParametersInfo(SPI_GETWHEELSCROLLLINES, 0,
4787 &s_linesPerRotation, 0))
4788 {
4789 // this is not supposed to happen
4790 wxLogLastError(_T("SystemParametersInfo(GETWHEELSCROLLLINES)"));
4791
4792 // the default is 3, so use it if SystemParametersInfo() failed
4793 s_linesPerRotation = 3;
4794 }
4795 }
4796
4797 event.m_linesPerAction = s_linesPerRotation;
4798 return GetEventHandler()->ProcessEvent(event);
4799
4800 #else // !wxUSE_MOUSEWHEEL
4801 wxUnusedVar(wParam);
4802 wxUnusedVar(lParam);
4803
4804 return false;
4805 #endif // wxUSE_MOUSEWHEEL/!wxUSE_MOUSEWHEEL
4806 }
4807
4808 void wxWindowMSW::GenerateMouseLeave()
4809 {
4810 m_mouseInWindow = false;
4811
4812 int state = 0;
4813 if ( wxIsShiftDown() )
4814 state |= MK_SHIFT;
4815 if ( wxIsCtrlDown() )
4816 state |= MK_CONTROL;
4817
4818 // Only the high-order bit should be tested
4819 if ( GetKeyState( VK_LBUTTON ) & (1<<15) )
4820 state |= MK_LBUTTON;
4821 if ( GetKeyState( VK_MBUTTON ) & (1<<15) )
4822 state |= MK_MBUTTON;
4823 if ( GetKeyState( VK_RBUTTON ) & (1<<15) )
4824 state |= MK_RBUTTON;
4825
4826 POINT pt;
4827 #ifdef __WXWINCE__
4828 if ( !::GetCursorPosWinCE(&pt) )
4829 #else
4830 if ( !::GetCursorPos(&pt) )
4831 #endif
4832 {
4833 wxLogLastError(_T("GetCursorPos"));
4834 }
4835
4836 // we need to have client coordinates here for symmetry with
4837 // wxEVT_ENTER_WINDOW
4838 RECT rect = wxGetWindowRect(GetHwnd());
4839 pt.x -= rect.left;
4840 pt.y -= rect.top;
4841
4842 wxMouseEvent event(wxEVT_LEAVE_WINDOW);
4843 InitMouseEvent(event, pt.x, pt.y, state);
4844
4845 (void)GetEventHandler()->ProcessEvent(event);
4846 }
4847
4848 // ---------------------------------------------------------------------------
4849 // keyboard handling
4850 // ---------------------------------------------------------------------------
4851
4852 // create the key event of the given type for the given key - used by
4853 // HandleChar and HandleKeyDown/Up
4854 wxKeyEvent wxWindowMSW::CreateKeyEvent(wxEventType evType,
4855 int id,
4856 WXLPARAM lParam,
4857 WXWPARAM wParam) const
4858 {
4859 wxKeyEvent event(evType);
4860 event.SetId(GetId());
4861 event.m_shiftDown = wxIsShiftDown();
4862 event.m_controlDown = wxIsCtrlDown();
4863 event.m_altDown = (HIWORD(lParam) & KF_ALTDOWN) == KF_ALTDOWN;
4864
4865 event.SetEventObject((wxWindow *)this); // const_cast
4866 event.m_keyCode = id;
4867 #if wxUSE_UNICODE
4868 event.m_uniChar = (wxChar) wParam;
4869 #endif
4870 event.m_rawCode = (wxUint32) wParam;
4871 event.m_rawFlags = (wxUint32) lParam;
4872 #ifndef __WXWINCE__
4873 event.SetTimestamp(::GetMessageTime());
4874 #endif
4875
4876 // translate the position to client coords
4877 POINT pt;
4878 #ifdef __WXWINCE__
4879 GetCursorPosWinCE(&pt);
4880 #else
4881 GetCursorPos(&pt);
4882 #endif
4883 RECT rect;
4884 GetWindowRect(GetHwnd(),&rect);
4885 pt.x -= rect.left;
4886 pt.y -= rect.top;
4887
4888 event.m_x = pt.x;
4889 event.m_y = pt.y;
4890
4891 return event;
4892 }
4893
4894 // isASCII is true only when we're called from WM_CHAR handler and not from
4895 // WM_KEYDOWN one
4896 bool wxWindowMSW::HandleChar(WXWPARAM wParam, WXLPARAM lParam, bool isASCII)
4897 {
4898 int id;
4899 if ( isASCII )
4900 {
4901 // If 1 -> 26, translate to either special keycode or just set
4902 // ctrlDown. IOW, Ctrl-C should result in keycode == 3 and
4903 // ControlDown() == true.
4904 id = wParam;
4905 if ( (id > 0) && (id < 27) )
4906 {
4907 switch (id)
4908 {
4909 case 13:
4910 id = WXK_RETURN;
4911 break;
4912
4913 case 8:
4914 id = WXK_BACK;
4915 break;
4916
4917 case 9:
4918 id = WXK_TAB;
4919 break;
4920
4921 default:
4922 //ctrlDown = true;
4923 break;
4924 }
4925 }
4926 }
4927 else // we're called from WM_KEYDOWN
4928 {
4929 id = wxCharCodeMSWToWX(wParam, lParam);
4930 if ( id == 0 )
4931 {
4932 // it's ASCII and will be processed here only when called from
4933 // WM_CHAR (i.e. when isASCII = true), don't process it now
4934 return false;
4935 }
4936 }
4937
4938 wxKeyEvent event(CreateKeyEvent(wxEVT_CHAR, id, lParam, wParam));
4939
4940 // the alphanumeric keys produced by pressing AltGr+something on European
4941 // keyboards have both Ctrl and Alt modifiers which may confuse the user
4942 // code as, normally, keys with Ctrl and/or Alt don't result in anything
4943 // alphanumeric, so pretend that there are no modifiers at all (the
4944 // KEY_DOWN event would still have the correct modifiers if they're really
4945 // needed)
4946 if ( event.m_controlDown && event.m_altDown &&
4947 (id >= 32 && id < 256) )
4948 {
4949 event.m_controlDown =
4950 event.m_altDown = false;
4951 }
4952
4953 return GetEventHandler()->ProcessEvent(event);
4954 }
4955
4956 bool wxWindowMSW::HandleKeyDown(WXWPARAM wParam, WXLPARAM lParam)
4957 {
4958 int id = wxCharCodeMSWToWX(wParam, lParam);
4959
4960 if ( !id )
4961 {
4962 // normal ASCII char
4963 id = wParam;
4964 }
4965
4966 if ( id != -1 ) // VZ: does this ever happen (FIXME)?
4967 {
4968 wxKeyEvent event(CreateKeyEvent(wxEVT_KEY_DOWN, id, lParam, wParam));
4969 if ( GetEventHandler()->ProcessEvent(event) )
4970 {
4971 return true;
4972 }
4973 }
4974
4975 return false;
4976 }
4977
4978 bool wxWindowMSW::HandleKeyUp(WXWPARAM wParam, WXLPARAM lParam)
4979 {
4980 int id = wxCharCodeMSWToWX(wParam, lParam);
4981
4982 if ( !id )
4983 {
4984 // normal ASCII char
4985 id = wParam;
4986 }
4987
4988 if ( id != -1 ) // VZ: does this ever happen (FIXME)?
4989 {
4990 wxKeyEvent event(CreateKeyEvent(wxEVT_KEY_UP, id, lParam, wParam));
4991 if ( GetEventHandler()->ProcessEvent(event) )
4992 return true;
4993 }
4994
4995 return false;
4996 }
4997
4998 int wxWindowMSW::HandleMenuChar(int WXUNUSED_IN_WINCE(chAccel),
4999 WXLPARAM WXUNUSED_IN_WINCE(lParam))
5000 {
5001 // FIXME: implement GetMenuItemCount for WinCE, possibly
5002 // in terms of GetMenuItemInfo
5003 #ifndef __WXWINCE__
5004 const HMENU hmenu = (HMENU)lParam;
5005
5006 MENUITEMINFO mii;
5007 wxZeroMemory(mii);
5008 mii.cbSize = sizeof(MENUITEMINFO);
5009
5010 // we could use MIIM_FTYPE here as we only need to know if the item is
5011 // ownerdrawn or not and not dwTypeData which MIIM_TYPE also returns, but
5012 // MIIM_FTYPE is not supported under Win95
5013 mii.fMask = MIIM_TYPE | MIIM_DATA;
5014
5015 // find if we have this letter in any owner drawn item
5016 const int count = ::GetMenuItemCount(hmenu);
5017 for ( int i = 0; i < count; i++ )
5018 {
5019 // previous loop iteration could modify it, reset it back before
5020 // calling GetMenuItemInfo() to prevent it from overflowing dwTypeData
5021 mii.cch = 0;
5022
5023 if ( ::GetMenuItemInfo(hmenu, i, TRUE, &mii) )
5024 {
5025 if ( mii.fType == MFT_OWNERDRAW )
5026 {
5027 // dwItemData member of the MENUITEMINFO is a
5028 // pointer to the associated wxMenuItem -- see the
5029 // menu creation code
5030 wxMenuItem *item = (wxMenuItem*)mii.dwItemData;
5031
5032 const wxChar *p = wxStrchr(item->GetText(), _T('&'));
5033 while ( p++ )
5034 {
5035 if ( *p == _T('&') )
5036 {
5037 // this is not the accel char, find the real one
5038 p = wxStrchr(p + 1, _T('&'));
5039 }
5040 else // got the accel char
5041 {
5042 // FIXME-UNICODE: this comparison doesn't risk to work
5043 // for non ASCII accelerator characters I'm afraid, but
5044 // what can we do?
5045 if ( (wchar_t)wxToupper(*p) == (wchar_t)chAccel )
5046 {
5047 return i;
5048 }
5049 else
5050 {
5051 // this one doesn't match
5052 break;
5053 }
5054 }
5055 }
5056 }
5057 }
5058 else // failed to get the menu text?
5059 {
5060 // it's not fatal, so don't show error, but still log it
5061 wxLogLastError(_T("GetMenuItemInfo"));
5062 }
5063 }
5064 #endif
5065 return wxNOT_FOUND;
5066 }
5067
5068 // ---------------------------------------------------------------------------
5069 // joystick
5070 // ---------------------------------------------------------------------------
5071
5072 bool wxWindowMSW::HandleJoystickEvent(WXUINT msg, int x, int y, WXUINT flags)
5073 {
5074 #ifdef JOY_BUTTON1
5075 int change = 0;
5076 if ( flags & JOY_BUTTON1CHG )
5077 change = wxJOY_BUTTON1;
5078 if ( flags & JOY_BUTTON2CHG )
5079 change = wxJOY_BUTTON2;
5080 if ( flags & JOY_BUTTON3CHG )
5081 change = wxJOY_BUTTON3;
5082 if ( flags & JOY_BUTTON4CHG )
5083 change = wxJOY_BUTTON4;
5084
5085 int buttons = 0;
5086 if ( flags & JOY_BUTTON1 )
5087 buttons |= wxJOY_BUTTON1;
5088 if ( flags & JOY_BUTTON2 )
5089 buttons |= wxJOY_BUTTON2;
5090 if ( flags & JOY_BUTTON3 )
5091 buttons |= wxJOY_BUTTON3;
5092 if ( flags & JOY_BUTTON4 )
5093 buttons |= wxJOY_BUTTON4;
5094
5095 // the event ids aren't consecutive so we can't use table based lookup
5096 int joystick;
5097 wxEventType eventType;
5098 switch ( msg )
5099 {
5100 case MM_JOY1MOVE:
5101 joystick = 1;
5102 eventType = wxEVT_JOY_MOVE;
5103 break;
5104
5105 case MM_JOY2MOVE:
5106 joystick = 2;
5107 eventType = wxEVT_JOY_MOVE;
5108 break;
5109
5110 case MM_JOY1ZMOVE:
5111 joystick = 1;
5112 eventType = wxEVT_JOY_ZMOVE;
5113 break;
5114
5115 case MM_JOY2ZMOVE:
5116 joystick = 2;
5117 eventType = wxEVT_JOY_ZMOVE;
5118 break;
5119
5120 case MM_JOY1BUTTONDOWN:
5121 joystick = 1;
5122 eventType = wxEVT_JOY_BUTTON_DOWN;
5123 break;
5124
5125 case MM_JOY2BUTTONDOWN:
5126 joystick = 2;
5127 eventType = wxEVT_JOY_BUTTON_DOWN;
5128 break;
5129
5130 case MM_JOY1BUTTONUP:
5131 joystick = 1;
5132 eventType = wxEVT_JOY_BUTTON_UP;
5133 break;
5134
5135 case MM_JOY2BUTTONUP:
5136 joystick = 2;
5137 eventType = wxEVT_JOY_BUTTON_UP;
5138 break;
5139
5140 default:
5141 wxFAIL_MSG(wxT("no such joystick event"));
5142
5143 return false;
5144 }
5145
5146 wxJoystickEvent event(eventType, buttons, joystick, change);
5147 event.SetPosition(wxPoint(x, y));
5148 event.SetEventObject(this);
5149
5150 return GetEventHandler()->ProcessEvent(event);
5151 #else
5152 wxUnusedVar(msg);
5153 wxUnusedVar(x);
5154 wxUnusedVar(y);
5155 wxUnusedVar(flags);
5156 return false;
5157 #endif
5158 }
5159
5160 // ---------------------------------------------------------------------------
5161 // scrolling
5162 // ---------------------------------------------------------------------------
5163
5164 bool wxWindowMSW::MSWOnScroll(int orientation, WXWORD wParam,
5165 WXWORD pos, WXHWND control)
5166 {
5167 if ( control && control != m_hWnd ) // Prevent infinite recursion
5168 {
5169 wxWindow *child = wxFindWinFromHandle(control);
5170 if ( child )
5171 return child->MSWOnScroll(orientation, wParam, pos, control);
5172 }
5173
5174 wxScrollWinEvent event;
5175 event.SetPosition(pos);
5176 event.SetOrientation(orientation);
5177 event.SetEventObject(this);
5178
5179 switch ( wParam )
5180 {
5181 case SB_TOP:
5182 event.SetEventType(wxEVT_SCROLLWIN_TOP);
5183 break;
5184
5185 case SB_BOTTOM:
5186 event.SetEventType(wxEVT_SCROLLWIN_BOTTOM);
5187 break;
5188
5189 case SB_LINEUP:
5190 event.SetEventType(wxEVT_SCROLLWIN_LINEUP);
5191 break;
5192
5193 case SB_LINEDOWN:
5194 event.SetEventType(wxEVT_SCROLLWIN_LINEDOWN);
5195 break;
5196
5197 case SB_PAGEUP:
5198 event.SetEventType(wxEVT_SCROLLWIN_PAGEUP);
5199 break;
5200
5201 case SB_PAGEDOWN:
5202 event.SetEventType(wxEVT_SCROLLWIN_PAGEDOWN);
5203 break;
5204
5205 case SB_THUMBPOSITION:
5206 case SB_THUMBTRACK:
5207 // under Win32, the scrollbar range and position are 32 bit integers,
5208 // but WM_[HV]SCROLL only carry the low 16 bits of them, so we must
5209 // explicitly query the scrollbar for the correct position (this must
5210 // be done only for these two SB_ events as they are the only one
5211 // carrying the scrollbar position)
5212 {
5213 WinStruct<SCROLLINFO> scrollInfo;
5214 scrollInfo.fMask = SIF_TRACKPOS;
5215
5216 if ( !::GetScrollInfo(GetHwnd(),
5217 orientation == wxHORIZONTAL ? SB_HORZ
5218 : SB_VERT,
5219 &scrollInfo) )
5220 {
5221 // Not necessarily an error, if there are no scrollbars yet.
5222 // wxLogLastError(_T("GetScrollInfo"));
5223 }
5224
5225 event.SetPosition(scrollInfo.nTrackPos);
5226 }
5227
5228 event.SetEventType( wParam == SB_THUMBPOSITION
5229 ? wxEVT_SCROLLWIN_THUMBRELEASE
5230 : wxEVT_SCROLLWIN_THUMBTRACK );
5231 break;
5232
5233 default:
5234 return false;
5235 }
5236
5237 return GetEventHandler()->ProcessEvent(event);
5238 }
5239
5240 // ===========================================================================
5241 // global functions
5242 // ===========================================================================
5243
5244 void wxGetCharSize(WXHWND wnd, int *x, int *y, const wxFont& the_font)
5245 {
5246 TEXTMETRIC tm;
5247 HDC dc = ::GetDC((HWND) wnd);
5248 HFONT was = 0;
5249
5250 // the_font.UseResource();
5251 // the_font.RealizeResource();
5252 HFONT fnt = (HFONT)the_font.GetResourceHandle(); // const_cast
5253 if ( fnt )
5254 was = (HFONT) SelectObject(dc,fnt);
5255
5256 GetTextMetrics(dc, &tm);
5257 if ( fnt && was )
5258 {
5259 SelectObject(dc,was);
5260 }
5261 ReleaseDC((HWND)wnd, dc);
5262
5263 if ( x )
5264 *x = tm.tmAveCharWidth;
5265 if ( y )
5266 *y = tm.tmHeight + tm.tmExternalLeading;
5267
5268 // the_font.ReleaseResource();
5269 }
5270
5271 // use the "extended" bit (24) of lParam to distinguish extended keys
5272 // from normal keys as the same key is sent
5273 static inline
5274 int ChooseNormalOrExtended(int lParam, int keyNormal, int keyExtended)
5275 {
5276 // except that if lParam is 0, it means we don't have real lParam from
5277 // WM_KEYDOWN but are just translating just a VK constant (e.g. done from
5278 // msw/treectrl.cpp when processing TVN_KEYDOWN) -- then assume this is a
5279 // non-numpad (hence extended) key as this is a more common case
5280 return !lParam || (lParam & (1 << 24)) ? keyExtended : keyNormal;
5281 }
5282
5283 // Returns 0 if was a normal ASCII value, not a special key. This indicates that
5284 // the key should be ignored by WM_KEYDOWN and processed by WM_CHAR instead.
5285 int wxCharCodeMSWToWX(int keySym, WXLPARAM lParam)
5286 {
5287 int id;
5288 switch (keySym)
5289 {
5290 case VK_CANCEL: id = WXK_CANCEL; break;
5291 case VK_BACK: id = WXK_BACK; break;
5292 case VK_TAB: id = WXK_TAB; break;
5293 case VK_CLEAR: id = WXK_CLEAR; break;
5294 case VK_SHIFT: id = WXK_SHIFT; break;
5295 case VK_CONTROL: id = WXK_CONTROL; break;
5296 case VK_MENU : id = WXK_ALT; break;
5297 case VK_PAUSE: id = WXK_PAUSE; break;
5298 case VK_CAPITAL: id = WXK_CAPITAL; break;
5299 case VK_SPACE: id = WXK_SPACE; break;
5300 case VK_ESCAPE: id = WXK_ESCAPE; break;
5301 case VK_SELECT: id = WXK_SELECT; break;
5302 case VK_PRINT: id = WXK_PRINT; break;
5303 case VK_EXECUTE: id = WXK_EXECUTE; break;
5304 case VK_HELP : id = WXK_HELP; break;
5305 case VK_NUMPAD0: id = WXK_NUMPAD0; break;
5306 case VK_NUMPAD1: id = WXK_NUMPAD1; break;
5307 case VK_NUMPAD2: id = WXK_NUMPAD2; break;
5308 case VK_NUMPAD3: id = WXK_NUMPAD3; break;
5309 case VK_NUMPAD4: id = WXK_NUMPAD4; break;
5310 case VK_NUMPAD5: id = WXK_NUMPAD5; break;
5311 case VK_NUMPAD6: id = WXK_NUMPAD6; break;
5312 case VK_NUMPAD7: id = WXK_NUMPAD7; break;
5313 case VK_NUMPAD8: id = WXK_NUMPAD8; break;
5314 case VK_NUMPAD9: id = WXK_NUMPAD9; break;
5315 case VK_MULTIPLY: id = WXK_NUMPAD_MULTIPLY; break;
5316 case VK_ADD: id = WXK_NUMPAD_ADD; break;
5317 case VK_SUBTRACT: id = WXK_NUMPAD_SUBTRACT; break;
5318 case VK_DECIMAL: id = WXK_NUMPAD_DECIMAL; break;
5319 case VK_DIVIDE: id = WXK_NUMPAD_DIVIDE; break;
5320 case VK_F1: id = WXK_F1; break;
5321 case VK_F2: id = WXK_F2; break;
5322 case VK_F3: id = WXK_F3; break;
5323 case VK_F4: id = WXK_F4; break;
5324 case VK_F5: id = WXK_F5; break;
5325 case VK_F6: id = WXK_F6; break;
5326 case VK_F7: id = WXK_F7; break;
5327 case VK_F8: id = WXK_F8; break;
5328 case VK_F9: id = WXK_F9; break;
5329 case VK_F10: id = WXK_F10; break;
5330 case VK_F11: id = WXK_F11; break;
5331 case VK_F12: id = WXK_F12; break;
5332 case VK_F13: id = WXK_F13; break;
5333 case VK_F14: id = WXK_F14; break;
5334 case VK_F15: id = WXK_F15; break;
5335 case VK_F16: id = WXK_F16; break;
5336 case VK_F17: id = WXK_F17; break;
5337 case VK_F18: id = WXK_F18; break;
5338 case VK_F19: id = WXK_F19; break;
5339 case VK_F20: id = WXK_F20; break;
5340 case VK_F21: id = WXK_F21; break;
5341 case VK_F22: id = WXK_F22; break;
5342 case VK_F23: id = WXK_F23; break;
5343 case VK_F24: id = WXK_F24; break;
5344 case VK_NUMLOCK: id = WXK_NUMLOCK; break;
5345 case VK_SCROLL: id = WXK_SCROLL; break;
5346
5347 // the mapping for these keys may be incorrect on non-US keyboards so
5348 // maybe we shouldn't map them to ASCII values at all
5349 case VK_OEM_1: id = ';'; break;
5350 case VK_OEM_PLUS: id = '+'; break;
5351 case VK_OEM_COMMA: id = ','; break;
5352 case VK_OEM_MINUS: id = '-'; break;
5353 case VK_OEM_PERIOD: id = '.'; break;
5354 case VK_OEM_2: id = '/'; break;
5355 case VK_OEM_3: id = '~'; break;
5356 case VK_OEM_4: id = '['; break;
5357 case VK_OEM_5: id = '\\'; break;
5358 case VK_OEM_6: id = ']'; break;
5359 case VK_OEM_7: id = '\''; break;
5360
5361 #ifdef VK_APPS
5362 case VK_LWIN: id = WXK_WINDOWS_LEFT; break;
5363 case VK_RWIN: id = WXK_WINDOWS_RIGHT; break;
5364 case VK_APPS: id = WXK_WINDOWS_MENU; break;
5365 #endif // VK_APPS defined
5366
5367 // handle extended keys
5368 case VK_PRIOR:
5369 id = ChooseNormalOrExtended(lParam, WXK_NUMPAD_PRIOR, WXK_PRIOR);
5370 break;
5371 case VK_NEXT:
5372 id = ChooseNormalOrExtended(lParam, WXK_NUMPAD_NEXT, WXK_NEXT);
5373 break;
5374 case VK_END:
5375 id = ChooseNormalOrExtended(lParam, WXK_NUMPAD_END, WXK_END);
5376 break;
5377 case VK_HOME:
5378 id = ChooseNormalOrExtended(lParam, WXK_NUMPAD_HOME, WXK_HOME);
5379 break;
5380 case VK_LEFT:
5381 id = ChooseNormalOrExtended(lParam, WXK_NUMPAD_LEFT, WXK_LEFT);
5382 break;
5383 case VK_UP:
5384 id = ChooseNormalOrExtended(lParam, WXK_NUMPAD_UP, WXK_UP);
5385 break;
5386 case VK_RIGHT:
5387 id = ChooseNormalOrExtended(lParam, WXK_NUMPAD_RIGHT, WXK_RIGHT);
5388 break;
5389 case VK_DOWN:
5390 id = ChooseNormalOrExtended(lParam, WXK_NUMPAD_DOWN, WXK_DOWN);
5391 break;
5392 case VK_INSERT:
5393 id = ChooseNormalOrExtended(lParam, WXK_NUMPAD_INSERT, WXK_INSERT);
5394 break;
5395 case VK_DELETE:
5396 id = ChooseNormalOrExtended(lParam, WXK_NUMPAD_DELETE, WXK_DELETE);
5397 break;
5398 case VK_RETURN:
5399 // don't use ChooseNormalOrExtended() here as the keys are reversed
5400 // here: numpad enter is the extended one
5401 id = lParam && (lParam & (1 << 24)) ? WXK_NUMPAD_ENTER : WXK_RETURN;
5402 break;
5403
5404 default:
5405 id = 0;
5406 }
5407
5408 return id;
5409 }
5410
5411 WXWORD wxCharCodeWXToMSW(int id, bool *isVirtual)
5412 {
5413 *isVirtual = true;
5414 WXWORD keySym;
5415 switch (id)
5416 {
5417 case WXK_CANCEL: keySym = VK_CANCEL; break;
5418 case WXK_CLEAR: keySym = VK_CLEAR; break;
5419 case WXK_SHIFT: keySym = VK_SHIFT; break;
5420 case WXK_CONTROL: keySym = VK_CONTROL; break;
5421 case WXK_ALT: keySym = VK_MENU; break;
5422 case WXK_PAUSE: keySym = VK_PAUSE; break;
5423 case WXK_CAPITAL: keySym = VK_CAPITAL; break;
5424 case WXK_PRIOR: keySym = VK_PRIOR; break;
5425 case WXK_NEXT : keySym = VK_NEXT; break;
5426 case WXK_END: keySym = VK_END; break;
5427 case WXK_HOME : keySym = VK_HOME; break;
5428 case WXK_LEFT : keySym = VK_LEFT; break;
5429 case WXK_UP: keySym = VK_UP; break;
5430 case WXK_RIGHT: keySym = VK_RIGHT; break;
5431 case WXK_DOWN : keySym = VK_DOWN; break;
5432 case WXK_SELECT: keySym = VK_SELECT; break;
5433 case WXK_PRINT: keySym = VK_PRINT; break;
5434 case WXK_EXECUTE: keySym = VK_EXECUTE; break;
5435 case WXK_INSERT: keySym = VK_INSERT; break;
5436 case WXK_DELETE: keySym = VK_DELETE; break;
5437 case WXK_HELP : keySym = VK_HELP; break;
5438 case WXK_NUMPAD0: keySym = VK_NUMPAD0; break;
5439 case WXK_NUMPAD1: keySym = VK_NUMPAD1; break;
5440 case WXK_NUMPAD2: keySym = VK_NUMPAD2; break;
5441 case WXK_NUMPAD3: keySym = VK_NUMPAD3; break;
5442 case WXK_NUMPAD4: keySym = VK_NUMPAD4; break;
5443 case WXK_NUMPAD5: keySym = VK_NUMPAD5; break;
5444 case WXK_NUMPAD6: keySym = VK_NUMPAD6; break;
5445 case WXK_NUMPAD7: keySym = VK_NUMPAD7; break;
5446 case WXK_NUMPAD8: keySym = VK_NUMPAD8; break;
5447 case WXK_NUMPAD9: keySym = VK_NUMPAD9; break;
5448 case WXK_NUMPAD_MULTIPLY: keySym = VK_MULTIPLY; break;
5449 case WXK_NUMPAD_ADD: keySym = VK_ADD; break;
5450 case WXK_NUMPAD_SUBTRACT: keySym = VK_SUBTRACT; break;
5451 case WXK_NUMPAD_DECIMAL: keySym = VK_DECIMAL; break;
5452 case WXK_NUMPAD_DIVIDE: keySym = VK_DIVIDE; break;
5453 case WXK_F1: keySym = VK_F1; break;
5454 case WXK_F2: keySym = VK_F2; break;
5455 case WXK_F3: keySym = VK_F3; break;
5456 case WXK_F4: keySym = VK_F4; break;
5457 case WXK_F5: keySym = VK_F5; break;
5458 case WXK_F6: keySym = VK_F6; break;
5459 case WXK_F7: keySym = VK_F7; break;
5460 case WXK_F8: keySym = VK_F8; break;
5461 case WXK_F9: keySym = VK_F9; break;
5462 case WXK_F10: keySym = VK_F10; break;
5463 case WXK_F11: keySym = VK_F11; break;
5464 case WXK_F12: keySym = VK_F12; break;
5465 case WXK_F13: keySym = VK_F13; break;
5466 case WXK_F14: keySym = VK_F14; break;
5467 case WXK_F15: keySym = VK_F15; break;
5468 case WXK_F16: keySym = VK_F16; break;
5469 case WXK_F17: keySym = VK_F17; break;
5470 case WXK_F18: keySym = VK_F18; break;
5471 case WXK_F19: keySym = VK_F19; break;
5472 case WXK_F20: keySym = VK_F20; break;
5473 case WXK_F21: keySym = VK_F21; break;
5474 case WXK_F22: keySym = VK_F22; break;
5475 case WXK_F23: keySym = VK_F23; break;
5476 case WXK_F24: keySym = VK_F24; break;
5477 case WXK_NUMLOCK: keySym = VK_NUMLOCK; break;
5478 case WXK_SCROLL: keySym = VK_SCROLL; break;
5479 default:
5480 {
5481 *isVirtual = false;
5482 keySym = (WORD)id;
5483 break;
5484 }
5485 }
5486 return keySym;
5487 }
5488
5489 bool wxGetKeyState(wxKeyCode key)
5490 {
5491 bool bVirtual;
5492
5493 wxASSERT_MSG(key != WXK_LBUTTON && key != WXK_RBUTTON && key !=
5494 WXK_MBUTTON, wxT("can't use wxGetKeyState() for mouse buttons"));
5495
5496 //High order with GetAsyncKeyState only available on WIN32
5497 #ifdef __WIN32__
5498 //If the requested key is a LED key, return
5499 //true if the led is pressed
5500 if (key == WXK_NUMLOCK ||
5501 key == WXK_CAPITAL ||
5502 key == WXK_SCROLL)
5503 {
5504 #endif
5505 //low order bit means LED is highlighted,
5506 //high order means key is down
5507 //Here, for compat with other ports we want both
5508 return GetKeyState( wxCharCodeWXToMSW(key, &bVirtual) ) != 0;
5509
5510 #ifdef __WIN32__
5511 }
5512 else
5513 {
5514 //normal key
5515 //low order bit means key pressed since last call
5516 //high order means key is down
5517 //We want only the high order bit - the key may not be down if only low order
5518 return ( GetAsyncKeyState( wxCharCodeWXToMSW(key, &bVirtual) ) & (1<<15) ) != 0;
5519 }
5520 #endif
5521 }
5522
5523
5524 wxMouseState wxGetMouseState()
5525 {
5526 wxMouseState ms;
5527 POINT pt;
5528 GetCursorPos( &pt );
5529
5530 ms.SetX(pt.x);
5531 ms.SetY(pt.y);
5532 ms.SetLeftDown( (GetAsyncKeyState(VK_LBUTTON) & (1<<15)) != 0 );
5533 ms.SetMiddleDown( (GetAsyncKeyState(VK_MBUTTON) & (1<<15)) != 0 );
5534 ms.SetRightDown( (GetAsyncKeyState(VK_RBUTTON) & (1<<15)) != 0 );
5535
5536 ms.SetControlDown( (GetAsyncKeyState(VK_CONTROL) & (1<<15)) != 0 );
5537 ms.SetShiftDown( (GetAsyncKeyState(VK_SHIFT) & (1<<15)) != 0 );
5538 ms.SetAltDown( (GetAsyncKeyState(VK_MENU) & (1<<15)) != 0 );
5539 // ms.SetMetaDown();
5540
5541 return ms;
5542 }
5543
5544
5545 wxWindow *wxGetActiveWindow()
5546 {
5547 HWND hWnd = GetActiveWindow();
5548 if ( hWnd != 0 )
5549 {
5550 return wxFindWinFromHandle((WXHWND) hWnd);
5551 }
5552 return NULL;
5553 }
5554
5555 extern wxWindow *wxGetWindowFromHWND(WXHWND hWnd)
5556 {
5557 HWND hwnd = (HWND)hWnd;
5558
5559 // For a radiobutton, we get the radiobox from GWL_USERDATA (which is set
5560 // by code in msw/radiobox.cpp), for all the others we just search up the
5561 // window hierarchy
5562 wxWindow *win = (wxWindow *)NULL;
5563 if ( hwnd )
5564 {
5565 win = wxFindWinFromHandle((WXHWND)hwnd);
5566 if ( !win )
5567 {
5568 #if wxUSE_RADIOBOX
5569 // native radiobuttons return DLGC_RADIOBUTTON here and for any
5570 // wxWindow class which overrides WM_GETDLGCODE processing to
5571 // do it as well, win would be already non NULL
5572 if ( ::SendMessage(hwnd, WM_GETDLGCODE, 0, 0) & DLGC_RADIOBUTTON )
5573 {
5574 win = (wxWindow *)wxGetWindowUserData(hwnd);
5575 }
5576 //else: it's a wxRadioButton, not a radiobutton from wxRadioBox
5577 #endif // wxUSE_RADIOBOX
5578
5579 // spin control text buddy window should be mapped to spin ctrl
5580 // itself so try it too
5581 #if wxUSE_SPINCTRL && !defined(__WXUNIVERSAL__)
5582 if ( !win )
5583 {
5584 win = wxSpinCtrl::GetSpinForTextCtrl((WXHWND)hwnd);
5585 }
5586 #endif // wxUSE_SPINCTRL
5587 }
5588 }
5589
5590 while ( hwnd && !win )
5591 {
5592 // this is a really ugly hack needed to avoid mistakenly returning the
5593 // parent frame wxWindow for the find/replace modeless dialog HWND -
5594 // this, in turn, is needed to call IsDialogMessage() from
5595 // wxApp::ProcessMessage() as for this we must return NULL from here
5596 //
5597 // FIXME: this is clearly not the best way to do it but I think we'll
5598 // need to change HWND <-> wxWindow code more heavily than I can
5599 // do it now to fix it
5600 #ifndef __WXMICROWIN__
5601 if ( ::GetWindow(hwnd, GW_OWNER) )
5602 {
5603 // it's a dialog box, don't go upwards
5604 break;
5605 }
5606 #endif
5607
5608 hwnd = ::GetParent(hwnd);
5609 win = wxFindWinFromHandle((WXHWND)hwnd);
5610 }
5611
5612 return win;
5613 }
5614
5615 #if !defined(__WXMICROWIN__) && !defined(__WXWINCE__)
5616
5617 // Windows keyboard hook. Allows interception of e.g. F1, ESCAPE
5618 // in active frames and dialogs, regardless of where the focus is.
5619 static HHOOK wxTheKeyboardHook = 0;
5620 static FARPROC wxTheKeyboardHookProc = 0;
5621 int APIENTRY _EXPORT
5622 wxKeyboardHook(int nCode, WORD wParam, DWORD lParam);
5623
5624 void wxSetKeyboardHook(bool doIt)
5625 {
5626 if ( doIt )
5627 {
5628 wxTheKeyboardHookProc = MakeProcInstance((FARPROC) wxKeyboardHook, wxGetInstance());
5629 wxTheKeyboardHook = SetWindowsHookEx(WH_KEYBOARD, (HOOKPROC) wxTheKeyboardHookProc, wxGetInstance(),
5630
5631 GetCurrentThreadId()
5632 // (DWORD)GetCurrentProcess()); // This is another possibility. Which is right?
5633 );
5634 }
5635 else
5636 {
5637 UnhookWindowsHookEx(wxTheKeyboardHook);
5638 }
5639 }
5640
5641 int APIENTRY _EXPORT
5642 wxKeyboardHook(int nCode, WORD wParam, DWORD lParam)
5643 {
5644 DWORD hiWord = HIWORD(lParam);
5645 if ( nCode != HC_NOREMOVE && ((hiWord & KF_UP) == 0) )
5646 {
5647 int id = wxCharCodeMSWToWX(wParam, lParam);
5648 if ( id != 0 )
5649 {
5650 wxKeyEvent event(wxEVT_CHAR_HOOK);
5651 if ( (HIWORD(lParam) & KF_ALTDOWN) == KF_ALTDOWN )
5652 event.m_altDown = true;
5653
5654 event.SetEventObject(NULL);
5655 event.m_keyCode = id;
5656 event.m_shiftDown = wxIsShiftDown();
5657 event.m_controlDown = wxIsCtrlDown();
5658 #ifndef __WXWINCE__
5659 event.SetTimestamp(::GetMessageTime());
5660 #endif
5661 wxWindow *win = wxGetActiveWindow();
5662 wxEvtHandler *handler;
5663 if ( win )
5664 {
5665 handler = win->GetEventHandler();
5666 event.SetId(win->GetId());
5667 }
5668 else
5669 {
5670 handler = wxTheApp;
5671 event.SetId(wxID_ANY);
5672 }
5673
5674 if ( handler && handler->ProcessEvent(event) )
5675 {
5676 // processed
5677 return 1;
5678 }
5679 }
5680 }
5681
5682 return (int)CallNextHookEx(wxTheKeyboardHook, nCode, wParam, lParam);
5683 }
5684
5685 #endif // !__WXMICROWIN__
5686
5687 #ifdef __WXDEBUG__
5688 const wxChar *wxGetMessageName(int message)
5689 {
5690 switch ( message )
5691 {
5692 case 0x0000: return wxT("WM_NULL");
5693 case 0x0001: return wxT("WM_CREATE");
5694 case 0x0002: return wxT("WM_DESTROY");
5695 case 0x0003: return wxT("WM_MOVE");
5696 case 0x0005: return wxT("WM_SIZE");
5697 case 0x0006: return wxT("WM_ACTIVATE");
5698 case 0x0007: return wxT("WM_SETFOCUS");
5699 case 0x0008: return wxT("WM_KILLFOCUS");
5700 case 0x000A: return wxT("WM_ENABLE");
5701 case 0x000B: return wxT("WM_SETREDRAW");
5702 case 0x000C: return wxT("WM_SETTEXT");
5703 case 0x000D: return wxT("WM_GETTEXT");
5704 case 0x000E: return wxT("WM_GETTEXTLENGTH");
5705 case 0x000F: return wxT("WM_PAINT");
5706 case 0x0010: return wxT("WM_CLOSE");
5707 case 0x0011: return wxT("WM_QUERYENDSESSION");
5708 case 0x0012: return wxT("WM_QUIT");
5709 case 0x0013: return wxT("WM_QUERYOPEN");
5710 case 0x0014: return wxT("WM_ERASEBKGND");
5711 case 0x0015: return wxT("WM_SYSCOLORCHANGE");
5712 case 0x0016: return wxT("WM_ENDSESSION");
5713 case 0x0017: return wxT("WM_SYSTEMERROR");
5714 case 0x0018: return wxT("WM_SHOWWINDOW");
5715 case 0x0019: return wxT("WM_CTLCOLOR");
5716 case 0x001A: return wxT("WM_WININICHANGE");
5717 case 0x001B: return wxT("WM_DEVMODECHANGE");
5718 case 0x001C: return wxT("WM_ACTIVATEAPP");
5719 case 0x001D: return wxT("WM_FONTCHANGE");
5720 case 0x001E: return wxT("WM_TIMECHANGE");
5721 case 0x001F: return wxT("WM_CANCELMODE");
5722 case 0x0020: return wxT("WM_SETCURSOR");
5723 case 0x0021: return wxT("WM_MOUSEACTIVATE");
5724 case 0x0022: return wxT("WM_CHILDACTIVATE");
5725 case 0x0023: return wxT("WM_QUEUESYNC");
5726 case 0x0024: return wxT("WM_GETMINMAXINFO");
5727 case 0x0026: return wxT("WM_PAINTICON");
5728 case 0x0027: return wxT("WM_ICONERASEBKGND");
5729 case 0x0028: return wxT("WM_NEXTDLGCTL");
5730 case 0x002A: return wxT("WM_SPOOLERSTATUS");
5731 case 0x002B: return wxT("WM_DRAWITEM");
5732 case 0x002C: return wxT("WM_MEASUREITEM");
5733 case 0x002D: return wxT("WM_DELETEITEM");
5734 case 0x002E: return wxT("WM_VKEYTOITEM");
5735 case 0x002F: return wxT("WM_CHARTOITEM");
5736 case 0x0030: return wxT("WM_SETFONT");
5737 case 0x0031: return wxT("WM_GETFONT");
5738 case 0x0037: return wxT("WM_QUERYDRAGICON");
5739 case 0x0039: return wxT("WM_COMPAREITEM");
5740 case 0x0041: return wxT("WM_COMPACTING");
5741 case 0x0044: return wxT("WM_COMMNOTIFY");
5742 case 0x0046: return wxT("WM_WINDOWPOSCHANGING");
5743 case 0x0047: return wxT("WM_WINDOWPOSCHANGED");
5744 case 0x0048: return wxT("WM_POWER");
5745
5746 case 0x004A: return wxT("WM_COPYDATA");
5747 case 0x004B: return wxT("WM_CANCELJOURNAL");
5748 case 0x004E: return wxT("WM_NOTIFY");
5749 case 0x0050: return wxT("WM_INPUTLANGCHANGEREQUEST");
5750 case 0x0051: return wxT("WM_INPUTLANGCHANGE");
5751 case 0x0052: return wxT("WM_TCARD");
5752 case 0x0053: return wxT("WM_HELP");
5753 case 0x0054: return wxT("WM_USERCHANGED");
5754 case 0x0055: return wxT("WM_NOTIFYFORMAT");
5755 case 0x007B: return wxT("WM_CONTEXTMENU");
5756 case 0x007C: return wxT("WM_STYLECHANGING");
5757 case 0x007D: return wxT("WM_STYLECHANGED");
5758 case 0x007E: return wxT("WM_DISPLAYCHANGE");
5759 case 0x007F: return wxT("WM_GETICON");
5760 case 0x0080: return wxT("WM_SETICON");
5761
5762 case 0x0081: return wxT("WM_NCCREATE");
5763 case 0x0082: return wxT("WM_NCDESTROY");
5764 case 0x0083: return wxT("WM_NCCALCSIZE");
5765 case 0x0084: return wxT("WM_NCHITTEST");
5766 case 0x0085: return wxT("WM_NCPAINT");
5767 case 0x0086: return wxT("WM_NCACTIVATE");
5768 case 0x0087: return wxT("WM_GETDLGCODE");
5769 case 0x00A0: return wxT("WM_NCMOUSEMOVE");
5770 case 0x00A1: return wxT("WM_NCLBUTTONDOWN");
5771 case 0x00A2: return wxT("WM_NCLBUTTONUP");
5772 case 0x00A3: return wxT("WM_NCLBUTTONDBLCLK");
5773 case 0x00A4: return wxT("WM_NCRBUTTONDOWN");
5774 case 0x00A5: return wxT("WM_NCRBUTTONUP");
5775 case 0x00A6: return wxT("WM_NCRBUTTONDBLCLK");
5776 case 0x00A7: return wxT("WM_NCMBUTTONDOWN");
5777 case 0x00A8: return wxT("WM_NCMBUTTONUP");
5778 case 0x00A9: return wxT("WM_NCMBUTTONDBLCLK");
5779 case 0x0100: return wxT("WM_KEYDOWN");
5780 case 0x0101: return wxT("WM_KEYUP");
5781 case 0x0102: return wxT("WM_CHAR");
5782 case 0x0103: return wxT("WM_DEADCHAR");
5783 case 0x0104: return wxT("WM_SYSKEYDOWN");
5784 case 0x0105: return wxT("WM_SYSKEYUP");
5785 case 0x0106: return wxT("WM_SYSCHAR");
5786 case 0x0107: return wxT("WM_SYSDEADCHAR");
5787 case 0x0108: return wxT("WM_KEYLAST");
5788
5789 case 0x010D: return wxT("WM_IME_STARTCOMPOSITION");
5790 case 0x010E: return wxT("WM_IME_ENDCOMPOSITION");
5791 case 0x010F: return wxT("WM_IME_COMPOSITION");
5792
5793 case 0x0110: return wxT("WM_INITDIALOG");
5794 case 0x0111: return wxT("WM_COMMAND");
5795 case 0x0112: return wxT("WM_SYSCOMMAND");
5796 case 0x0113: return wxT("WM_TIMER");
5797 case 0x0114: return wxT("WM_HSCROLL");
5798 case 0x0115: return wxT("WM_VSCROLL");
5799 case 0x0116: return wxT("WM_INITMENU");
5800 case 0x0117: return wxT("WM_INITMENUPOPUP");
5801 case 0x011F: return wxT("WM_MENUSELECT");
5802 case 0x0120: return wxT("WM_MENUCHAR");
5803 case 0x0121: return wxT("WM_ENTERIDLE");
5804 case 0x0200: return wxT("WM_MOUSEMOVE");
5805 case 0x0201: return wxT("WM_LBUTTONDOWN");
5806 case 0x0202: return wxT("WM_LBUTTONUP");
5807 case 0x0203: return wxT("WM_LBUTTONDBLCLK");
5808 case 0x0204: return wxT("WM_RBUTTONDOWN");
5809 case 0x0205: return wxT("WM_RBUTTONUP");
5810 case 0x0206: return wxT("WM_RBUTTONDBLCLK");
5811 case 0x0207: return wxT("WM_MBUTTONDOWN");
5812 case 0x0208: return wxT("WM_MBUTTONUP");
5813 case 0x0209: return wxT("WM_MBUTTONDBLCLK");
5814 case 0x020A: return wxT("WM_MOUSEWHEEL");
5815 case 0x0210: return wxT("WM_PARENTNOTIFY");
5816 case 0x0211: return wxT("WM_ENTERMENULOOP");
5817 case 0x0212: return wxT("WM_EXITMENULOOP");
5818
5819 case 0x0213: return wxT("WM_NEXTMENU");
5820 case 0x0214: return wxT("WM_SIZING");
5821 case 0x0215: return wxT("WM_CAPTURECHANGED");
5822 case 0x0216: return wxT("WM_MOVING");
5823 case 0x0218: return wxT("WM_POWERBROADCAST");
5824 case 0x0219: return wxT("WM_DEVICECHANGE");
5825
5826 case 0x0220: return wxT("WM_MDICREATE");
5827 case 0x0221: return wxT("WM_MDIDESTROY");
5828 case 0x0222: return wxT("WM_MDIACTIVATE");
5829 case 0x0223: return wxT("WM_MDIRESTORE");
5830 case 0x0224: return wxT("WM_MDINEXT");
5831 case 0x0225: return wxT("WM_MDIMAXIMIZE");
5832 case 0x0226: return wxT("WM_MDITILE");
5833 case 0x0227: return wxT("WM_MDICASCADE");
5834 case 0x0228: return wxT("WM_MDIICONARRANGE");
5835 case 0x0229: return wxT("WM_MDIGETACTIVE");
5836 case 0x0230: return wxT("WM_MDISETMENU");
5837 case 0x0233: return wxT("WM_DROPFILES");
5838
5839 case 0x0281: return wxT("WM_IME_SETCONTEXT");
5840 case 0x0282: return wxT("WM_IME_NOTIFY");
5841 case 0x0283: return wxT("WM_IME_CONTROL");
5842 case 0x0284: return wxT("WM_IME_COMPOSITIONFULL");
5843 case 0x0285: return wxT("WM_IME_SELECT");
5844 case 0x0286: return wxT("WM_IME_CHAR");
5845 case 0x0290: return wxT("WM_IME_KEYDOWN");
5846 case 0x0291: return wxT("WM_IME_KEYUP");
5847
5848 case 0x0300: return wxT("WM_CUT");
5849 case 0x0301: return wxT("WM_COPY");
5850 case 0x0302: return wxT("WM_PASTE");
5851 case 0x0303: return wxT("WM_CLEAR");
5852 case 0x0304: return wxT("WM_UNDO");
5853 case 0x0305: return wxT("WM_RENDERFORMAT");
5854 case 0x0306: return wxT("WM_RENDERALLFORMATS");
5855 case 0x0307: return wxT("WM_DESTROYCLIPBOARD");
5856 case 0x0308: return wxT("WM_DRAWCLIPBOARD");
5857 case 0x0309: return wxT("WM_PAINTCLIPBOARD");
5858 case 0x030A: return wxT("WM_VSCROLLCLIPBOARD");
5859 case 0x030B: return wxT("WM_SIZECLIPBOARD");
5860 case 0x030C: return wxT("WM_ASKCBFORMATNAME");
5861 case 0x030D: return wxT("WM_CHANGECBCHAIN");
5862 case 0x030E: return wxT("WM_HSCROLLCLIPBOARD");
5863 case 0x030F: return wxT("WM_QUERYNEWPALETTE");
5864 case 0x0310: return wxT("WM_PALETTEISCHANGING");
5865 case 0x0311: return wxT("WM_PALETTECHANGED");
5866 #if wxUSE_HOTKEY
5867 case 0x0312: return wxT("WM_HOTKEY");
5868 #endif
5869
5870 // common controls messages - although they're not strictly speaking
5871 // standard, it's nice to decode them nevertheless
5872
5873 // listview
5874 case 0x1000 + 0: return wxT("LVM_GETBKCOLOR");
5875 case 0x1000 + 1: return wxT("LVM_SETBKCOLOR");
5876 case 0x1000 + 2: return wxT("LVM_GETIMAGELIST");
5877 case 0x1000 + 3: return wxT("LVM_SETIMAGELIST");
5878 case 0x1000 + 4: return wxT("LVM_GETITEMCOUNT");
5879 case 0x1000 + 5: return wxT("LVM_GETITEMA");
5880 case 0x1000 + 75: return wxT("LVM_GETITEMW");
5881 case 0x1000 + 6: return wxT("LVM_SETITEMA");
5882 case 0x1000 + 76: return wxT("LVM_SETITEMW");
5883 case 0x1000 + 7: return wxT("LVM_INSERTITEMA");
5884 case 0x1000 + 77: return wxT("LVM_INSERTITEMW");
5885 case 0x1000 + 8: return wxT("LVM_DELETEITEM");
5886 case 0x1000 + 9: return wxT("LVM_DELETEALLITEMS");
5887 case 0x1000 + 10: return wxT("LVM_GETCALLBACKMASK");
5888 case 0x1000 + 11: return wxT("LVM_SETCALLBACKMASK");
5889 case 0x1000 + 12: return wxT("LVM_GETNEXTITEM");
5890 case 0x1000 + 13: return wxT("LVM_FINDITEMA");
5891 case 0x1000 + 83: return wxT("LVM_FINDITEMW");
5892 case 0x1000 + 14: return wxT("LVM_GETITEMRECT");
5893 case 0x1000 + 15: return wxT("LVM_SETITEMPOSITION");
5894 case 0x1000 + 16: return wxT("LVM_GETITEMPOSITION");
5895 case 0x1000 + 17: return wxT("LVM_GETSTRINGWIDTHA");
5896 case 0x1000 + 87: return wxT("LVM_GETSTRINGWIDTHW");
5897 case 0x1000 + 18: return wxT("LVM_HITTEST");
5898 case 0x1000 + 19: return wxT("LVM_ENSUREVISIBLE");
5899 case 0x1000 + 20: return wxT("LVM_SCROLL");
5900 case 0x1000 + 21: return wxT("LVM_REDRAWITEMS");
5901 case 0x1000 + 22: return wxT("LVM_ARRANGE");
5902 case 0x1000 + 23: return wxT("LVM_EDITLABELA");
5903 case 0x1000 + 118: return wxT("LVM_EDITLABELW");
5904 case 0x1000 + 24: return wxT("LVM_GETEDITCONTROL");
5905 case 0x1000 + 25: return wxT("LVM_GETCOLUMNA");
5906 case 0x1000 + 95: return wxT("LVM_GETCOLUMNW");
5907 case 0x1000 + 26: return wxT("LVM_SETCOLUMNA");
5908 case 0x1000 + 96: return wxT("LVM_SETCOLUMNW");
5909 case 0x1000 + 27: return wxT("LVM_INSERTCOLUMNA");
5910 case 0x1000 + 97: return wxT("LVM_INSERTCOLUMNW");
5911 case 0x1000 + 28: return wxT("LVM_DELETECOLUMN");
5912 case 0x1000 + 29: return wxT("LVM_GETCOLUMNWIDTH");
5913 case 0x1000 + 30: return wxT("LVM_SETCOLUMNWIDTH");
5914 case 0x1000 + 31: return wxT("LVM_GETHEADER");
5915 case 0x1000 + 33: return wxT("LVM_CREATEDRAGIMAGE");
5916 case 0x1000 + 34: return wxT("LVM_GETVIEWRECT");
5917 case 0x1000 + 35: return wxT("LVM_GETTEXTCOLOR");
5918 case 0x1000 + 36: return wxT("LVM_SETTEXTCOLOR");
5919 case 0x1000 + 37: return wxT("LVM_GETTEXTBKCOLOR");
5920 case 0x1000 + 38: return wxT("LVM_SETTEXTBKCOLOR");
5921 case 0x1000 + 39: return wxT("LVM_GETTOPINDEX");
5922 case 0x1000 + 40: return wxT("LVM_GETCOUNTPERPAGE");
5923 case 0x1000 + 41: return wxT("LVM_GETORIGIN");
5924 case 0x1000 + 42: return wxT("LVM_UPDATE");
5925 case 0x1000 + 43: return wxT("LVM_SETITEMSTATE");
5926 case 0x1000 + 44: return wxT("LVM_GETITEMSTATE");
5927 case 0x1000 + 45: return wxT("LVM_GETITEMTEXTA");
5928 case 0x1000 + 115: return wxT("LVM_GETITEMTEXTW");
5929 case 0x1000 + 46: return wxT("LVM_SETITEMTEXTA");
5930 case 0x1000 + 116: return wxT("LVM_SETITEMTEXTW");
5931 case 0x1000 + 47: return wxT("LVM_SETITEMCOUNT");
5932 case 0x1000 + 48: return wxT("LVM_SORTITEMS");
5933 case 0x1000 + 49: return wxT("LVM_SETITEMPOSITION32");
5934 case 0x1000 + 50: return wxT("LVM_GETSELECTEDCOUNT");
5935 case 0x1000 + 51: return wxT("LVM_GETITEMSPACING");
5936 case 0x1000 + 52: return wxT("LVM_GETISEARCHSTRINGA");
5937 case 0x1000 + 117: return wxT("LVM_GETISEARCHSTRINGW");
5938 case 0x1000 + 53: return wxT("LVM_SETICONSPACING");
5939 case 0x1000 + 54: return wxT("LVM_SETEXTENDEDLISTVIEWSTYLE");
5940 case 0x1000 + 55: return wxT("LVM_GETEXTENDEDLISTVIEWSTYLE");
5941 case 0x1000 + 56: return wxT("LVM_GETSUBITEMRECT");
5942 case 0x1000 + 57: return wxT("LVM_SUBITEMHITTEST");
5943 case 0x1000 + 58: return wxT("LVM_SETCOLUMNORDERARRAY");
5944 case 0x1000 + 59: return wxT("LVM_GETCOLUMNORDERARRAY");
5945 case 0x1000 + 60: return wxT("LVM_SETHOTITEM");
5946 case 0x1000 + 61: return wxT("LVM_GETHOTITEM");
5947 case 0x1000 + 62: return wxT("LVM_SETHOTCURSOR");
5948 case 0x1000 + 63: return wxT("LVM_GETHOTCURSOR");
5949 case 0x1000 + 64: return wxT("LVM_APPROXIMATEVIEWRECT");
5950 case 0x1000 + 65: return wxT("LVM_SETWORKAREA");
5951
5952 // tree view
5953 case 0x1100 + 0: return wxT("TVM_INSERTITEMA");
5954 case 0x1100 + 50: return wxT("TVM_INSERTITEMW");
5955 case 0x1100 + 1: return wxT("TVM_DELETEITEM");
5956 case 0x1100 + 2: return wxT("TVM_EXPAND");
5957 case 0x1100 + 4: return wxT("TVM_GETITEMRECT");
5958 case 0x1100 + 5: return wxT("TVM_GETCOUNT");
5959 case 0x1100 + 6: return wxT("TVM_GETINDENT");
5960 case 0x1100 + 7: return wxT("TVM_SETINDENT");
5961 case 0x1100 + 8: return wxT("TVM_GETIMAGELIST");
5962 case 0x1100 + 9: return wxT("TVM_SETIMAGELIST");
5963 case 0x1100 + 10: return wxT("TVM_GETNEXTITEM");
5964 case 0x1100 + 11: return wxT("TVM_SELECTITEM");
5965 case 0x1100 + 12: return wxT("TVM_GETITEMA");
5966 case 0x1100 + 62: return wxT("TVM_GETITEMW");
5967 case 0x1100 + 13: return wxT("TVM_SETITEMA");
5968 case 0x1100 + 63: return wxT("TVM_SETITEMW");
5969 case 0x1100 + 14: return wxT("TVM_EDITLABELA");
5970 case 0x1100 + 65: return wxT("TVM_EDITLABELW");
5971 case 0x1100 + 15: return wxT("TVM_GETEDITCONTROL");
5972 case 0x1100 + 16: return wxT("TVM_GETVISIBLECOUNT");
5973 case 0x1100 + 17: return wxT("TVM_HITTEST");
5974 case 0x1100 + 18: return wxT("TVM_CREATEDRAGIMAGE");
5975 case 0x1100 + 19: return wxT("TVM_SORTCHILDREN");
5976 case 0x1100 + 20: return wxT("TVM_ENSUREVISIBLE");
5977 case 0x1100 + 21: return wxT("TVM_SORTCHILDRENCB");
5978 case 0x1100 + 22: return wxT("TVM_ENDEDITLABELNOW");
5979 case 0x1100 + 23: return wxT("TVM_GETISEARCHSTRINGA");
5980 case 0x1100 + 64: return wxT("TVM_GETISEARCHSTRINGW");
5981 case 0x1100 + 24: return wxT("TVM_SETTOOLTIPS");
5982 case 0x1100 + 25: return wxT("TVM_GETTOOLTIPS");
5983
5984 // header
5985 case 0x1200 + 0: return wxT("HDM_GETITEMCOUNT");
5986 case 0x1200 + 1: return wxT("HDM_INSERTITEMA");
5987 case 0x1200 + 10: return wxT("HDM_INSERTITEMW");
5988 case 0x1200 + 2: return wxT("HDM_DELETEITEM");
5989 case 0x1200 + 3: return wxT("HDM_GETITEMA");
5990 case 0x1200 + 11: return wxT("HDM_GETITEMW");
5991 case 0x1200 + 4: return wxT("HDM_SETITEMA");
5992 case 0x1200 + 12: return wxT("HDM_SETITEMW");
5993 case 0x1200 + 5: return wxT("HDM_LAYOUT");
5994 case 0x1200 + 6: return wxT("HDM_HITTEST");
5995 case 0x1200 + 7: return wxT("HDM_GETITEMRECT");
5996 case 0x1200 + 8: return wxT("HDM_SETIMAGELIST");
5997 case 0x1200 + 9: return wxT("HDM_GETIMAGELIST");
5998 case 0x1200 + 15: return wxT("HDM_ORDERTOINDEX");
5999 case 0x1200 + 16: return wxT("HDM_CREATEDRAGIMAGE");
6000 case 0x1200 + 17: return wxT("HDM_GETORDERARRAY");
6001 case 0x1200 + 18: return wxT("HDM_SETORDERARRAY");
6002 case 0x1200 + 19: return wxT("HDM_SETHOTDIVIDER");
6003
6004 // tab control
6005 case 0x1300 + 2: return wxT("TCM_GETIMAGELIST");
6006 case 0x1300 + 3: return wxT("TCM_SETIMAGELIST");
6007 case 0x1300 + 4: return wxT("TCM_GETITEMCOUNT");
6008 case 0x1300 + 5: return wxT("TCM_GETITEMA");
6009 case 0x1300 + 60: return wxT("TCM_GETITEMW");
6010 case 0x1300 + 6: return wxT("TCM_SETITEMA");
6011 case 0x1300 + 61: return wxT("TCM_SETITEMW");
6012 case 0x1300 + 7: return wxT("TCM_INSERTITEMA");
6013 case 0x1300 + 62: return wxT("TCM_INSERTITEMW");
6014 case 0x1300 + 8: return wxT("TCM_DELETEITEM");
6015 case 0x1300 + 9: return wxT("TCM_DELETEALLITEMS");
6016 case 0x1300 + 10: return wxT("TCM_GETITEMRECT");
6017 case 0x1300 + 11: return wxT("TCM_GETCURSEL");
6018 case 0x1300 + 12: return wxT("TCM_SETCURSEL");
6019 case 0x1300 + 13: return wxT("TCM_HITTEST");
6020 case 0x1300 + 14: return wxT("TCM_SETITEMEXTRA");
6021 case 0x1300 + 40: return wxT("TCM_ADJUSTRECT");
6022 case 0x1300 + 41: return wxT("TCM_SETITEMSIZE");
6023 case 0x1300 + 42: return wxT("TCM_REMOVEIMAGE");
6024 case 0x1300 + 43: return wxT("TCM_SETPADDING");
6025 case 0x1300 + 44: return wxT("TCM_GETROWCOUNT");
6026 case 0x1300 + 45: return wxT("TCM_GETTOOLTIPS");
6027 case 0x1300 + 46: return wxT("TCM_SETTOOLTIPS");
6028 case 0x1300 + 47: return wxT("TCM_GETCURFOCUS");
6029 case 0x1300 + 48: return wxT("TCM_SETCURFOCUS");
6030 case 0x1300 + 49: return wxT("TCM_SETMINTABWIDTH");
6031 case 0x1300 + 50: return wxT("TCM_DESELECTALL");
6032
6033 // toolbar
6034 case WM_USER+1: return wxT("TB_ENABLEBUTTON");
6035 case WM_USER+2: return wxT("TB_CHECKBUTTON");
6036 case WM_USER+3: return wxT("TB_PRESSBUTTON");
6037 case WM_USER+4: return wxT("TB_HIDEBUTTON");
6038 case WM_USER+5: return wxT("TB_INDETERMINATE");
6039 case WM_USER+9: return wxT("TB_ISBUTTONENABLED");
6040 case WM_USER+10: return wxT("TB_ISBUTTONCHECKED");
6041 case WM_USER+11: return wxT("TB_ISBUTTONPRESSED");
6042 case WM_USER+12: return wxT("TB_ISBUTTONHIDDEN");
6043 case WM_USER+13: return wxT("TB_ISBUTTONINDETERMINATE");
6044 case WM_USER+17: return wxT("TB_SETSTATE");
6045 case WM_USER+18: return wxT("TB_GETSTATE");
6046 case WM_USER+19: return wxT("TB_ADDBITMAP");
6047 case WM_USER+20: return wxT("TB_ADDBUTTONS");
6048 case WM_USER+21: return wxT("TB_INSERTBUTTON");
6049 case WM_USER+22: return wxT("TB_DELETEBUTTON");
6050 case WM_USER+23: return wxT("TB_GETBUTTON");
6051 case WM_USER+24: return wxT("TB_BUTTONCOUNT");
6052 case WM_USER+25: return wxT("TB_COMMANDTOINDEX");
6053 case WM_USER+26: return wxT("TB_SAVERESTOREA");
6054 case WM_USER+76: return wxT("TB_SAVERESTOREW");
6055 case WM_USER+27: return wxT("TB_CUSTOMIZE");
6056 case WM_USER+28: return wxT("TB_ADDSTRINGA");
6057 case WM_USER+77: return wxT("TB_ADDSTRINGW");
6058 case WM_USER+29: return wxT("TB_GETITEMRECT");
6059 case WM_USER+30: return wxT("TB_BUTTONSTRUCTSIZE");
6060 case WM_USER+31: return wxT("TB_SETBUTTONSIZE");
6061 case WM_USER+32: return wxT("TB_SETBITMAPSIZE");
6062 case WM_USER+33: return wxT("TB_AUTOSIZE");
6063 case WM_USER+35: return wxT("TB_GETTOOLTIPS");
6064 case WM_USER+36: return wxT("TB_SETTOOLTIPS");
6065 case WM_USER+37: return wxT("TB_SETPARENT");
6066 case WM_USER+39: return wxT("TB_SETROWS");
6067 case WM_USER+40: return wxT("TB_GETROWS");
6068 case WM_USER+42: return wxT("TB_SETCMDID");
6069 case WM_USER+43: return wxT("TB_CHANGEBITMAP");
6070 case WM_USER+44: return wxT("TB_GETBITMAP");
6071 case WM_USER+45: return wxT("TB_GETBUTTONTEXTA");
6072 case WM_USER+75: return wxT("TB_GETBUTTONTEXTW");
6073 case WM_USER+46: return wxT("TB_REPLACEBITMAP");
6074 case WM_USER+47: return wxT("TB_SETINDENT");
6075 case WM_USER+48: return wxT("TB_SETIMAGELIST");
6076 case WM_USER+49: return wxT("TB_GETIMAGELIST");
6077 case WM_USER+50: return wxT("TB_LOADIMAGES");
6078 case WM_USER+51: return wxT("TB_GETRECT");
6079 case WM_USER+52: return wxT("TB_SETHOTIMAGELIST");
6080 case WM_USER+53: return wxT("TB_GETHOTIMAGELIST");
6081 case WM_USER+54: return wxT("TB_SETDISABLEDIMAGELIST");
6082 case WM_USER+55: return wxT("TB_GETDISABLEDIMAGELIST");
6083 case WM_USER+56: return wxT("TB_SETSTYLE");
6084 case WM_USER+57: return wxT("TB_GETSTYLE");
6085 case WM_USER+58: return wxT("TB_GETBUTTONSIZE");
6086 case WM_USER+59: return wxT("TB_SETBUTTONWIDTH");
6087 case WM_USER+60: return wxT("TB_SETMAXTEXTROWS");
6088 case WM_USER+61: return wxT("TB_GETTEXTROWS");
6089 case WM_USER+41: return wxT("TB_GETBITMAPFLAGS");
6090
6091 default:
6092 static wxString s_szBuf;
6093 s_szBuf.Printf(wxT("<unknown message = %d>"), message);
6094 return s_szBuf.c_str();
6095 }
6096 }
6097 #endif //__WXDEBUG__
6098
6099 static TEXTMETRIC wxGetTextMetrics(const wxWindowMSW *win)
6100 {
6101 // prepare the DC
6102 TEXTMETRIC tm;
6103 HWND hwnd = GetHwndOf(win);
6104 HDC hdc = ::GetDC(hwnd);
6105
6106 #if !wxDIALOG_UNIT_COMPATIBILITY
6107 // and select the current font into it
6108 HFONT hfont = GetHfontOf(win->GetFont());
6109 if ( hfont )
6110 {
6111 hfont = (HFONT)::SelectObject(hdc, hfont);
6112 }
6113 #endif
6114
6115 // finally retrieve the text metrics from it
6116 GetTextMetrics(hdc, &tm);
6117
6118 #if !wxDIALOG_UNIT_COMPATIBILITY
6119 // and clean up
6120 if ( hfont )
6121 {
6122 (void)::SelectObject(hdc, hfont);
6123 }
6124 #endif
6125
6126 ::ReleaseDC(hwnd, hdc);
6127
6128 return tm;
6129 }
6130
6131 // Find the wxWindow at the current mouse position, returning the mouse
6132 // position.
6133 wxWindow* wxFindWindowAtPointer(wxPoint& pt)
6134 {
6135 pt = wxGetMousePosition();
6136 return wxFindWindowAtPoint(pt);
6137 }
6138
6139 wxWindow* wxFindWindowAtPoint(const wxPoint& pt)
6140 {
6141 POINT pt2;
6142 pt2.x = pt.x;
6143 pt2.y = pt.y;
6144 HWND hWndHit = ::WindowFromPoint(pt2);
6145
6146 wxWindow* win = wxFindWinFromHandle((WXHWND) hWndHit) ;
6147 HWND hWnd = hWndHit;
6148
6149 // Try to find a window with a wxWindow associated with it
6150 while (!win && (hWnd != 0))
6151 {
6152 hWnd = ::GetParent(hWnd);
6153 win = wxFindWinFromHandle((WXHWND) hWnd) ;
6154 }
6155 return win;
6156 }
6157
6158 // Get the current mouse position.
6159 wxPoint wxGetMousePosition()
6160 {
6161 POINT pt;
6162 #ifdef __WXWINCE__
6163 GetCursorPosWinCE(&pt);
6164 #else
6165 GetCursorPos( & pt );
6166 #endif
6167
6168 return wxPoint(pt.x, pt.y);
6169 }
6170
6171 #if wxUSE_HOTKEY
6172
6173 #if defined(__SMARTPHONE__) || defined(__POCKETPC__)
6174 static void WinCEUnregisterHotKey(int modifiers, int id)
6175 {
6176 // Register hotkeys for the hardware buttons
6177 HINSTANCE hCoreDll;
6178 typedef BOOL (WINAPI *UnregisterFunc1Proc)(UINT, UINT);
6179
6180 UnregisterFunc1Proc procUnregisterFunc;
6181 hCoreDll = LoadLibrary(_T("coredll.dll"));
6182 if (hCoreDll)
6183 {
6184 procUnregisterFunc = (UnregisterFunc1Proc)GetProcAddress(hCoreDll, _T("UnregisterFunc1"));
6185 if (procUnregisterFunc)
6186 procUnregisterFunc(modifiers, id);
6187 FreeLibrary(hCoreDll);
6188 }
6189 }
6190 #endif
6191
6192 bool wxWindowMSW::RegisterHotKey(int hotkeyId, int modifiers, int keycode)
6193 {
6194 UINT win_modifiers=0;
6195 if ( modifiers & wxMOD_ALT )
6196 win_modifiers |= MOD_ALT;
6197 if ( modifiers & wxMOD_SHIFT )
6198 win_modifiers |= MOD_SHIFT;
6199 if ( modifiers & wxMOD_CONTROL )
6200 win_modifiers |= MOD_CONTROL;
6201 if ( modifiers & wxMOD_WIN )
6202 win_modifiers |= MOD_WIN;
6203
6204 #if defined(__SMARTPHONE__) || defined(__POCKETPC__)
6205 // Required for PPC and Smartphone hardware buttons
6206 if (keycode >= WXK_SPECIAL1 && keycode <= WXK_SPECIAL20)
6207 WinCEUnregisterHotKey(win_modifiers, hotkeyId);
6208 #endif
6209
6210 if ( !::RegisterHotKey(GetHwnd(), hotkeyId, win_modifiers, keycode) )
6211 {
6212 wxLogLastError(_T("RegisterHotKey"));
6213
6214 return false;
6215 }
6216
6217 return true;
6218 }
6219
6220 bool wxWindowMSW::UnregisterHotKey(int hotkeyId)
6221 {
6222 #if defined(__SMARTPHONE__) || defined(__POCKETPC__)
6223 WinCEUnregisterHotKey(MOD_WIN, hotkeyId);
6224 #endif
6225
6226 if ( !::UnregisterHotKey(GetHwnd(), hotkeyId) )
6227 {
6228 wxLogLastError(_T("UnregisterHotKey"));
6229
6230 return false;
6231 }
6232
6233 return true;
6234 }
6235
6236 #if wxUSE_ACCEL
6237
6238 bool wxWindowMSW::HandleHotKey(WXWPARAM wParam, WXLPARAM lParam)
6239 {
6240 int hotkeyId = wParam;
6241 int virtualKey = HIWORD(lParam);
6242 int win_modifiers = LOWORD(lParam);
6243
6244 wxKeyEvent event(CreateKeyEvent(wxEVT_HOTKEY, virtualKey, wParam, lParam));
6245 event.SetId(hotkeyId);
6246 event.m_shiftDown = (win_modifiers & MOD_SHIFT) != 0;
6247 event.m_controlDown = (win_modifiers & MOD_CONTROL) != 0;
6248 event.m_altDown = (win_modifiers & MOD_ALT) != 0;
6249 event.m_metaDown = (win_modifiers & MOD_WIN) != 0;
6250
6251 return GetEventHandler()->ProcessEvent(event);
6252 }
6253
6254 #endif // wxUSE_ACCEL
6255
6256 #endif // wxUSE_HOTKEY
6257
6258 // Not tested under WinCE
6259 #ifndef __WXWINCE__
6260
6261 // this class installs a message hook which really wakes up our idle processing
6262 // each time a WM_NULL is received (wxWakeUpIdle does this), even if we're
6263 // sitting inside a local modal loop (e.g. a menu is opened or scrollbar is
6264 // being dragged or even inside ::MessageBox()) and so don't control message
6265 // dispatching otherwise
6266 class wxIdleWakeUpModule : public wxModule
6267 {
6268 public:
6269 virtual bool OnInit()
6270 {
6271 ms_hMsgHookProc = ::SetWindowsHookEx
6272 (
6273 WH_GETMESSAGE,
6274 &wxIdleWakeUpModule::MsgHookProc,
6275 NULL,
6276 GetCurrentThreadId()
6277 );
6278
6279 if ( !ms_hMsgHookProc )
6280 {
6281 wxLogLastError(_T("SetWindowsHookEx(WH_GETMESSAGE)"));
6282
6283 return false;
6284 }
6285
6286 return true;
6287 }
6288
6289 virtual void OnExit()
6290 {
6291 ::UnhookWindowsHookEx(wxIdleWakeUpModule::ms_hMsgHookProc);
6292 }
6293
6294 static LRESULT CALLBACK MsgHookProc(int nCode, WPARAM wParam, LPARAM lParam)
6295 {
6296 MSG *msg = (MSG*)lParam;
6297
6298 // only process the message if it is actually going to be removed from
6299 // the message queue, this prevents that the same event from being
6300 // processed multiple times if now someone just called PeekMessage()
6301 if ( msg->message == WM_NULL && wParam == PM_REMOVE )
6302 {
6303 wxTheApp->ProcessPendingEvents();
6304 }
6305
6306 return CallNextHookEx(ms_hMsgHookProc, nCode, wParam, lParam);
6307 };
6308
6309 private:
6310 static HHOOK ms_hMsgHookProc;
6311
6312 DECLARE_DYNAMIC_CLASS(wxIdleWakeUpModule)
6313 };
6314
6315 HHOOK wxIdleWakeUpModule::ms_hMsgHookProc = 0;
6316
6317 IMPLEMENT_DYNAMIC_CLASS(wxIdleWakeUpModule, wxModule)
6318
6319 #endif // __WXWINCE__
6320
6321 #ifdef __WXWINCE__
6322
6323 #if wxUSE_STATBOX
6324 static void wxAdjustZOrder(wxWindow* parent)
6325 {
6326 if (parent->IsKindOf(CLASSINFO(wxStaticBox)))
6327 {
6328 // Set the z-order correctly
6329 SetWindowPos((HWND) parent->GetHWND(), HWND_BOTTOM, 0, 0, 0, 0, SWP_NOMOVE|SWP_NOSIZE);
6330 }
6331
6332 wxWindowList::compatibility_iterator current = parent->GetChildren().GetFirst();
6333 while (current)
6334 {
6335 wxWindow *childWin = current->GetData();
6336 wxAdjustZOrder(childWin);
6337 current = current->GetNext();
6338 }
6339 }
6340 #endif
6341
6342 // We need to adjust the z-order of static boxes in WinCE, to
6343 // make 'contained' controls visible
6344 void wxWindowMSW::OnInitDialog( wxInitDialogEvent& event )
6345 {
6346 #if wxUSE_STATBOX
6347 wxAdjustZOrder(this);
6348 #endif
6349
6350 event.Skip();
6351 }
6352 #endif