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