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