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