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