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