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