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