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