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