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