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