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