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