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