]> 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
Unicode compilation fix
[wxWidgets.git] / src / msw / window.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/msw/windows.cpp
3 // Purpose: wxWindow
4 // Author: Julian Smart
5 // Modified by: VZ on 13.05.99: no more Default(), MSWOnXXX() reorganisation
6 // Created: 04/01/98
7 // RCS-ID: $Id$
8 // Copyright: (c) Julian Smart
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 // ===========================================================================
13 // declarations
14 // ===========================================================================
15
16 // ---------------------------------------------------------------------------
17 // headers
18 // ---------------------------------------------------------------------------
19
20 #ifdef __GNUG__
21 #pragma implementation "window.h"
22 #endif
23
24 // For compilers that support precompilation, includes "wx.h".
25 #include "wx/wxprec.h"
26
27 #ifdef __BORLANDC__
28 #pragma hdrstop
29 #endif
30
31 #ifndef WX_PRECOMP
32 #include <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 SendDestroyEvent();
3329
3330 // delete our drop target if we've got one
3331 #if wxUSE_DRAG_AND_DROP
3332 if ( m_dropTarget != NULL )
3333 {
3334 m_dropTarget->Revoke(m_hWnd);
3335
3336 delete m_dropTarget;
3337 m_dropTarget = NULL;
3338 }
3339 #endif // wxUSE_DRAG_AND_DROP
3340
3341 // WM_DESTROY handled
3342 return TRUE;
3343 }
3344
3345 // ---------------------------------------------------------------------------
3346 // activation/focus
3347 // ---------------------------------------------------------------------------
3348
3349 bool wxWindowMSW::HandleActivate(int state,
3350 bool WXUNUSED(minimized),
3351 WXHWND WXUNUSED(activate))
3352 {
3353 wxActivateEvent event(wxEVT_ACTIVATE,
3354 (state == WA_ACTIVE) || (state == WA_CLICKACTIVE),
3355 m_windowId);
3356 event.SetEventObject(this);
3357
3358 return GetEventHandler()->ProcessEvent(event);
3359 }
3360
3361 bool wxWindowMSW::HandleSetFocus(WXHWND hwnd)
3362 {
3363 // notify the parent keeping track of focus for the kbd navigation
3364 // purposes that we got it
3365 wxChildFocusEvent eventFocus((wxWindow *)this);
3366 (void)GetEventHandler()->ProcessEvent(eventFocus);
3367
3368 #if wxUSE_CARET
3369 // Deal with caret
3370 if ( m_caret )
3371 {
3372 m_caret->OnSetFocus();
3373 }
3374 #endif // wxUSE_CARET
3375
3376 #if wxUSE_TEXTCTRL
3377 // If it's a wxTextCtrl don't send the event as it will be done
3378 // after the control gets to process it from EN_FOCUS handler
3379 if ( wxDynamicCastThis(wxTextCtrl) )
3380 {
3381 return FALSE;
3382 }
3383 #endif // wxUSE_TEXTCTRL
3384
3385 wxFocusEvent event(wxEVT_SET_FOCUS, m_windowId);
3386 event.SetEventObject(this);
3387
3388 // wxFindWinFromHandle() may return NULL, it is ok
3389 event.SetWindow(wxFindWinFromHandle(hwnd));
3390
3391 return GetEventHandler()->ProcessEvent(event);
3392 }
3393
3394 bool wxWindowMSW::HandleKillFocus(WXHWND hwnd)
3395 {
3396 #if wxUSE_CARET
3397 // Deal with caret
3398 if ( m_caret )
3399 {
3400 m_caret->OnKillFocus();
3401 }
3402 #endif // wxUSE_CARET
3403
3404 #if wxUSE_TEXTCTRL
3405 // If it's a wxTextCtrl don't send the event as it will be done
3406 // after the control gets to process it.
3407 wxTextCtrl *ctrl = wxDynamicCastThis(wxTextCtrl);
3408 if ( ctrl )
3409 {
3410 return FALSE;
3411 }
3412 #endif
3413
3414 // Don't send the event when in the process of being deleted. This can
3415 // only cause problems if the event handler tries to access the object.
3416 if ( m_isBeingDeleted )
3417 {
3418 return FALSE;
3419 }
3420
3421 wxFocusEvent event(wxEVT_KILL_FOCUS, m_windowId);
3422 event.SetEventObject(this);
3423
3424 // wxFindWinFromHandle() may return NULL, it is ok
3425 event.SetWindow(wxFindWinFromHandle(hwnd));
3426
3427 return GetEventHandler()->ProcessEvent(event);
3428 }
3429
3430 // ---------------------------------------------------------------------------
3431 // miscellaneous
3432 // ---------------------------------------------------------------------------
3433
3434 bool wxWindowMSW::HandleShow(bool show, int WXUNUSED(status))
3435 {
3436 wxShowEvent event(GetId(), show);
3437 event.m_eventObject = this;
3438
3439 return GetEventHandler()->ProcessEvent(event);
3440 }
3441
3442 bool wxWindowMSW::HandleInitDialog(WXHWND WXUNUSED(hWndFocus))
3443 {
3444 wxInitDialogEvent event(GetId());
3445 event.m_eventObject = this;
3446
3447 return GetEventHandler()->ProcessEvent(event);
3448 }
3449
3450 bool wxWindowMSW::HandleDropFiles(WXWPARAM wParam)
3451 {
3452 #ifndef __WXMICROWIN__
3453 HDROP hFilesInfo = (HDROP) wParam;
3454
3455 // Get the total number of files dropped
3456 UINT gwFilesDropped = ::DragQueryFile
3457 (
3458 (HDROP)hFilesInfo,
3459 (UINT)-1,
3460 (LPTSTR)0,
3461 (UINT)0
3462 );
3463
3464 wxString *files = new wxString[gwFilesDropped];
3465 for ( UINT wIndex = 0; wIndex < gwFilesDropped; wIndex++ )
3466 {
3467 // first get the needed buffer length (+1 for terminating NUL)
3468 size_t len = ::DragQueryFile(hFilesInfo, wIndex, NULL, 0) + 1;
3469
3470 // and now get the file name
3471 ::DragQueryFile(hFilesInfo, wIndex,
3472 files[wIndex].GetWriteBuf(len), len);
3473
3474 files[wIndex].UngetWriteBuf();
3475 }
3476 DragFinish (hFilesInfo);
3477
3478 wxDropFilesEvent event(wxEVT_DROP_FILES, gwFilesDropped, files);
3479 event.m_eventObject = this;
3480
3481 POINT dropPoint;
3482 DragQueryPoint(hFilesInfo, (LPPOINT) &dropPoint);
3483 event.m_pos.x = dropPoint.x;
3484 event.m_pos.y = dropPoint.y;
3485
3486 return GetEventHandler()->ProcessEvent(event);
3487 #else // __WXMICROWIN__
3488 return FALSE;
3489 #endif
3490 }
3491
3492 bool wxWindowMSW::HandleSetCursor(WXHWND WXUNUSED(hWnd),
3493 short nHitTest,
3494 int WXUNUSED(mouseMsg))
3495 {
3496 #ifndef __WXMICROWIN__
3497 // the logic is as follows:
3498 // -1. don't set cursor for non client area, including but not limited to
3499 // the title bar, scrollbars, &c
3500 // 0. allow the user to override default behaviour by using EVT_SET_CURSOR
3501 // 1. if we have the cursor set it unless wxIsBusy()
3502 // 2. if we're a top level window, set some cursor anyhow
3503 // 3. if wxIsBusy(), set the busy cursor, otherwise the global one
3504
3505 if ( nHitTest != HTCLIENT )
3506 {
3507 return FALSE;
3508 }
3509
3510 HCURSOR hcursor = 0;
3511
3512 // first ask the user code - it may wish to set the cursor in some very
3513 // specific way (for example, depending on the current position)
3514 POINT pt;
3515 #ifdef __WIN32__
3516 if ( !::GetCursorPos(&pt) )
3517 {
3518 wxLogLastError(wxT("GetCursorPos"));
3519 }
3520 #else
3521 // In WIN16 it doesn't return a value.
3522 ::GetCursorPos(&pt);
3523 #endif
3524
3525 int x = pt.x,
3526 y = pt.y;
3527 ScreenToClient(&x, &y);
3528 wxSetCursorEvent event(x, y);
3529
3530 bool processedEvtSetCursor = GetEventHandler()->ProcessEvent(event);
3531 if ( processedEvtSetCursor && event.HasCursor() )
3532 {
3533 hcursor = GetHcursorOf(event.GetCursor());
3534 }
3535
3536 if ( !hcursor )
3537 {
3538 bool isBusy = wxIsBusy();
3539
3540 // the test for processedEvtSetCursor is here to prevent using m_cursor
3541 // if the user code caught EVT_SET_CURSOR() and returned nothing from
3542 // it - this is a way to say that our cursor shouldn't be used for this
3543 // point
3544 if ( !processedEvtSetCursor && m_cursor.Ok() )
3545 {
3546 hcursor = GetHcursorOf(m_cursor);
3547 }
3548
3549 if ( !GetParent() )
3550 {
3551 if ( isBusy )
3552 {
3553 hcursor = wxGetCurrentBusyCursor();
3554 }
3555 else if ( !hcursor )
3556 {
3557 const wxCursor *cursor = wxGetGlobalCursor();
3558 if ( cursor && cursor->Ok() )
3559 {
3560 hcursor = GetHcursorOf(*cursor);
3561 }
3562 }
3563 }
3564 }
3565
3566 if ( hcursor )
3567 {
3568 // wxLogDebug("HandleSetCursor: Setting cursor %ld", (long) hcursor);
3569
3570 ::SetCursor(hcursor);
3571
3572 // cursor set, stop here
3573 return TRUE;
3574 }
3575 #endif // __WXMICROWIN__
3576
3577 // pass up the window chain
3578 return FALSE;
3579 }
3580
3581 // ---------------------------------------------------------------------------
3582 // owner drawn stuff
3583 // ---------------------------------------------------------------------------
3584
3585 bool wxWindowMSW::MSWOnDrawItem(int id, WXDRAWITEMSTRUCT *itemStruct)
3586 {
3587 #if wxUSE_OWNER_DRAWN
3588
3589 #if wxUSE_MENUS_NATIVE
3590 // is it a menu item?
3591 DRAWITEMSTRUCT *pDrawStruct = (DRAWITEMSTRUCT *)itemStruct;
3592 if ( id == 0 && pDrawStruct->CtlType == ODT_MENU )
3593 {
3594 wxMenuItem *pMenuItem = (wxMenuItem *)(pDrawStruct->itemData);
3595
3596 wxCHECK( pMenuItem->IsKindOf(CLASSINFO(wxMenuItem)), FALSE );
3597
3598 // prepare to call OnDrawItem(): notice using of wxDCTemp to prevent
3599 // the DC from being released
3600 wxDCTemp dc((WXHDC)pDrawStruct->hDC);
3601 wxRect rect(pDrawStruct->rcItem.left, pDrawStruct->rcItem.top,
3602 pDrawStruct->rcItem.right - pDrawStruct->rcItem.left,
3603 pDrawStruct->rcItem.bottom - pDrawStruct->rcItem.top);
3604
3605 return pMenuItem->OnDrawItem
3606 (
3607 dc,
3608 rect,
3609 (wxOwnerDrawn::wxODAction)pDrawStruct->itemAction,
3610 (wxOwnerDrawn::wxODStatus)pDrawStruct->itemState
3611 );
3612 }
3613 #endif // wxUSE_MENUS_NATIVE
3614
3615 #if wxUSE_CONTROLS
3616 wxWindow *item = FindItem(id);
3617 if ( item && item->IsKindOf(CLASSINFO(wxControl)) )
3618 {
3619 return ((wxControl *)item)->MSWOnDraw(itemStruct);
3620 }
3621 #endif // wxUSE_CONTROLS
3622
3623 #endif // USE_OWNER_DRAWN
3624
3625 return FALSE;
3626 }
3627
3628 bool wxWindowMSW::MSWOnMeasureItem(int id, WXMEASUREITEMSTRUCT *itemStruct)
3629 {
3630 #if wxUSE_OWNER_DRAWN
3631 // is it a menu item?
3632 MEASUREITEMSTRUCT *pMeasureStruct = (MEASUREITEMSTRUCT *)itemStruct;
3633 if ( id == 0 && pMeasureStruct->CtlType == ODT_MENU )
3634 {
3635 wxMenuItem *pMenuItem = (wxMenuItem *)(pMeasureStruct->itemData);
3636
3637 wxCHECK( pMenuItem->IsKindOf(CLASSINFO(wxMenuItem)), FALSE );
3638
3639 return pMenuItem->OnMeasureItem(&pMeasureStruct->itemWidth,
3640 &pMeasureStruct->itemHeight);
3641 }
3642
3643 wxWindow *item = FindItem(id);
3644 if ( item && item->IsKindOf(CLASSINFO(wxControl)) )
3645 {
3646 return ((wxControl *)item)->MSWOnMeasure(itemStruct);
3647 }
3648 #endif // owner-drawn menus
3649 return FALSE;
3650 }
3651
3652 // ---------------------------------------------------------------------------
3653 // colours and palettes
3654 // ---------------------------------------------------------------------------
3655
3656 bool wxWindowMSW::HandleSysColorChange()
3657 {
3658 wxSysColourChangedEvent event;
3659 event.SetEventObject(this);
3660
3661 (void)GetEventHandler()->ProcessEvent(event);
3662
3663 // always let the system carry on the default processing to allow the
3664 // native controls to react to the colours update
3665 return FALSE;
3666 }
3667
3668 bool wxWindowMSW::HandleDisplayChange()
3669 {
3670 wxDisplayChangedEvent event;
3671 event.SetEventObject(this);
3672
3673 return GetEventHandler()->ProcessEvent(event);
3674 }
3675
3676 bool wxWindowMSW::HandleCtlColor(WXHBRUSH *brush,
3677 WXHDC pDC,
3678 WXHWND pWnd,
3679 WXUINT nCtlColor,
3680 WXUINT message,
3681 WXWPARAM wParam,
3682 WXLPARAM lParam)
3683 {
3684 #ifndef __WXMICROWIN__
3685 WXHBRUSH hBrush = 0;
3686
3687 if ( nCtlColor == CTLCOLOR_DLG )
3688 {
3689 hBrush = OnCtlColor(pDC, pWnd, nCtlColor, message, wParam, lParam);
3690 }
3691 #if wxUSE_CONTROLS
3692 else
3693 {
3694 wxControl *item = (wxControl *)FindItemByHWND(pWnd, TRUE);
3695 if ( item )
3696 hBrush = item->OnCtlColor(pDC, pWnd, nCtlColor, message, wParam, lParam);
3697 }
3698 #endif // wxUSE_CONTROLS
3699
3700 if ( hBrush )
3701 *brush = hBrush;
3702
3703 return hBrush != 0;
3704 #else // __WXMICROWIN__
3705 return FALSE;
3706 #endif
3707 }
3708
3709 // Define for each class of dialog and control
3710 WXHBRUSH wxWindowMSW::OnCtlColor(WXHDC WXUNUSED(hDC),
3711 WXHWND WXUNUSED(hWnd),
3712 WXUINT WXUNUSED(nCtlColor),
3713 WXUINT WXUNUSED(message),
3714 WXWPARAM WXUNUSED(wParam),
3715 WXLPARAM WXUNUSED(lParam))
3716 {
3717 return (WXHBRUSH)0;
3718 }
3719
3720 bool wxWindowMSW::HandlePaletteChanged(WXHWND hWndPalChange)
3721 {
3722 #if wxUSE_PALETTE
3723 // same as below except we don't respond to our own messages
3724 if ( hWndPalChange != GetHWND() )
3725 {
3726 // check to see if we our our parents have a custom palette
3727 wxWindowMSW *win = this;
3728 while ( win && !win->HasCustomPalette() )
3729 {
3730 win = win->GetParent();
3731 }
3732
3733 if ( win && win->HasCustomPalette() )
3734 {
3735 // realize the palette to see whether redrawing is needed
3736 HDC hdc = ::GetDC((HWND) hWndPalChange);
3737 win->m_palette.SetHPALETTE((WXHPALETTE)
3738 ::SelectPalette(hdc, GetHpaletteOf(win->m_palette), FALSE));
3739
3740 int result = ::RealizePalette(hdc);
3741
3742 // restore the palette (before releasing the DC)
3743 win->m_palette.SetHPALETTE((WXHPALETTE)
3744 ::SelectPalette(hdc, GetHpaletteOf(win->m_palette), FALSE));
3745 ::RealizePalette(hdc);
3746 ::ReleaseDC((HWND) hWndPalChange, hdc);
3747
3748 // now check for the need to redraw
3749 if (result > 0)
3750 InvalidateRect((HWND) hWndPalChange, NULL, TRUE);
3751 }
3752
3753 }
3754 #endif // wxUSE_PALETTE
3755
3756 wxPaletteChangedEvent event(GetId());
3757 event.SetEventObject(this);
3758 event.SetChangedWindow(wxFindWinFromHandle(hWndPalChange));
3759
3760 return GetEventHandler()->ProcessEvent(event);
3761 }
3762
3763 bool wxWindowMSW::HandleCaptureChanged(WXHWND hWndGainedCapture)
3764 {
3765 wxMouseCaptureChangedEvent event(GetId(), wxFindWinFromHandle(hWndGainedCapture));
3766 event.SetEventObject(this);
3767
3768 return GetEventHandler()->ProcessEvent(event);
3769 }
3770
3771 bool wxWindowMSW::HandleQueryNewPalette()
3772 {
3773
3774 #if wxUSE_PALETTE
3775 // check to see if we our our parents have a custom palette
3776 wxWindowMSW *win = this;
3777 while (!win->HasCustomPalette() && win->GetParent()) win = win->GetParent();
3778 if (win->HasCustomPalette()) {
3779 /* realize the palette to see whether redrawing is needed */
3780 HDC hdc = GetDC((HWND) GetHWND());
3781 win->m_palette.SetHPALETTE( (WXHPALETTE)
3782 ::SelectPalette(hdc, (HPALETTE) win->m_palette.GetHPALETTE(), FALSE) );
3783
3784 int result = ::RealizePalette(hdc);
3785 /* restore the palette (before releasing the DC) */
3786 win->m_palette.SetHPALETTE( (WXHPALETTE)
3787 ::SelectPalette(hdc, (HPALETTE) win->m_palette.GetHPALETTE(), TRUE) );
3788 ::RealizePalette(hdc);
3789 ::ReleaseDC((HWND) GetHWND(), hdc);
3790 /* now check for the need to redraw */
3791 if (result > 0)
3792 ::InvalidateRect((HWND) GetHWND(), NULL, TRUE);
3793 }
3794 #endif // wxUSE_PALETTE
3795
3796 wxQueryNewPaletteEvent event(GetId());
3797 event.SetEventObject(this);
3798
3799 return GetEventHandler()->ProcessEvent(event) && event.GetPaletteRealized();
3800 }
3801
3802 // Responds to colour changes: passes event on to children.
3803 void wxWindowMSW::OnSysColourChanged(wxSysColourChangedEvent& WXUNUSED(event))
3804 {
3805 // the top level window also reset the standard colour map as it might have
3806 // changed (there is no need to do it for the non top level windows as we
3807 // only have to do it once)
3808 if ( IsTopLevel() )
3809 {
3810 // FIXME-MT
3811 gs_hasStdCmap = FALSE;
3812 }
3813 wxWindowList::Node *node = GetChildren().GetFirst();
3814 while ( node )
3815 {
3816 // Only propagate to non-top-level windows because Windows already
3817 // sends this event to all top-level ones
3818 wxWindow *win = node->GetData();
3819 if ( !win->IsTopLevel() )
3820 {
3821 // we need to send the real WM_SYSCOLORCHANGE and not just trigger
3822 // EVT_SYS_COLOUR_CHANGED call because the latter wouldn't work for
3823 // the standard controls
3824 ::SendMessage(GetHwndOf(win), WM_SYSCOLORCHANGE, 0, 0);
3825 }
3826
3827 node = node->GetNext();
3828 }
3829
3830 // update the colours we use if they were not set explicitly by the user:
3831 // this must be done or OnCtlColor() would continue to use the old colours
3832 if ( !m_hasFgCol )
3833 {
3834 m_foregroundColour = wxSystemSettings::
3835 GetSystemColour(wxSYS_COLOUR_WINDOWTEXT);
3836 }
3837
3838 if ( !m_hasBgCol )
3839 {
3840 m_backgroundColour = wxSystemSettings::
3841 GetSystemColour(wxSYS_COLOUR_BTNFACE);
3842 }
3843 }
3844
3845 extern wxCOLORMAP *wxGetStdColourMap()
3846 {
3847 static COLORREF s_stdColours[wxSTD_COL_MAX];
3848 static wxCOLORMAP s_cmap[wxSTD_COL_MAX];
3849
3850 if ( !gs_hasStdCmap )
3851 {
3852 static bool s_coloursInit = FALSE;
3853
3854 if ( !s_coloursInit )
3855 {
3856 // When a bitmap is loaded, the RGB values can change (apparently
3857 // because Windows adjusts them to care for the old programs always
3858 // using 0xc0c0c0 while the transparent colour for the new Windows
3859 // versions is different). But we do this adjustment ourselves so
3860 // we want to avoid Windows' "help" and for this we need to have a
3861 // reference bitmap which can tell us what the RGB values change
3862 // to.
3863 wxBitmap stdColourBitmap(_T("wxBITMAP_STD_COLOURS"));
3864 if ( stdColourBitmap.Ok() )
3865 {
3866 // the pixels in the bitmap must correspond to wxSTD_COL_XXX!
3867 wxASSERT_MSG( stdColourBitmap.GetWidth() == wxSTD_COL_MAX,
3868 _T("forgot to update wxBITMAP_STD_COLOURS!") );
3869
3870 wxMemoryDC memDC;
3871 memDC.SelectObject(stdColourBitmap);
3872
3873 wxColour colour;
3874 for ( size_t i = 0; i < WXSIZEOF(s_stdColours); i++ )
3875 {
3876 memDC.GetPixel(i, 0, &colour);
3877 s_stdColours[i] = wxColourToRGB(colour);
3878 }
3879 }
3880 else // wxBITMAP_STD_COLOURS couldn't be loaded
3881 {
3882 s_stdColours[0] = RGB(000,000,000); // black
3883 s_stdColours[1] = RGB(128,128,128); // dark grey
3884 s_stdColours[2] = RGB(192,192,192); // light grey
3885 s_stdColours[3] = RGB(255,255,255); // white
3886 //s_stdColours[4] = RGB(000,000,255); // blue
3887 //s_stdColours[5] = RGB(255,000,255); // magenta
3888 }
3889
3890 s_coloursInit = TRUE;
3891 }
3892
3893 gs_hasStdCmap = TRUE;
3894
3895 // create the colour map
3896 #define INIT_CMAP_ENTRY(col) \
3897 s_cmap[wxSTD_COL_##col].from = s_stdColours[wxSTD_COL_##col]; \
3898 s_cmap[wxSTD_COL_##col].to = ::GetSysColor(COLOR_##col)
3899
3900 INIT_CMAP_ENTRY(BTNTEXT);
3901 INIT_CMAP_ENTRY(BTNSHADOW);
3902 INIT_CMAP_ENTRY(BTNFACE);
3903 INIT_CMAP_ENTRY(BTNHIGHLIGHT);
3904
3905 #undef INIT_CMAP_ENTRY
3906 }
3907
3908 return s_cmap;
3909 }
3910
3911 // ---------------------------------------------------------------------------
3912 // painting
3913 // ---------------------------------------------------------------------------
3914
3915 bool wxWindowMSW::HandlePaint()
3916 {
3917 #ifdef __WIN32__
3918 HRGN hRegion = ::CreateRectRgn(0, 0, 0, 0); // Dummy call to get a handle
3919 if ( !hRegion )
3920 wxLogLastError(wxT("CreateRectRgn"));
3921 if ( ::GetUpdateRgn(GetHwnd(), hRegion, FALSE) == ERROR )
3922 wxLogLastError(wxT("GetUpdateRgn"));
3923
3924 m_updateRegion = wxRegion((WXHRGN) hRegion);
3925 #else // Win16
3926 RECT updateRect;
3927 ::GetUpdateRect(GetHwnd(), &updateRect, FALSE);
3928
3929 m_updateRegion = wxRegion(updateRect.left, updateRect.top,
3930 updateRect.right - updateRect.left,
3931 updateRect.bottom - updateRect.top);
3932 #endif // Win32/16
3933
3934 wxPaintEvent event(m_windowId);
3935 event.SetEventObject(this);
3936
3937 bool processed = GetEventHandler()->ProcessEvent(event);
3938
3939 // note that we must generate NC event after the normal one as otherwise
3940 // BeginPaint() will happily overwrite our decorations with the background
3941 // colour
3942 wxNcPaintEvent eventNc(m_windowId);
3943 eventNc.SetEventObject(this);
3944 GetEventHandler()->ProcessEvent(eventNc);
3945
3946 return processed;
3947 }
3948
3949 // Can be called from an application's OnPaint handler
3950 void wxWindowMSW::OnPaint(wxPaintEvent& event)
3951 {
3952 #ifdef __WXUNIVERSAL__
3953 event.Skip();
3954 #else
3955 HDC hDC = (HDC) wxPaintDC::FindDCInCache((wxWindow*) event.GetEventObject());
3956 if (hDC != 0)
3957 {
3958 MSWDefWindowProc(WM_PAINT, (WPARAM) hDC, 0);
3959 }
3960 #endif
3961 }
3962
3963 bool wxWindowMSW::HandleEraseBkgnd(WXHDC hdc)
3964 {
3965 // Prevents flicker when dragging
3966 if ( ::IsIconic(GetHwnd()) )
3967 return TRUE;
3968
3969 wxDCTemp dc(hdc);
3970
3971 dc.SetHDC(hdc);
3972 dc.SetWindow((wxWindow *)this);
3973 dc.BeginDrawing();
3974
3975 wxEraseEvent event(m_windowId, &dc);
3976 event.SetEventObject(this);
3977 bool rc = GetEventHandler()->ProcessEvent(event);
3978
3979 dc.EndDrawing();
3980
3981 // must be called manually as ~wxDC doesn't do anything for wxDCTemp
3982 dc.SelectOldObjects(hdc);
3983
3984 return rc;
3985 }
3986
3987 void wxWindowMSW::OnEraseBackground(wxEraseEvent& event)
3988 {
3989 RECT rect;
3990 ::GetClientRect(GetHwnd(), &rect);
3991
3992 COLORREF ref = PALETTERGB(m_backgroundColour.Red(),
3993 m_backgroundColour.Green(),
3994 m_backgroundColour.Blue());
3995 HBRUSH hBrush = ::CreateSolidBrush(ref);
3996 if ( !hBrush )
3997 wxLogLastError(wxT("CreateSolidBrush"));
3998
3999 HDC hdc = (HDC)event.GetDC()->GetHDC();
4000
4001 int mode = ::SetMapMode(hdc, MM_TEXT);
4002
4003 ::FillRect(hdc, &rect, hBrush);
4004 ::DeleteObject(hBrush);
4005 ::SetMapMode(hdc, mode);
4006 }
4007
4008 // ---------------------------------------------------------------------------
4009 // moving and resizing
4010 // ---------------------------------------------------------------------------
4011
4012 bool wxWindowMSW::HandleMinimize()
4013 {
4014 wxIconizeEvent event(m_windowId);
4015 event.SetEventObject(this);
4016
4017 return GetEventHandler()->ProcessEvent(event);
4018 }
4019
4020 bool wxWindowMSW::HandleMaximize()
4021 {
4022 wxMaximizeEvent event(m_windowId);
4023 event.SetEventObject(this);
4024
4025 return GetEventHandler()->ProcessEvent(event);
4026 }
4027
4028 bool wxWindowMSW::HandleMove(int x, int y)
4029 {
4030 wxMoveEvent event(wxPoint(x, y), m_windowId);
4031 event.SetEventObject(this);
4032
4033 return GetEventHandler()->ProcessEvent(event);
4034 }
4035
4036 bool wxWindowMSW::HandleSize(int WXUNUSED(w), int WXUNUSED(h),
4037 WXUINT WXUNUSED(flag))
4038 {
4039 // don't use w and h parameters as they specify the client size while
4040 // according to the docs EVT_SIZE handler is supposed to receive the total
4041 // size
4042 wxSizeEvent event(GetSize(), m_windowId);
4043 event.SetEventObject(this);
4044
4045 return GetEventHandler()->ProcessEvent(event);
4046 }
4047
4048 bool wxWindowMSW::HandleGetMinMaxInfo(void *mmInfo)
4049 {
4050 MINMAXINFO *info = (MINMAXINFO *)mmInfo;
4051
4052 bool rc = FALSE;
4053
4054 int minWidth = GetMinWidth(),
4055 minHeight = GetMinHeight(),
4056 maxWidth = GetMaxWidth(),
4057 maxHeight = GetMaxHeight();
4058
4059 if ( minWidth != -1 )
4060 {
4061 info->ptMinTrackSize.x = minWidth;
4062 rc = TRUE;
4063 }
4064
4065 if ( minHeight != -1 )
4066 {
4067 info->ptMinTrackSize.y = minHeight;
4068 rc = TRUE;
4069 }
4070
4071 if ( maxWidth != -1 )
4072 {
4073 info->ptMaxTrackSize.x = maxWidth;
4074 rc = TRUE;
4075 }
4076
4077 if ( maxHeight != -1 )
4078 {
4079 info->ptMaxTrackSize.y = maxHeight;
4080 rc = TRUE;
4081 }
4082
4083 return rc;
4084 }
4085
4086 // ---------------------------------------------------------------------------
4087 // command messages
4088 // ---------------------------------------------------------------------------
4089
4090 bool wxWindowMSW::HandleCommand(WXWORD id, WXWORD cmd, WXHWND control)
4091 {
4092 #if wxUSE_MENUS_NATIVE
4093 if ( !cmd && wxCurrentPopupMenu )
4094 {
4095 wxMenu *popupMenu = wxCurrentPopupMenu;
4096 wxCurrentPopupMenu = NULL;
4097
4098 return popupMenu->MSWCommand(cmd, id);
4099 }
4100 #endif // wxUSE_MENUS_NATIVE
4101
4102 wxWindow *win = NULL;
4103
4104 // first try to find it from HWND - this works even with the broken
4105 // programs using the same ids for different controls
4106 if ( control )
4107 {
4108 win = wxFindWinFromHandle(control);
4109 }
4110
4111 // try the id
4112 if ( !win )
4113 {
4114 // must cast to a signed type before comparing with other ids!
4115 win = FindItem((signed short)id);
4116 }
4117
4118 if ( win )
4119 {
4120 return win->MSWCommand(cmd, id);
4121 }
4122
4123 // the messages sent from the in-place edit control used by the treectrl
4124 // for label editing have id == 0, but they should _not_ be treated as menu
4125 // messages (they are EN_XXX ones, in fact) so don't translate anything
4126 // coming from a control to wxEVT_COMMAND_MENU_SELECTED
4127 if ( !control )
4128 {
4129 // If no child window, it may be an accelerator, e.g. for a popup menu
4130 // command
4131
4132 wxCommandEvent event(wxEVT_COMMAND_MENU_SELECTED);
4133 event.SetEventObject(this);
4134 event.SetId(id);
4135 event.SetInt(id);
4136
4137 return GetEventHandler()->ProcessEvent(event);
4138 }
4139 #if wxUSE_SPINCTRL && !defined(__WXUNIVERSAL__)
4140 else
4141 {
4142 // the text ctrl which is logically part of wxSpinCtrl sends WM_COMMAND
4143 // notifications to its parent which we want to reflect back to
4144 // wxSpinCtrl
4145 wxSpinCtrl *spin = wxSpinCtrl::GetSpinForTextCtrl(control);
4146 if ( spin && spin->ProcessTextCommand(cmd, id) )
4147 return TRUE;
4148 }
4149 #endif // wxUSE_SPINCTRL
4150
4151 return FALSE;
4152 }
4153
4154 bool wxWindowMSW::HandleSysCommand(WXWPARAM wParam, WXLPARAM WXUNUSED(lParam))
4155 {
4156 // 4 bits are reserved
4157 switch ( wParam & 0xFFFFFFF0 )
4158 {
4159 case SC_MAXIMIZE:
4160 return HandleMaximize();
4161
4162 case SC_MINIMIZE:
4163 return HandleMinimize();
4164 }
4165
4166 return FALSE;
4167 }
4168
4169 // ---------------------------------------------------------------------------
4170 // mouse events
4171 // ---------------------------------------------------------------------------
4172
4173 void wxWindowMSW::InitMouseEvent(wxMouseEvent& event,
4174 int x, int y,
4175 WXUINT flags)
4176 {
4177 // our client coords are not quite the same as Windows ones
4178 wxPoint pt = GetClientAreaOrigin();
4179 event.m_x = x - pt.x;
4180 event.m_y = y - pt.y;
4181
4182 event.m_shiftDown = (flags & MK_SHIFT) != 0;
4183 event.m_controlDown = (flags & MK_CONTROL) != 0;
4184 event.m_leftDown = (flags & MK_LBUTTON) != 0;
4185 event.m_middleDown = (flags & MK_MBUTTON) != 0;
4186 event.m_rightDown = (flags & MK_RBUTTON) != 0;
4187 event.m_altDown = (::GetKeyState(VK_MENU) & 0x80000000) != 0;
4188
4189 event.SetTimestamp(s_currentMsg.time);
4190 event.m_eventObject = this;
4191 event.SetId(GetId());
4192
4193 #if wxUSE_MOUSEEVENT_HACK
4194 m_lastMouseX = x;
4195 m_lastMouseY = y;
4196 m_lastMouseEvent = event.GetEventType();
4197 #endif // wxUSE_MOUSEEVENT_HACK
4198 }
4199
4200 // Windows doesn't send the mouse events to the static controls (which are
4201 // transparent in the sense that their WM_NCHITTEST handler returns
4202 // HTTRANSPARENT) at all but we want all controls to receive the mouse events
4203 // and so we manually check if we don't have a child window under mouse and if
4204 // we do, send the event to it instead of the window Windows had sent WM_XXX
4205 // to.
4206 //
4207 // Notice that this is not done for the mouse move events because this could
4208 // (would?) be too slow, but only for clicks which means that the static texts
4209 // still don't get move, enter nor leave events.
4210 static wxWindowMSW *FindWindowForMouseEvent(wxWindowMSW *win, int *x, int *y) //TW:REQ:Univ
4211 {
4212 wxCHECK_MSG( x && y, win, _T("NULL pointer in FindWindowForMouseEvent") );
4213
4214 // first try to find a non transparent child: this allows us to send events
4215 // to a static text which is inside a static box, for example
4216 POINT pt = { *x, *y };
4217 HWND hwnd = GetHwndOf(win),
4218 hwndUnderMouse;
4219
4220 #ifdef __WIN32__
4221 hwndUnderMouse = ::ChildWindowFromPointEx
4222 (
4223 hwnd,
4224 pt,
4225 CWP_SKIPINVISIBLE |
4226 CWP_SKIPDISABLED |
4227 CWP_SKIPTRANSPARENT
4228 );
4229
4230 if ( !hwndUnderMouse || hwndUnderMouse == hwnd )
4231 #endif // __WIN32__
4232 {
4233 // now try any child window at all
4234 hwndUnderMouse = ::ChildWindowFromPoint(hwnd, pt);
4235 }
4236
4237 // check that we have a child window which is susceptible to receive mouse
4238 // events: for this it must be shown and enabled
4239 if ( hwndUnderMouse &&
4240 hwndUnderMouse != hwnd &&
4241 ::IsWindowVisible(hwndUnderMouse) &&
4242 ::IsWindowEnabled(hwndUnderMouse) )
4243 {
4244 wxWindow *winUnderMouse = wxFindWinFromHandle((WXHWND)hwndUnderMouse);
4245 if ( winUnderMouse )
4246 {
4247 // translate the mouse coords to the other window coords
4248 win->ClientToScreen(x, y);
4249 winUnderMouse->ScreenToClient(x, y);
4250
4251 win = winUnderMouse;
4252 }
4253 }
4254
4255 return win;
4256 }
4257
4258 bool wxWindowMSW::HandleMouseEvent(WXUINT msg, int x, int y, WXUINT flags)
4259 {
4260 // the mouse events take consecutive IDs from WM_MOUSEFIRST to
4261 // WM_MOUSELAST, so it's enough to substract WM_MOUSEMOVE == WM_MOUSEFIRST
4262 // from the message id and take the value in the table to get wxWin event
4263 // id
4264 static const wxEventType eventsMouse[] =
4265 {
4266 wxEVT_MOTION,
4267 wxEVT_LEFT_DOWN,
4268 wxEVT_LEFT_UP,
4269 wxEVT_LEFT_DCLICK,
4270 wxEVT_RIGHT_DOWN,
4271 wxEVT_RIGHT_UP,
4272 wxEVT_RIGHT_DCLICK,
4273 wxEVT_MIDDLE_DOWN,
4274 wxEVT_MIDDLE_UP,
4275 wxEVT_MIDDLE_DCLICK
4276 };
4277
4278 wxMouseEvent event(eventsMouse[msg - WM_MOUSEMOVE]);
4279 InitMouseEvent(event, x, y, flags);
4280
4281 return GetEventHandler()->ProcessEvent(event);
4282 }
4283
4284 bool wxWindowMSW::HandleMouseMove(int x, int y, WXUINT flags)
4285 {
4286 if ( !m_mouseInWindow )
4287 {
4288 // it would be wrong to assume that just because we get a mouse move
4289 // event that the mouse is inside the window: although this is usually
4290 // true, it is not if we had captured the mouse, so we need to check
4291 // the mouse coordinates here
4292 if ( !HasCapture() || IsMouseInWindow() )
4293 {
4294 // Generate an ENTER event
4295 m_mouseInWindow = TRUE;
4296
4297 wxMouseEvent event(wxEVT_ENTER_WINDOW);
4298 InitMouseEvent(event, x, y, flags);
4299
4300 (void)GetEventHandler()->ProcessEvent(event);
4301 }
4302 }
4303
4304 #if wxUSE_MOUSEEVENT_HACK
4305 // Window gets a click down message followed by a mouse move message even
4306 // if position isn't changed! We want to discard the trailing move event
4307 // if x and y are the same.
4308 if ( (m_lastMouseEvent == wxEVT_RIGHT_DOWN ||
4309 m_lastMouseEvent == wxEVT_LEFT_DOWN ||
4310 m_lastMouseEvent == wxEVT_MIDDLE_DOWN) &&
4311 (m_lastMouseX == x && m_lastMouseY == y) )
4312 {
4313 m_lastMouseEvent = wxEVT_MOTION;
4314
4315 return FALSE;
4316 }
4317 #endif // wxUSE_MOUSEEVENT_HACK
4318
4319 return HandleMouseEvent(WM_MOUSEMOVE, x, y, flags);
4320 }
4321
4322
4323 bool wxWindowMSW::HandleMouseWheel(WXWPARAM wParam, WXLPARAM lParam)
4324 {
4325 #if wxUSE_MOUSEWHEEL
4326 wxMouseEvent event(wxEVT_MOUSEWHEEL);
4327 InitMouseEvent(event,
4328 GET_X_LPARAM(lParam),
4329 GET_Y_LPARAM(lParam),
4330 LOWORD(wParam));
4331 event.m_wheelRotation = (short)HIWORD(wParam);
4332 event.m_wheelDelta = WHEEL_DELTA;
4333
4334 #ifdef __WIN32__
4335 static int s_linesPerRotation = -1;
4336 if ( s_linesPerRotation == -1 )
4337 {
4338 if ( !::SystemParametersInfo(SPI_GETWHEELSCROLLLINES, 0,
4339 &s_linesPerRotation, 0))
4340 {
4341 // this is not supposed to happen
4342 wxLogLastError(_T("SystemParametersInfo(GETWHEELSCROLLLINES)"));
4343
4344 // the default is 3, so use it if SystemParametersInfo() failed
4345 s_linesPerRotation = 3;
4346 }
4347 }
4348 #else // Win16
4349 // no SystemParametersInfo() under Win16
4350 static const int s_linesPerRotation = 3;
4351 #endif
4352
4353 event.m_linesPerAction = s_linesPerRotation;
4354 return GetEventHandler()->ProcessEvent(event);
4355
4356 #else
4357 (void) wParam;
4358 (void) lParam;
4359
4360 return FALSE;
4361 #endif
4362 }
4363
4364
4365 // ---------------------------------------------------------------------------
4366 // keyboard handling
4367 // ---------------------------------------------------------------------------
4368
4369 // create the key event of the given type for the given key - used by
4370 // HandleChar and HandleKeyDown/Up
4371 wxKeyEvent wxWindowMSW::CreateKeyEvent(wxEventType evType,
4372 int id,
4373 WXLPARAM lParam,
4374 WXWPARAM wParam) const
4375 {
4376 wxKeyEvent event(evType);
4377 event.SetId(GetId());
4378 event.m_shiftDown = wxIsShiftDown();
4379 event.m_controlDown = wxIsCtrlDown();
4380 event.m_altDown = (HIWORD(lParam) & KF_ALTDOWN) == KF_ALTDOWN;
4381
4382 event.m_eventObject = (wxWindow *)this; // const_cast
4383 event.m_keyCode = id;
4384 event.m_rawCode = (wxUint32) wParam;
4385 event.m_rawFlags = (wxUint32) lParam;
4386 event.SetTimestamp(s_currentMsg.time);
4387
4388 // translate the position to client coords
4389 POINT pt;
4390 GetCursorPos(&pt);
4391 RECT rect;
4392 GetWindowRect(GetHwnd(),&rect);
4393 pt.x -= rect.left;
4394 pt.y -= rect.top;
4395
4396 event.m_x = pt.x;
4397 event.m_y = pt.y;
4398
4399 return event;
4400 }
4401
4402 // isASCII is TRUE only when we're called from WM_CHAR handler and not from
4403 // WM_KEYDOWN one
4404 bool wxWindowMSW::HandleChar(WXWPARAM wParam, WXLPARAM lParam, bool isASCII)
4405 {
4406 bool ctrlDown = FALSE;
4407
4408 int id;
4409 if ( isASCII )
4410 {
4411 // If 1 -> 26, translate to either special keycode or just set
4412 // ctrlDown. IOW, Ctrl-C should result in keycode == 3 and
4413 // ControlDown() == TRUE.
4414 id = wParam;
4415 if ( (id > 0) && (id < 27) )
4416 {
4417 switch (id)
4418 {
4419 case 13:
4420 id = WXK_RETURN;
4421 break;
4422
4423 case 8:
4424 id = WXK_BACK;
4425 break;
4426
4427 case 9:
4428 id = WXK_TAB;
4429 break;
4430
4431 default:
4432 ctrlDown = TRUE;
4433 break;
4434 }
4435 }
4436 }
4437 else // we're called from WM_KEYDOWN
4438 {
4439 id = wxCharCodeMSWToWX(wParam);
4440 if ( id == 0 )
4441 {
4442 // it's ASCII and will be processed here only when called from
4443 // WM_CHAR (i.e. when isASCII = TRUE), don't process it now
4444 return FALSE;
4445 }
4446 }
4447
4448 wxKeyEvent event(CreateKeyEvent(wxEVT_CHAR, id, lParam, wParam));
4449
4450 // the alphanumeric keys produced by pressing AltGr+something on European
4451 // keyboards have both Ctrl and Alt modifiers which may confuse the user
4452 // code as, normally, keys with Ctrl and/or Alt don't result in anything
4453 // alphanumeric, so pretend that there are no modifiers at all (the
4454 // KEY_DOWN event would still have the correct modifiers if they're really
4455 // needed)
4456 if ( event.m_controlDown && event.m_altDown &&
4457 (id >= 32 && id < 256) )
4458 {
4459 event.m_controlDown =
4460 event.m_altDown = FALSE;
4461 }
4462
4463 return GetEventHandler()->ProcessEvent(event);
4464 }
4465
4466 bool wxWindowMSW::HandleKeyDown(WXWPARAM wParam, WXLPARAM lParam)
4467 {
4468 int id = wxCharCodeMSWToWX(wParam);
4469
4470 if ( !id )
4471 {
4472 // normal ASCII char
4473 id = wParam;
4474 }
4475
4476 if ( id != -1 ) // VZ: does this ever happen (FIXME)?
4477 {
4478 wxKeyEvent event(CreateKeyEvent(wxEVT_KEY_DOWN, id, lParam, wParam));
4479 if ( GetEventHandler()->ProcessEvent(event) )
4480 {
4481 return TRUE;
4482 }
4483 }
4484
4485 return FALSE;
4486 }
4487
4488 bool wxWindowMSW::HandleKeyUp(WXWPARAM wParam, WXLPARAM lParam)
4489 {
4490 int id = wxCharCodeMSWToWX(wParam);
4491
4492 if ( !id )
4493 {
4494 // normal ASCII char
4495 id = wParam;
4496 }
4497
4498 if ( id != -1 ) // VZ: does this ever happen (FIXME)?
4499 {
4500 wxKeyEvent event(CreateKeyEvent(wxEVT_KEY_UP, id, lParam, wParam));
4501 if ( GetEventHandler()->ProcessEvent(event) )
4502 return TRUE;
4503 }
4504
4505 return FALSE;
4506 }
4507
4508 #ifdef __WIN32__
4509
4510 int wxWindowMSW::HandleMenuChar(int chAccel, WXLPARAM lParam)
4511 {
4512 const HMENU hmenu = (HMENU)lParam;
4513
4514 MENUITEMINFO mii;
4515 wxZeroMemory(mii);
4516 mii.cbSize = sizeof(MENUITEMINFO);
4517 mii.fMask = MIIM_TYPE | MIIM_DATA;
4518
4519 // find if we have this letter in any owner drawn item
4520 const int count = ::GetMenuItemCount(hmenu);
4521 for ( int i = 0; i < count; i++ )
4522 {
4523 if ( ::GetMenuItemInfo(hmenu, i, TRUE, &mii) )
4524 {
4525 if ( mii.fType == MFT_OWNERDRAW )
4526 {
4527 // dwItemData member of the MENUITEMINFO is a
4528 // pointer to the associated wxMenuItem -- see the
4529 // menu creation code
4530 wxMenuItem *item = (wxMenuItem*)mii.dwItemData;
4531
4532 const wxChar *p = wxStrchr(item->GetText(), _T('&'));
4533 while ( p++ )
4534 {
4535 if ( *p == _T('&') )
4536 {
4537 // this is not the accel char, find the real one
4538 p = wxStrchr(p + 1, _T('&'));
4539 }
4540 else // got the accel char
4541 {
4542 // FIXME-UNICODE: this comparison doesn't risk to work
4543 // for non ASCII accelerator characters I'm afraid, but
4544 // what can we do?
4545 if ( wxToupper(*p) == chAccel )
4546 {
4547 return i;
4548 }
4549 else
4550 {
4551 // this one doesn't match
4552 break;
4553 }
4554 }
4555 }
4556 }
4557 }
4558 else // failed ot get the menu text?
4559 {
4560 // it's not fatal, so don't show error, but still log
4561 // it
4562 wxLogLastError(_T("GetMenuItemInfo"));
4563 }
4564 }
4565
4566 return wxNOT_FOUND;
4567 }
4568
4569 #endif // __WIN32__
4570
4571 // ---------------------------------------------------------------------------
4572 // joystick
4573 // ---------------------------------------------------------------------------
4574
4575 bool wxWindowMSW::HandleJoystickEvent(WXUINT msg, int x, int y, WXUINT flags)
4576 {
4577 #ifdef JOY_BUTTON1
4578 int change = 0;
4579 if ( flags & JOY_BUTTON1CHG )
4580 change = wxJOY_BUTTON1;
4581 if ( flags & JOY_BUTTON2CHG )
4582 change = wxJOY_BUTTON2;
4583 if ( flags & JOY_BUTTON3CHG )
4584 change = wxJOY_BUTTON3;
4585 if ( flags & JOY_BUTTON4CHG )
4586 change = wxJOY_BUTTON4;
4587
4588 int buttons = 0;
4589 if ( flags & JOY_BUTTON1 )
4590 buttons |= wxJOY_BUTTON1;
4591 if ( flags & JOY_BUTTON2 )
4592 buttons |= wxJOY_BUTTON2;
4593 if ( flags & JOY_BUTTON3 )
4594 buttons |= wxJOY_BUTTON3;
4595 if ( flags & JOY_BUTTON4 )
4596 buttons |= wxJOY_BUTTON4;
4597
4598 // the event ids aren't consecutive so we can't use table based lookup
4599 int joystick;
4600 wxEventType eventType;
4601 switch ( msg )
4602 {
4603 case MM_JOY1MOVE:
4604 joystick = 1;
4605 eventType = wxEVT_JOY_MOVE;
4606 break;
4607
4608 case MM_JOY2MOVE:
4609 joystick = 2;
4610 eventType = wxEVT_JOY_MOVE;
4611 break;
4612
4613 case MM_JOY1ZMOVE:
4614 joystick = 1;
4615 eventType = wxEVT_JOY_ZMOVE;
4616 break;
4617
4618 case MM_JOY2ZMOVE:
4619 joystick = 2;
4620 eventType = wxEVT_JOY_ZMOVE;
4621 break;
4622
4623 case MM_JOY1BUTTONDOWN:
4624 joystick = 1;
4625 eventType = wxEVT_JOY_BUTTON_DOWN;
4626 break;
4627
4628 case MM_JOY2BUTTONDOWN:
4629 joystick = 2;
4630 eventType = wxEVT_JOY_BUTTON_DOWN;
4631 break;
4632
4633 case MM_JOY1BUTTONUP:
4634 joystick = 1;
4635 eventType = wxEVT_JOY_BUTTON_UP;
4636 break;
4637
4638 case MM_JOY2BUTTONUP:
4639 joystick = 2;
4640 eventType = wxEVT_JOY_BUTTON_UP;
4641 break;
4642
4643 default:
4644 wxFAIL_MSG(wxT("no such joystick event"));
4645
4646 return FALSE;
4647 }
4648
4649 wxJoystickEvent event(eventType, buttons, joystick, change);
4650 event.SetPosition(wxPoint(x, y));
4651 event.SetEventObject(this);
4652
4653 return GetEventHandler()->ProcessEvent(event);
4654 #else
4655 return FALSE;
4656 #endif
4657 }
4658
4659 // ---------------------------------------------------------------------------
4660 // scrolling
4661 // ---------------------------------------------------------------------------
4662
4663 bool wxWindowMSW::MSWOnScroll(int orientation, WXWORD wParam,
4664 WXWORD pos, WXHWND control)
4665 {
4666 if ( control )
4667 {
4668 wxWindow *child = wxFindWinFromHandle(control);
4669 if ( child )
4670 return child->MSWOnScroll(orientation, wParam, pos, control);
4671 }
4672
4673 wxScrollWinEvent event;
4674 event.SetPosition(pos);
4675 event.SetOrientation(orientation);
4676 event.m_eventObject = this;
4677
4678 switch ( wParam )
4679 {
4680 case SB_TOP:
4681 event.m_eventType = wxEVT_SCROLLWIN_TOP;
4682 break;
4683
4684 case SB_BOTTOM:
4685 event.m_eventType = wxEVT_SCROLLWIN_BOTTOM;
4686 break;
4687
4688 case SB_LINEUP:
4689 event.m_eventType = wxEVT_SCROLLWIN_LINEUP;
4690 break;
4691
4692 case SB_LINEDOWN:
4693 event.m_eventType = wxEVT_SCROLLWIN_LINEDOWN;
4694 break;
4695
4696 case SB_PAGEUP:
4697 event.m_eventType = wxEVT_SCROLLWIN_PAGEUP;
4698 break;
4699
4700 case SB_PAGEDOWN:
4701 event.m_eventType = wxEVT_SCROLLWIN_PAGEDOWN;
4702 break;
4703
4704 case SB_THUMBPOSITION:
4705 case SB_THUMBTRACK:
4706 #ifdef __WIN32__
4707 // under Win32, the scrollbar range and position are 32 bit integers,
4708 // but WM_[HV]SCROLL only carry the low 16 bits of them, so we must
4709 // explicitly query the scrollbar for the correct position (this must
4710 // be done only for these two SB_ events as they are the only one
4711 // carrying the scrollbar position)
4712 {
4713 SCROLLINFO scrollInfo;
4714 wxZeroMemory(scrollInfo);
4715 scrollInfo.cbSize = sizeof(SCROLLINFO);
4716 scrollInfo.fMask = SIF_TRACKPOS;
4717
4718 if ( !::GetScrollInfo(GetHwnd(),
4719 orientation == wxHORIZONTAL ? SB_HORZ
4720 : SB_VERT,
4721 &scrollInfo) )
4722 {
4723 wxLogLastError(_T("GetScrollInfo"));
4724 }
4725
4726 event.SetPosition(scrollInfo.nTrackPos);
4727 }
4728 #endif // Win32
4729
4730 event.m_eventType = wParam == SB_THUMBPOSITION
4731 ? wxEVT_SCROLLWIN_THUMBRELEASE
4732 : wxEVT_SCROLLWIN_THUMBTRACK;
4733 break;
4734
4735 default:
4736 return FALSE;
4737 }
4738
4739 return GetEventHandler()->ProcessEvent(event);
4740 }
4741
4742 // ===========================================================================
4743 // global functions
4744 // ===========================================================================
4745
4746 void wxGetCharSize(WXHWND wnd, int *x, int *y, const wxFont *the_font)
4747 {
4748 TEXTMETRIC tm;
4749 HDC dc = ::GetDC((HWND) wnd);
4750 HFONT fnt =0;
4751 HFONT was = 0;
4752 if ( the_font )
4753 {
4754 // the_font->UseResource();
4755 // the_font->RealizeResource();
4756 fnt = (HFONT)((wxFont *)the_font)->GetResourceHandle(); // const_cast
4757 if ( fnt )
4758 was = (HFONT) SelectObject(dc,fnt);
4759 }
4760 GetTextMetrics(dc, &tm);
4761 if ( the_font && fnt && was )
4762 {
4763 SelectObject(dc,was);
4764 }
4765 ReleaseDC((HWND)wnd, dc);
4766
4767 if ( x )
4768 *x = tm.tmAveCharWidth;
4769 if ( y )
4770 *y = tm.tmHeight + tm.tmExternalLeading;
4771
4772 // if ( the_font )
4773 // the_font->ReleaseResource();
4774 }
4775
4776 // Returns 0 if was a normal ASCII value, not a special key. This indicates that
4777 // the key should be ignored by WM_KEYDOWN and processed by WM_CHAR instead.
4778 int wxCharCodeMSWToWX(int keySym)
4779 {
4780 int id;
4781 switch (keySym)
4782 {
4783 case VK_CANCEL: id = WXK_CANCEL; break;
4784 case VK_BACK: id = WXK_BACK; break;
4785 case VK_TAB: id = WXK_TAB; break;
4786 case VK_CLEAR: id = WXK_CLEAR; break;
4787 case VK_RETURN: id = WXK_RETURN; break;
4788 case VK_SHIFT: id = WXK_SHIFT; break;
4789 case VK_CONTROL: id = WXK_CONTROL; break;
4790 case VK_MENU : id = WXK_MENU; break;
4791 case VK_PAUSE: id = WXK_PAUSE; break;
4792 case VK_CAPITAL: id = WXK_CAPITAL; break;
4793 case VK_SPACE: id = WXK_SPACE; break;
4794 case VK_ESCAPE: id = WXK_ESCAPE; break;
4795 case VK_PRIOR: id = WXK_PRIOR; break;
4796 case VK_NEXT : id = WXK_NEXT; break;
4797 case VK_END: id = WXK_END; break;
4798 case VK_HOME : id = WXK_HOME; break;
4799 case VK_LEFT : id = WXK_LEFT; break;
4800 case VK_UP: id = WXK_UP; break;
4801 case VK_RIGHT: id = WXK_RIGHT; break;
4802 case VK_DOWN : id = WXK_DOWN; break;
4803 case VK_SELECT: id = WXK_SELECT; break;
4804 case VK_PRINT: id = WXK_PRINT; break;
4805 case VK_EXECUTE: id = WXK_EXECUTE; break;
4806 case VK_INSERT: id = WXK_INSERT; break;
4807 case VK_DELETE: id = WXK_DELETE; break;
4808 case VK_HELP : id = WXK_HELP; break;
4809 case VK_NUMPAD0: id = WXK_NUMPAD0; break;
4810 case VK_NUMPAD1: id = WXK_NUMPAD1; break;
4811 case VK_NUMPAD2: id = WXK_NUMPAD2; break;
4812 case VK_NUMPAD3: id = WXK_NUMPAD3; break;
4813 case VK_NUMPAD4: id = WXK_NUMPAD4; break;
4814 case VK_NUMPAD5: id = WXK_NUMPAD5; break;
4815 case VK_NUMPAD6: id = WXK_NUMPAD6; break;
4816 case VK_NUMPAD7: id = WXK_NUMPAD7; break;
4817 case VK_NUMPAD8: id = WXK_NUMPAD8; break;
4818 case VK_NUMPAD9: id = WXK_NUMPAD9; break;
4819 case VK_MULTIPLY: id = WXK_NUMPAD_MULTIPLY; break;
4820 case VK_ADD: id = WXK_NUMPAD_ADD; break;
4821 case VK_SUBTRACT: id = WXK_NUMPAD_SUBTRACT; break;
4822 case VK_DECIMAL: id = WXK_NUMPAD_DECIMAL; break;
4823 case VK_DIVIDE: id = WXK_NUMPAD_DIVIDE; break;
4824 case VK_F1: id = WXK_F1; break;
4825 case VK_F2: id = WXK_F2; break;
4826 case VK_F3: id = WXK_F3; break;
4827 case VK_F4: id = WXK_F4; break;
4828 case VK_F5: id = WXK_F5; break;
4829 case VK_F6: id = WXK_F6; break;
4830 case VK_F7: id = WXK_F7; break;
4831 case VK_F8: id = WXK_F8; break;
4832 case VK_F9: id = WXK_F9; break;
4833 case VK_F10: id = WXK_F10; break;
4834 case VK_F11: id = WXK_F11; break;
4835 case VK_F12: id = WXK_F12; break;
4836 case VK_F13: id = WXK_F13; break;
4837 case VK_F14: id = WXK_F14; break;
4838 case VK_F15: id = WXK_F15; break;
4839 case VK_F16: id = WXK_F16; break;
4840 case VK_F17: id = WXK_F17; break;
4841 case VK_F18: id = WXK_F18; break;
4842 case VK_F19: id = WXK_F19; break;
4843 case VK_F20: id = WXK_F20; break;
4844 case VK_F21: id = WXK_F21; break;
4845 case VK_F22: id = WXK_F22; break;
4846 case VK_F23: id = WXK_F23; break;
4847 case VK_F24: id = WXK_F24; break;
4848 case VK_NUMLOCK: id = WXK_NUMLOCK; break;
4849 case VK_SCROLL: id = WXK_SCROLL; break;
4850
4851 case VK_OEM_1: id = ';'; break;
4852 case VK_OEM_PLUS: id = '+'; break;
4853 case VK_OEM_COMMA: id = ','; break;
4854 case VK_OEM_MINUS: id = '-'; break;
4855 case VK_OEM_PERIOD: id = '.'; break;
4856 case VK_OEM_2: id = '/'; break;
4857 case VK_OEM_3: id = '~'; break;
4858 case VK_OEM_4: id = '['; break;
4859 case VK_OEM_5: id = '\\'; break;
4860 case VK_OEM_6: id = ']'; break;
4861 case VK_OEM_7: id = '\''; break;
4862
4863 #ifdef VK_APPS
4864 case VK_LWIN: id = WXK_WINDOWS_LEFT; break;
4865 case VK_RWIN: id = WXK_WINDOWS_RIGHT; break;
4866 case VK_APPS: id = WXK_WINDOWS_MENU; break;
4867 #endif // VK_APPS defined
4868
4869 default:
4870 id = 0;
4871 }
4872
4873 return id;
4874 }
4875
4876 int wxCharCodeWXToMSW(int id, bool *isVirtual)
4877 {
4878 *isVirtual = TRUE;
4879 int keySym = 0;
4880 switch (id)
4881 {
4882 case WXK_CANCEL: keySym = VK_CANCEL; break;
4883 case WXK_CLEAR: keySym = VK_CLEAR; break;
4884 case WXK_SHIFT: keySym = VK_SHIFT; break;
4885 case WXK_CONTROL: keySym = VK_CONTROL; break;
4886 case WXK_MENU : keySym = VK_MENU; break;
4887 case WXK_PAUSE: keySym = VK_PAUSE; break;
4888 case WXK_PRIOR: keySym = VK_PRIOR; break;
4889 case WXK_NEXT : keySym = VK_NEXT; break;
4890 case WXK_END: keySym = VK_END; break;
4891 case WXK_HOME : keySym = VK_HOME; break;
4892 case WXK_LEFT : keySym = VK_LEFT; break;
4893 case WXK_UP: keySym = VK_UP; break;
4894 case WXK_RIGHT: keySym = VK_RIGHT; break;
4895 case WXK_DOWN : keySym = VK_DOWN; break;
4896 case WXK_SELECT: keySym = VK_SELECT; break;
4897 case WXK_PRINT: keySym = VK_PRINT; break;
4898 case WXK_EXECUTE: keySym = VK_EXECUTE; break;
4899 case WXK_INSERT: keySym = VK_INSERT; break;
4900 case WXK_DELETE: keySym = VK_DELETE; break;
4901 case WXK_HELP : keySym = VK_HELP; break;
4902 case WXK_NUMPAD0: keySym = VK_NUMPAD0; break;
4903 case WXK_NUMPAD1: keySym = VK_NUMPAD1; break;
4904 case WXK_NUMPAD2: keySym = VK_NUMPAD2; break;
4905 case WXK_NUMPAD3: keySym = VK_NUMPAD3; break;
4906 case WXK_NUMPAD4: keySym = VK_NUMPAD4; break;
4907 case WXK_NUMPAD5: keySym = VK_NUMPAD5; break;
4908 case WXK_NUMPAD6: keySym = VK_NUMPAD6; break;
4909 case WXK_NUMPAD7: keySym = VK_NUMPAD7; break;
4910 case WXK_NUMPAD8: keySym = VK_NUMPAD8; break;
4911 case WXK_NUMPAD9: keySym = VK_NUMPAD9; break;
4912 case WXK_NUMPAD_MULTIPLY: keySym = VK_MULTIPLY; break;
4913 case WXK_NUMPAD_ADD: keySym = VK_ADD; break;
4914 case WXK_NUMPAD_SUBTRACT: keySym = VK_SUBTRACT; break;
4915 case WXK_NUMPAD_DECIMAL: keySym = VK_DECIMAL; break;
4916 case WXK_NUMPAD_DIVIDE: keySym = VK_DIVIDE; break;
4917 case WXK_F1: keySym = VK_F1; break;
4918 case WXK_F2: keySym = VK_F2; break;
4919 case WXK_F3: keySym = VK_F3; break;
4920 case WXK_F4: keySym = VK_F4; break;
4921 case WXK_F5: keySym = VK_F5; break;
4922 case WXK_F6: keySym = VK_F6; break;
4923 case WXK_F7: keySym = VK_F7; break;
4924 case WXK_F8: keySym = VK_F8; break;
4925 case WXK_F9: keySym = VK_F9; break;
4926 case WXK_F10: keySym = VK_F10; break;
4927 case WXK_F11: keySym = VK_F11; break;
4928 case WXK_F12: keySym = VK_F12; break;
4929 case WXK_F13: keySym = VK_F13; break;
4930 case WXK_F14: keySym = VK_F14; break;
4931 case WXK_F15: keySym = VK_F15; break;
4932 case WXK_F16: keySym = VK_F16; break;
4933 case WXK_F17: keySym = VK_F17; break;
4934 case WXK_F18: keySym = VK_F18; break;
4935 case WXK_F19: keySym = VK_F19; break;
4936 case WXK_F20: keySym = VK_F20; break;
4937 case WXK_F21: keySym = VK_F21; break;
4938 case WXK_F22: keySym = VK_F22; break;
4939 case WXK_F23: keySym = VK_F23; break;
4940 case WXK_F24: keySym = VK_F24; break;
4941 case WXK_NUMLOCK: keySym = VK_NUMLOCK; break;
4942 case WXK_SCROLL: keySym = VK_SCROLL; break;
4943 default:
4944 {
4945 *isVirtual = FALSE;
4946 keySym = id;
4947 break;
4948 }
4949 }
4950 return keySym;
4951 }
4952
4953 wxWindow *wxGetActiveWindow()
4954 {
4955 HWND hWnd = GetActiveWindow();
4956 if ( hWnd != 0 )
4957 {
4958 return wxFindWinFromHandle((WXHWND) hWnd);
4959 }
4960 return NULL;
4961 }
4962
4963 extern wxWindow *wxGetWindowFromHWND(WXHWND hWnd)
4964 {
4965 HWND hwnd = (HWND)hWnd;
4966
4967 // For a radiobutton, we get the radiobox from GWL_USERDATA (which is set
4968 // by code in msw/radiobox.cpp), for all the others we just search up the
4969 // window hierarchy
4970 wxWindow *win = (wxWindow *)NULL;
4971 if ( hwnd )
4972 {
4973 win = wxFindWinFromHandle((WXHWND)hwnd);
4974 if ( !win )
4975 {
4976 // all these hacks only work under Win32 anyhow
4977 #ifdef __WIN32__
4978
4979 #if wxUSE_RADIOBOX
4980 // native radiobuttons return DLGC_RADIOBUTTON here and for any
4981 // wxWindow class which overrides WM_GETDLGCODE processing to
4982 // do it as well, win would be already non NULL
4983 if ( ::SendMessage(hwnd, WM_GETDLGCODE, 0, 0) & DLGC_RADIOBUTTON )
4984 {
4985 win = (wxWindow *)::GetWindowLong(hwnd, GWL_USERDATA);
4986 }
4987 //else: it's a wxRadioButton, not a radiobutton from wxRadioBox
4988 #endif // wxUSE_RADIOBOX
4989
4990 // spin control text buddy window should be mapped to spin ctrl
4991 // itself so try it too
4992 #if wxUSE_SPINCTRL && !defined(__WXUNIVERSAL__)
4993 if ( !win )
4994 {
4995 win = wxSpinCtrl::GetSpinForTextCtrl((WXHWND)hwnd);
4996 }
4997 #endif // wxUSE_SPINCTRL
4998
4999 #endif // Win32
5000 }
5001 }
5002
5003 while ( hwnd && !win )
5004 {
5005 // this is a really ugly hack needed to avoid mistakenly returning the
5006 // parent frame wxWindow for the find/replace modeless dialog HWND -
5007 // this, in turn, is needed to call IsDialogMessage() from
5008 // wxApp::ProcessMessage() as for this we must return NULL from here
5009 //
5010 // FIXME: this is clearly not the best way to do it but I think we'll
5011 // need to change HWND <-> wxWindow code more heavily than I can
5012 // do it now to fix it
5013 #ifndef __WXMICROWIN__
5014 if ( ::GetWindow(hwnd, GW_OWNER) )
5015 {
5016 // it's a dialog box, don't go upwards
5017 break;
5018 }
5019 #endif
5020
5021 hwnd = ::GetParent(hwnd);
5022 win = wxFindWinFromHandle((WXHWND)hwnd);
5023 }
5024
5025 return win;
5026 }
5027
5028 #ifndef __WXMICROWIN__
5029
5030 // Windows keyboard hook. Allows interception of e.g. F1, ESCAPE
5031 // in active frames and dialogs, regardless of where the focus is.
5032 static HHOOK wxTheKeyboardHook = 0;
5033 static FARPROC wxTheKeyboardHookProc = 0;
5034 int APIENTRY _EXPORT
5035 wxKeyboardHook(int nCode, WORD wParam, DWORD lParam);
5036
5037 void wxSetKeyboardHook(bool doIt)
5038 {
5039 if ( doIt )
5040 {
5041 wxTheKeyboardHookProc = MakeProcInstance((FARPROC) wxKeyboardHook, wxGetInstance());
5042 wxTheKeyboardHook = SetWindowsHookEx(WH_KEYBOARD, (HOOKPROC) wxTheKeyboardHookProc, wxGetInstance(),
5043
5044 #if defined(__WIN32__) && !defined(__TWIN32__)
5045 GetCurrentThreadId()
5046 // (DWORD)GetCurrentProcess()); // This is another possibility. Which is right?
5047 #else
5048 GetCurrentTask()
5049 #endif
5050 );
5051 }
5052 else
5053 {
5054 UnhookWindowsHookEx(wxTheKeyboardHook);
5055
5056 // avoids warning about statement with no effect (FreeProcInstance
5057 // doesn't do anything under Win32)
5058 #if !defined(__WIN32__) && !defined(__NT__)
5059 FreeProcInstance(wxTheKeyboardHookProc);
5060 #endif
5061 }
5062 }
5063
5064 int APIENTRY _EXPORT
5065 wxKeyboardHook(int nCode, WORD wParam, DWORD lParam)
5066 {
5067 DWORD hiWord = HIWORD(lParam);
5068 if ( nCode != HC_NOREMOVE && ((hiWord & KF_UP) == 0) )
5069 {
5070 int id = wxCharCodeMSWToWX(wParam);
5071 if ( id != 0 )
5072 {
5073 wxKeyEvent event(wxEVT_CHAR_HOOK);
5074 if ( (HIWORD(lParam) & KF_ALTDOWN) == KF_ALTDOWN )
5075 event.m_altDown = TRUE;
5076
5077 event.m_eventObject = NULL;
5078 event.m_keyCode = id;
5079 event.m_shiftDown = wxIsShiftDown();
5080 event.m_controlDown = wxIsCtrlDown();
5081 event.SetTimestamp(s_currentMsg.time);
5082
5083 wxWindow *win = wxGetActiveWindow();
5084 wxEvtHandler *handler;
5085 if ( win )
5086 {
5087 handler = win->GetEventHandler();
5088 event.SetId(win->GetId());
5089 }
5090 else
5091 {
5092 handler = wxTheApp;
5093 event.SetId(-1);
5094 }
5095
5096 if ( handler && handler->ProcessEvent(event) )
5097 {
5098 // processed
5099 return 1;
5100 }
5101 }
5102 }
5103
5104 return (int)CallNextHookEx(wxTheKeyboardHook, nCode, wParam, lParam);
5105 }
5106
5107 #endif // !__WXMICROWIN__
5108
5109 #ifdef __WXDEBUG__
5110 const char *wxGetMessageName(int message)
5111 {
5112 switch ( message )
5113 {
5114 case 0x0000: return "WM_NULL";
5115 case 0x0001: return "WM_CREATE";
5116 case 0x0002: return "WM_DESTROY";
5117 case 0x0003: return "WM_MOVE";
5118 case 0x0005: return "WM_SIZE";
5119 case 0x0006: return "WM_ACTIVATE";
5120 case 0x0007: return "WM_SETFOCUS";
5121 case 0x0008: return "WM_KILLFOCUS";
5122 case 0x000A: return "WM_ENABLE";
5123 case 0x000B: return "WM_SETREDRAW";
5124 case 0x000C: return "WM_SETTEXT";
5125 case 0x000D: return "WM_GETTEXT";
5126 case 0x000E: return "WM_GETTEXTLENGTH";
5127 case 0x000F: return "WM_PAINT";
5128 case 0x0010: return "WM_CLOSE";
5129 case 0x0011: return "WM_QUERYENDSESSION";
5130 case 0x0012: return "WM_QUIT";
5131 case 0x0013: return "WM_QUERYOPEN";
5132 case 0x0014: return "WM_ERASEBKGND";
5133 case 0x0015: return "WM_SYSCOLORCHANGE";
5134 case 0x0016: return "WM_ENDSESSION";
5135 case 0x0017: return "WM_SYSTEMERROR";
5136 case 0x0018: return "WM_SHOWWINDOW";
5137 case 0x0019: return "WM_CTLCOLOR";
5138 case 0x001A: return "WM_WININICHANGE";
5139 case 0x001B: return "WM_DEVMODECHANGE";
5140 case 0x001C: return "WM_ACTIVATEAPP";
5141 case 0x001D: return "WM_FONTCHANGE";
5142 case 0x001E: return "WM_TIMECHANGE";
5143 case 0x001F: return "WM_CANCELMODE";
5144 case 0x0020: return "WM_SETCURSOR";
5145 case 0x0021: return "WM_MOUSEACTIVATE";
5146 case 0x0022: return "WM_CHILDACTIVATE";
5147 case 0x0023: return "WM_QUEUESYNC";
5148 case 0x0024: return "WM_GETMINMAXINFO";
5149 case 0x0026: return "WM_PAINTICON";
5150 case 0x0027: return "WM_ICONERASEBKGND";
5151 case 0x0028: return "WM_NEXTDLGCTL";
5152 case 0x002A: return "WM_SPOOLERSTATUS";
5153 case 0x002B: return "WM_DRAWITEM";
5154 case 0x002C: return "WM_MEASUREITEM";
5155 case 0x002D: return "WM_DELETEITEM";
5156 case 0x002E: return "WM_VKEYTOITEM";
5157 case 0x002F: return "WM_CHARTOITEM";
5158 case 0x0030: return "WM_SETFONT";
5159 case 0x0031: return "WM_GETFONT";
5160 case 0x0037: return "WM_QUERYDRAGICON";
5161 case 0x0039: return "WM_COMPAREITEM";
5162 case 0x0041: return "WM_COMPACTING";
5163 case 0x0044: return "WM_COMMNOTIFY";
5164 case 0x0046: return "WM_WINDOWPOSCHANGING";
5165 case 0x0047: return "WM_WINDOWPOSCHANGED";
5166 case 0x0048: return "WM_POWER";
5167
5168 #ifdef __WIN32__
5169 case 0x004A: return "WM_COPYDATA";
5170 case 0x004B: return "WM_CANCELJOURNAL";
5171 case 0x004E: return "WM_NOTIFY";
5172 case 0x0050: return "WM_INPUTLANGCHANGEREQUEST";
5173 case 0x0051: return "WM_INPUTLANGCHANGE";
5174 case 0x0052: return "WM_TCARD";
5175 case 0x0053: return "WM_HELP";
5176 case 0x0054: return "WM_USERCHANGED";
5177 case 0x0055: return "WM_NOTIFYFORMAT";
5178 case 0x007B: return "WM_CONTEXTMENU";
5179 case 0x007C: return "WM_STYLECHANGING";
5180 case 0x007D: return "WM_STYLECHANGED";
5181 case 0x007E: return "WM_DISPLAYCHANGE";
5182 case 0x007F: return "WM_GETICON";
5183 case 0x0080: return "WM_SETICON";
5184 #endif //WIN32
5185
5186 case 0x0081: return "WM_NCCREATE";
5187 case 0x0082: return "WM_NCDESTROY";
5188 case 0x0083: return "WM_NCCALCSIZE";
5189 case 0x0084: return "WM_NCHITTEST";
5190 case 0x0085: return "WM_NCPAINT";
5191 case 0x0086: return "WM_NCACTIVATE";
5192 case 0x0087: return "WM_GETDLGCODE";
5193 case 0x00A0: return "WM_NCMOUSEMOVE";
5194 case 0x00A1: return "WM_NCLBUTTONDOWN";
5195 case 0x00A2: return "WM_NCLBUTTONUP";
5196 case 0x00A3: return "WM_NCLBUTTONDBLCLK";
5197 case 0x00A4: return "WM_NCRBUTTONDOWN";
5198 case 0x00A5: return "WM_NCRBUTTONUP";
5199 case 0x00A6: return "WM_NCRBUTTONDBLCLK";
5200 case 0x00A7: return "WM_NCMBUTTONDOWN";
5201 case 0x00A8: return "WM_NCMBUTTONUP";
5202 case 0x00A9: return "WM_NCMBUTTONDBLCLK";
5203 case 0x0100: return "WM_KEYDOWN";
5204 case 0x0101: return "WM_KEYUP";
5205 case 0x0102: return "WM_CHAR";
5206 case 0x0103: return "WM_DEADCHAR";
5207 case 0x0104: return "WM_SYSKEYDOWN";
5208 case 0x0105: return "WM_SYSKEYUP";
5209 case 0x0106: return "WM_SYSCHAR";
5210 case 0x0107: return "WM_SYSDEADCHAR";
5211 case 0x0108: return "WM_KEYLAST";
5212
5213 #ifdef __WIN32__
5214 case 0x010D: return "WM_IME_STARTCOMPOSITION";
5215 case 0x010E: return "WM_IME_ENDCOMPOSITION";
5216 case 0x010F: return "WM_IME_COMPOSITION";
5217 #endif //WIN32
5218
5219 case 0x0110: return "WM_INITDIALOG";
5220 case 0x0111: return "WM_COMMAND";
5221 case 0x0112: return "WM_SYSCOMMAND";
5222 case 0x0113: return "WM_TIMER";
5223 case 0x0114: return "WM_HSCROLL";
5224 case 0x0115: return "WM_VSCROLL";
5225 case 0x0116: return "WM_INITMENU";
5226 case 0x0117: return "WM_INITMENUPOPUP";
5227 case 0x011F: return "WM_MENUSELECT";
5228 case 0x0120: return "WM_MENUCHAR";
5229 case 0x0121: return "WM_ENTERIDLE";
5230 case 0x0200: return "WM_MOUSEMOVE";
5231 case 0x0201: return "WM_LBUTTONDOWN";
5232 case 0x0202: return "WM_LBUTTONUP";
5233 case 0x0203: return "WM_LBUTTONDBLCLK";
5234 case 0x0204: return "WM_RBUTTONDOWN";
5235 case 0x0205: return "WM_RBUTTONUP";
5236 case 0x0206: return "WM_RBUTTONDBLCLK";
5237 case 0x0207: return "WM_MBUTTONDOWN";
5238 case 0x0208: return "WM_MBUTTONUP";
5239 case 0x0209: return "WM_MBUTTONDBLCLK";
5240 case 0x020A: return "WM_MOUSEWHEEL";
5241 case 0x0210: return "WM_PARENTNOTIFY";
5242 case 0x0211: return "WM_ENTERMENULOOP";
5243 case 0x0212: return "WM_EXITMENULOOP";
5244
5245 #ifdef __WIN32__
5246 case 0x0213: return "WM_NEXTMENU";
5247 case 0x0214: return "WM_SIZING";
5248 case 0x0215: return "WM_CAPTURECHANGED";
5249 case 0x0216: return "WM_MOVING";
5250 case 0x0218: return "WM_POWERBROADCAST";
5251 case 0x0219: return "WM_DEVICECHANGE";
5252 #endif //WIN32
5253
5254 case 0x0220: return "WM_MDICREATE";
5255 case 0x0221: return "WM_MDIDESTROY";
5256 case 0x0222: return "WM_MDIACTIVATE";
5257 case 0x0223: return "WM_MDIRESTORE";
5258 case 0x0224: return "WM_MDINEXT";
5259 case 0x0225: return "WM_MDIMAXIMIZE";
5260 case 0x0226: return "WM_MDITILE";
5261 case 0x0227: return "WM_MDICASCADE";
5262 case 0x0228: return "WM_MDIICONARRANGE";
5263 case 0x0229: return "WM_MDIGETACTIVE";
5264 case 0x0230: return "WM_MDISETMENU";
5265 case 0x0233: return "WM_DROPFILES";
5266
5267 #ifdef __WIN32__
5268 case 0x0281: return "WM_IME_SETCONTEXT";
5269 case 0x0282: return "WM_IME_NOTIFY";
5270 case 0x0283: return "WM_IME_CONTROL";
5271 case 0x0284: return "WM_IME_COMPOSITIONFULL";
5272 case 0x0285: return "WM_IME_SELECT";
5273 case 0x0286: return "WM_IME_CHAR";
5274 case 0x0290: return "WM_IME_KEYDOWN";
5275 case 0x0291: return "WM_IME_KEYUP";
5276 #endif //WIN32
5277
5278 case 0x0300: return "WM_CUT";
5279 case 0x0301: return "WM_COPY";
5280 case 0x0302: return "WM_PASTE";
5281 case 0x0303: return "WM_CLEAR";
5282 case 0x0304: return "WM_UNDO";
5283 case 0x0305: return "WM_RENDERFORMAT";
5284 case 0x0306: return "WM_RENDERALLFORMATS";
5285 case 0x0307: return "WM_DESTROYCLIPBOARD";
5286 case 0x0308: return "WM_DRAWCLIPBOARD";
5287 case 0x0309: return "WM_PAINTCLIPBOARD";
5288 case 0x030A: return "WM_VSCROLLCLIPBOARD";
5289 case 0x030B: return "WM_SIZECLIPBOARD";
5290 case 0x030C: return "WM_ASKCBFORMATNAME";
5291 case 0x030D: return "WM_CHANGECBCHAIN";
5292 case 0x030E: return "WM_HSCROLLCLIPBOARD";
5293 case 0x030F: return "WM_QUERYNEWPALETTE";
5294 case 0x0310: return "WM_PALETTEISCHANGING";
5295 case 0x0311: return "WM_PALETTECHANGED";
5296
5297 #ifdef __WIN32__
5298 // common controls messages - although they're not strictly speaking
5299 // standard, it's nice to decode them nevertheless
5300
5301 // listview
5302 case 0x1000 + 0: return "LVM_GETBKCOLOR";
5303 case 0x1000 + 1: return "LVM_SETBKCOLOR";
5304 case 0x1000 + 2: return "LVM_GETIMAGELIST";
5305 case 0x1000 + 3: return "LVM_SETIMAGELIST";
5306 case 0x1000 + 4: return "LVM_GETITEMCOUNT";
5307 case 0x1000 + 5: return "LVM_GETITEMA";
5308 case 0x1000 + 75: return "LVM_GETITEMW";
5309 case 0x1000 + 6: return "LVM_SETITEMA";
5310 case 0x1000 + 76: return "LVM_SETITEMW";
5311 case 0x1000 + 7: return "LVM_INSERTITEMA";
5312 case 0x1000 + 77: return "LVM_INSERTITEMW";
5313 case 0x1000 + 8: return "LVM_DELETEITEM";
5314 case 0x1000 + 9: return "LVM_DELETEALLITEMS";
5315 case 0x1000 + 10: return "LVM_GETCALLBACKMASK";
5316 case 0x1000 + 11: return "LVM_SETCALLBACKMASK";
5317 case 0x1000 + 12: return "LVM_GETNEXTITEM";
5318 case 0x1000 + 13: return "LVM_FINDITEMA";
5319 case 0x1000 + 83: return "LVM_FINDITEMW";
5320 case 0x1000 + 14: return "LVM_GETITEMRECT";
5321 case 0x1000 + 15: return "LVM_SETITEMPOSITION";
5322 case 0x1000 + 16: return "LVM_GETITEMPOSITION";
5323 case 0x1000 + 17: return "LVM_GETSTRINGWIDTHA";
5324 case 0x1000 + 87: return "LVM_GETSTRINGWIDTHW";
5325 case 0x1000 + 18: return "LVM_HITTEST";
5326 case 0x1000 + 19: return "LVM_ENSUREVISIBLE";
5327 case 0x1000 + 20: return "LVM_SCROLL";
5328 case 0x1000 + 21: return "LVM_REDRAWITEMS";
5329 case 0x1000 + 22: return "LVM_ARRANGE";
5330 case 0x1000 + 23: return "LVM_EDITLABELA";
5331 case 0x1000 + 118: return "LVM_EDITLABELW";
5332 case 0x1000 + 24: return "LVM_GETEDITCONTROL";
5333 case 0x1000 + 25: return "LVM_GETCOLUMNA";
5334 case 0x1000 + 95: return "LVM_GETCOLUMNW";
5335 case 0x1000 + 26: return "LVM_SETCOLUMNA";
5336 case 0x1000 + 96: return "LVM_SETCOLUMNW";
5337 case 0x1000 + 27: return "LVM_INSERTCOLUMNA";
5338 case 0x1000 + 97: return "LVM_INSERTCOLUMNW";
5339 case 0x1000 + 28: return "LVM_DELETECOLUMN";
5340 case 0x1000 + 29: return "LVM_GETCOLUMNWIDTH";
5341 case 0x1000 + 30: return "LVM_SETCOLUMNWIDTH";
5342 case 0x1000 + 31: return "LVM_GETHEADER";
5343 case 0x1000 + 33: return "LVM_CREATEDRAGIMAGE";
5344 case 0x1000 + 34: return "LVM_GETVIEWRECT";
5345 case 0x1000 + 35: return "LVM_GETTEXTCOLOR";
5346 case 0x1000 + 36: return "LVM_SETTEXTCOLOR";
5347 case 0x1000 + 37: return "LVM_GETTEXTBKCOLOR";
5348 case 0x1000 + 38: return "LVM_SETTEXTBKCOLOR";
5349 case 0x1000 + 39: return "LVM_GETTOPINDEX";
5350 case 0x1000 + 40: return "LVM_GETCOUNTPERPAGE";
5351 case 0x1000 + 41: return "LVM_GETORIGIN";
5352 case 0x1000 + 42: return "LVM_UPDATE";
5353 case 0x1000 + 43: return "LVM_SETITEMSTATE";
5354 case 0x1000 + 44: return "LVM_GETITEMSTATE";
5355 case 0x1000 + 45: return "LVM_GETITEMTEXTA";
5356 case 0x1000 + 115: return "LVM_GETITEMTEXTW";
5357 case 0x1000 + 46: return "LVM_SETITEMTEXTA";
5358 case 0x1000 + 116: return "LVM_SETITEMTEXTW";
5359 case 0x1000 + 47: return "LVM_SETITEMCOUNT";
5360 case 0x1000 + 48: return "LVM_SORTITEMS";
5361 case 0x1000 + 49: return "LVM_SETITEMPOSITION32";
5362 case 0x1000 + 50: return "LVM_GETSELECTEDCOUNT";
5363 case 0x1000 + 51: return "LVM_GETITEMSPACING";
5364 case 0x1000 + 52: return "LVM_GETISEARCHSTRINGA";
5365 case 0x1000 + 117: return "LVM_GETISEARCHSTRINGW";
5366 case 0x1000 + 53: return "LVM_SETICONSPACING";
5367 case 0x1000 + 54: return "LVM_SETEXTENDEDLISTVIEWSTYLE";
5368 case 0x1000 + 55: return "LVM_GETEXTENDEDLISTVIEWSTYLE";
5369 case 0x1000 + 56: return "LVM_GETSUBITEMRECT";
5370 case 0x1000 + 57: return "LVM_SUBITEMHITTEST";
5371 case 0x1000 + 58: return "LVM_SETCOLUMNORDERARRAY";
5372 case 0x1000 + 59: return "LVM_GETCOLUMNORDERARRAY";
5373 case 0x1000 + 60: return "LVM_SETHOTITEM";
5374 case 0x1000 + 61: return "LVM_GETHOTITEM";
5375 case 0x1000 + 62: return "LVM_SETHOTCURSOR";
5376 case 0x1000 + 63: return "LVM_GETHOTCURSOR";
5377 case 0x1000 + 64: return "LVM_APPROXIMATEVIEWRECT";
5378 case 0x1000 + 65: return "LVM_SETWORKAREA";
5379
5380 // tree view
5381 case 0x1100 + 0: return "TVM_INSERTITEMA";
5382 case 0x1100 + 50: return "TVM_INSERTITEMW";
5383 case 0x1100 + 1: return "TVM_DELETEITEM";
5384 case 0x1100 + 2: return "TVM_EXPAND";
5385 case 0x1100 + 4: return "TVM_GETITEMRECT";
5386 case 0x1100 + 5: return "TVM_GETCOUNT";
5387 case 0x1100 + 6: return "TVM_GETINDENT";
5388 case 0x1100 + 7: return "TVM_SETINDENT";
5389 case 0x1100 + 8: return "TVM_GETIMAGELIST";
5390 case 0x1100 + 9: return "TVM_SETIMAGELIST";
5391 case 0x1100 + 10: return "TVM_GETNEXTITEM";
5392 case 0x1100 + 11: return "TVM_SELECTITEM";
5393 case 0x1100 + 12: return "TVM_GETITEMA";
5394 case 0x1100 + 62: return "TVM_GETITEMW";
5395 case 0x1100 + 13: return "TVM_SETITEMA";
5396 case 0x1100 + 63: return "TVM_SETITEMW";
5397 case 0x1100 + 14: return "TVM_EDITLABELA";
5398 case 0x1100 + 65: return "TVM_EDITLABELW";
5399 case 0x1100 + 15: return "TVM_GETEDITCONTROL";
5400 case 0x1100 + 16: return "TVM_GETVISIBLECOUNT";
5401 case 0x1100 + 17: return "TVM_HITTEST";
5402 case 0x1100 + 18: return "TVM_CREATEDRAGIMAGE";
5403 case 0x1100 + 19: return "TVM_SORTCHILDREN";
5404 case 0x1100 + 20: return "TVM_ENSUREVISIBLE";
5405 case 0x1100 + 21: return "TVM_SORTCHILDRENCB";
5406 case 0x1100 + 22: return "TVM_ENDEDITLABELNOW";
5407 case 0x1100 + 23: return "TVM_GETISEARCHSTRINGA";
5408 case 0x1100 + 64: return "TVM_GETISEARCHSTRINGW";
5409 case 0x1100 + 24: return "TVM_SETTOOLTIPS";
5410 case 0x1100 + 25: return "TVM_GETTOOLTIPS";
5411
5412 // header
5413 case 0x1200 + 0: return "HDM_GETITEMCOUNT";
5414 case 0x1200 + 1: return "HDM_INSERTITEMA";
5415 case 0x1200 + 10: return "HDM_INSERTITEMW";
5416 case 0x1200 + 2: return "HDM_DELETEITEM";
5417 case 0x1200 + 3: return "HDM_GETITEMA";
5418 case 0x1200 + 11: return "HDM_GETITEMW";
5419 case 0x1200 + 4: return "HDM_SETITEMA";
5420 case 0x1200 + 12: return "HDM_SETITEMW";
5421 case 0x1200 + 5: return "HDM_LAYOUT";
5422 case 0x1200 + 6: return "HDM_HITTEST";
5423 case 0x1200 + 7: return "HDM_GETITEMRECT";
5424 case 0x1200 + 8: return "HDM_SETIMAGELIST";
5425 case 0x1200 + 9: return "HDM_GETIMAGELIST";
5426 case 0x1200 + 15: return "HDM_ORDERTOINDEX";
5427 case 0x1200 + 16: return "HDM_CREATEDRAGIMAGE";
5428 case 0x1200 + 17: return "HDM_GETORDERARRAY";
5429 case 0x1200 + 18: return "HDM_SETORDERARRAY";
5430 case 0x1200 + 19: return "HDM_SETHOTDIVIDER";
5431
5432 // tab control
5433 case 0x1300 + 2: return "TCM_GETIMAGELIST";
5434 case 0x1300 + 3: return "TCM_SETIMAGELIST";
5435 case 0x1300 + 4: return "TCM_GETITEMCOUNT";
5436 case 0x1300 + 5: return "TCM_GETITEMA";
5437 case 0x1300 + 60: return "TCM_GETITEMW";
5438 case 0x1300 + 6: return "TCM_SETITEMA";
5439 case 0x1300 + 61: return "TCM_SETITEMW";
5440 case 0x1300 + 7: return "TCM_INSERTITEMA";
5441 case 0x1300 + 62: return "TCM_INSERTITEMW";
5442 case 0x1300 + 8: return "TCM_DELETEITEM";
5443 case 0x1300 + 9: return "TCM_DELETEALLITEMS";
5444 case 0x1300 + 10: return "TCM_GETITEMRECT";
5445 case 0x1300 + 11: return "TCM_GETCURSEL";
5446 case 0x1300 + 12: return "TCM_SETCURSEL";
5447 case 0x1300 + 13: return "TCM_HITTEST";
5448 case 0x1300 + 14: return "TCM_SETITEMEXTRA";
5449 case 0x1300 + 40: return "TCM_ADJUSTRECT";
5450 case 0x1300 + 41: return "TCM_SETITEMSIZE";
5451 case 0x1300 + 42: return "TCM_REMOVEIMAGE";
5452 case 0x1300 + 43: return "TCM_SETPADDING";
5453 case 0x1300 + 44: return "TCM_GETROWCOUNT";
5454 case 0x1300 + 45: return "TCM_GETTOOLTIPS";
5455 case 0x1300 + 46: return "TCM_SETTOOLTIPS";
5456 case 0x1300 + 47: return "TCM_GETCURFOCUS";
5457 case 0x1300 + 48: return "TCM_SETCURFOCUS";
5458 case 0x1300 + 49: return "TCM_SETMINTABWIDTH";
5459 case 0x1300 + 50: return "TCM_DESELECTALL";
5460
5461 // toolbar
5462 case WM_USER+1: return "TB_ENABLEBUTTON";
5463 case WM_USER+2: return "TB_CHECKBUTTON";
5464 case WM_USER+3: return "TB_PRESSBUTTON";
5465 case WM_USER+4: return "TB_HIDEBUTTON";
5466 case WM_USER+5: return "TB_INDETERMINATE";
5467 case WM_USER+9: return "TB_ISBUTTONENABLED";
5468 case WM_USER+10: return "TB_ISBUTTONCHECKED";
5469 case WM_USER+11: return "TB_ISBUTTONPRESSED";
5470 case WM_USER+12: return "TB_ISBUTTONHIDDEN";
5471 case WM_USER+13: return "TB_ISBUTTONINDETERMINATE";
5472 case WM_USER+17: return "TB_SETSTATE";
5473 case WM_USER+18: return "TB_GETSTATE";
5474 case WM_USER+19: return "TB_ADDBITMAP";
5475 case WM_USER+20: return "TB_ADDBUTTONS";
5476 case WM_USER+21: return "TB_INSERTBUTTON";
5477 case WM_USER+22: return "TB_DELETEBUTTON";
5478 case WM_USER+23: return "TB_GETBUTTON";
5479 case WM_USER+24: return "TB_BUTTONCOUNT";
5480 case WM_USER+25: return "TB_COMMANDTOINDEX";
5481 case WM_USER+26: return "TB_SAVERESTOREA";
5482 case WM_USER+76: return "TB_SAVERESTOREW";
5483 case WM_USER+27: return "TB_CUSTOMIZE";
5484 case WM_USER+28: return "TB_ADDSTRINGA";
5485 case WM_USER+77: return "TB_ADDSTRINGW";
5486 case WM_USER+29: return "TB_GETITEMRECT";
5487 case WM_USER+30: return "TB_BUTTONSTRUCTSIZE";
5488 case WM_USER+31: return "TB_SETBUTTONSIZE";
5489 case WM_USER+32: return "TB_SETBITMAPSIZE";
5490 case WM_USER+33: return "TB_AUTOSIZE";
5491 case WM_USER+35: return "TB_GETTOOLTIPS";
5492 case WM_USER+36: return "TB_SETTOOLTIPS";
5493 case WM_USER+37: return "TB_SETPARENT";
5494 case WM_USER+39: return "TB_SETROWS";
5495 case WM_USER+40: return "TB_GETROWS";
5496 case WM_USER+42: return "TB_SETCMDID";
5497 case WM_USER+43: return "TB_CHANGEBITMAP";
5498 case WM_USER+44: return "TB_GETBITMAP";
5499 case WM_USER+45: return "TB_GETBUTTONTEXTA";
5500 case WM_USER+75: return "TB_GETBUTTONTEXTW";
5501 case WM_USER+46: return "TB_REPLACEBITMAP";
5502 case WM_USER+47: return "TB_SETINDENT";
5503 case WM_USER+48: return "TB_SETIMAGELIST";
5504 case WM_USER+49: return "TB_GETIMAGELIST";
5505 case WM_USER+50: return "TB_LOADIMAGES";
5506 case WM_USER+51: return "TB_GETRECT";
5507 case WM_USER+52: return "TB_SETHOTIMAGELIST";
5508 case WM_USER+53: return "TB_GETHOTIMAGELIST";
5509 case WM_USER+54: return "TB_SETDISABLEDIMAGELIST";
5510 case WM_USER+55: return "TB_GETDISABLEDIMAGELIST";
5511 case WM_USER+56: return "TB_SETSTYLE";
5512 case WM_USER+57: return "TB_GETSTYLE";
5513 case WM_USER+58: return "TB_GETBUTTONSIZE";
5514 case WM_USER+59: return "TB_SETBUTTONWIDTH";
5515 case WM_USER+60: return "TB_SETMAXTEXTROWS";
5516 case WM_USER+61: return "TB_GETTEXTROWS";
5517 case WM_USER+41: return "TB_GETBITMAPFLAGS";
5518
5519 #endif //WIN32
5520
5521 default:
5522 static char s_szBuf[128];
5523 sprintf(s_szBuf, "<unknown message = %d>", message);
5524 return s_szBuf;
5525 }
5526 }
5527 #endif //__WXDEBUG__
5528
5529 static void TranslateKbdEventToMouse(wxWindowMSW *win,
5530 int *x, int *y, WPARAM *flags)
5531 {
5532 // construct the key mask
5533 WPARAM& fwKeys = *flags;
5534
5535 fwKeys = MK_RBUTTON;
5536 if ( wxIsCtrlDown() )
5537 fwKeys |= MK_CONTROL;
5538 if ( wxIsShiftDown() )
5539 fwKeys |= MK_SHIFT;
5540
5541 // simulate right mouse button click
5542 DWORD dwPos = ::GetMessagePos();
5543 *x = GET_X_LPARAM(dwPos);
5544 *y = GET_Y_LPARAM(dwPos);
5545
5546 win->ScreenToClient(x, y);
5547 }
5548
5549 static TEXTMETRIC wxGetTextMetrics(const wxWindowMSW *win)
5550 {
5551 // prepare the DC
5552 TEXTMETRIC tm;
5553 HWND hwnd = GetHwndOf(win);
5554 HDC hdc = ::GetDC(hwnd);
5555
5556 #if !wxDIALOG_UNIT_COMPATIBILITY
5557 // and select the current font into it
5558 HFONT hfont = GetHfontOf(win->GetFont());
5559 if ( hfont )
5560 {
5561 hfont = (HFONT)::SelectObject(hdc, hfont);
5562 }
5563 #endif
5564
5565 // finally retrieve the text metrics from it
5566 GetTextMetrics(hdc, &tm);
5567
5568 #if !wxDIALOG_UNIT_COMPATIBILITY
5569 // and clean up
5570 if ( hfont )
5571 {
5572 (void)::SelectObject(hdc, hfont);
5573 }
5574 #endif
5575
5576 ::ReleaseDC(hwnd, hdc);
5577
5578 return tm;
5579 }
5580
5581 // Find the wxWindow at the current mouse position, returning the mouse
5582 // position.
5583 wxWindow* wxFindWindowAtPointer(wxPoint& pt)
5584 {
5585 pt = wxGetMousePosition();
5586 return wxFindWindowAtPoint(pt);
5587 }
5588
5589 wxWindow* wxFindWindowAtPoint(const wxPoint& pt)
5590 {
5591 POINT pt2;
5592 pt2.x = pt.x;
5593 pt2.y = pt.y;
5594 HWND hWndHit = ::WindowFromPoint(pt2);
5595
5596 wxWindow* win = wxFindWinFromHandle((WXHWND) hWndHit) ;
5597 HWND hWnd = hWndHit;
5598
5599 // Try to find a window with a wxWindow associated with it
5600 while (!win && (hWnd != 0))
5601 {
5602 hWnd = ::GetParent(hWnd);
5603 win = wxFindWinFromHandle((WXHWND) hWnd) ;
5604 }
5605 return win;
5606 }
5607
5608 // Get the current mouse position.
5609 wxPoint wxGetMousePosition()
5610 {
5611 POINT pt;
5612 GetCursorPos( & pt );
5613
5614 return wxPoint(pt.x, pt.y);
5615 }
5616
wxWidgets (Impactor)