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