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