]> git.saurik.com Git - wxWidgets.git/blob - src/msw/window.cpp
07d4a17190f9ac956421f2bc1508111e0758c56f
[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
1896 bool wxWindowMSW::DoPopupMenu(wxMenu *menu, int x, int y)
1897 {
1898 menu->SetInvokingWindow(this);
1899 menu->UpdateUI();
1900
1901 HWND hWnd = GetHwnd();
1902 HMENU hMenu = GetHmenuOf(menu);
1903 POINT point;
1904 point.x = x;
1905 point.y = y;
1906 ::ClientToScreen(hWnd, &point);
1907 wxCurrentPopupMenu = menu;
1908 ::TrackPopupMenu(hMenu, TPM_RIGHTBUTTON, point.x, point.y, 0, hWnd, NULL);
1909
1910 // we need to do it righ now as otherwise the events are never going to be
1911 // sent to wxCurrentPopupMenu from HandleCommand()
1912 //
1913 // note that even eliminating (ugly) wxCurrentPopupMenu global wouldn't
1914 // help and we'd still need wxYieldForCommandsOnly() as the menu may be
1915 // destroyed as soon as we return (it can be a local variable in the caller
1916 // for example) and so we do need to process the event immediately
1917 wxYieldForCommandsOnly();
1918
1919 wxCurrentPopupMenu = NULL;
1920
1921 menu->SetInvokingWindow(NULL);
1922
1923 return TRUE;
1924 }
1925
1926 #endif // wxUSE_MENUS_NATIVE
1927
1928 // ===========================================================================
1929 // pre/post message processing
1930 // ===========================================================================
1931
1932 long wxWindowMSW::MSWDefWindowProc(WXUINT nMsg, WXWPARAM wParam, WXLPARAM lParam)
1933 {
1934 if ( m_oldWndProc )
1935 return ::CallWindowProc(CASTWNDPROC m_oldWndProc, GetHwnd(), (UINT) nMsg, (WPARAM) wParam, (LPARAM) lParam);
1936 else
1937 return ::DefWindowProc(GetHwnd(), nMsg, wParam, lParam);
1938 }
1939
1940 bool wxWindowMSW::MSWProcessMessage(WXMSG* pMsg)
1941 {
1942 // wxUniversal implements tab traversal itself
1943 #ifndef __WXUNIVERSAL__
1944 if ( m_hWnd != 0 && (GetWindowStyleFlag() & wxTAB_TRAVERSAL) )
1945 {
1946 // intercept dialog navigation keys
1947 MSG *msg = (MSG *)pMsg;
1948
1949 // here we try to do all the job which ::IsDialogMessage() usually does
1950 // internally
1951 #if 1
1952 if ( msg->message == WM_KEYDOWN )
1953 {
1954 bool bCtrlDown = wxIsCtrlDown();
1955 bool bShiftDown = wxIsShiftDown();
1956
1957 // WM_GETDLGCODE: ask the control if it wants the key for itself,
1958 // don't process it if it's the case (except for Ctrl-Tab/Enter
1959 // combinations which are always processed)
1960 LONG lDlgCode = 0;
1961 if ( !bCtrlDown )
1962 {
1963 lDlgCode = ::SendMessage(msg->hwnd, WM_GETDLGCODE, 0, 0);
1964 }
1965
1966 bool bForward = TRUE,
1967 bWindowChange = FALSE;
1968
1969 // should we process this message specially?
1970 bool bProcess = TRUE;
1971 switch ( msg->wParam )
1972 {
1973 case VK_TAB:
1974 // assume that nobody wants Shift-TAB for himself - if we
1975 // don't do it there is no easy way for a control to grab
1976 // TABs but still let Shift-TAB work as navugation key
1977 if ( (lDlgCode & DLGC_WANTTAB) && !bShiftDown ) {
1978 bProcess = FALSE;
1979 }
1980 else {
1981 // Ctrl-Tab cycles thru notebook pages
1982 bWindowChange = bCtrlDown;
1983 bForward = !bShiftDown;
1984 }
1985 break;
1986
1987 case VK_UP:
1988 case VK_LEFT:
1989 if ( (lDlgCode & DLGC_WANTARROWS) || bCtrlDown )
1990 bProcess = FALSE;
1991 else
1992 bForward = FALSE;
1993 break;
1994
1995 case VK_DOWN:
1996 case VK_RIGHT:
1997 if ( (lDlgCode & DLGC_WANTARROWS) || bCtrlDown )
1998 bProcess = FALSE;
1999 break;
2000
2001 case VK_RETURN:
2002 {
2003 if ( (lDlgCode & DLGC_WANTMESSAGE) && !bCtrlDown )
2004 {
2005 // control wants to process Enter itself, don't
2006 // call IsDialogMessage() which would interpret
2007 // it
2008 return FALSE;
2009 }
2010 else if ( lDlgCode & DLGC_BUTTON )
2011 {
2012 // let IsDialogMessage() handle this for all
2013 // buttons except the owner-drawn ones which it
2014 // just seems to ignore
2015 long style = ::GetWindowLong(msg->hwnd, GWL_STYLE);
2016 if ( (style & BS_OWNERDRAW) == BS_OWNERDRAW )
2017 {
2018 // emulate the button click
2019 wxWindow *btn = wxFindWinFromHandle((WXHWND)msg->hwnd);
2020 if ( btn )
2021 btn->MSWCommand(BN_CLICKED, 0 /* unused */);
2022 }
2023
2024 bProcess = FALSE;
2025 }
2026 // FIXME: this should be handled by
2027 // wxNavigationKeyEvent handler and not here!!
2028 else
2029 {
2030 #if wxUSE_BUTTON
2031 wxButton *btn = wxDynamicCast(GetDefaultItem(),
2032 wxButton);
2033 if ( btn && btn->IsEnabled() )
2034 {
2035 // if we do have a default button, do press it
2036 btn->MSWCommand(BN_CLICKED, 0 /* unused */);
2037
2038 return TRUE;
2039 }
2040 else // no default button
2041 {
2042 #endif // wxUSE_BUTTON
2043 // this is a quick and dirty test for a text
2044 // control
2045 if ( !(lDlgCode & DLGC_HASSETSEL) )
2046 {
2047 // don't process Enter, the control might
2048 // need it for itself and don't let
2049 // ::IsDialogMessage() have it as it can
2050 // eat the Enter events sometimes
2051 return FALSE;
2052 }
2053 //else: treat Enter as TAB: pass to the next
2054 // control as this is the best thing to do
2055 // if the text doesn't handle Enter itself
2056 }
2057 }
2058 }
2059 break;
2060
2061 default:
2062 bProcess = FALSE;
2063 }
2064
2065 if ( bProcess )
2066 {
2067 wxNavigationKeyEvent event;
2068 event.SetDirection(bForward);
2069 event.SetWindowChange(bWindowChange);
2070 event.SetEventObject(this);
2071
2072 if ( GetEventHandler()->ProcessEvent(event) )
2073 {
2074 return TRUE;
2075 }
2076 }
2077 }
2078 #else // 0
2079 // let ::IsDialogMessage() do almost everything and handle just the
2080 // things it doesn't here: Ctrl-TAB for switching notebook pages
2081 if ( msg->message == WM_KEYDOWN )
2082 {
2083 // don't process system keys here
2084 if ( !(HIWORD(msg->lParam) & KF_ALTDOWN) )
2085 {
2086 if ( (msg->wParam == VK_TAB) && wxIsCtrlDown() )
2087 {
2088 // find the first notebook parent and change its page
2089 wxWindow *win = this;
2090 wxNotebook *nbook = NULL;
2091 while ( win && !nbook )
2092 {
2093 nbook = wxDynamicCast(win, wxNotebook);
2094 win = win->GetParent();
2095 }
2096
2097 if ( nbook )
2098 {
2099 bool forward = !wxIsShiftDown();
2100
2101 nbook->AdvanceSelection(forward);
2102 }
2103 }
2104 }
2105 }
2106 #endif // 1/0
2107
2108 // we handle VK_ESCAPE ourselves in wxDialog::OnCharHook() and we
2109 // shouldn't let IsDialogMessage() get it as it _always_ eats the
2110 // message even when there is no cancel button and when the message is
2111 // needed by the control itself: in particular, it prevents the tree in
2112 // place edit control from being closed with Escape in a dialog
2113 if ( msg->message != WM_KEYDOWN || msg->wParam != VK_ESCAPE )
2114 {
2115 // ::IsDialogMessage() can enter in an infinite loop when the
2116 // currently focused window is disabled or hidden and its parent
2117 // has WS_EX_CONTROLPARENT style, so don't call it in this case
2118 bool canSafelyCallIsDlgMsg = TRUE;
2119
2120 HWND hwndFocus = ::GetFocus();
2121 while ( hwndFocus )
2122 {
2123 if ( !::IsWindowEnabled(hwndFocus) ||
2124 !::IsWindowVisible(hwndFocus) )
2125 {
2126 // it would enter an infinite loop if we do this!
2127 canSafelyCallIsDlgMsg = FALSE;
2128
2129 break;
2130 }
2131
2132 if ( !(::GetWindowLong(hwndFocus, GWL_STYLE) & WS_CHILD) )
2133 {
2134 // it's a top level window, don't go further -- e.g. even
2135 // if the parent of a dialog is disabled, this doesn't
2136 // break navigation inside the dialog
2137 break;
2138 }
2139
2140 hwndFocus = ::GetParent(hwndFocus);
2141 }
2142
2143 if ( canSafelyCallIsDlgMsg && ::IsDialogMessage(GetHwnd(), msg) )
2144 {
2145 // IsDialogMessage() did something...
2146 return TRUE;
2147 }
2148 }
2149 }
2150 #endif // __WXUNIVERSAL__
2151
2152 #if wxUSE_TOOLTIPS
2153 if ( m_tooltip )
2154 {
2155 // relay mouse move events to the tooltip control
2156 MSG *msg = (MSG *)pMsg;
2157 if ( msg->message == WM_MOUSEMOVE )
2158 m_tooltip->RelayEvent(pMsg);
2159 }
2160 #endif // wxUSE_TOOLTIPS
2161
2162 return FALSE;
2163 }
2164
2165 bool wxWindowMSW::MSWTranslateMessage(WXMSG* pMsg)
2166 {
2167 #if wxUSE_ACCEL && !defined(__WXUNIVERSAL__)
2168 return m_acceleratorTable.Translate(this, pMsg);
2169 #else
2170 (void) pMsg;
2171 return FALSE;
2172 #endif // wxUSE_ACCEL
2173 }
2174
2175 bool wxWindowMSW::MSWShouldPreProcessMessage(WXMSG* WXUNUSED(pMsg))
2176 {
2177 // preprocess all messages by default
2178 return TRUE;
2179 }
2180
2181 // ---------------------------------------------------------------------------
2182 // message params unpackers (different for Win16 and Win32)
2183 // ---------------------------------------------------------------------------
2184
2185 #ifdef __WIN32__
2186
2187 void wxWindowMSW::UnpackCommand(WXWPARAM wParam, WXLPARAM lParam,
2188 WORD *id, WXHWND *hwnd, WORD *cmd)
2189 {
2190 *id = LOWORD(wParam);
2191 *hwnd = (WXHWND)lParam;
2192 *cmd = HIWORD(wParam);
2193 }
2194
2195 void wxWindowMSW::UnpackActivate(WXWPARAM wParam, WXLPARAM lParam,
2196 WXWORD *state, WXWORD *minimized, WXHWND *hwnd)
2197 {
2198 *state = LOWORD(wParam);
2199 *minimized = HIWORD(wParam);
2200 *hwnd = (WXHWND)lParam;
2201 }
2202
2203 void wxWindowMSW::UnpackScroll(WXWPARAM wParam, WXLPARAM lParam,
2204 WXWORD *code, WXWORD *pos, WXHWND *hwnd)
2205 {
2206 *code = LOWORD(wParam);
2207 *pos = HIWORD(wParam);
2208 *hwnd = (WXHWND)lParam;
2209 }
2210
2211 void wxWindowMSW::UnpackCtlColor(WXWPARAM wParam, WXLPARAM lParam,
2212 WXWORD *nCtlColor, WXHDC *hdc, WXHWND *hwnd)
2213 {
2214 #ifndef __WXMICROWIN__
2215 *nCtlColor = CTLCOLOR_BTN;
2216 *hwnd = (WXHWND)lParam;
2217 *hdc = (WXHDC)wParam;
2218 #endif
2219 }
2220
2221 void wxWindowMSW::UnpackMenuSelect(WXWPARAM wParam, WXLPARAM lParam,
2222 WXWORD *item, WXWORD *flags, WXHMENU *hmenu)
2223 {
2224 *item = (WXWORD)wParam;
2225 *flags = HIWORD(wParam);
2226 *hmenu = (WXHMENU)lParam;
2227 }
2228
2229 #else // Win16
2230
2231 void wxWindowMSW::UnpackCommand(WXWPARAM wParam, WXLPARAM lParam,
2232 WXWORD *id, WXHWND *hwnd, WXWORD *cmd)
2233 {
2234 *id = (WXWORD)wParam;
2235 *hwnd = (WXHWND)LOWORD(lParam);
2236 *cmd = HIWORD(lParam);
2237 }
2238
2239 void wxWindowMSW::UnpackActivate(WXWPARAM wParam, WXLPARAM lParam,
2240 WXWORD *state, WXWORD *minimized, WXHWND *hwnd)
2241 {
2242 *state = (WXWORD)wParam;
2243 *minimized = LOWORD(lParam);
2244 *hwnd = (WXHWND)HIWORD(lParam);
2245 }
2246
2247 void wxWindowMSW::UnpackScroll(WXWPARAM wParam, WXLPARAM lParam,
2248 WXWORD *code, WXWORD *pos, WXHWND *hwnd)
2249 {
2250 *code = (WXWORD)wParam;
2251 *pos = LOWORD(lParam);
2252 *hwnd = (WXHWND)HIWORD(lParam);
2253 }
2254
2255 void wxWindowMSW::UnpackCtlColor(WXWPARAM wParam, WXLPARAM lParam,
2256 WXWORD *nCtlColor, WXHDC *hdc, WXHWND *hwnd)
2257 {
2258 *hwnd = (WXHWND)LOWORD(lParam);
2259 *nCtlColor = (int)HIWORD(lParam);
2260 *hdc = (WXHDC)wParam;
2261 }
2262
2263 void wxWindowMSW::UnpackMenuSelect(WXWPARAM wParam, WXLPARAM lParam,
2264 WXWORD *item, WXWORD *flags, WXHMENU *hmenu)
2265 {
2266 *item = (WXWORD)wParam;
2267 *flags = LOWORD(lParam);
2268 *hmenu = (WXHMENU)HIWORD(lParam);
2269 }
2270
2271 #endif // Win32/16
2272
2273 // ---------------------------------------------------------------------------
2274 // Main wxWindows window proc and the window proc for wxWindow
2275 // ---------------------------------------------------------------------------
2276
2277 // Hook for new window just as it's being created, when the window isn't yet
2278 // associated with the handle
2279 static wxWindowMSW *gs_winBeingCreated = NULL;
2280
2281 // implementation of wxWindowCreationHook class: it just sets gs_winBeingCreated to the
2282 // window being created and insures that it's always unset back later
2283 wxWindowCreationHook::wxWindowCreationHook(wxWindowMSW *winBeingCreated)
2284 {
2285 gs_winBeingCreated = winBeingCreated;
2286 }
2287
2288 wxWindowCreationHook::~wxWindowCreationHook()
2289 {
2290 gs_winBeingCreated = NULL;
2291 }
2292
2293 // Main window proc
2294 LRESULT WXDLLEXPORT APIENTRY _EXPORT wxWndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
2295 {
2296 // trace all messages - useful for the debugging
2297 #ifdef __WXDEBUG__
2298 wxLogTrace(wxTraceMessages, wxT("Processing %s(wParam=%8lx, lParam=%8lx)"),
2299 wxGetMessageName(message), (long) wParam, lParam);
2300 #endif // __WXDEBUG__
2301
2302 wxWindowMSW *wnd = wxFindWinFromHandle((WXHWND) hWnd);
2303
2304 // when we get the first message for the HWND we just created, we associate
2305 // it with wxWindow stored in gs_winBeingCreated
2306 if ( !wnd && gs_winBeingCreated )
2307 {
2308 wxAssociateWinWithHandle(hWnd, gs_winBeingCreated);
2309 wnd = gs_winBeingCreated;
2310 gs_winBeingCreated = NULL;
2311 wnd->SetHWND((WXHWND)hWnd);
2312 }
2313
2314 LRESULT rc;
2315
2316 if ( wnd )
2317 rc = wnd->MSWWindowProc(message, wParam, lParam);
2318 else
2319 rc = ::DefWindowProc(hWnd, message, wParam, lParam);
2320
2321 return rc;
2322 }
2323
2324 long wxWindowMSW::MSWWindowProc(WXUINT message, WXWPARAM wParam, WXLPARAM lParam)
2325 {
2326 // did we process the message?
2327 bool processed = FALSE;
2328
2329 // the return value
2330 union
2331 {
2332 bool allow;
2333 long result;
2334 WXHICON hIcon;
2335 WXHBRUSH hBrush;
2336 } rc;
2337
2338 // for most messages we should return 0 when we do process the message
2339 rc.result = 0;
2340
2341 switch ( message )
2342 {
2343 case WM_CREATE:
2344 {
2345 bool mayCreate;
2346 processed = HandleCreate((WXLPCREATESTRUCT)lParam, &mayCreate);
2347 if ( processed )
2348 {
2349 // return 0 to allow window creation
2350 rc.result = mayCreate ? 0 : -1;
2351 }
2352 }
2353 break;
2354
2355 case WM_DESTROY:
2356 // never set processed to TRUE and *always* pass WM_DESTROY to
2357 // DefWindowProc() as Windows may do some internal cleanup when
2358 // processing it and failing to pass the message along may cause
2359 // memory and resource leaks!
2360 (void)HandleDestroy();
2361 break;
2362
2363 case WM_MOVE:
2364 processed = HandleMove(GET_X_LPARAM(lParam), GET_Y_LPARAM(lParam));
2365 break;
2366
2367 case WM_SIZE:
2368 switch ( wParam )
2369 {
2370 case SIZE_MAXHIDE:
2371 case SIZE_MAXSHOW:
2372 // we're not interested in these messages at all
2373 break;
2374
2375 case SIZE_MINIMIZED:
2376 // we shouldn't send sizev events for these messages as the
2377 // client size may be negative which breaks existing code
2378 //
2379 // OTOH we might send another (wxMinimizedEvent?) one or
2380 // add an additional parameter to wxSizeEvent if this is
2381 // useful to anybody
2382 break;
2383
2384 default:
2385 wxFAIL_MSG( _T("unexpected WM_SIZE parameter") );
2386 // fall through nevertheless
2387
2388 case SIZE_MAXIMIZED:
2389 case SIZE_RESTORED:
2390 processed = HandleSize(LOWORD(lParam), HIWORD(lParam),
2391 wParam);
2392 }
2393 break;
2394
2395 #ifndef __WXMICROWIN__
2396 case WM_ACTIVATEAPP:
2397 wxTheApp->SetActive(wParam != 0, FindFocus());
2398 break;
2399 #endif
2400
2401 case WM_ACTIVATE:
2402 {
2403 WXWORD state, minimized;
2404 WXHWND hwnd;
2405 UnpackActivate(wParam, lParam, &state, &minimized, &hwnd);
2406
2407 processed = HandleActivate(state, minimized != 0, (WXHWND)hwnd);
2408 }
2409 break;
2410
2411 case WM_SETFOCUS:
2412 processed = HandleSetFocus((WXHWND)(HWND)wParam);
2413 break;
2414
2415 case WM_KILLFOCUS:
2416 processed = HandleKillFocus((WXHWND)(HWND)wParam);
2417 break;
2418
2419 case WM_PAINT:
2420 processed = HandlePaint();
2421 break;
2422
2423 case WM_CLOSE:
2424 #ifdef __WXUNIVERSAL__
2425 // Universal uses its own wxFrame/wxDialog, so we don't receive
2426 // close events unless we have this.
2427 Close();
2428 processed = TRUE;
2429 rc.result = TRUE;
2430 #else
2431 // don't let the DefWindowProc() destroy our window - we'll do it
2432 // ourselves in ~wxWindow
2433 processed = TRUE;
2434 rc.result = TRUE;
2435 #endif
2436 break;
2437
2438 case WM_SHOWWINDOW:
2439 processed = HandleShow(wParam != 0, (int)lParam);
2440 break;
2441
2442 case WM_MOUSEMOVE:
2443 processed = HandleMouseMove(GET_X_LPARAM(lParam),
2444 GET_Y_LPARAM(lParam),
2445 wParam);
2446 break;
2447
2448 #if wxUSE_MOUSEWHEEL
2449 case WM_MOUSEWHEEL:
2450 processed = HandleMouseWheel(wParam, lParam);
2451 break;
2452 #endif
2453
2454 case WM_LBUTTONDOWN:
2455 case WM_LBUTTONUP:
2456 case WM_LBUTTONDBLCLK:
2457 case WM_RBUTTONDOWN:
2458 case WM_RBUTTONUP:
2459 case WM_RBUTTONDBLCLK:
2460 case WM_MBUTTONDOWN:
2461 case WM_MBUTTONUP:
2462 case WM_MBUTTONDBLCLK:
2463 {
2464 #ifdef __WXMICROWIN__
2465 // MicroWindows seems to ignore the fact that a window is
2466 // disabled. So catch mouse events and throw them away if
2467 // necessary.
2468 wxWindowMSW* win = this;
2469 for ( ;; )
2470 {
2471 if (!win->IsEnabled())
2472 {
2473 processed = TRUE;
2474 break;
2475 }
2476
2477 win = win->GetParent();
2478 if ( !win || win->IsTopLevel() )
2479 break;
2480 }
2481
2482 if ( processed )
2483 break;
2484
2485 #endif // __WXMICROWIN__
2486 // VZ: if you find a situation when this is needed, tell
2487 // me about it, do *not* uncomment this code as it
2488 // causes other strange problems
2489 #if 0
2490 if ( message == WM_LBUTTONDOWN && AcceptsFocus() )
2491 SetFocus();
2492 #endif // 0
2493
2494 int x = GET_X_LPARAM(lParam),
2495 y = GET_Y_LPARAM(lParam);
2496
2497 // redirect the event to a static control if necessary by
2498 // finding one under mouse
2499 wxWindowMSW *win;
2500 if ( GetCapture() == this )
2501 {
2502 // but don't do it if the mouse is captured by this window
2503 // because then it should really get this event itself
2504 win = this;
2505 }
2506 else
2507 {
2508 win = FindWindowForMouseEvent(this, &x, &y);
2509 }
2510
2511 processed = win->HandleMouseEvent(message, x, y, wParam);
2512 }
2513 break;
2514
2515 #ifdef MM_JOY1MOVE
2516 case MM_JOY1MOVE:
2517 case MM_JOY2MOVE:
2518 case MM_JOY1ZMOVE:
2519 case MM_JOY2ZMOVE:
2520 case MM_JOY1BUTTONDOWN:
2521 case MM_JOY2BUTTONDOWN:
2522 case MM_JOY1BUTTONUP:
2523 case MM_JOY2BUTTONUP:
2524 processed = HandleJoystickEvent(message,
2525 GET_X_LPARAM(lParam),
2526 GET_Y_LPARAM(lParam),
2527 wParam);
2528 break;
2529 #endif // __WXMICROWIN__
2530
2531 case WM_SYSCOMMAND:
2532 processed = HandleSysCommand(wParam, lParam);
2533 break;
2534
2535 case WM_COMMAND:
2536 {
2537 WORD id, cmd;
2538 WXHWND hwnd;
2539 UnpackCommand(wParam, lParam, &id, &hwnd, &cmd);
2540
2541 processed = HandleCommand(id, cmd, hwnd);
2542 }
2543 break;
2544
2545 #ifdef __WIN95__
2546 case WM_NOTIFY:
2547 processed = HandleNotify((int)wParam, lParam, &rc.result);
2548 break;
2549 #endif // Win95
2550
2551 // for these messages we must return TRUE if process the message
2552 #ifdef WM_DRAWITEM
2553 case WM_DRAWITEM:
2554 case WM_MEASUREITEM:
2555 {
2556 int idCtrl = (UINT)wParam;
2557 if ( message == WM_DRAWITEM )
2558 {
2559 processed = MSWOnDrawItem(idCtrl,
2560 (WXDRAWITEMSTRUCT *)lParam);
2561 }
2562 else
2563 {
2564 processed = MSWOnMeasureItem(idCtrl,
2565 (WXMEASUREITEMSTRUCT *)lParam);
2566 }
2567
2568 if ( processed )
2569 rc.result = TRUE;
2570 }
2571 break;
2572 #endif // defined(WM_DRAWITEM)
2573
2574 case WM_GETDLGCODE:
2575 if ( !IsOfStandardClass() )
2576 {
2577 // we always want to get the char events
2578 rc.result = DLGC_WANTCHARS;
2579
2580 if ( GetWindowStyleFlag() & wxWANTS_CHARS )
2581 {
2582 // in fact, we want everything
2583 rc.result |= DLGC_WANTARROWS |
2584 DLGC_WANTTAB |
2585 DLGC_WANTALLKEYS;
2586 }
2587
2588 processed = TRUE;
2589 }
2590 //else: get the dlg code from the DefWindowProc()
2591 break;
2592
2593 case WM_SYSKEYDOWN:
2594 case WM_KEYDOWN:
2595 // If this has been processed by an event handler, return 0 now
2596 // (we've handled it).
2597 m_lastKeydownProcessed = HandleKeyDown((WORD) wParam, lParam);
2598 if ( m_lastKeydownProcessed )
2599 {
2600 processed = TRUE;
2601 break;
2602 }
2603
2604 switch ( wParam )
2605 {
2606 // we consider these message "not interesting" to OnChar, so
2607 // just don't do anything more with them
2608 case VK_SHIFT:
2609 case VK_CONTROL:
2610 case VK_MENU:
2611 case VK_CAPITAL:
2612 case VK_NUMLOCK:
2613 case VK_SCROLL:
2614 processed = TRUE;
2615 break;
2616
2617 // avoid duplicate messages to OnChar for these ASCII keys:
2618 // they will be translated by TranslateMessage() and received
2619 // in WM_CHAR
2620 case VK_ESCAPE:
2621 case VK_SPACE:
2622 case VK_RETURN:
2623 case VK_BACK:
2624 case VK_TAB:
2625 case VK_ADD:
2626 case VK_SUBTRACT:
2627 case VK_MULTIPLY:
2628 case VK_DIVIDE:
2629 case VK_OEM_1:
2630 case VK_OEM_2:
2631 case VK_OEM_3:
2632 case VK_OEM_4:
2633 case VK_OEM_5:
2634 case VK_OEM_6:
2635 case VK_OEM_7:
2636 case VK_OEM_PLUS:
2637 case VK_OEM_COMMA:
2638 case VK_OEM_MINUS:
2639 case VK_OEM_PERIOD:
2640 // but set processed to FALSE, not TRUE to still pass them
2641 // to the control's default window proc - otherwise
2642 // built-in keyboard handling won't work
2643 processed = FALSE;
2644
2645 break;
2646
2647 #ifdef VK_APPS
2648 // special case of VK_APPS: treat it the same as right mouse
2649 // click because both usually pop up a context menu
2650 case VK_APPS:
2651 {
2652 WPARAM flags;
2653 int x, y;
2654
2655 TranslateKbdEventToMouse(this, &x, &y, &flags);
2656 processed = HandleMouseEvent(WM_RBUTTONDOWN, x, y, flags);
2657 }
2658 break;
2659 #endif // VK_APPS
2660
2661 default:
2662 // do generate a CHAR event
2663 processed = HandleChar((WORD)wParam, lParam);
2664
2665 }
2666 break;
2667
2668 case WM_SYSKEYUP:
2669 case WM_KEYUP:
2670 #ifdef VK_APPS
2671 // special case of VK_APPS: treat it the same as right mouse button
2672 if ( wParam == VK_APPS )
2673 {
2674 WPARAM flags;
2675 int x, y;
2676
2677 TranslateKbdEventToMouse(this, &x, &y, &flags);
2678 processed = HandleMouseEvent(WM_RBUTTONUP, x, y, flags);
2679 }
2680 else
2681 #endif // VK_APPS
2682 {
2683 processed = HandleKeyUp((WORD) wParam, lParam);
2684 }
2685 break;
2686
2687 case WM_SYSCHAR:
2688 case WM_CHAR: // Always an ASCII character
2689 if ( m_lastKeydownProcessed )
2690 {
2691 // The key was handled in the EVT_KEY_DOWN and handling
2692 // a key in an EVT_KEY_DOWN handler is meant, by
2693 // design, to prevent EVT_CHARs from happening
2694 m_lastKeydownProcessed = FALSE;
2695 processed = TRUE;
2696 }
2697 else
2698 {
2699 processed = HandleChar((WORD)wParam, lParam, TRUE);
2700 }
2701 break;
2702
2703 case WM_HSCROLL:
2704 case WM_VSCROLL:
2705 {
2706 WXWORD code, pos;
2707 WXHWND hwnd;
2708 UnpackScroll(wParam, lParam, &code, &pos, &hwnd);
2709
2710 processed = MSWOnScroll(message == WM_HSCROLL ? wxHORIZONTAL
2711 : wxVERTICAL,
2712 code, pos, hwnd);
2713 }
2714 break;
2715
2716 // CTLCOLOR messages are sent by children to query the parent for their
2717 // colors#ifndef __WXMICROWIN__
2718 #ifndef __WXMICROWIN__
2719 #ifdef __WIN32__
2720 case WM_CTLCOLORMSGBOX:
2721 case WM_CTLCOLOREDIT:
2722 case WM_CTLCOLORLISTBOX:
2723 case WM_CTLCOLORBTN:
2724 case WM_CTLCOLORDLG:
2725 case WM_CTLCOLORSCROLLBAR:
2726 case WM_CTLCOLORSTATIC:
2727 #else // Win16
2728 case WM_CTLCOLOR:
2729 #endif // Win32/16
2730 {
2731 WXWORD nCtlColor;
2732 WXHDC hdc;
2733 WXHWND hwnd;
2734 UnpackCtlColor(wParam, lParam, &nCtlColor, &hdc, &hwnd);
2735
2736 processed = HandleCtlColor(&rc.hBrush,
2737 (WXHDC)hdc,
2738 (WXHWND)hwnd,
2739 nCtlColor,
2740 message,
2741 wParam,
2742 lParam);
2743 }
2744 break;
2745 #endif // !__WXMICROWIN__
2746
2747 case WM_SYSCOLORCHANGE:
2748 // the return value for this message is ignored
2749 processed = HandleSysColorChange();
2750 break;
2751
2752 case WM_DISPLAYCHANGE:
2753 processed = HandleDisplayChange();
2754 break;
2755
2756 case WM_PALETTECHANGED:
2757 processed = HandlePaletteChanged((WXHWND) (HWND) wParam);
2758 break;
2759
2760 case WM_CAPTURECHANGED:
2761 processed = HandleCaptureChanged((WXHWND) (HWND) lParam);
2762 break;
2763
2764 case WM_QUERYNEWPALETTE:
2765 processed = HandleQueryNewPalette();
2766 break;
2767
2768 case WM_ERASEBKGND:
2769 processed = HandleEraseBkgnd((WXHDC)(HDC)wParam);
2770 if ( processed )
2771 {
2772 // we processed the message, i.e. erased the background
2773 rc.result = TRUE;
2774 }
2775 break;
2776
2777 case WM_DROPFILES:
2778 processed = HandleDropFiles(wParam);
2779 break;
2780
2781 case WM_INITDIALOG:
2782 processed = HandleInitDialog((WXHWND)(HWND)wParam);
2783
2784 if ( processed )
2785 {
2786 // we never set focus from here
2787 rc.result = FALSE;
2788 }
2789 break;
2790
2791 case WM_QUERYENDSESSION:
2792 processed = HandleQueryEndSession(lParam, &rc.allow);
2793 break;
2794
2795 case WM_ENDSESSION:
2796 processed = HandleEndSession(wParam != 0, lParam);
2797 break;
2798
2799 case WM_GETMINMAXINFO:
2800 processed = HandleGetMinMaxInfo((MINMAXINFO*)lParam);
2801 break;
2802
2803 case WM_SETCURSOR:
2804 processed = HandleSetCursor((WXHWND)(HWND)wParam,
2805 LOWORD(lParam), // hit test
2806 HIWORD(lParam)); // mouse msg
2807
2808 if ( processed )
2809 {
2810 // returning TRUE stops the DefWindowProc() from further
2811 // processing this message - exactly what we need because we've
2812 // just set the cursor.
2813 rc.result = TRUE;
2814 }
2815 break;
2816
2817 #if defined(__WIN32__) && defined(WM_HELP)
2818 case WM_HELP:
2819 {
2820 HELPINFO* info = (HELPINFO*) lParam;
2821 // Don't yet process menu help events, just windows
2822 if (info->iContextType == HELPINFO_WINDOW)
2823 {
2824 wxWindowMSW* subjectOfHelp = this;
2825 bool eventProcessed = FALSE;
2826 while (subjectOfHelp && !eventProcessed)
2827 {
2828 wxHelpEvent helpEvent(wxEVT_HELP,
2829 subjectOfHelp->GetId(),
2830 wxPoint(info->MousePos.x,
2831 info->MousePos.y) );
2832 helpEvent.SetEventObject(this);
2833 eventProcessed =
2834 GetEventHandler()->ProcessEvent(helpEvent);
2835
2836 // Go up the window hierarchy until the event is
2837 // handled (or not)
2838 subjectOfHelp = subjectOfHelp->GetParent();
2839 }
2840
2841 processed = eventProcessed;
2842 }
2843 else if (info->iContextType == HELPINFO_MENUITEM)
2844 {
2845 wxHelpEvent helpEvent(wxEVT_HELP, info->iCtrlId);
2846 helpEvent.SetEventObject(this);
2847 processed = GetEventHandler()->ProcessEvent(helpEvent);
2848
2849 }
2850 //else: processed is already FALSE
2851 }
2852 break;
2853
2854 case WM_CONTEXTMENU:
2855 {
2856 // we don't convert from screen to client coordinates as
2857 // the event may be handled by a parent window
2858 wxPoint pt(GET_X_LPARAM(lParam), GET_Y_LPARAM(lParam));
2859
2860 wxContextMenuEvent evtCtx(wxEVT_CONTEXT_MENU, GetId(), pt);
2861 processed = GetEventHandler()->ProcessEvent(evtCtx);
2862 }
2863 break;
2864 #endif // __WIN32__
2865 }
2866
2867 if ( !processed )
2868 {
2869 #ifdef __WXDEBUG__
2870 wxLogTrace(wxTraceMessages, wxT("Forwarding %s to DefWindowProc."),
2871 wxGetMessageName(message));
2872 #endif // __WXDEBUG__
2873 rc.result = MSWDefWindowProc(message, wParam, lParam);
2874 }
2875
2876 return rc.result;
2877 }
2878
2879 // ----------------------------------------------------------------------------
2880 // wxWindow <-> HWND map
2881 // ----------------------------------------------------------------------------
2882
2883 wxWinHashTable *wxWinHandleHash = NULL;
2884
2885 wxWindow *wxFindWinFromHandle(WXHWND hWnd)
2886 {
2887 return wxWinHandleHash->Get((long)hWnd);
2888 }
2889
2890 void wxAssociateWinWithHandle(HWND hWnd, wxWindowMSW *win)
2891 {
2892 // adding NULL hWnd is (first) surely a result of an error and
2893 // (secondly) breaks menu command processing
2894 wxCHECK_RET( hWnd != (HWND)NULL,
2895 wxT("attempt to add a NULL hWnd to window list ignored") );
2896
2897 wxWindow *oldWin = wxFindWinFromHandle((WXHWND) hWnd);
2898 #ifdef __WXDEBUG__
2899 if ( oldWin && (oldWin != win) )
2900 {
2901 wxLogDebug(wxT("HWND %X already associated with another window (%s)"),
2902 (int) hWnd, win->GetClassInfo()->GetClassName());
2903 }
2904 else
2905 #endif // __WXDEBUG__
2906 if (!oldWin)
2907 {
2908 wxWinHandleHash->Put((long)hWnd, (wxWindow *)win);
2909 }
2910 }
2911
2912 void wxRemoveHandleAssociation(wxWindowMSW *win)
2913 {
2914 wxWinHandleHash->Delete((long)win->GetHWND());
2915 }
2916
2917 // ----------------------------------------------------------------------------
2918 // various MSW speciic class dependent functions
2919 // ----------------------------------------------------------------------------
2920
2921 // Default destroyer - override if you destroy it in some other way
2922 // (e.g. with MDI child windows)
2923 void wxWindowMSW::MSWDestroyWindow()
2924 {
2925 }
2926
2927 bool wxWindowMSW::MSWGetCreateWindowCoords(const wxPoint& pos,
2928 const wxSize& size,
2929 int& x, int& y,
2930 int& w, int& h) const
2931 {
2932 static const int DEFAULT_Y = 200;
2933 static const int DEFAULT_H = 250;
2934
2935 bool nonDefault = FALSE;
2936
2937 if ( pos.x == -1 )
2938 {
2939 // if set x to CW_USEDEFAULT, y parameter is ignored anyhow so we can
2940 // just as well set it to CW_USEDEFAULT as well
2941 x =
2942 y = CW_USEDEFAULT;
2943 }
2944 else
2945 {
2946 // OTOH, if x is not set to CW_USEDEFAULT, y shouldn't be set to it
2947 // neither because it is not handled as a special value by Windows then
2948 // and so we have to choose some default value for it
2949 x = pos.x;
2950 y = pos.y == -1 ? DEFAULT_Y : pos.y;
2951
2952 nonDefault = TRUE;
2953 }
2954
2955 /*
2956 NB: there used to be some code here which set the initial size of the
2957 window to the client size of the parent if no explicit size was
2958 specified. This was wrong because wxWindows programs often assume
2959 that they get a WM_SIZE (EVT_SIZE) upon creation, however this broke
2960 it. To see why, you should understand that Windows sends WM_SIZE from
2961 inside ::CreateWindow() anyhow. However, ::CreateWindow() is called
2962 from some base class ctor and so this WM_SIZE is not processed in the
2963 real class' OnSize() (because it's not fully constructed yet and the
2964 event goes to some base class OnSize() instead). So the WM_SIZE we
2965 rely on is the one sent when the parent frame resizes its children
2966 but here is the problem: if the child already has just the right
2967 size, nothing will happen as both wxWindows and Windows check for
2968 this and ignore any attempts to change the window size to the size it
2969 already has - so no WM_SIZE would be sent.
2970 */
2971 if ( size.x == -1 )
2972 {
2973 // as above, h is not used at all in this case anyhow
2974 w =
2975 h = CW_USEDEFAULT;
2976 }
2977 else
2978 {
2979 // and, again as above, we can't set the height to CW_USEDEFAULT here
2980 w = size.x;
2981 h = size.y == -1 ? DEFAULT_H : size.y;
2982
2983 nonDefault = TRUE;
2984 }
2985
2986 return nonDefault;
2987 }
2988
2989 WXHWND wxWindowMSW::MSWGetParent() const
2990 {
2991 return m_parent ? m_parent->GetHWND() : WXHWND(NULL);
2992 }
2993
2994 bool wxWindowMSW::MSWCreate(const wxChar *wclass,
2995 const wxChar *title,
2996 const wxPoint& pos,
2997 const wxSize& size,
2998 WXDWORD style,
2999 WXDWORD extendedStyle)
3000 {
3001 // choose the position/size for the new window
3002 int x, y, w, h;
3003 (void)MSWGetCreateWindowCoords(pos, size, x, y, w, h);
3004
3005 // controlId is menu handle for the top level windows, so set it to 0
3006 // unless we're creating a child window
3007 int controlId = style & WS_CHILD ? GetId() : 0;
3008
3009 // for each class "Foo" we have we also have "FooNR" ("no repaint") class
3010 // which is the same but without CS_[HV]REDRAW class styles so using it
3011 // ensures that the window is not fully repainted on each resize
3012 wxString className(wclass);
3013 if ( GetWindowStyleFlag() & wxNO_FULL_REPAINT_ON_RESIZE )
3014 {
3015 className += wxT("NR");
3016 }
3017
3018 // do create the window
3019 wxWindowCreationHook hook(this);
3020
3021 m_hWnd = (WXHWND)::CreateWindowEx
3022 (
3023 extendedStyle,
3024 className,
3025 title ? title : wxT(""),
3026 style,
3027 x, y, w, h,
3028 (HWND)MSWGetParent(),
3029 (HMENU)controlId,
3030 wxGetInstance(),
3031 NULL // no extra data
3032 );
3033
3034 if ( !m_hWnd )
3035 {
3036 wxLogSysError(_("Can't create window of class %s"), wclass);
3037
3038 return FALSE;
3039 }
3040
3041 SubclassWin(m_hWnd);
3042
3043 SetFont(wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT));
3044
3045 return TRUE;
3046 }
3047
3048 // ===========================================================================
3049 // MSW message handlers
3050 // ===========================================================================
3051
3052 // ---------------------------------------------------------------------------
3053 // WM_NOTIFY
3054 // ---------------------------------------------------------------------------
3055
3056 #ifdef __WIN95__
3057
3058 bool wxWindowMSW::HandleNotify(int idCtrl, WXLPARAM lParam, WXLPARAM *result)
3059 {
3060 #ifndef __WXMICROWIN__
3061 LPNMHDR hdr = (LPNMHDR)lParam;
3062 HWND hWnd = hdr->hwndFrom;
3063 wxWindow *win = wxFindWinFromHandle((WXHWND)hWnd);
3064
3065 // if the control is one of our windows, let it handle the message itself
3066 if ( win )
3067 {
3068 return win->MSWOnNotify(idCtrl, lParam, result);
3069 }
3070
3071 // VZ: why did we do it? normally this is unnecessary and, besides, it
3072 // breaks the message processing for the toolbars because the tooltip
3073 // notifications were being forwarded to the toolbar child controls
3074 // (if it had any) before being passed to the toolbar itself, so in my
3075 // example the tooltip for the combobox was always shown instead of the
3076 // correct button tooltips
3077 #if 0
3078 // try all our children
3079 wxWindowList::Node *node = GetChildren().GetFirst();
3080 while ( node )
3081 {
3082 wxWindow *child = node->GetData();
3083 if ( child->MSWOnNotify(idCtrl, lParam, result) )
3084 {
3085 return TRUE;
3086 }
3087
3088 node = node->GetNext();
3089 }
3090 #endif // 0
3091
3092 // by default, handle it ourselves
3093 return MSWOnNotify(idCtrl, lParam, result);
3094 #else // __WXMICROWIN__
3095 return FALSE;
3096 #endif
3097 }
3098
3099 #if wxUSE_TOOLTIPS
3100
3101 bool wxWindowMSW::HandleTooltipNotify(WXUINT code,
3102 WXLPARAM lParam,
3103 const wxString& ttip)
3104 {
3105 // I don't know why it happens, but the versions of comctl32.dll starting
3106 // from 4.70 sometimes send TTN_NEEDTEXTW even to ANSI programs (normally,
3107 // this message is supposed to be sent to Unicode programs only) -- hence
3108 // we need to handle it as well, otherwise no tooltips will be shown in
3109 // this case
3110
3111 if ( !(code == (WXUINT) TTN_NEEDTEXTA || code == (WXUINT) TTN_NEEDTEXTW) || ttip.empty() )
3112 {
3113 // not a tooltip message or no tooltip to show anyhow
3114 return FALSE;
3115 }
3116
3117 LPTOOLTIPTEXT ttText = (LPTOOLTIPTEXT)lParam;
3118
3119 if ( code == (WXUINT) TTN_NEEDTEXTA )
3120 {
3121 ttText->lpszText = (wxChar *)ttip.c_str();
3122 }
3123 else
3124 {
3125 #if wxUSE_UNICODE
3126 ttText->lpszText = (wxChar *)ttip.c_str();
3127 #else // !Unicode
3128 size_t lenAnsi = ttip.length();
3129
3130 // some compilers (MetroWerks and Cygwin) don't like calling mbstowcs
3131 // with NULL argument
3132 #if defined( __MWERKS__ ) || defined( __CYGWIN__ )
3133 size_t lenUnicode = 2*lenAnsi;
3134 #else
3135 size_t lenUnicode = mbstowcs(NULL, ttip, lenAnsi);
3136 #endif
3137
3138 // using the pointer of right type avoids us doing all sorts of
3139 // pointer arithmetics ourselves
3140 wchar_t *dst = (wchar_t *)ttText->szText,
3141 *pwz = new wchar_t[lenUnicode + 1];
3142 mbstowcs(pwz, ttip, lenAnsi + 1);
3143 memcpy(dst, pwz, lenUnicode*sizeof(wchar_t));
3144
3145 // put the terminating wide NUL
3146 dst[lenUnicode] = L'\0';
3147
3148 delete [] pwz;
3149 #endif // Unicode/!Unicode
3150 }
3151
3152 return TRUE;
3153 }
3154
3155 #endif // wxUSE_TOOLTIPS
3156
3157 bool wxWindowMSW::MSWOnNotify(int WXUNUSED(idCtrl),
3158 WXLPARAM lParam,
3159 WXLPARAM* WXUNUSED(result))
3160 {
3161 #if wxUSE_TOOLTIPS
3162 if ( m_tooltip )
3163 {
3164 NMHDR* hdr = (NMHDR *)lParam;
3165 if ( HandleTooltipNotify(hdr->code, lParam, m_tooltip->GetTip()))
3166 {
3167 // processed
3168 return TRUE;
3169 }
3170 }
3171 #endif // wxUSE_TOOLTIPS
3172
3173 return FALSE;
3174 }
3175
3176 #endif // __WIN95__
3177
3178 // ---------------------------------------------------------------------------
3179 // end session messages
3180 // ---------------------------------------------------------------------------
3181
3182 bool wxWindowMSW::HandleQueryEndSession(long logOff, bool *mayEnd)
3183 {
3184 wxCloseEvent event(wxEVT_QUERY_END_SESSION, -1);
3185 event.SetEventObject(wxTheApp);
3186 event.SetCanVeto(TRUE);
3187 event.SetLoggingOff(logOff == (long)ENDSESSION_LOGOFF);
3188
3189 bool rc = wxTheApp->ProcessEvent(event);
3190
3191 if ( rc )
3192 {
3193 // we may end only if the app didn't veto session closing (double
3194 // negation...)
3195 *mayEnd = !event.GetVeto();
3196 }
3197
3198 return rc;
3199 }
3200
3201 bool wxWindowMSW::HandleEndSession(bool endSession, long logOff)
3202 {
3203 // do nothing if the session isn't ending
3204 if ( !endSession )
3205 return FALSE;
3206
3207 // only send once
3208 if ( (this != wxTheApp->GetTopWindow()) )
3209 return FALSE;
3210
3211 wxCloseEvent event(wxEVT_END_SESSION, -1);
3212 event.SetEventObject(wxTheApp);
3213 event.SetCanVeto(FALSE);
3214 event.SetLoggingOff( (logOff == (long)ENDSESSION_LOGOFF) );
3215
3216 return wxTheApp->ProcessEvent(event);
3217 }
3218
3219 // ---------------------------------------------------------------------------
3220 // window creation/destruction
3221 // ---------------------------------------------------------------------------
3222
3223 bool wxWindowMSW::HandleCreate(WXLPCREATESTRUCT cs, bool *mayCreate)
3224 {
3225 // if we have WS_EX_CONTROLPARENT flag we absolutely *must* set it for our
3226 // parent as well as otherwise several Win32 functions using
3227 // GetNextDlgTabItem() to iterate over all controls such as
3228 // IsDialogMessage() or DefDlgProc() would enter an infinite loop: indeed,
3229 // all of them iterate over all the controls starting from the focus and
3230 // stop iterating when they get back to the focus but unless all parents
3231 // have WS_EX_CONTROLPARENT bit set, they would never get back to focus
3232 if ( ((CREATESTRUCT *)cs)->dwExStyle & WS_EX_CONTROLPARENT )
3233 {
3234 // there is no need to do anything for the top level windows
3235 const wxWindow *parent = GetParent();
3236 while ( parent && !parent->IsTopLevel() )
3237 {
3238 LONG exStyle = ::GetWindowLong(GetHwndOf(parent), GWL_EXSTYLE);
3239 if ( !(exStyle & WS_EX_CONTROLPARENT) )
3240 {
3241 // force the parent to have this style
3242 ::SetWindowLong(GetHwndOf(parent), GWL_EXSTYLE,
3243 exStyle | WS_EX_CONTROLPARENT);
3244 }
3245
3246 parent = parent->GetParent();
3247 }
3248 }
3249
3250 // TODO: should generate this event from WM_NCCREATE
3251 wxWindowCreateEvent event((wxWindow *)this);
3252 (void)GetEventHandler()->ProcessEvent(event);
3253
3254 *mayCreate = TRUE;
3255
3256 return TRUE;
3257 }
3258
3259 bool wxWindowMSW::HandleDestroy()
3260 {
3261 wxWindowDestroyEvent event((wxWindow *)this);
3262 (void)GetEventHandler()->ProcessEvent(event);
3263
3264 // delete our drop target if we've got one
3265 #if wxUSE_DRAG_AND_DROP
3266 if ( m_dropTarget != NULL )
3267 {
3268 m_dropTarget->Revoke(m_hWnd);
3269
3270 delete m_dropTarget;
3271 m_dropTarget = NULL;
3272 }
3273 #endif // wxUSE_DRAG_AND_DROP
3274
3275 // WM_DESTROY handled
3276 return TRUE;
3277 }
3278
3279 // ---------------------------------------------------------------------------
3280 // activation/focus
3281 // ---------------------------------------------------------------------------
3282
3283 bool wxWindowMSW::HandleActivate(int state,
3284 bool WXUNUSED(minimized),
3285 WXHWND WXUNUSED(activate))
3286 {
3287 wxActivateEvent event(wxEVT_ACTIVATE,
3288 (state == WA_ACTIVE) || (state == WA_CLICKACTIVE),
3289 m_windowId);
3290 event.SetEventObject(this);
3291
3292 return GetEventHandler()->ProcessEvent(event);
3293 }
3294
3295 bool wxWindowMSW::HandleSetFocus(WXHWND hwnd)
3296 {
3297 // notify the parent keeping track of focus for the kbd navigation
3298 // purposes that we got it
3299 wxChildFocusEvent eventFocus((wxWindow *)this);
3300 (void)GetEventHandler()->ProcessEvent(eventFocus);
3301
3302 #if wxUSE_CARET
3303 // Deal with caret
3304 if ( m_caret )
3305 {
3306 m_caret->OnSetFocus();
3307 }
3308 #endif // wxUSE_CARET
3309
3310 #if wxUSE_TEXTCTRL
3311 // If it's a wxTextCtrl don't send the event as it will be done
3312 // after the control gets to process it from EN_FOCUS handler
3313 if ( wxDynamicCastThis(wxTextCtrl) )
3314 {
3315 return FALSE;
3316 }
3317 #endif // wxUSE_TEXTCTRL
3318
3319 wxFocusEvent event(wxEVT_SET_FOCUS, m_windowId);
3320 event.SetEventObject(this);
3321
3322 // wxFindWinFromHandle() may return NULL, it is ok
3323 event.SetWindow(wxFindWinFromHandle(hwnd));
3324
3325 return GetEventHandler()->ProcessEvent(event);
3326 }
3327
3328 bool wxWindowMSW::HandleKillFocus(WXHWND hwnd)
3329 {
3330 #if wxUSE_CARET
3331 // Deal with caret
3332 if ( m_caret )
3333 {
3334 m_caret->OnKillFocus();
3335 }
3336 #endif // wxUSE_CARET
3337
3338 #if wxUSE_TEXTCTRL
3339 // If it's a wxTextCtrl don't send the event as it will be done
3340 // after the control gets to process it.
3341 wxTextCtrl *ctrl = wxDynamicCastThis(wxTextCtrl);
3342 if ( ctrl )
3343 {
3344 return FALSE;
3345 }
3346 #endif
3347
3348 // Don't send the event when in the process of being deleted. This can
3349 // only cause problems if the event handler tries to access the object.
3350 if ( m_isBeingDeleted )
3351 {
3352 return FALSE;
3353 }
3354
3355 wxFocusEvent event(wxEVT_KILL_FOCUS, m_windowId);
3356 event.SetEventObject(this);
3357
3358 // wxFindWinFromHandle() may return NULL, it is ok
3359 event.SetWindow(wxFindWinFromHandle(hwnd));
3360
3361 return GetEventHandler()->ProcessEvent(event);
3362 }
3363
3364 // ---------------------------------------------------------------------------
3365 // miscellaneous
3366 // ---------------------------------------------------------------------------
3367
3368 bool wxWindowMSW::HandleShow(bool show, int WXUNUSED(status))
3369 {
3370 wxShowEvent event(GetId(), show);
3371 event.m_eventObject = this;
3372
3373 return GetEventHandler()->ProcessEvent(event);
3374 }
3375
3376 bool wxWindowMSW::HandleInitDialog(WXHWND WXUNUSED(hWndFocus))
3377 {
3378 wxInitDialogEvent event(GetId());
3379 event.m_eventObject = this;
3380
3381 return GetEventHandler()->ProcessEvent(event);
3382 }
3383
3384 bool wxWindowMSW::HandleDropFiles(WXWPARAM wParam)
3385 {
3386 #ifndef __WXMICROWIN__
3387 HDROP hFilesInfo = (HDROP) wParam;
3388
3389 // Get the total number of files dropped
3390 UINT gwFilesDropped = ::DragQueryFile
3391 (
3392 (HDROP)hFilesInfo,
3393 (UINT)-1,
3394 (LPTSTR)0,
3395 (UINT)0
3396 );
3397
3398 wxString *files = new wxString[gwFilesDropped];
3399 for ( UINT wIndex = 0; wIndex < gwFilesDropped; wIndex++ )
3400 {
3401 // first get the needed buffer length (+1 for terminating NUL)
3402 size_t len = ::DragQueryFile(hFilesInfo, wIndex, NULL, 0) + 1;
3403
3404 // and now get the file name
3405 ::DragQueryFile(hFilesInfo, wIndex,
3406 files[wIndex].GetWriteBuf(len), len);
3407
3408 files[wIndex].UngetWriteBuf();
3409 }
3410 DragFinish (hFilesInfo);
3411
3412 wxDropFilesEvent event(wxEVT_DROP_FILES, gwFilesDropped, files);
3413 event.m_eventObject = this;
3414
3415 POINT dropPoint;
3416 DragQueryPoint(hFilesInfo, (LPPOINT) &dropPoint);
3417 event.m_pos.x = dropPoint.x;
3418 event.m_pos.y = dropPoint.y;
3419
3420 return GetEventHandler()->ProcessEvent(event);
3421 #else // __WXMICROWIN__
3422 return FALSE;
3423 #endif
3424 }
3425
3426 bool wxWindowMSW::HandleSetCursor(WXHWND WXUNUSED(hWnd),
3427 short nHitTest,
3428 int WXUNUSED(mouseMsg))
3429 {
3430 #ifndef __WXMICROWIN__
3431 // the logic is as follows:
3432 // -1. don't set cursor for non client area, including but not limited to
3433 // the title bar, scrollbars, &c
3434 // 0. allow the user to override default behaviour by using EVT_SET_CURSOR
3435 // 1. if we have the cursor set it unless wxIsBusy()
3436 // 2. if we're a top level window, set some cursor anyhow
3437 // 3. if wxIsBusy(), set the busy cursor, otherwise the global one
3438
3439 if ( nHitTest != HTCLIENT )
3440 {
3441 return FALSE;
3442 }
3443
3444 HCURSOR hcursor = 0;
3445
3446 // first ask the user code - it may wish to set the cursor in some very
3447 // specific way (for example, depending on the current position)
3448 POINT pt;
3449 #ifdef __WIN32__
3450 if ( !::GetCursorPos(&pt) )
3451 {
3452 wxLogLastError(wxT("GetCursorPos"));
3453 }
3454 #else
3455 // In WIN16 it doesn't return a value.
3456 ::GetCursorPos(&pt);
3457 #endif
3458
3459 int x = pt.x,
3460 y = pt.y;
3461 ScreenToClient(&x, &y);
3462 wxSetCursorEvent event(x, y);
3463
3464 bool processedEvtSetCursor = GetEventHandler()->ProcessEvent(event);
3465 if ( processedEvtSetCursor && event.HasCursor() )
3466 {
3467 hcursor = GetHcursorOf(event.GetCursor());
3468 }
3469
3470 if ( !hcursor )
3471 {
3472 bool isBusy = wxIsBusy();
3473
3474 // the test for processedEvtSetCursor is here to prevent using m_cursor
3475 // if the user code caught EVT_SET_CURSOR() and returned nothing from
3476 // it - this is a way to say that our cursor shouldn't be used for this
3477 // point
3478 if ( !processedEvtSetCursor && m_cursor.Ok() )
3479 {
3480 hcursor = GetHcursorOf(m_cursor);
3481 }
3482
3483 if ( !GetParent() )
3484 {
3485 if ( isBusy )
3486 {
3487 hcursor = wxGetCurrentBusyCursor();
3488 }
3489 else if ( !hcursor )
3490 {
3491 const wxCursor *cursor = wxGetGlobalCursor();
3492 if ( cursor && cursor->Ok() )
3493 {
3494 hcursor = GetHcursorOf(*cursor);
3495 }
3496 }
3497 }
3498 }
3499
3500 if ( hcursor )
3501 {
3502 ::SetCursor(hcursor);
3503
3504 // cursor set, stop here
3505 return TRUE;
3506 }
3507 #endif // __WXMICROWIN__
3508
3509 // pass up the window chain
3510 return FALSE;
3511 }
3512
3513 // ---------------------------------------------------------------------------
3514 // owner drawn stuff
3515 // ---------------------------------------------------------------------------
3516
3517 bool wxWindowMSW::MSWOnDrawItem(int id, WXDRAWITEMSTRUCT *itemStruct)
3518 {
3519 #if wxUSE_OWNER_DRAWN
3520
3521 #if wxUSE_MENUS_NATIVE
3522 // is it a menu item?
3523 DRAWITEMSTRUCT *pDrawStruct = (DRAWITEMSTRUCT *)itemStruct;
3524 if ( id == 0 && pDrawStruct->CtlType == ODT_MENU )
3525 {
3526 wxMenuItem *pMenuItem = (wxMenuItem *)(pDrawStruct->itemData);
3527
3528 wxCHECK( pMenuItem->IsKindOf(CLASSINFO(wxMenuItem)), FALSE );
3529
3530 // prepare to call OnDrawItem(): notice using of wxDCTemp to prevent
3531 // the DC from being released
3532 wxDCTemp dc((WXHDC)pDrawStruct->hDC);
3533 wxRect rect(pDrawStruct->rcItem.left, pDrawStruct->rcItem.top,
3534 pDrawStruct->rcItem.right - pDrawStruct->rcItem.left,
3535 pDrawStruct->rcItem.bottom - pDrawStruct->rcItem.top);
3536
3537 return pMenuItem->OnDrawItem
3538 (
3539 dc,
3540 rect,
3541 (wxOwnerDrawn::wxODAction)pDrawStruct->itemAction,
3542 (wxOwnerDrawn::wxODStatus)pDrawStruct->itemState
3543 );
3544 }
3545 #endif // wxUSE_MENUS_NATIVE
3546
3547 #if wxUSE_CONTROLS
3548 wxWindow *item = FindItem(id);
3549 if ( item && item->IsKindOf(CLASSINFO(wxControl)) )
3550 {
3551 return ((wxControl *)item)->MSWOnDraw(itemStruct);
3552 }
3553 #endif // wxUSE_CONTROLS
3554
3555 #endif // USE_OWNER_DRAWN
3556
3557 return FALSE;
3558 }
3559
3560 bool wxWindowMSW::MSWOnMeasureItem(int id, WXMEASUREITEMSTRUCT *itemStruct)
3561 {
3562 #if wxUSE_OWNER_DRAWN
3563 // is it a menu item?
3564 MEASUREITEMSTRUCT *pMeasureStruct = (MEASUREITEMSTRUCT *)itemStruct;
3565 if ( id == 0 && pMeasureStruct->CtlType == ODT_MENU )
3566 {
3567 wxMenuItem *pMenuItem = (wxMenuItem *)(pMeasureStruct->itemData);
3568
3569 wxCHECK( pMenuItem->IsKindOf(CLASSINFO(wxMenuItem)), FALSE );
3570
3571 return pMenuItem->OnMeasureItem(&pMeasureStruct->itemWidth,
3572 &pMeasureStruct->itemHeight);
3573 }
3574
3575 wxWindow *item = FindItem(id);
3576 if ( item && item->IsKindOf(CLASSINFO(wxControl)) )
3577 {
3578 return ((wxControl *)item)->MSWOnMeasure(itemStruct);
3579 }
3580 #endif // owner-drawn menus
3581 return FALSE;
3582 }
3583
3584 // ---------------------------------------------------------------------------
3585 // colours and palettes
3586 // ---------------------------------------------------------------------------
3587
3588 bool wxWindowMSW::HandleSysColorChange()
3589 {
3590 wxSysColourChangedEvent event;
3591 event.SetEventObject(this);
3592
3593 (void)GetEventHandler()->ProcessEvent(event);
3594
3595 // always let the system carry on the default processing to allow the
3596 // native controls to react to the colours update
3597 return FALSE;
3598 }
3599
3600 bool wxWindowMSW::HandleDisplayChange()
3601 {
3602 wxDisplayChangedEvent event;
3603 event.SetEventObject(this);
3604
3605 return GetEventHandler()->ProcessEvent(event);
3606 }
3607
3608 bool wxWindowMSW::HandleCtlColor(WXHBRUSH *brush,
3609 WXHDC pDC,
3610 WXHWND pWnd,
3611 WXUINT nCtlColor,
3612 WXUINT message,
3613 WXWPARAM wParam,
3614 WXLPARAM lParam)
3615 {
3616 #ifndef __WXMICROWIN__
3617 WXHBRUSH hBrush = 0;
3618
3619 if ( nCtlColor == CTLCOLOR_DLG )
3620 {
3621 hBrush = OnCtlColor(pDC, pWnd, nCtlColor, message, wParam, lParam);
3622 }
3623 #if wxUSE_CONTROLS
3624 else
3625 {
3626 wxControl *item = (wxControl *)FindItemByHWND(pWnd, TRUE);
3627 if ( item )
3628 hBrush = item->OnCtlColor(pDC, pWnd, nCtlColor, message, wParam, lParam);
3629 }
3630 #endif // wxUSE_CONTROLS
3631
3632 if ( hBrush )
3633 *brush = hBrush;
3634
3635 return hBrush != 0;
3636 #else // __WXMICROWIN__
3637 return FALSE;
3638 #endif
3639 }
3640
3641 // Define for each class of dialog and control
3642 WXHBRUSH wxWindowMSW::OnCtlColor(WXHDC WXUNUSED(hDC),
3643 WXHWND WXUNUSED(hWnd),
3644 WXUINT WXUNUSED(nCtlColor),
3645 WXUINT WXUNUSED(message),
3646 WXWPARAM WXUNUSED(wParam),
3647 WXLPARAM WXUNUSED(lParam))
3648 {
3649 return (WXHBRUSH)0;
3650 }
3651
3652 bool wxWindowMSW::HandlePaletteChanged(WXHWND hWndPalChange)
3653 {
3654 #if wxUSE_PALETTE
3655 // same as below except we don't respond to our own messages
3656 if ( hWndPalChange != GetHWND() )
3657 {
3658 // check to see if we our our parents have a custom palette
3659 wxWindowMSW *win = this;
3660 while ( win && !win->HasCustomPalette() )
3661 {
3662 win = win->GetParent();
3663 }
3664
3665 if ( win && win->HasCustomPalette() )
3666 {
3667 // realize the palette to see whether redrawing is needed
3668 HDC hdc = ::GetDC((HWND) hWndPalChange);
3669 win->m_palette.SetHPALETTE((WXHPALETTE)
3670 ::SelectPalette(hdc, GetHpaletteOf(win->m_palette), FALSE));
3671
3672 int result = ::RealizePalette(hdc);
3673
3674 // restore the palette (before releasing the DC)
3675 win->m_palette.SetHPALETTE((WXHPALETTE)
3676 ::SelectPalette(hdc, GetHpaletteOf(win->m_palette), FALSE));
3677 ::RealizePalette(hdc);
3678 ::ReleaseDC((HWND) hWndPalChange, hdc);
3679
3680 // now check for the need to redraw
3681 if (result > 0)
3682 InvalidateRect((HWND) hWndPalChange, NULL, TRUE);
3683 }
3684
3685 }
3686 #endif // wxUSE_PALETTE
3687
3688 wxPaletteChangedEvent event(GetId());
3689 event.SetEventObject(this);
3690 event.SetChangedWindow(wxFindWinFromHandle(hWndPalChange));
3691
3692 return GetEventHandler()->ProcessEvent(event);
3693 }
3694
3695 bool wxWindowMSW::HandleCaptureChanged(WXHWND hWndGainedCapture)
3696 {
3697 wxMouseCaptureChangedEvent event(GetId(), wxFindWinFromHandle(hWndGainedCapture));
3698 event.SetEventObject(this);
3699
3700 return GetEventHandler()->ProcessEvent(event);
3701 }
3702
3703 bool wxWindowMSW::HandleQueryNewPalette()
3704 {
3705
3706 #if wxUSE_PALETTE
3707 // check to see if we our our parents have a custom palette
3708 wxWindowMSW *win = this;
3709 while (!win->HasCustomPalette() && win->GetParent()) win = win->GetParent();
3710 if (win->HasCustomPalette()) {
3711 /* realize the palette to see whether redrawing is needed */
3712 HDC hdc = GetDC((HWND) GetHWND());
3713 win->m_palette.SetHPALETTE( (WXHPALETTE)
3714 ::SelectPalette(hdc, (HPALETTE) win->m_palette.GetHPALETTE(), FALSE) );
3715
3716 int result = ::RealizePalette(hdc);
3717 /* restore the palette (before releasing the DC) */
3718 win->m_palette.SetHPALETTE( (WXHPALETTE)
3719 ::SelectPalette(hdc, (HPALETTE) win->m_palette.GetHPALETTE(), TRUE) );
3720 ::RealizePalette(hdc);
3721 ::ReleaseDC((HWND) GetHWND(), hdc);
3722 /* now check for the need to redraw */
3723 if (result > 0)
3724 ::InvalidateRect((HWND) GetHWND(), NULL, TRUE);
3725 }
3726 #endif // wxUSE_PALETTE
3727
3728 wxQueryNewPaletteEvent event(GetId());
3729 event.SetEventObject(this);
3730
3731 return GetEventHandler()->ProcessEvent(event) && event.GetPaletteRealized();
3732 }
3733
3734 // Responds to colour changes: passes event on to children.
3735 void wxWindowMSW::OnSysColourChanged(wxSysColourChangedEvent& WXUNUSED(event))
3736 {
3737 // the top level window also reset the standard colour map as it might have
3738 // changed (there is no need to do it for the non top level windows as we
3739 // only have to do it once)
3740 if ( IsTopLevel() )
3741 {
3742 // FIXME-MT
3743 gs_hasStdCmap = FALSE;
3744 }
3745 wxWindowList::Node *node = GetChildren().GetFirst();
3746 while ( node )
3747 {
3748 // Only propagate to non-top-level windows because Windows already
3749 // sends this event to all top-level ones
3750 wxWindow *win = node->GetData();
3751 if ( !win->IsTopLevel() )
3752 {
3753 // we need to send the real WM_SYSCOLORCHANGE and not just trigger
3754 // EVT_SYS_COLOUR_CHANGED call because the latter wouldn't work for
3755 // the standard controls
3756 ::SendMessage(GetHwndOf(win), WM_SYSCOLORCHANGE, 0, 0);
3757 }
3758
3759 node = node->GetNext();
3760 }
3761
3762 // update the colours we use if they were not set explicitly by the user:
3763 // this must be done or OnCtlColor() would continue to use the old colours
3764 if ( !m_hasFgCol )
3765 {
3766 m_foregroundColour = wxSystemSettings::
3767 GetSystemColour(wxSYS_COLOUR_WINDOWTEXT);
3768 }
3769
3770 if ( !m_hasBgCol )
3771 {
3772 m_backgroundColour = wxSystemSettings::
3773 GetSystemColour(wxSYS_COLOUR_BTNFACE);
3774 }
3775 }
3776
3777 extern wxCOLORMAP *wxGetStdColourMap()
3778 {
3779 static COLORREF s_stdColours[wxSTD_COL_MAX];
3780 static wxCOLORMAP s_cmap[wxSTD_COL_MAX];
3781
3782 if ( !gs_hasStdCmap )
3783 {
3784 static bool s_coloursInit = FALSE;
3785
3786 if ( !s_coloursInit )
3787 {
3788 // When a bitmap is loaded, the RGB values can change (apparently
3789 // because Windows adjusts them to care for the old programs always
3790 // using 0xc0c0c0 while the transparent colour for the new Windows
3791 // versions is different). But we do this adjustment ourselves so
3792 // we want to avoid Windows' "help" and for this we need to have a
3793 // reference bitmap which can tell us what the RGB values change
3794 // to.
3795 wxBitmap stdColourBitmap(_T("wxBITMAP_STD_COLOURS"));
3796 if ( stdColourBitmap.Ok() )
3797 {
3798 // the pixels in the bitmap must correspond to wxSTD_COL_XXX!
3799 wxASSERT_MSG( stdColourBitmap.GetWidth() == wxSTD_COL_MAX,
3800 _T("forgot to update wxBITMAP_STD_COLOURS!") );
3801
3802 wxMemoryDC memDC;
3803 memDC.SelectObject(stdColourBitmap);
3804
3805 wxColour colour;
3806 for ( size_t i = 0; i < WXSIZEOF(s_stdColours); i++ )
3807 {
3808 memDC.GetPixel(i, 0, &colour);
3809 s_stdColours[i] = wxColourToRGB(colour);
3810 }
3811 }
3812 else // wxBITMAP_STD_COLOURS couldn't be loaded
3813 {
3814 s_stdColours[0] = RGB(000,000,000); // black
3815 s_stdColours[1] = RGB(128,128,128); // dark grey
3816 s_stdColours[2] = RGB(192,192,192); // light grey
3817 s_stdColours[3] = RGB(255,255,255); // white
3818 //s_stdColours[4] = RGB(000,000,255); // blue
3819 //s_stdColours[5] = RGB(255,000,255); // magenta
3820 }
3821
3822 s_coloursInit = TRUE;
3823 }
3824
3825 gs_hasStdCmap = TRUE;
3826
3827 // create the colour map
3828 #define INIT_CMAP_ENTRY(col) \
3829 s_cmap[wxSTD_COL_##col].from = s_stdColours[wxSTD_COL_##col]; \
3830 s_cmap[wxSTD_COL_##col].to = ::GetSysColor(COLOR_##col)
3831
3832 INIT_CMAP_ENTRY(BTNTEXT);
3833 INIT_CMAP_ENTRY(BTNSHADOW);
3834 INIT_CMAP_ENTRY(BTNFACE);
3835 INIT_CMAP_ENTRY(BTNHIGHLIGHT);
3836
3837 #undef INIT_CMAP_ENTRY
3838 }
3839
3840 return s_cmap;
3841 }
3842
3843 // ---------------------------------------------------------------------------
3844 // painting
3845 // ---------------------------------------------------------------------------
3846
3847 bool wxWindowMSW::HandlePaint()
3848 {
3849 #ifdef __WIN32__
3850 HRGN hRegion = ::CreateRectRgn(0, 0, 0, 0); // Dummy call to get a handle
3851 if ( !hRegion )
3852 wxLogLastError(wxT("CreateRectRgn"));
3853 if ( ::GetUpdateRgn(GetHwnd(), hRegion, FALSE) == ERROR )
3854 wxLogLastError(wxT("GetUpdateRgn"));
3855
3856 m_updateRegion = wxRegion((WXHRGN) hRegion);
3857 #else // Win16
3858 RECT updateRect;
3859 ::GetUpdateRect(GetHwnd(), &updateRect, FALSE);
3860
3861 m_updateRegion = wxRegion(updateRect.left, updateRect.top,
3862 updateRect.right - updateRect.left,
3863 updateRect.bottom - updateRect.top);
3864 #endif // Win32/16
3865
3866 wxPaintEvent event(m_windowId);
3867 event.SetEventObject(this);
3868
3869 bool processed = GetEventHandler()->ProcessEvent(event);
3870
3871 // note that we must generate NC event after the normal one as otherwise
3872 // BeginPaint() will happily overwrite our decorations with the background
3873 // colour
3874 wxNcPaintEvent eventNc(m_windowId);
3875 eventNc.SetEventObject(this);
3876 GetEventHandler()->ProcessEvent(eventNc);
3877
3878 return processed;
3879 }
3880
3881 // Can be called from an application's OnPaint handler
3882 void wxWindowMSW::OnPaint(wxPaintEvent& event)
3883 {
3884 #ifdef __WXUNIVERSAL__
3885 event.Skip();
3886 #else
3887 HDC hDC = (HDC) wxPaintDC::FindDCInCache((wxWindow*) event.GetEventObject());
3888 if (hDC != 0)
3889 {
3890 MSWDefWindowProc(WM_PAINT, (WPARAM) hDC, 0);
3891 }
3892 #endif
3893 }
3894
3895 bool wxWindowMSW::HandleEraseBkgnd(WXHDC hdc)
3896 {
3897 // Prevents flicker when dragging
3898 if ( ::IsIconic(GetHwnd()) )
3899 return TRUE;
3900
3901 wxDCTemp dc(hdc);
3902
3903 dc.SetHDC(hdc);
3904 dc.SetWindow((wxWindow *)this);
3905 dc.BeginDrawing();
3906
3907 wxEraseEvent event(m_windowId, &dc);
3908 event.SetEventObject(this);
3909 bool rc = GetEventHandler()->ProcessEvent(event);
3910
3911 dc.EndDrawing();
3912
3913 // must be called manually as ~wxDC doesn't do anything for wxDCTemp
3914 dc.SelectOldObjects(hdc);
3915
3916 return rc;
3917 }
3918
3919 void wxWindowMSW::OnEraseBackground(wxEraseEvent& event)
3920 {
3921 RECT rect;
3922 ::GetClientRect(GetHwnd(), &rect);
3923
3924 COLORREF ref = PALETTERGB(m_backgroundColour.Red(),
3925 m_backgroundColour.Green(),
3926 m_backgroundColour.Blue());
3927 HBRUSH hBrush = ::CreateSolidBrush(ref);
3928 if ( !hBrush )
3929 wxLogLastError(wxT("CreateSolidBrush"));
3930
3931 HDC hdc = (HDC)event.GetDC()->GetHDC();
3932
3933 int mode = ::SetMapMode(hdc, MM_TEXT);
3934
3935 ::FillRect(hdc, &rect, hBrush);
3936 ::DeleteObject(hBrush);
3937 ::SetMapMode(hdc, mode);
3938 }
3939
3940 // ---------------------------------------------------------------------------
3941 // moving and resizing
3942 // ---------------------------------------------------------------------------
3943
3944 bool wxWindowMSW::HandleMinimize()
3945 {
3946 wxIconizeEvent event(m_windowId);
3947 event.SetEventObject(this);
3948
3949 return GetEventHandler()->ProcessEvent(event);
3950 }
3951
3952 bool wxWindowMSW::HandleMaximize()
3953 {
3954 wxMaximizeEvent event(m_windowId);
3955 event.SetEventObject(this);
3956
3957 return GetEventHandler()->ProcessEvent(event);
3958 }
3959
3960 bool wxWindowMSW::HandleMove(int x, int y)
3961 {
3962 wxMoveEvent event(wxPoint(x, y), m_windowId);
3963 event.SetEventObject(this);
3964
3965 return GetEventHandler()->ProcessEvent(event);
3966 }
3967
3968 bool wxWindowMSW::HandleSize(int WXUNUSED(w), int WXUNUSED(h),
3969 WXUINT WXUNUSED(flag))
3970 {
3971 // don't use w and h parameters as they specify the client size while
3972 // according to the docs EVT_SIZE handler is supposed to receive the total
3973 // size
3974 wxSizeEvent event(GetSize(), m_windowId);
3975 event.SetEventObject(this);
3976
3977 return GetEventHandler()->ProcessEvent(event);
3978 }
3979
3980 bool wxWindowMSW::HandleGetMinMaxInfo(void *mmInfo)
3981 {
3982 MINMAXINFO *info = (MINMAXINFO *)mmInfo;
3983
3984 bool rc = FALSE;
3985
3986 int minWidth = GetMinWidth(),
3987 minHeight = GetMinHeight(),
3988 maxWidth = GetMaxWidth(),
3989 maxHeight = GetMaxHeight();
3990
3991 if ( minWidth != -1 )
3992 {
3993 info->ptMinTrackSize.x = minWidth;
3994 rc = TRUE;
3995 }
3996
3997 if ( minHeight != -1 )
3998 {
3999 info->ptMinTrackSize.y = minHeight;
4000 rc = TRUE;
4001 }
4002
4003 if ( maxWidth != -1 )
4004 {
4005 info->ptMaxTrackSize.x = maxWidth;
4006 rc = TRUE;
4007 }
4008
4009 if ( maxHeight != -1 )
4010 {
4011 info->ptMaxTrackSize.y = maxHeight;
4012 rc = TRUE;
4013 }
4014
4015 return rc;
4016 }
4017
4018 // ---------------------------------------------------------------------------
4019 // command messages
4020 // ---------------------------------------------------------------------------
4021
4022 bool wxWindowMSW::HandleCommand(WXWORD id, WXWORD cmd, WXHWND control)
4023 {
4024 #if wxUSE_MENUS_NATIVE
4025 if ( !cmd && wxCurrentPopupMenu )
4026 {
4027 wxMenu *popupMenu = wxCurrentPopupMenu;
4028 wxCurrentPopupMenu = NULL;
4029
4030 return popupMenu->MSWCommand(cmd, id);
4031 }
4032 #endif // wxUSE_MENUS_NATIVE
4033
4034 wxWindow *win = NULL;
4035
4036 // first try to find it from HWND - this works even with the broken
4037 // programs using the same ids for different controls
4038 if ( control )
4039 {
4040 win = wxFindWinFromHandle(control);
4041 }
4042
4043 // try the id
4044 if ( !win )
4045 {
4046 // must cast to a signed type before comparing with other ids!
4047 win = FindItem((signed short)id);
4048 }
4049
4050 if ( win )
4051 {
4052 return win->MSWCommand(cmd, id);
4053 }
4054
4055 // the messages sent from the in-place edit control used by the treectrl
4056 // for label editing have id == 0, but they should _not_ be treated as menu
4057 // messages (they are EN_XXX ones, in fact) so don't translate anything
4058 // coming from a control to wxEVT_COMMAND_MENU_SELECTED
4059 if ( !control )
4060 {
4061 // If no child window, it may be an accelerator, e.g. for a popup menu
4062 // command
4063
4064 wxCommandEvent event(wxEVT_COMMAND_MENU_SELECTED);
4065 event.SetEventObject(this);
4066 event.SetId(id);
4067 event.SetInt(id);
4068
4069 return GetEventHandler()->ProcessEvent(event);
4070 }
4071 #if wxUSE_SPINCTRL && !defined(__WXUNIVERSAL__)
4072 else
4073 {
4074 // the text ctrl which is logically part of wxSpinCtrl sends WM_COMMAND
4075 // notifications to its parent which we want to reflect back to
4076 // wxSpinCtrl
4077 wxSpinCtrl *spin = wxSpinCtrl::GetSpinForTextCtrl(control);
4078 if ( spin && spin->ProcessTextCommand(cmd, id) )
4079 return TRUE;
4080 }
4081 #endif // wxUSE_SPINCTRL
4082
4083 return FALSE;
4084 }
4085
4086 bool wxWindowMSW::HandleSysCommand(WXWPARAM wParam, WXLPARAM WXUNUSED(lParam))
4087 {
4088 // 4 bits are reserved
4089 switch ( wParam & 0xFFFFFFF0 )
4090 {
4091 case SC_MAXIMIZE:
4092 return HandleMaximize();
4093
4094 case SC_MINIMIZE:
4095 return HandleMinimize();
4096 }
4097
4098 return FALSE;
4099 }
4100
4101 // ---------------------------------------------------------------------------
4102 // mouse events
4103 // ---------------------------------------------------------------------------
4104
4105 void wxWindowMSW::InitMouseEvent(wxMouseEvent& event,
4106 int x, int y,
4107 WXUINT flags)
4108 {
4109 // our client coords are not quite the same as Windows ones
4110 wxPoint pt = GetClientAreaOrigin();
4111 event.m_x = x - pt.x;
4112 event.m_y = y - pt.y;
4113
4114 event.m_shiftDown = (flags & MK_SHIFT) != 0;
4115 event.m_controlDown = (flags & MK_CONTROL) != 0;
4116 event.m_leftDown = (flags & MK_LBUTTON) != 0;
4117 event.m_middleDown = (flags & MK_MBUTTON) != 0;
4118 event.m_rightDown = (flags & MK_RBUTTON) != 0;
4119 event.m_altDown = (::GetKeyState(VK_MENU) & 0x80000000) != 0;
4120
4121 event.SetTimestamp(s_currentMsg.time);
4122 event.m_eventObject = this;
4123 event.SetId(GetId());
4124
4125 #if wxUSE_MOUSEEVENT_HACK
4126 m_lastMouseX = x;
4127 m_lastMouseY = y;
4128 m_lastMouseEvent = event.GetEventType();
4129 #endif // wxUSE_MOUSEEVENT_HACK
4130 }
4131
4132 // Windows doesn't send the mouse events to the static controls (which are
4133 // transparent in the sense that their WM_NCHITTEST handler returns
4134 // HTTRANSPARENT) at all but we want all controls to receive the mouse events
4135 // and so we manually check if we don't have a child window under mouse and if
4136 // we do, send the event to it instead of the window Windows had sent WM_XXX
4137 // to.
4138 //
4139 // Notice that this is not done for the mouse move events because this could
4140 // (would?) be too slow, but only for clicks which means that the static texts
4141 // still don't get move, enter nor leave events.
4142 static wxWindowMSW *FindWindowForMouseEvent(wxWindowMSW *win, int *x, int *y) //TW:REQ:Univ
4143 {
4144 wxCHECK_MSG( x && y, win, _T("NULL pointer in FindWindowForMouseEvent") );
4145
4146 // first try to find a non transparent child: this allows us to send events
4147 // to a static text which is inside a static box, for example
4148 POINT pt = { *x, *y };
4149 HWND hwnd = GetHwndOf(win),
4150 hwndUnderMouse;
4151
4152 #ifdef __WIN32__
4153 hwndUnderMouse = ::ChildWindowFromPointEx
4154 (
4155 hwnd,
4156 pt,
4157 CWP_SKIPINVISIBLE |
4158 CWP_SKIPDISABLED |
4159 CWP_SKIPTRANSPARENT
4160 );
4161
4162 if ( !hwndUnderMouse || hwndUnderMouse == hwnd )
4163 #endif // __WIN32__
4164 {
4165 // now try any child window at all
4166 hwndUnderMouse = ::ChildWindowFromPoint(hwnd, pt);
4167 }
4168
4169 // check that we have a child window which is susceptible to receive mouse
4170 // events: for this it must be shown and enabled
4171 if ( hwndUnderMouse &&
4172 hwndUnderMouse != hwnd &&
4173 ::IsWindowVisible(hwndUnderMouse) &&
4174 ::IsWindowEnabled(hwndUnderMouse) )
4175 {
4176 wxWindow *winUnderMouse = wxFindWinFromHandle((WXHWND)hwndUnderMouse);
4177 if ( winUnderMouse )
4178 {
4179 // translate the mouse coords to the other window coords
4180 win->ClientToScreen(x, y);
4181 winUnderMouse->ScreenToClient(x, y);
4182
4183 win = winUnderMouse;
4184 }
4185 }
4186
4187 return win;
4188 }
4189
4190 bool wxWindowMSW::HandleMouseEvent(WXUINT msg, int x, int y, WXUINT flags)
4191 {
4192 // the mouse events take consecutive IDs from WM_MOUSEFIRST to
4193 // WM_MOUSELAST, so it's enough to substract WM_MOUSEMOVE == WM_MOUSEFIRST
4194 // from the message id and take the value in the table to get wxWin event
4195 // id
4196 static const wxEventType eventsMouse[] =
4197 {
4198 wxEVT_MOTION,
4199 wxEVT_LEFT_DOWN,
4200 wxEVT_LEFT_UP,
4201 wxEVT_LEFT_DCLICK,
4202 wxEVT_RIGHT_DOWN,
4203 wxEVT_RIGHT_UP,
4204 wxEVT_RIGHT_DCLICK,
4205 wxEVT_MIDDLE_DOWN,
4206 wxEVT_MIDDLE_UP,
4207 wxEVT_MIDDLE_DCLICK
4208 };
4209
4210 wxMouseEvent event(eventsMouse[msg - WM_MOUSEMOVE]);
4211 InitMouseEvent(event, x, y, flags);
4212
4213 return GetEventHandler()->ProcessEvent(event);
4214 }
4215
4216 bool wxWindowMSW::HandleMouseMove(int x, int y, WXUINT flags)
4217 {
4218 if ( !m_mouseInWindow )
4219 {
4220 // it would be wrong to assume that just because we get a mouse move
4221 // event that the mouse is inside the window: although this is usually
4222 // true, it is not if we had captured the mouse, so we need to check
4223 // the mouse coordinates here
4224 if ( !HasCapture() || IsMouseInWindow() )
4225 {
4226 // Generate an ENTER event
4227 m_mouseInWindow = TRUE;
4228
4229 wxMouseEvent event(wxEVT_ENTER_WINDOW);
4230 InitMouseEvent(event, x, y, flags);
4231
4232 (void)GetEventHandler()->ProcessEvent(event);
4233 }
4234 }
4235
4236 #if wxUSE_MOUSEEVENT_HACK
4237 // Window gets a click down message followed by a mouse move message even
4238 // if position isn't changed! We want to discard the trailing move event
4239 // if x and y are the same.
4240 if ( (m_lastMouseEvent == wxEVT_RIGHT_DOWN ||
4241 m_lastMouseEvent == wxEVT_LEFT_DOWN ||
4242 m_lastMouseEvent == wxEVT_MIDDLE_DOWN) &&
4243 (m_lastMouseX == x && m_lastMouseY == y) )
4244 {
4245 m_lastMouseEvent = wxEVT_MOTION;
4246
4247 return FALSE;
4248 }
4249 #endif // wxUSE_MOUSEEVENT_HACK
4250
4251 return HandleMouseEvent(WM_MOUSEMOVE, x, y, flags);
4252 }
4253
4254
4255 bool wxWindowMSW::HandleMouseWheel(WXWPARAM wParam, WXLPARAM lParam)
4256 {
4257 #if wxUSE_MOUSEWHEEL
4258 wxMouseEvent event(wxEVT_MOUSEWHEEL);
4259 InitMouseEvent(event,
4260 GET_X_LPARAM(lParam),
4261 GET_Y_LPARAM(lParam),
4262 LOWORD(wParam));
4263 event.m_wheelRotation = (short)HIWORD(wParam);
4264 event.m_wheelDelta = WHEEL_DELTA;
4265
4266 #ifdef __WIN32__
4267 static int s_linesPerRotation = -1;
4268 if ( s_linesPerRotation == -1 )
4269 {
4270 if ( !::SystemParametersInfo(SPI_GETWHEELSCROLLLINES, 0,
4271 &s_linesPerRotation, 0))
4272 {
4273 // this is not supposed to happen
4274 wxLogLastError(_T("SystemParametersInfo(GETWHEELSCROLLLINES)"));
4275
4276 // the default is 3, so use it if SystemParametersInfo() failed
4277 s_linesPerRotation = 3;
4278 }
4279 }
4280 #else // Win16
4281 // no SystemParametersInfo() under Win16
4282 static const int s_linesPerRotation = 3;
4283 #endif
4284
4285 event.m_linesPerAction = s_linesPerRotation;
4286 return GetEventHandler()->ProcessEvent(event);
4287
4288 #else
4289 (void) wParam;
4290 (void) lParam;
4291
4292 return FALSE;
4293 #endif
4294 }
4295
4296
4297 // ---------------------------------------------------------------------------
4298 // keyboard handling
4299 // ---------------------------------------------------------------------------
4300
4301 // create the key event of the given type for the given key - used by
4302 // HandleChar and HandleKeyDown/Up
4303 wxKeyEvent wxWindowMSW::CreateKeyEvent(wxEventType evType,
4304 int id,
4305 WXLPARAM lParam,
4306 WXWPARAM wParam) const
4307 {
4308 wxKeyEvent event(evType);
4309 event.SetId(GetId());
4310 event.m_shiftDown = wxIsShiftDown();
4311 event.m_controlDown = wxIsCtrlDown();
4312 event.m_altDown = (HIWORD(lParam) & KF_ALTDOWN) == KF_ALTDOWN;
4313
4314 event.m_eventObject = (wxWindow *)this; // const_cast
4315 event.m_keyCode = id;
4316 event.m_rawCode = (wxUint32) wParam;
4317 event.m_rawFlags = (wxUint32) lParam;
4318 event.SetTimestamp(s_currentMsg.time);
4319
4320 // translate the position to client coords
4321 POINT pt;
4322 GetCursorPos(&pt);
4323 RECT rect;
4324 GetWindowRect(GetHwnd(),&rect);
4325 pt.x -= rect.left;
4326 pt.y -= rect.top;
4327
4328 event.m_x = pt.x;
4329 event.m_y = pt.y;
4330
4331 return event;
4332 }
4333
4334 // isASCII is TRUE only when we're called from WM_CHAR handler and not from
4335 // WM_KEYDOWN one
4336 bool wxWindowMSW::HandleChar(WXWPARAM wParam, WXLPARAM lParam, bool isASCII)
4337 {
4338 bool ctrlDown = FALSE;
4339
4340 int id;
4341 if ( isASCII )
4342 {
4343 // If 1 -> 26, translate to either special keycode or just set
4344 // ctrlDown. IOW, Ctrl-C should result in keycode == 3 and
4345 // ControlDown() == TRUE.
4346 id = wParam;
4347 if ( (id > 0) && (id < 27) )
4348 {
4349 switch (id)
4350 {
4351 case 13:
4352 id = WXK_RETURN;
4353 break;
4354
4355 case 8:
4356 id = WXK_BACK;
4357 break;
4358
4359 case 9:
4360 id = WXK_TAB;
4361 break;
4362
4363 default:
4364 ctrlDown = TRUE;
4365 break;
4366 }
4367 }
4368 }
4369 else // we're called from WM_KEYDOWN
4370 {
4371 id = wxCharCodeMSWToWX(wParam);
4372 if ( id == 0 )
4373 {
4374 // it's ASCII and will be processed here only when called from
4375 // WM_CHAR (i.e. when isASCII = TRUE), don't process it now
4376 return FALSE;
4377 }
4378 }
4379
4380 wxKeyEvent event(CreateKeyEvent(wxEVT_CHAR, id, lParam, wParam));
4381 if ( ctrlDown )
4382 {
4383 event.m_controlDown = TRUE;
4384 }
4385
4386 return GetEventHandler()->ProcessEvent(event);
4387 }
4388
4389 bool wxWindowMSW::HandleKeyDown(WXWPARAM wParam, WXLPARAM lParam)
4390 {
4391 int id = wxCharCodeMSWToWX(wParam);
4392
4393 if ( !id )
4394 {
4395 // normal ASCII char
4396 id = wParam;
4397 }
4398
4399 if ( id != -1 ) // VZ: does this ever happen (FIXME)?
4400 {
4401 wxKeyEvent event(CreateKeyEvent(wxEVT_KEY_DOWN, id, lParam, wParam));
4402 if ( GetEventHandler()->ProcessEvent(event) )
4403 {
4404 return TRUE;
4405 }
4406 }
4407
4408 return FALSE;
4409 }
4410
4411 bool wxWindowMSW::HandleKeyUp(WXWPARAM wParam, WXLPARAM lParam)
4412 {
4413 int id = wxCharCodeMSWToWX(wParam);
4414
4415 if ( !id )
4416 {
4417 // normal ASCII char
4418 id = wParam;
4419 }
4420
4421 if ( id != -1 ) // VZ: does this ever happen (FIXME)?
4422 {
4423 wxKeyEvent event(CreateKeyEvent(wxEVT_KEY_UP, id, lParam, wParam));
4424 if ( GetEventHandler()->ProcessEvent(event) )
4425 return TRUE;
4426 }
4427
4428 return FALSE;
4429 }
4430
4431 // ---------------------------------------------------------------------------
4432 // joystick
4433 // ---------------------------------------------------------------------------
4434
4435 bool wxWindowMSW::HandleJoystickEvent(WXUINT msg, int x, int y, WXUINT flags)
4436 {
4437 #ifdef JOY_BUTTON1
4438 int change = 0;
4439 if ( flags & JOY_BUTTON1CHG )
4440 change = wxJOY_BUTTON1;
4441 if ( flags & JOY_BUTTON2CHG )
4442 change = wxJOY_BUTTON2;
4443 if ( flags & JOY_BUTTON3CHG )
4444 change = wxJOY_BUTTON3;
4445 if ( flags & JOY_BUTTON4CHG )
4446 change = wxJOY_BUTTON4;
4447
4448 int buttons = 0;
4449 if ( flags & JOY_BUTTON1 )
4450 buttons |= wxJOY_BUTTON1;
4451 if ( flags & JOY_BUTTON2 )
4452 buttons |= wxJOY_BUTTON2;
4453 if ( flags & JOY_BUTTON3 )
4454 buttons |= wxJOY_BUTTON3;
4455 if ( flags & JOY_BUTTON4 )
4456 buttons |= wxJOY_BUTTON4;
4457
4458 // the event ids aren't consecutive so we can't use table based lookup
4459 int joystick;
4460 wxEventType eventType;
4461 switch ( msg )
4462 {
4463 case MM_JOY1MOVE:
4464 joystick = 1;
4465 eventType = wxEVT_JOY_MOVE;
4466 break;
4467
4468 case MM_JOY2MOVE:
4469 joystick = 2;
4470 eventType = wxEVT_JOY_MOVE;
4471 break;
4472
4473 case MM_JOY1ZMOVE:
4474 joystick = 1;
4475 eventType = wxEVT_JOY_ZMOVE;
4476 break;
4477
4478 case MM_JOY2ZMOVE:
4479 joystick = 2;
4480 eventType = wxEVT_JOY_ZMOVE;
4481 break;
4482
4483 case MM_JOY1BUTTONDOWN:
4484 joystick = 1;
4485 eventType = wxEVT_JOY_BUTTON_DOWN;
4486 break;
4487
4488 case MM_JOY2BUTTONDOWN:
4489 joystick = 2;
4490 eventType = wxEVT_JOY_BUTTON_DOWN;
4491 break;
4492
4493 case MM_JOY1BUTTONUP:
4494 joystick = 1;
4495 eventType = wxEVT_JOY_BUTTON_UP;
4496 break;
4497
4498 case MM_JOY2BUTTONUP:
4499 joystick = 2;
4500 eventType = wxEVT_JOY_BUTTON_UP;
4501 break;
4502
4503 default:
4504 wxFAIL_MSG(wxT("no such joystick event"));
4505
4506 return FALSE;
4507 }
4508
4509 wxJoystickEvent event(eventType, buttons, joystick, change);
4510 event.SetPosition(wxPoint(x, y));
4511 event.SetEventObject(this);
4512
4513 return GetEventHandler()->ProcessEvent(event);
4514 #else
4515 return FALSE;
4516 #endif
4517 }
4518
4519 // ---------------------------------------------------------------------------
4520 // scrolling
4521 // ---------------------------------------------------------------------------
4522
4523 bool wxWindowMSW::MSWOnScroll(int orientation, WXWORD wParam,
4524 WXWORD pos, WXHWND control)
4525 {
4526 if ( control )
4527 {
4528 wxWindow *child = wxFindWinFromHandle(control);
4529 if ( child )
4530 return child->MSWOnScroll(orientation, wParam, pos, control);
4531 }
4532
4533 wxScrollWinEvent event;
4534 event.SetPosition(pos);
4535 event.SetOrientation(orientation);
4536 event.m_eventObject = this;
4537
4538 switch ( wParam )
4539 {
4540 case SB_TOP:
4541 event.m_eventType = wxEVT_SCROLLWIN_TOP;
4542 break;
4543
4544 case SB_BOTTOM:
4545 event.m_eventType = wxEVT_SCROLLWIN_BOTTOM;
4546 break;
4547
4548 case SB_LINEUP:
4549 event.m_eventType = wxEVT_SCROLLWIN_LINEUP;
4550 break;
4551
4552 case SB_LINEDOWN:
4553 event.m_eventType = wxEVT_SCROLLWIN_LINEDOWN;
4554 break;
4555
4556 case SB_PAGEUP:
4557 event.m_eventType = wxEVT_SCROLLWIN_PAGEUP;
4558 break;
4559
4560 case SB_PAGEDOWN:
4561 event.m_eventType = wxEVT_SCROLLWIN_PAGEDOWN;
4562 break;
4563
4564 case SB_THUMBPOSITION:
4565 case SB_THUMBTRACK:
4566 #ifdef __WIN32__
4567 // under Win32, the scrollbar range and position are 32 bit integers,
4568 // but WM_[HV]SCROLL only carry the low 16 bits of them, so we must
4569 // explicitly query the scrollbar for the correct position (this must
4570 // be done only for these two SB_ events as they are the only one
4571 // carrying the scrollbar position)
4572 {
4573 SCROLLINFO scrollInfo;
4574 wxZeroMemory(scrollInfo);
4575 scrollInfo.cbSize = sizeof(SCROLLINFO);
4576 scrollInfo.fMask = SIF_TRACKPOS;
4577
4578 if ( !::GetScrollInfo(GetHwnd(),
4579 orientation == wxHORIZONTAL ? SB_HORZ
4580 : SB_VERT,
4581 &scrollInfo) )
4582 {
4583 wxLogLastError(_T("GetScrollInfo"));
4584 }
4585
4586 event.SetPosition(scrollInfo.nTrackPos);
4587 }
4588 #endif // Win32
4589
4590 event.m_eventType = wParam == SB_THUMBPOSITION
4591 ? wxEVT_SCROLLWIN_THUMBRELEASE
4592 : wxEVT_SCROLLWIN_THUMBTRACK;
4593 break;
4594
4595 default:
4596 return FALSE;
4597 }
4598
4599 return GetEventHandler()->ProcessEvent(event);
4600 }
4601
4602 // ===========================================================================
4603 // global functions
4604 // ===========================================================================
4605
4606 void wxGetCharSize(WXHWND wnd, int *x, int *y, const wxFont *the_font)
4607 {
4608 TEXTMETRIC tm;
4609 HDC dc = ::GetDC((HWND) wnd);
4610 HFONT fnt =0;
4611 HFONT was = 0;
4612 if ( the_font )
4613 {
4614 // the_font->UseResource();
4615 // the_font->RealizeResource();
4616 fnt = (HFONT)((wxFont *)the_font)->GetResourceHandle(); // const_cast
4617 if ( fnt )
4618 was = (HFONT) SelectObject(dc,fnt);
4619 }
4620 GetTextMetrics(dc, &tm);
4621 if ( the_font && fnt && was )
4622 {
4623 SelectObject(dc,was);
4624 }
4625 ReleaseDC((HWND)wnd, dc);
4626
4627 if ( x )
4628 *x = tm.tmAveCharWidth;
4629 if ( y )
4630 *y = tm.tmHeight + tm.tmExternalLeading;
4631
4632 // if ( the_font )
4633 // the_font->ReleaseResource();
4634 }
4635
4636 // Returns 0 if was a normal ASCII value, not a special key. This indicates that
4637 // the key should be ignored by WM_KEYDOWN and processed by WM_CHAR instead.
4638 int wxCharCodeMSWToWX(int keySym)
4639 {
4640 int id;
4641 switch (keySym)
4642 {
4643 case VK_CANCEL: id = WXK_CANCEL; break;
4644 case VK_BACK: id = WXK_BACK; break;
4645 case VK_TAB: id = WXK_TAB; break;
4646 case VK_CLEAR: id = WXK_CLEAR; break;
4647 case VK_RETURN: id = WXK_RETURN; break;
4648 case VK_SHIFT: id = WXK_SHIFT; break;
4649 case VK_CONTROL: id = WXK_CONTROL; break;
4650 case VK_MENU : id = WXK_MENU; break;
4651 case VK_PAUSE: id = WXK_PAUSE; break;
4652 case VK_CAPITAL: id = WXK_CAPITAL; break;
4653 case VK_SPACE: id = WXK_SPACE; break;
4654 case VK_ESCAPE: id = WXK_ESCAPE; break;
4655 case VK_PRIOR: id = WXK_PRIOR; break;
4656 case VK_NEXT : id = WXK_NEXT; break;
4657 case VK_END: id = WXK_END; break;
4658 case VK_HOME : id = WXK_HOME; break;
4659 case VK_LEFT : id = WXK_LEFT; break;
4660 case VK_UP: id = WXK_UP; break;
4661 case VK_RIGHT: id = WXK_RIGHT; break;
4662 case VK_DOWN : id = WXK_DOWN; break;
4663 case VK_SELECT: id = WXK_SELECT; break;
4664 case VK_PRINT: id = WXK_PRINT; break;
4665 case VK_EXECUTE: id = WXK_EXECUTE; break;
4666 case VK_INSERT: id = WXK_INSERT; break;
4667 case VK_DELETE: id = WXK_DELETE; break;
4668 case VK_HELP : id = WXK_HELP; break;
4669 case VK_NUMPAD0: id = WXK_NUMPAD0; break;
4670 case VK_NUMPAD1: id = WXK_NUMPAD1; break;
4671 case VK_NUMPAD2: id = WXK_NUMPAD2; break;
4672 case VK_NUMPAD3: id = WXK_NUMPAD3; break;
4673 case VK_NUMPAD4: id = WXK_NUMPAD4; break;
4674 case VK_NUMPAD5: id = WXK_NUMPAD5; break;
4675 case VK_NUMPAD6: id = WXK_NUMPAD6; break;
4676 case VK_NUMPAD7: id = WXK_NUMPAD7; break;
4677 case VK_NUMPAD8: id = WXK_NUMPAD8; break;
4678 case VK_NUMPAD9: id = WXK_NUMPAD9; break;
4679 case VK_MULTIPLY: id = WXK_NUMPAD_MULTIPLY; break;
4680 case VK_ADD: id = WXK_NUMPAD_ADD; break;
4681 case VK_SUBTRACT: id = WXK_NUMPAD_SUBTRACT; break;
4682 case VK_DECIMAL: id = WXK_NUMPAD_DECIMAL; break;
4683 case VK_DIVIDE: id = WXK_NUMPAD_DIVIDE; break;
4684 case VK_F1: id = WXK_F1; break;
4685 case VK_F2: id = WXK_F2; break;
4686 case VK_F3: id = WXK_F3; break;
4687 case VK_F4: id = WXK_F4; break;
4688 case VK_F5: id = WXK_F5; break;
4689 case VK_F6: id = WXK_F6; break;
4690 case VK_F7: id = WXK_F7; break;
4691 case VK_F8: id = WXK_F8; break;
4692 case VK_F9: id = WXK_F9; break;
4693 case VK_F10: id = WXK_F10; break;
4694 case VK_F11: id = WXK_F11; break;
4695 case VK_F12: id = WXK_F12; break;
4696 case VK_F13: id = WXK_F13; break;
4697 case VK_F14: id = WXK_F14; break;
4698 case VK_F15: id = WXK_F15; break;
4699 case VK_F16: id = WXK_F16; break;
4700 case VK_F17: id = WXK_F17; break;
4701 case VK_F18: id = WXK_F18; break;
4702 case VK_F19: id = WXK_F19; break;
4703 case VK_F20: id = WXK_F20; break;
4704 case VK_F21: id = WXK_F21; break;
4705 case VK_F22: id = WXK_F22; break;
4706 case VK_F23: id = WXK_F23; break;
4707 case VK_F24: id = WXK_F24; break;
4708 case VK_NUMLOCK: id = WXK_NUMLOCK; break;
4709 case VK_SCROLL: id = WXK_SCROLL; break;
4710
4711 case VK_OEM_1: id = ';'; break;
4712 case VK_OEM_PLUS: id = '+'; break;
4713 case VK_OEM_COMMA: id = ','; break;
4714 case VK_OEM_MINUS: id = '-'; break;
4715 case VK_OEM_PERIOD: id = '.'; break;
4716 case VK_OEM_2: id = '/'; break;
4717 case VK_OEM_3: id = '~'; break;
4718 case VK_OEM_4: id = '['; break;
4719 case VK_OEM_5: id = '\\'; break;
4720 case VK_OEM_6: id = ']'; break;
4721 case VK_OEM_7: id = '\''; break;
4722
4723 default:
4724 id = 0;
4725 }
4726
4727 return id;
4728 }
4729
4730 int wxCharCodeWXToMSW(int id, bool *isVirtual)
4731 {
4732 *isVirtual = TRUE;
4733 int keySym = 0;
4734 switch (id)
4735 {
4736 case WXK_CANCEL: keySym = VK_CANCEL; break;
4737 case WXK_CLEAR: keySym = VK_CLEAR; break;
4738 case WXK_SHIFT: keySym = VK_SHIFT; break;
4739 case WXK_CONTROL: keySym = VK_CONTROL; break;
4740 case WXK_MENU : keySym = VK_MENU; break;
4741 case WXK_PAUSE: keySym = VK_PAUSE; break;
4742 case WXK_PRIOR: keySym = VK_PRIOR; break;
4743 case WXK_NEXT : keySym = VK_NEXT; break;
4744 case WXK_END: keySym = VK_END; break;
4745 case WXK_HOME : keySym = VK_HOME; break;
4746 case WXK_LEFT : keySym = VK_LEFT; break;
4747 case WXK_UP: keySym = VK_UP; break;
4748 case WXK_RIGHT: keySym = VK_RIGHT; break;
4749 case WXK_DOWN : keySym = VK_DOWN; break;
4750 case WXK_SELECT: keySym = VK_SELECT; break;
4751 case WXK_PRINT: keySym = VK_PRINT; break;
4752 case WXK_EXECUTE: keySym = VK_EXECUTE; break;
4753 case WXK_INSERT: keySym = VK_INSERT; break;
4754 case WXK_DELETE: keySym = VK_DELETE; break;
4755 case WXK_HELP : keySym = VK_HELP; break;
4756 case WXK_NUMPAD0: keySym = VK_NUMPAD0; break;
4757 case WXK_NUMPAD1: keySym = VK_NUMPAD1; break;
4758 case WXK_NUMPAD2: keySym = VK_NUMPAD2; break;
4759 case WXK_NUMPAD3: keySym = VK_NUMPAD3; break;
4760 case WXK_NUMPAD4: keySym = VK_NUMPAD4; break;
4761 case WXK_NUMPAD5: keySym = VK_NUMPAD5; break;
4762 case WXK_NUMPAD6: keySym = VK_NUMPAD6; break;
4763 case WXK_NUMPAD7: keySym = VK_NUMPAD7; break;
4764 case WXK_NUMPAD8: keySym = VK_NUMPAD8; break;
4765 case WXK_NUMPAD9: keySym = VK_NUMPAD9; break;
4766 case WXK_NUMPAD_MULTIPLY: keySym = VK_MULTIPLY; break;
4767 case WXK_NUMPAD_ADD: keySym = VK_ADD; break;
4768 case WXK_NUMPAD_SUBTRACT: keySym = VK_SUBTRACT; break;
4769 case WXK_NUMPAD_DECIMAL: keySym = VK_DECIMAL; break;
4770 case WXK_NUMPAD_DIVIDE: keySym = VK_DIVIDE; break;
4771 case WXK_F1: keySym = VK_F1; break;
4772 case WXK_F2: keySym = VK_F2; break;
4773 case WXK_F3: keySym = VK_F3; break;
4774 case WXK_F4: keySym = VK_F4; break;
4775 case WXK_F5: keySym = VK_F5; break;
4776 case WXK_F6: keySym = VK_F6; break;
4777 case WXK_F7: keySym = VK_F7; break;
4778 case WXK_F8: keySym = VK_F8; break;
4779 case WXK_F9: keySym = VK_F9; break;
4780 case WXK_F10: keySym = VK_F10; break;
4781 case WXK_F11: keySym = VK_F11; break;
4782 case WXK_F12: keySym = VK_F12; break;
4783 case WXK_F13: keySym = VK_F13; break;
4784 case WXK_F14: keySym = VK_F14; break;
4785 case WXK_F15: keySym = VK_F15; break;
4786 case WXK_F16: keySym = VK_F16; break;
4787 case WXK_F17: keySym = VK_F17; break;
4788 case WXK_F18: keySym = VK_F18; break;
4789 case WXK_F19: keySym = VK_F19; break;
4790 case WXK_F20: keySym = VK_F20; break;
4791 case WXK_F21: keySym = VK_F21; break;
4792 case WXK_F22: keySym = VK_F22; break;
4793 case WXK_F23: keySym = VK_F23; break;
4794 case WXK_F24: keySym = VK_F24; break;
4795 case WXK_NUMLOCK: keySym = VK_NUMLOCK; break;
4796 case WXK_SCROLL: keySym = VK_SCROLL; break;
4797 default:
4798 {
4799 *isVirtual = FALSE;
4800 keySym = id;
4801 break;
4802 }
4803 }
4804 return keySym;
4805 }
4806
4807 wxWindow *wxGetActiveWindow()
4808 {
4809 HWND hWnd = GetActiveWindow();
4810 if ( hWnd != 0 )
4811 {
4812 return wxFindWinFromHandle((WXHWND) hWnd);
4813 }
4814 return NULL;
4815 }
4816
4817 extern wxWindow *wxGetWindowFromHWND(WXHWND hWnd)
4818 {
4819 HWND hwnd = (HWND)hWnd;
4820
4821 // For a radiobutton, we get the radiobox from GWL_USERDATA (which is set
4822 // by code in msw/radiobox.cpp), for all the others we just search up the
4823 // window hierarchy
4824 wxWindow *win = (wxWindow *)NULL;
4825 if ( hwnd )
4826 {
4827 win = wxFindWinFromHandle((WXHWND)hwnd);
4828 if ( !win )
4829 {
4830 // all these hacks only work under Win32 anyhow
4831 #ifdef __WIN32__
4832
4833 #if wxUSE_RADIOBOX
4834 // native radiobuttons return DLGC_RADIOBUTTON here and for any
4835 // wxWindow class which overrides WM_GETDLGCODE processing to
4836 // do it as well, win would be already non NULL
4837 if ( ::SendMessage(hwnd, WM_GETDLGCODE, 0, 0) & DLGC_RADIOBUTTON )
4838 {
4839 win = (wxWindow *)::GetWindowLong(hwnd, GWL_USERDATA);
4840 }
4841 //else: it's a wxRadioButton, not a radiobutton from wxRadioBox
4842 #endif // wxUSE_RADIOBOX
4843
4844 // spin control text buddy window should be mapped to spin ctrl
4845 // itself so try it too
4846 #if wxUSE_SPINCTRL && !defined(__WXUNIVERSAL__)
4847 if ( !win )
4848 {
4849 win = wxSpinCtrl::GetSpinForTextCtrl((WXHWND)hwnd);
4850 }
4851 #endif // wxUSE_SPINCTRL
4852
4853 #endif // Win32
4854 }
4855 }
4856
4857 while ( hwnd && !win )
4858 {
4859 // this is a really ugly hack needed to avoid mistakenly returning the
4860 // parent frame wxWindow for the find/replace modeless dialog HWND -
4861 // this, in turn, is needed to call IsDialogMessage() from
4862 // wxApp::ProcessMessage() as for this we must return NULL from here
4863 //
4864 // FIXME: this is clearly not the best way to do it but I think we'll
4865 // need to change HWND <-> wxWindow code more heavily than I can
4866 // do it now to fix it
4867 #ifndef __WXMICROWIN__
4868 if ( ::GetWindow(hwnd, GW_OWNER) )
4869 {
4870 // it's a dialog box, don't go upwards
4871 break;
4872 }
4873 #endif
4874
4875 hwnd = ::GetParent(hwnd);
4876 win = wxFindWinFromHandle((WXHWND)hwnd);
4877 }
4878
4879 return win;
4880 }
4881
4882 #ifndef __WXMICROWIN__
4883
4884 // Windows keyboard hook. Allows interception of e.g. F1, ESCAPE
4885 // in active frames and dialogs, regardless of where the focus is.
4886 static HHOOK wxTheKeyboardHook = 0;
4887 static FARPROC wxTheKeyboardHookProc = 0;
4888 int APIENTRY _EXPORT
4889 wxKeyboardHook(int nCode, WORD wParam, DWORD lParam);
4890
4891 void wxSetKeyboardHook(bool doIt)
4892 {
4893 if ( doIt )
4894 {
4895 wxTheKeyboardHookProc = MakeProcInstance((FARPROC) wxKeyboardHook, wxGetInstance());
4896 wxTheKeyboardHook = SetWindowsHookEx(WH_KEYBOARD, (HOOKPROC) wxTheKeyboardHookProc, wxGetInstance(),
4897
4898 #if defined(__WIN32__) && !defined(__TWIN32__)
4899 GetCurrentThreadId()
4900 // (DWORD)GetCurrentProcess()); // This is another possibility. Which is right?
4901 #else
4902 GetCurrentTask()
4903 #endif
4904 );
4905 }
4906 else
4907 {
4908 UnhookWindowsHookEx(wxTheKeyboardHook);
4909
4910 // avoids warning about statement with no effect (FreeProcInstance
4911 // doesn't do anything under Win32)
4912 #if !defined(WIN32) && !defined(_WIN32) && !defined(__WIN32__) && !defined(__NT__) && !defined(__GNUWIN32__)
4913 FreeProcInstance(wxTheKeyboardHookProc);
4914 #endif
4915 }
4916 }
4917
4918 int APIENTRY _EXPORT
4919 wxKeyboardHook(int nCode, WORD wParam, DWORD lParam)
4920 {
4921 DWORD hiWord = HIWORD(lParam);
4922 if ( nCode != HC_NOREMOVE && ((hiWord & KF_UP) == 0) )
4923 {
4924 int id = wxCharCodeMSWToWX(wParam);
4925 if ( id != 0 )
4926 {
4927 wxKeyEvent event(wxEVT_CHAR_HOOK);
4928 if ( (HIWORD(lParam) & KF_ALTDOWN) == KF_ALTDOWN )
4929 event.m_altDown = TRUE;
4930
4931 event.m_eventObject = NULL;
4932 event.m_keyCode = id;
4933 event.m_shiftDown = wxIsShiftDown();
4934 event.m_controlDown = wxIsCtrlDown();
4935 event.SetTimestamp(s_currentMsg.time);
4936
4937 wxWindow *win = wxGetActiveWindow();
4938 wxEvtHandler *handler;
4939 if ( win )
4940 {
4941 handler = win->GetEventHandler();
4942 event.SetId(win->GetId());
4943 }
4944 else
4945 {
4946 handler = wxTheApp;
4947 event.SetId(-1);
4948 }
4949
4950 if ( handler && handler->ProcessEvent(event) )
4951 {
4952 // processed
4953 return 1;
4954 }
4955 }
4956 }
4957
4958 return (int)CallNextHookEx(wxTheKeyboardHook, nCode, wParam, lParam);
4959 }
4960
4961 #endif // !__WXMICROWIN__
4962
4963 #ifdef __WXDEBUG__
4964 const char *wxGetMessageName(int message)
4965 {
4966 switch ( message )
4967 {
4968 case 0x0000: return "WM_NULL";
4969 case 0x0001: return "WM_CREATE";
4970 case 0x0002: return "WM_DESTROY";
4971 case 0x0003: return "WM_MOVE";
4972 case 0x0005: return "WM_SIZE";
4973 case 0x0006: return "WM_ACTIVATE";
4974 case 0x0007: return "WM_SETFOCUS";
4975 case 0x0008: return "WM_KILLFOCUS";
4976 case 0x000A: return "WM_ENABLE";
4977 case 0x000B: return "WM_SETREDRAW";
4978 case 0x000C: return "WM_SETTEXT";
4979 case 0x000D: return "WM_GETTEXT";
4980 case 0x000E: return "WM_GETTEXTLENGTH";
4981 case 0x000F: return "WM_PAINT";
4982 case 0x0010: return "WM_CLOSE";
4983 case 0x0011: return "WM_QUERYENDSESSION";
4984 case 0x0012: return "WM_QUIT";
4985 case 0x0013: return "WM_QUERYOPEN";
4986 case 0x0014: return "WM_ERASEBKGND";
4987 case 0x0015: return "WM_SYSCOLORCHANGE";
4988 case 0x0016: return "WM_ENDSESSION";
4989 case 0x0017: return "WM_SYSTEMERROR";
4990 case 0x0018: return "WM_SHOWWINDOW";
4991 case 0x0019: return "WM_CTLCOLOR";
4992 case 0x001A: return "WM_WININICHANGE";
4993 case 0x001B: return "WM_DEVMODECHANGE";
4994 case 0x001C: return "WM_ACTIVATEAPP";
4995 case 0x001D: return "WM_FONTCHANGE";
4996 case 0x001E: return "WM_TIMECHANGE";
4997 case 0x001F: return "WM_CANCELMODE";
4998 case 0x0020: return "WM_SETCURSOR";
4999 case 0x0021: return "WM_MOUSEACTIVATE";
5000 case 0x0022: return "WM_CHILDACTIVATE";
5001 case 0x0023: return "WM_QUEUESYNC";
5002 case 0x0024: return "WM_GETMINMAXINFO";
5003 case 0x0026: return "WM_PAINTICON";
5004 case 0x0027: return "WM_ICONERASEBKGND";
5005 case 0x0028: return "WM_NEXTDLGCTL";
5006 case 0x002A: return "WM_SPOOLERSTATUS";
5007 case 0x002B: return "WM_DRAWITEM";
5008 case 0x002C: return "WM_MEASUREITEM";
5009 case 0x002D: return "WM_DELETEITEM";
5010 case 0x002E: return "WM_VKEYTOITEM";
5011 case 0x002F: return "WM_CHARTOITEM";
5012 case 0x0030: return "WM_SETFONT";
5013 case 0x0031: return "WM_GETFONT";
5014 case 0x0037: return "WM_QUERYDRAGICON";
5015 case 0x0039: return "WM_COMPAREITEM";
5016 case 0x0041: return "WM_COMPACTING";
5017 case 0x0044: return "WM_COMMNOTIFY";
5018 case 0x0046: return "WM_WINDOWPOSCHANGING";
5019 case 0x0047: return "WM_WINDOWPOSCHANGED";
5020 case 0x0048: return "WM_POWER";
5021
5022 #ifdef __WIN32__
5023 case 0x004A: return "WM_COPYDATA";
5024 case 0x004B: return "WM_CANCELJOURNAL";
5025 case 0x004E: return "WM_NOTIFY";
5026 case 0x0050: return "WM_INPUTLANGCHANGEREQUEST";
5027 case 0x0051: return "WM_INPUTLANGCHANGE";
5028 case 0x0052: return "WM_TCARD";
5029 case 0x0053: return "WM_HELP";
5030 case 0x0054: return "WM_USERCHANGED";
5031 case 0x0055: return "WM_NOTIFYFORMAT";
5032 case 0x007B: return "WM_CONTEXTMENU";
5033 case 0x007C: return "WM_STYLECHANGING";
5034 case 0x007D: return "WM_STYLECHANGED";
5035 case 0x007E: return "WM_DISPLAYCHANGE";
5036 case 0x007F: return "WM_GETICON";
5037 case 0x0080: return "WM_SETICON";
5038 #endif //WIN32
5039
5040 case 0x0081: return "WM_NCCREATE";
5041 case 0x0082: return "WM_NCDESTROY";
5042 case 0x0083: return "WM_NCCALCSIZE";
5043 case 0x0084: return "WM_NCHITTEST";
5044 case 0x0085: return "WM_NCPAINT";
5045 case 0x0086: return "WM_NCACTIVATE";
5046 case 0x0087: return "WM_GETDLGCODE";
5047 case 0x00A0: return "WM_NCMOUSEMOVE";
5048 case 0x00A1: return "WM_NCLBUTTONDOWN";
5049 case 0x00A2: return "WM_NCLBUTTONUP";
5050 case 0x00A3: return "WM_NCLBUTTONDBLCLK";
5051 case 0x00A4: return "WM_NCRBUTTONDOWN";
5052 case 0x00A5: return "WM_NCRBUTTONUP";
5053 case 0x00A6: return "WM_NCRBUTTONDBLCLK";
5054 case 0x00A7: return "WM_NCMBUTTONDOWN";
5055 case 0x00A8: return "WM_NCMBUTTONUP";
5056 case 0x00A9: return "WM_NCMBUTTONDBLCLK";
5057 case 0x0100: return "WM_KEYDOWN";
5058 case 0x0101: return "WM_KEYUP";
5059 case 0x0102: return "WM_CHAR";
5060 case 0x0103: return "WM_DEADCHAR";
5061 case 0x0104: return "WM_SYSKEYDOWN";
5062 case 0x0105: return "WM_SYSKEYUP";
5063 case 0x0106: return "WM_SYSCHAR";
5064 case 0x0107: return "WM_SYSDEADCHAR";
5065 case 0x0108: return "WM_KEYLAST";
5066
5067 #ifdef __WIN32__
5068 case 0x010D: return "WM_IME_STARTCOMPOSITION";
5069 case 0x010E: return "WM_IME_ENDCOMPOSITION";
5070 case 0x010F: return "WM_IME_COMPOSITION";
5071 #endif //WIN32
5072
5073 case 0x0110: return "WM_INITDIALOG";
5074 case 0x0111: return "WM_COMMAND";
5075 case 0x0112: return "WM_SYSCOMMAND";
5076 case 0x0113: return "WM_TIMER";
5077 case 0x0114: return "WM_HSCROLL";
5078 case 0x0115: return "WM_VSCROLL";
5079 case 0x0116: return "WM_INITMENU";
5080 case 0x0117: return "WM_INITMENUPOPUP";
5081 case 0x011F: return "WM_MENUSELECT";
5082 case 0x0120: return "WM_MENUCHAR";
5083 case 0x0121: return "WM_ENTERIDLE";
5084 case 0x0200: return "WM_MOUSEMOVE";
5085 case 0x0201: return "WM_LBUTTONDOWN";
5086 case 0x0202: return "WM_LBUTTONUP";
5087 case 0x0203: return "WM_LBUTTONDBLCLK";
5088 case 0x0204: return "WM_RBUTTONDOWN";
5089 case 0x0205: return "WM_RBUTTONUP";
5090 case 0x0206: return "WM_RBUTTONDBLCLK";
5091 case 0x0207: return "WM_MBUTTONDOWN";
5092 case 0x0208: return "WM_MBUTTONUP";
5093 case 0x0209: return "WM_MBUTTONDBLCLK";
5094 case 0x020A: return "WM_MOUSEWHEEL";
5095 case 0x0210: return "WM_PARENTNOTIFY";
5096 case 0x0211: return "WM_ENTERMENULOOP";
5097 case 0x0212: return "WM_EXITMENULOOP";
5098
5099 #ifdef __WIN32__
5100 case 0x0213: return "WM_NEXTMENU";
5101 case 0x0214: return "WM_SIZING";
5102 case 0x0215: return "WM_CAPTURECHANGED";
5103 case 0x0216: return "WM_MOVING";
5104 case 0x0218: return "WM_POWERBROADCAST";
5105 case 0x0219: return "WM_DEVICECHANGE";
5106 #endif //WIN32
5107
5108 case 0x0220: return "WM_MDICREATE";
5109 case 0x0221: return "WM_MDIDESTROY";
5110 case 0x0222: return "WM_MDIACTIVATE";
5111 case 0x0223: return "WM_MDIRESTORE";
5112 case 0x0224: return "WM_MDINEXT";
5113 case 0x0225: return "WM_MDIMAXIMIZE";
5114 case 0x0226: return "WM_MDITILE";
5115 case 0x0227: return "WM_MDICASCADE";
5116 case 0x0228: return "WM_MDIICONARRANGE";
5117 case 0x0229: return "WM_MDIGETACTIVE";
5118 case 0x0230: return "WM_MDISETMENU";
5119 case 0x0233: return "WM_DROPFILES";
5120
5121 #ifdef __WIN32__
5122 case 0x0281: return "WM_IME_SETCONTEXT";
5123 case 0x0282: return "WM_IME_NOTIFY";
5124 case 0x0283: return "WM_IME_CONTROL";
5125 case 0x0284: return "WM_IME_COMPOSITIONFULL";
5126 case 0x0285: return "WM_IME_SELECT";
5127 case 0x0286: return "WM_IME_CHAR";
5128 case 0x0290: return "WM_IME_KEYDOWN";
5129 case 0x0291: return "WM_IME_KEYUP";
5130 #endif //WIN32
5131
5132 case 0x0300: return "WM_CUT";
5133 case 0x0301: return "WM_COPY";
5134 case 0x0302: return "WM_PASTE";
5135 case 0x0303: return "WM_CLEAR";
5136 case 0x0304: return "WM_UNDO";
5137 case 0x0305: return "WM_RENDERFORMAT";
5138 case 0x0306: return "WM_RENDERALLFORMATS";
5139 case 0x0307: return "WM_DESTROYCLIPBOARD";
5140 case 0x0308: return "WM_DRAWCLIPBOARD";
5141 case 0x0309: return "WM_PAINTCLIPBOARD";
5142 case 0x030A: return "WM_VSCROLLCLIPBOARD";
5143 case 0x030B: return "WM_SIZECLIPBOARD";
5144 case 0x030C: return "WM_ASKCBFORMATNAME";
5145 case 0x030D: return "WM_CHANGECBCHAIN";
5146 case 0x030E: return "WM_HSCROLLCLIPBOARD";
5147 case 0x030F: return "WM_QUERYNEWPALETTE";
5148 case 0x0310: return "WM_PALETTEISCHANGING";
5149 case 0x0311: return "WM_PALETTECHANGED";
5150
5151 #ifdef __WIN32__
5152 // common controls messages - although they're not strictly speaking
5153 // standard, it's nice to decode them nevertheless
5154
5155 // listview
5156 case 0x1000 + 0: return "LVM_GETBKCOLOR";
5157 case 0x1000 + 1: return "LVM_SETBKCOLOR";
5158 case 0x1000 + 2: return "LVM_GETIMAGELIST";
5159 case 0x1000 + 3: return "LVM_SETIMAGELIST";
5160 case 0x1000 + 4: return "LVM_GETITEMCOUNT";
5161 case 0x1000 + 5: return "LVM_GETITEMA";
5162 case 0x1000 + 75: return "LVM_GETITEMW";
5163 case 0x1000 + 6: return "LVM_SETITEMA";
5164 case 0x1000 + 76: return "LVM_SETITEMW";
5165 case 0x1000 + 7: return "LVM_INSERTITEMA";
5166 case 0x1000 + 77: return "LVM_INSERTITEMW";
5167 case 0x1000 + 8: return "LVM_DELETEITEM";
5168 case 0x1000 + 9: return "LVM_DELETEALLITEMS";
5169 case 0x1000 + 10: return "LVM_GETCALLBACKMASK";
5170 case 0x1000 + 11: return "LVM_SETCALLBACKMASK";
5171 case 0x1000 + 12: return "LVM_GETNEXTITEM";
5172 case 0x1000 + 13: return "LVM_FINDITEMA";
5173 case 0x1000 + 83: return "LVM_FINDITEMW";
5174 case 0x1000 + 14: return "LVM_GETITEMRECT";
5175 case 0x1000 + 15: return "LVM_SETITEMPOSITION";
5176 case 0x1000 + 16: return "LVM_GETITEMPOSITION";
5177 case 0x1000 + 17: return "LVM_GETSTRINGWIDTHA";
5178 case 0x1000 + 87: return "LVM_GETSTRINGWIDTHW";
5179 case 0x1000 + 18: return "LVM_HITTEST";
5180 case 0x1000 + 19: return "LVM_ENSUREVISIBLE";
5181 case 0x1000 + 20: return "LVM_SCROLL";
5182 case 0x1000 + 21: return "LVM_REDRAWITEMS";
5183 case 0x1000 + 22: return "LVM_ARRANGE";
5184 case 0x1000 + 23: return "LVM_EDITLABELA";
5185 case 0x1000 + 118: return "LVM_EDITLABELW";
5186 case 0x1000 + 24: return "LVM_GETEDITCONTROL";
5187 case 0x1000 + 25: return "LVM_GETCOLUMNA";
5188 case 0x1000 + 95: return "LVM_GETCOLUMNW";
5189 case 0x1000 + 26: return "LVM_SETCOLUMNA";
5190 case 0x1000 + 96: return "LVM_SETCOLUMNW";
5191 case 0x1000 + 27: return "LVM_INSERTCOLUMNA";
5192 case 0x1000 + 97: return "LVM_INSERTCOLUMNW";
5193 case 0x1000 + 28: return "LVM_DELETECOLUMN";
5194 case 0x1000 + 29: return "LVM_GETCOLUMNWIDTH";
5195 case 0x1000 + 30: return "LVM_SETCOLUMNWIDTH";
5196 case 0x1000 + 31: return "LVM_GETHEADER";
5197 case 0x1000 + 33: return "LVM_CREATEDRAGIMAGE";
5198 case 0x1000 + 34: return "LVM_GETVIEWRECT";
5199 case 0x1000 + 35: return "LVM_GETTEXTCOLOR";
5200 case 0x1000 + 36: return "LVM_SETTEXTCOLOR";
5201 case 0x1000 + 37: return "LVM_GETTEXTBKCOLOR";
5202 case 0x1000 + 38: return "LVM_SETTEXTBKCOLOR";
5203 case 0x1000 + 39: return "LVM_GETTOPINDEX";
5204 case 0x1000 + 40: return "LVM_GETCOUNTPERPAGE";
5205 case 0x1000 + 41: return "LVM_GETORIGIN";
5206 case 0x1000 + 42: return "LVM_UPDATE";
5207 case 0x1000 + 43: return "LVM_SETITEMSTATE";
5208 case 0x1000 + 44: return "LVM_GETITEMSTATE";
5209 case 0x1000 + 45: return "LVM_GETITEMTEXTA";
5210 case 0x1000 + 115: return "LVM_GETITEMTEXTW";
5211 case 0x1000 + 46: return "LVM_SETITEMTEXTA";
5212 case 0x1000 + 116: return "LVM_SETITEMTEXTW";
5213 case 0x1000 + 47: return "LVM_SETITEMCOUNT";
5214 case 0x1000 + 48: return "LVM_SORTITEMS";
5215 case 0x1000 + 49: return "LVM_SETITEMPOSITION32";
5216 case 0x1000 + 50: return "LVM_GETSELECTEDCOUNT";
5217 case 0x1000 + 51: return "LVM_GETITEMSPACING";
5218 case 0x1000 + 52: return "LVM_GETISEARCHSTRINGA";
5219 case 0x1000 + 117: return "LVM_GETISEARCHSTRINGW";
5220 case 0x1000 + 53: return "LVM_SETICONSPACING";
5221 case 0x1000 + 54: return "LVM_SETEXTENDEDLISTVIEWSTYLE";
5222 case 0x1000 + 55: return "LVM_GETEXTENDEDLISTVIEWSTYLE";
5223 case 0x1000 + 56: return "LVM_GETSUBITEMRECT";
5224 case 0x1000 + 57: return "LVM_SUBITEMHITTEST";
5225 case 0x1000 + 58: return "LVM_SETCOLUMNORDERARRAY";
5226 case 0x1000 + 59: return "LVM_GETCOLUMNORDERARRAY";
5227 case 0x1000 + 60: return "LVM_SETHOTITEM";
5228 case 0x1000 + 61: return "LVM_GETHOTITEM";
5229 case 0x1000 + 62: return "LVM_SETHOTCURSOR";
5230 case 0x1000 + 63: return "LVM_GETHOTCURSOR";
5231 case 0x1000 + 64: return "LVM_APPROXIMATEVIEWRECT";
5232 case 0x1000 + 65: return "LVM_SETWORKAREA";
5233
5234 // tree view
5235 case 0x1100 + 0: return "TVM_INSERTITEMA";
5236 case 0x1100 + 50: return "TVM_INSERTITEMW";
5237 case 0x1100 + 1: return "TVM_DELETEITEM";
5238 case 0x1100 + 2: return "TVM_EXPAND";
5239 case 0x1100 + 4: return "TVM_GETITEMRECT";
5240 case 0x1100 + 5: return "TVM_GETCOUNT";
5241 case 0x1100 + 6: return "TVM_GETINDENT";
5242 case 0x1100 + 7: return "TVM_SETINDENT";
5243 case 0x1100 + 8: return "TVM_GETIMAGELIST";
5244 case 0x1100 + 9: return "TVM_SETIMAGELIST";
5245 case 0x1100 + 10: return "TVM_GETNEXTITEM";
5246 case 0x1100 + 11: return "TVM_SELECTITEM";
5247 case 0x1100 + 12: return "TVM_GETITEMA";
5248 case 0x1100 + 62: return "TVM_GETITEMW";
5249 case 0x1100 + 13: return "TVM_SETITEMA";
5250 case 0x1100 + 63: return "TVM_SETITEMW";
5251 case 0x1100 + 14: return "TVM_EDITLABELA";
5252 case 0x1100 + 65: return "TVM_EDITLABELW";
5253 case 0x1100 + 15: return "TVM_GETEDITCONTROL";
5254 case 0x1100 + 16: return "TVM_GETVISIBLECOUNT";
5255 case 0x1100 + 17: return "TVM_HITTEST";
5256 case 0x1100 + 18: return "TVM_CREATEDRAGIMAGE";
5257 case 0x1100 + 19: return "TVM_SORTCHILDREN";
5258 case 0x1100 + 20: return "TVM_ENSUREVISIBLE";
5259 case 0x1100 + 21: return "TVM_SORTCHILDRENCB";
5260 case 0x1100 + 22: return "TVM_ENDEDITLABELNOW";
5261 case 0x1100 + 23: return "TVM_GETISEARCHSTRINGA";
5262 case 0x1100 + 64: return "TVM_GETISEARCHSTRINGW";
5263 case 0x1100 + 24: return "TVM_SETTOOLTIPS";
5264 case 0x1100 + 25: return "TVM_GETTOOLTIPS";
5265
5266 // header
5267 case 0x1200 + 0: return "HDM_GETITEMCOUNT";
5268 case 0x1200 + 1: return "HDM_INSERTITEMA";
5269 case 0x1200 + 10: return "HDM_INSERTITEMW";
5270 case 0x1200 + 2: return "HDM_DELETEITEM";
5271 case 0x1200 + 3: return "HDM_GETITEMA";
5272 case 0x1200 + 11: return "HDM_GETITEMW";
5273 case 0x1200 + 4: return "HDM_SETITEMA";
5274 case 0x1200 + 12: return "HDM_SETITEMW";
5275 case 0x1200 + 5: return "HDM_LAYOUT";
5276 case 0x1200 + 6: return "HDM_HITTEST";
5277 case 0x1200 + 7: return "HDM_GETITEMRECT";
5278 case 0x1200 + 8: return "HDM_SETIMAGELIST";
5279 case 0x1200 + 9: return "HDM_GETIMAGELIST";
5280 case 0x1200 + 15: return "HDM_ORDERTOINDEX";
5281 case 0x1200 + 16: return "HDM_CREATEDRAGIMAGE";
5282 case 0x1200 + 17: return "HDM_GETORDERARRAY";
5283 case 0x1200 + 18: return "HDM_SETORDERARRAY";
5284 case 0x1200 + 19: return "HDM_SETHOTDIVIDER";
5285
5286 // tab control
5287 case 0x1300 + 2: return "TCM_GETIMAGELIST";
5288 case 0x1300 + 3: return "TCM_SETIMAGELIST";
5289 case 0x1300 + 4: return "TCM_GETITEMCOUNT";
5290 case 0x1300 + 5: return "TCM_GETITEMA";
5291 case 0x1300 + 60: return "TCM_GETITEMW";
5292 case 0x1300 + 6: return "TCM_SETITEMA";
5293 case 0x1300 + 61: return "TCM_SETITEMW";
5294 case 0x1300 + 7: return "TCM_INSERTITEMA";
5295 case 0x1300 + 62: return "TCM_INSERTITEMW";
5296 case 0x1300 + 8: return "TCM_DELETEITEM";
5297 case 0x1300 + 9: return "TCM_DELETEALLITEMS";
5298 case 0x1300 + 10: return "TCM_GETITEMRECT";
5299 case 0x1300 + 11: return "TCM_GETCURSEL";
5300 case 0x1300 + 12: return "TCM_SETCURSEL";
5301 case 0x1300 + 13: return "TCM_HITTEST";
5302 case 0x1300 + 14: return "TCM_SETITEMEXTRA";
5303 case 0x1300 + 40: return "TCM_ADJUSTRECT";
5304 case 0x1300 + 41: return "TCM_SETITEMSIZE";
5305 case 0x1300 + 42: return "TCM_REMOVEIMAGE";
5306 case 0x1300 + 43: return "TCM_SETPADDING";
5307 case 0x1300 + 44: return "TCM_GETROWCOUNT";
5308 case 0x1300 + 45: return "TCM_GETTOOLTIPS";
5309 case 0x1300 + 46: return "TCM_SETTOOLTIPS";
5310 case 0x1300 + 47: return "TCM_GETCURFOCUS";
5311 case 0x1300 + 48: return "TCM_SETCURFOCUS";
5312 case 0x1300 + 49: return "TCM_SETMINTABWIDTH";
5313 case 0x1300 + 50: return "TCM_DESELECTALL";
5314
5315 // toolbar
5316 case WM_USER+1: return "TB_ENABLEBUTTON";
5317 case WM_USER+2: return "TB_CHECKBUTTON";
5318 case WM_USER+3: return "TB_PRESSBUTTON";
5319 case WM_USER+4: return "TB_HIDEBUTTON";
5320 case WM_USER+5: return "TB_INDETERMINATE";
5321 case WM_USER+9: return "TB_ISBUTTONENABLED";
5322 case WM_USER+10: return "TB_ISBUTTONCHECKED";
5323 case WM_USER+11: return "TB_ISBUTTONPRESSED";
5324 case WM_USER+12: return "TB_ISBUTTONHIDDEN";
5325 case WM_USER+13: return "TB_ISBUTTONINDETERMINATE";
5326 case WM_USER+17: return "TB_SETSTATE";
5327 case WM_USER+18: return "TB_GETSTATE";
5328 case WM_USER+19: return "TB_ADDBITMAP";
5329 case WM_USER+20: return "TB_ADDBUTTONS";
5330 case WM_USER+21: return "TB_INSERTBUTTON";
5331 case WM_USER+22: return "TB_DELETEBUTTON";
5332 case WM_USER+23: return "TB_GETBUTTON";
5333 case WM_USER+24: return "TB_BUTTONCOUNT";
5334 case WM_USER+25: return "TB_COMMANDTOINDEX";
5335 case WM_USER+26: return "TB_SAVERESTOREA";
5336 case WM_USER+76: return "TB_SAVERESTOREW";
5337 case WM_USER+27: return "TB_CUSTOMIZE";
5338 case WM_USER+28: return "TB_ADDSTRINGA";
5339 case WM_USER+77: return "TB_ADDSTRINGW";
5340 case WM_USER+29: return "TB_GETITEMRECT";
5341 case WM_USER+30: return "TB_BUTTONSTRUCTSIZE";
5342 case WM_USER+31: return "TB_SETBUTTONSIZE";
5343 case WM_USER+32: return "TB_SETBITMAPSIZE";
5344 case WM_USER+33: return "TB_AUTOSIZE";
5345 case WM_USER+35: return "TB_GETTOOLTIPS";
5346 case WM_USER+36: return "TB_SETTOOLTIPS";
5347 case WM_USER+37: return "TB_SETPARENT";
5348 case WM_USER+39: return "TB_SETROWS";
5349 case WM_USER+40: return "TB_GETROWS";
5350 case WM_USER+42: return "TB_SETCMDID";
5351 case WM_USER+43: return "TB_CHANGEBITMAP";
5352 case WM_USER+44: return "TB_GETBITMAP";
5353 case WM_USER+45: return "TB_GETBUTTONTEXTA";
5354 case WM_USER+75: return "TB_GETBUTTONTEXTW";
5355 case WM_USER+46: return "TB_REPLACEBITMAP";
5356 case WM_USER+47: return "TB_SETINDENT";
5357 case WM_USER+48: return "TB_SETIMAGELIST";
5358 case WM_USER+49: return "TB_GETIMAGELIST";
5359 case WM_USER+50: return "TB_LOADIMAGES";
5360 case WM_USER+51: return "TB_GETRECT";
5361 case WM_USER+52: return "TB_SETHOTIMAGELIST";
5362 case WM_USER+53: return "TB_GETHOTIMAGELIST";
5363 case WM_USER+54: return "TB_SETDISABLEDIMAGELIST";
5364 case WM_USER+55: return "TB_GETDISABLEDIMAGELIST";
5365 case WM_USER+56: return "TB_SETSTYLE";
5366 case WM_USER+57: return "TB_GETSTYLE";
5367 case WM_USER+58: return "TB_GETBUTTONSIZE";
5368 case WM_USER+59: return "TB_SETBUTTONWIDTH";
5369 case WM_USER+60: return "TB_SETMAXTEXTROWS";
5370 case WM_USER+61: return "TB_GETTEXTROWS";
5371 case WM_USER+41: return "TB_GETBITMAPFLAGS";
5372
5373 #endif //WIN32
5374
5375 default:
5376 static char s_szBuf[128];
5377 sprintf(s_szBuf, "<unknown message = %d>", message);
5378 return s_szBuf;
5379 }
5380 }
5381 #endif //__WXDEBUG__
5382
5383 static void TranslateKbdEventToMouse(wxWindowMSW *win,
5384 int *x, int *y, WPARAM *flags)
5385 {
5386 // construct the key mask
5387 WPARAM& fwKeys = *flags;
5388
5389 fwKeys = MK_RBUTTON;
5390 if ( wxIsCtrlDown() )
5391 fwKeys |= MK_CONTROL;
5392 if ( wxIsShiftDown() )
5393 fwKeys |= MK_SHIFT;
5394
5395 // simulate right mouse button click
5396 DWORD dwPos = ::GetMessagePos();
5397 *x = GET_X_LPARAM(dwPos);
5398 *y = GET_Y_LPARAM(dwPos);
5399
5400 win->ScreenToClient(x, y);
5401 }
5402
5403 static TEXTMETRIC wxGetTextMetrics(const wxWindowMSW *win)
5404 {
5405 // prepare the DC
5406 TEXTMETRIC tm;
5407 HWND hwnd = GetHwndOf(win);
5408 HDC hdc = ::GetDC(hwnd);
5409
5410 #if !wxDIALOG_UNIT_COMPATIBILITY
5411 // and select the current font into it
5412 HFONT hfont = GetHfontOf(win->GetFont());
5413 if ( hfont )
5414 {
5415 hfont = (HFONT)::SelectObject(hdc, hfont);
5416 }
5417 #endif
5418
5419 // finally retrieve the text metrics from it
5420 GetTextMetrics(hdc, &tm);
5421
5422 #if !wxDIALOG_UNIT_COMPATIBILITY
5423 // and clean up
5424 if ( hfont )
5425 {
5426 (void)::SelectObject(hdc, hfont);
5427 }
5428 #endif
5429
5430 ::ReleaseDC(hwnd, hdc);
5431
5432 return tm;
5433 }
5434
5435 // Find the wxWindow at the current mouse position, returning the mouse
5436 // position.
5437 wxWindow* wxFindWindowAtPointer(wxPoint& WXUNUSED(pt))
5438 {
5439 return wxFindWindowAtPoint(wxGetMousePosition());
5440 }
5441
5442 wxWindow* wxFindWindowAtPoint(const wxPoint& pt)
5443 {
5444 POINT pt2;
5445 pt2.x = pt.x;
5446 pt2.y = pt.y;
5447 HWND hWndHit = ::WindowFromPoint(pt2);
5448
5449 wxWindow* win = wxFindWinFromHandle((WXHWND) hWndHit) ;
5450 HWND hWnd = hWndHit;
5451
5452 // Try to find a window with a wxWindow associated with it
5453 while (!win && (hWnd != 0))
5454 {
5455 hWnd = ::GetParent(hWnd);
5456 win = wxFindWinFromHandle((WXHWND) hWnd) ;
5457 }
5458 return win;
5459 }
5460
5461 // Get the current mouse position.
5462 wxPoint wxGetMousePosition()
5463 {
5464 POINT pt;
5465 GetCursorPos( & pt );
5466
5467 return wxPoint(pt.x, pt.y);
5468 }
5469