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