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