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