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