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