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