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