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