]> 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
Implemented delayed closing of an existing document
[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 #ifndef __DIGITALMARS__
3324 if ( m_dropTarget != NULL )
3325 {
3326 m_dropTarget->Revoke(m_hWnd);
3327
3328 delete m_dropTarget;
3329 m_dropTarget = NULL;
3330 }
3331 #endif //#ifndef __DIGITALMARS__
3332 #endif // wxUSE_DRAG_AND_DROP
3333
3334 // WM_DESTROY handled
3335 return TRUE;
3336 }
3337
3338 // ---------------------------------------------------------------------------
3339 // activation/focus
3340 // ---------------------------------------------------------------------------
3341
3342 bool wxWindowMSW::HandleActivate(int state,
3343 bool WXUNUSED(minimized),
3344 WXHWND WXUNUSED(activate))
3345 {
3346 wxActivateEvent event(wxEVT_ACTIVATE,
3347 (state == WA_ACTIVE) || (state == WA_CLICKACTIVE),
3348 m_windowId);
3349 event.SetEventObject(this);
3350
3351 return GetEventHandler()->ProcessEvent(event);
3352 }
3353
3354 bool wxWindowMSW::HandleSetFocus(WXHWND hwnd)
3355 {
3356 // notify the parent keeping track of focus for the kbd navigation
3357 // purposes that we got it
3358 wxChildFocusEvent eventFocus((wxWindow *)this);
3359 (void)GetEventHandler()->ProcessEvent(eventFocus);
3360
3361 #if wxUSE_CARET
3362 // Deal with caret
3363 if ( m_caret )
3364 {
3365 m_caret->OnSetFocus();
3366 }
3367 #endif // wxUSE_CARET
3368
3369 #if wxUSE_TEXTCTRL
3370 // If it's a wxTextCtrl don't send the event as it will be done
3371 // after the control gets to process it from EN_FOCUS handler
3372 if ( wxDynamicCastThis(wxTextCtrl) )
3373 {
3374 return FALSE;
3375 }
3376 #endif // wxUSE_TEXTCTRL
3377
3378 wxFocusEvent event(wxEVT_SET_FOCUS, m_windowId);
3379 event.SetEventObject(this);
3380
3381 // wxFindWinFromHandle() may return NULL, it is ok
3382 event.SetWindow(wxFindWinFromHandle(hwnd));
3383
3384 return GetEventHandler()->ProcessEvent(event);
3385 }
3386
3387 bool wxWindowMSW::HandleKillFocus(WXHWND hwnd)
3388 {
3389 #if wxUSE_CARET
3390 // Deal with caret
3391 if ( m_caret )
3392 {
3393 m_caret->OnKillFocus();
3394 }
3395 #endif // wxUSE_CARET
3396
3397 #if wxUSE_TEXTCTRL
3398 // If it's a wxTextCtrl don't send the event as it will be done
3399 // after the control gets to process it.
3400 wxTextCtrl *ctrl = wxDynamicCastThis(wxTextCtrl);
3401 if ( ctrl )
3402 {
3403 return FALSE;
3404 }
3405 #endif
3406
3407 // Don't send the event when in the process of being deleted. This can
3408 // only cause problems if the event handler tries to access the object.
3409 if ( m_isBeingDeleted )
3410 {
3411 return FALSE;
3412 }
3413
3414 wxFocusEvent event(wxEVT_KILL_FOCUS, m_windowId);
3415 event.SetEventObject(this);
3416
3417 // wxFindWinFromHandle() may return NULL, it is ok
3418 event.SetWindow(wxFindWinFromHandle(hwnd));
3419
3420 return GetEventHandler()->ProcessEvent(event);
3421 }
3422
3423 // ---------------------------------------------------------------------------
3424 // miscellaneous
3425 // ---------------------------------------------------------------------------
3426
3427 bool wxWindowMSW::HandleShow(bool show, int WXUNUSED(status))
3428 {
3429 wxShowEvent event(GetId(), show);
3430 event.m_eventObject = this;
3431
3432 return GetEventHandler()->ProcessEvent(event);
3433 }
3434
3435 bool wxWindowMSW::HandleInitDialog(WXHWND WXUNUSED(hWndFocus))
3436 {
3437 wxInitDialogEvent event(GetId());
3438 event.m_eventObject = this;
3439
3440 return GetEventHandler()->ProcessEvent(event);
3441 }
3442
3443 bool wxWindowMSW::HandleDropFiles(WXWPARAM wParam)
3444 {
3445 //FIX ME __DIGITALMARS__
3446 #if defined (__WXMICROWIN__) || defined (__DIGITALMARS__)
3447 return FALSE;
3448 #else // __WXMICROWIN__
3449 HDROP hFilesInfo = (HDROP) wParam;
3450
3451 // Get the total number of files dropped
3452 UINT gwFilesDropped = ::DragQueryFile
3453 (
3454 (HDROP)hFilesInfo,
3455 (UINT)-1,
3456 (LPTSTR)0,
3457 (UINT)0
3458 );
3459
3460 wxString *files = new wxString[gwFilesDropped];
3461 for ( UINT wIndex = 0; wIndex < gwFilesDropped; wIndex++ )
3462 {
3463 // first get the needed buffer length (+1 for terminating NUL)
3464 size_t len = ::DragQueryFile(hFilesInfo, wIndex, NULL, 0) + 1;
3465
3466 // and now get the file name
3467 ::DragQueryFile(hFilesInfo, wIndex,
3468 files[wIndex].GetWriteBuf(len), len);
3469
3470 files[wIndex].UngetWriteBuf();
3471 }
3472 DragFinish (hFilesInfo);
3473
3474 wxDropFilesEvent event(wxEVT_DROP_FILES, gwFilesDropped, files);
3475 event.m_eventObject = this;
3476
3477 POINT dropPoint;
3478 DragQueryPoint(hFilesInfo, (LPPOINT) &dropPoint);
3479 event.m_pos.x = dropPoint.x;
3480 event.m_pos.y = dropPoint.y;
3481
3482 return GetEventHandler()->ProcessEvent(event);
3483 #endif
3484 }
3485
3486 #ifdef __DIGITALMARS__
3487 extern "C" HCURSOR wxGetCurrentBusyCursor();
3488 #endif
3489
3490 bool wxWindowMSW::HandleSetCursor(WXHWND WXUNUSED(hWnd),
3491 short nHitTest,
3492 int WXUNUSED(mouseMsg))
3493 {
3494 #ifndef __WXMICROWIN__
3495 // the logic is as follows:
3496 // -1. don't set cursor for non client area, including but not limited to
3497 // the title bar, scrollbars, &c
3498 // 0. allow the user to override default behaviour by using EVT_SET_CURSOR
3499 // 1. if we have the cursor set it unless wxIsBusy()
3500 // 2. if we're a top level window, set some cursor anyhow
3501 // 3. if wxIsBusy(), set the busy cursor, otherwise the global one
3502
3503 if ( nHitTest != HTCLIENT )
3504 {
3505 return FALSE;
3506 }
3507
3508 HCURSOR hcursor = 0;
3509
3510 // first ask the user code - it may wish to set the cursor in some very
3511 // specific way (for example, depending on the current position)
3512 POINT pt;
3513 #ifdef __WIN32__
3514 if ( !::GetCursorPos(&pt) )
3515 {
3516 wxLogLastError(wxT("GetCursorPos"));
3517 }
3518 #else
3519 // In WIN16 it doesn't return a value.
3520 ::GetCursorPos(&pt);
3521 #endif
3522
3523 int x = pt.x,
3524 y = pt.y;
3525 ScreenToClient(&x, &y);
3526 wxSetCursorEvent event(x, y);
3527
3528 bool processedEvtSetCursor = GetEventHandler()->ProcessEvent(event);
3529 if ( processedEvtSetCursor && event.HasCursor() )
3530 {
3531 hcursor = GetHcursorOf(event.GetCursor());
3532 }
3533
3534 if ( !hcursor )
3535 {
3536 bool isBusy = wxIsBusy();
3537
3538 // the test for processedEvtSetCursor is here to prevent using m_cursor
3539 // if the user code caught EVT_SET_CURSOR() and returned nothing from
3540 // it - this is a way to say that our cursor shouldn't be used for this
3541 // point
3542 if ( !processedEvtSetCursor && m_cursor.Ok() )
3543 {
3544 hcursor = GetHcursorOf(m_cursor);
3545 }
3546
3547 if ( !GetParent() )
3548 {
3549 if ( isBusy )
3550 {
3551 hcursor = wxGetCurrentBusyCursor();
3552 }
3553 else if ( !hcursor )
3554 {
3555 const wxCursor *cursor = wxGetGlobalCursor();
3556 if ( cursor && cursor->Ok() )
3557 {
3558 hcursor = GetHcursorOf(*cursor);
3559 }
3560 }
3561 }
3562 }
3563
3564 if ( hcursor )
3565 {
3566 // wxLogDebug("HandleSetCursor: Setting cursor %ld", (long) hcursor);
3567
3568 ::SetCursor(hcursor);
3569
3570 // cursor set, stop here
3571 return TRUE;
3572 }
3573 #endif // __WXMICROWIN__
3574
3575 // pass up the window chain
3576 return FALSE;
3577 }
3578
3579 // ---------------------------------------------------------------------------
3580 // owner drawn stuff
3581 // ---------------------------------------------------------------------------
3582
3583 bool wxWindowMSW::MSWOnDrawItem(int id, WXDRAWITEMSTRUCT *itemStruct)
3584 {
3585 #if wxUSE_OWNER_DRAWN
3586
3587 #if wxUSE_MENUS_NATIVE
3588 // is it a menu item?
3589 DRAWITEMSTRUCT *pDrawStruct = (DRAWITEMSTRUCT *)itemStruct;
3590 if ( id == 0 && pDrawStruct->CtlType == ODT_MENU )
3591 {
3592 wxMenuItem *pMenuItem = (wxMenuItem *)(pDrawStruct->itemData);
3593
3594 wxCHECK( pMenuItem->IsKindOf(CLASSINFO(wxMenuItem)), FALSE );
3595
3596 // prepare to call OnDrawItem(): notice using of wxDCTemp to prevent
3597 // the DC from being released
3598 wxDCTemp dc((WXHDC)pDrawStruct->hDC);
3599 wxRect rect(pDrawStruct->rcItem.left, pDrawStruct->rcItem.top,
3600 pDrawStruct->rcItem.right - pDrawStruct->rcItem.left,
3601 pDrawStruct->rcItem.bottom - pDrawStruct->rcItem.top);
3602
3603 return pMenuItem->OnDrawItem
3604 (
3605 dc,
3606 rect,
3607 (wxOwnerDrawn::wxODAction)pDrawStruct->itemAction,
3608 (wxOwnerDrawn::wxODStatus)pDrawStruct->itemState
3609 );
3610 }
3611 #endif // wxUSE_MENUS_NATIVE
3612
3613 #if wxUSE_CONTROLS
3614 wxWindow *item = FindItem(id);
3615 if ( item && item->IsKindOf(CLASSINFO(wxControl)) )
3616 {
3617 return ((wxControl *)item)->MSWOnDraw(itemStruct);
3618 }
3619 #endif // wxUSE_CONTROLS
3620
3621 #endif // USE_OWNER_DRAWN
3622
3623 return FALSE;
3624 }
3625
3626 bool wxWindowMSW::MSWOnMeasureItem(int id, WXMEASUREITEMSTRUCT *itemStruct)
3627 {
3628 #if wxUSE_OWNER_DRAWN
3629 // is it a menu item?
3630 MEASUREITEMSTRUCT *pMeasureStruct = (MEASUREITEMSTRUCT *)itemStruct;
3631 if ( id == 0 && pMeasureStruct->CtlType == ODT_MENU )
3632 {
3633 wxMenuItem *pMenuItem = (wxMenuItem *)(pMeasureStruct->itemData);
3634
3635 wxCHECK( pMenuItem->IsKindOf(CLASSINFO(wxMenuItem)), FALSE );
3636
3637 return pMenuItem->OnMeasureItem(&pMeasureStruct->itemWidth,
3638 &pMeasureStruct->itemHeight);
3639 }
3640
3641 wxWindow *item = FindItem(id);
3642 if ( item && item->IsKindOf(CLASSINFO(wxControl)) )
3643 {
3644 return ((wxControl *)item)->MSWOnMeasure(itemStruct);
3645 }
3646 #endif // owner-drawn menus
3647 return FALSE;
3648 }
3649
3650 // ---------------------------------------------------------------------------
3651 // colours and palettes
3652 // ---------------------------------------------------------------------------
3653
3654 bool wxWindowMSW::HandleSysColorChange()
3655 {
3656 wxSysColourChangedEvent event;
3657 event.SetEventObject(this);
3658
3659 (void)GetEventHandler()->ProcessEvent(event);
3660
3661 // always let the system carry on the default processing to allow the
3662 // native controls to react to the colours update
3663 return FALSE;
3664 }
3665
3666 bool wxWindowMSW::HandleDisplayChange()
3667 {
3668 wxDisplayChangedEvent event;
3669 event.SetEventObject(this);
3670
3671 return GetEventHandler()->ProcessEvent(event);
3672 }
3673
3674 bool wxWindowMSW::HandleCtlColor(WXHBRUSH *brush,
3675 WXHDC pDC,
3676 WXHWND pWnd,
3677 WXUINT nCtlColor,
3678 WXUINT message,
3679 WXWPARAM wParam,
3680 WXLPARAM lParam)
3681 {
3682 #ifndef __WXMICROWIN__
3683 WXHBRUSH hBrush = 0;
3684
3685 if ( nCtlColor == CTLCOLOR_DLG )
3686 {
3687 hBrush = OnCtlColor(pDC, pWnd, nCtlColor, message, wParam, lParam);
3688 }
3689 #if wxUSE_CONTROLS
3690 else
3691 {
3692 wxControl *item = (wxControl *)FindItemByHWND(pWnd, TRUE);
3693 if ( item )
3694 hBrush = item->OnCtlColor(pDC, pWnd, nCtlColor, message, wParam, lParam);
3695 }
3696 #endif // wxUSE_CONTROLS
3697
3698 if ( hBrush )
3699 *brush = hBrush;
3700
3701 return hBrush != 0;
3702 #else // __WXMICROWIN__
3703 return FALSE;
3704 #endif
3705 }
3706
3707 // Define for each class of dialog and control
3708 WXHBRUSH wxWindowMSW::OnCtlColor(WXHDC WXUNUSED(hDC),
3709 WXHWND WXUNUSED(hWnd),
3710 WXUINT WXUNUSED(nCtlColor),
3711 WXUINT WXUNUSED(message),
3712 WXWPARAM WXUNUSED(wParam),
3713 WXLPARAM WXUNUSED(lParam))
3714 {
3715 return (WXHBRUSH)0;
3716 }
3717
3718 bool wxWindowMSW::HandlePaletteChanged(WXHWND hWndPalChange)
3719 {
3720 #if wxUSE_PALETTE
3721 // same as below except we don't respond to our own messages
3722 if ( hWndPalChange != GetHWND() )
3723 {
3724 // check to see if we our our parents have a custom palette
3725 wxWindowMSW *win = this;
3726 while ( win && !win->HasCustomPalette() )
3727 {
3728 win = win->GetParent();
3729 }
3730
3731 if ( win && win->HasCustomPalette() )
3732 {
3733 // realize the palette to see whether redrawing is needed
3734 HDC hdc = ::GetDC((HWND) hWndPalChange);
3735 win->m_palette.SetHPALETTE((WXHPALETTE)
3736 ::SelectPalette(hdc, GetHpaletteOf(win->m_palette), FALSE));
3737
3738 int result = ::RealizePalette(hdc);
3739
3740 // restore the palette (before releasing the DC)
3741 win->m_palette.SetHPALETTE((WXHPALETTE)
3742 ::SelectPalette(hdc, GetHpaletteOf(win->m_palette), FALSE));
3743 ::RealizePalette(hdc);
3744 ::ReleaseDC((HWND) hWndPalChange, hdc);
3745
3746 // now check for the need to redraw
3747 if (result > 0)
3748 InvalidateRect((HWND) hWndPalChange, NULL, TRUE);
3749 }
3750
3751 }
3752 #endif // wxUSE_PALETTE
3753
3754 wxPaletteChangedEvent event(GetId());
3755 event.SetEventObject(this);
3756 event.SetChangedWindow(wxFindWinFromHandle(hWndPalChange));
3757
3758 return GetEventHandler()->ProcessEvent(event);
3759 }
3760
3761 bool wxWindowMSW::HandleCaptureChanged(WXHWND hWndGainedCapture)
3762 {
3763 wxMouseCaptureChangedEvent event(GetId(), wxFindWinFromHandle(hWndGainedCapture));
3764 event.SetEventObject(this);
3765
3766 return GetEventHandler()->ProcessEvent(event);
3767 }
3768
3769 bool wxWindowMSW::HandleQueryNewPalette()
3770 {
3771
3772 #if wxUSE_PALETTE
3773 // check to see if we our our parents have a custom palette
3774 wxWindowMSW *win = this;
3775 while (!win->HasCustomPalette() && win->GetParent()) win = win->GetParent();
3776 if (win->HasCustomPalette()) {
3777 /* realize the palette to see whether redrawing is needed */
3778 HDC hdc = GetDC((HWND) GetHWND());
3779 win->m_palette.SetHPALETTE( (WXHPALETTE)
3780 ::SelectPalette(hdc, (HPALETTE) win->m_palette.GetHPALETTE(), FALSE) );
3781
3782 int result = ::RealizePalette(hdc);
3783 /* restore the palette (before releasing the DC) */
3784 win->m_palette.SetHPALETTE( (WXHPALETTE)
3785 ::SelectPalette(hdc, (HPALETTE) win->m_palette.GetHPALETTE(), TRUE) );
3786 ::RealizePalette(hdc);
3787 ::ReleaseDC((HWND) GetHWND(), hdc);
3788 /* now check for the need to redraw */
3789 if (result > 0)
3790 ::InvalidateRect((HWND) GetHWND(), NULL, TRUE);
3791 }
3792 #endif // wxUSE_PALETTE
3793
3794 wxQueryNewPaletteEvent event(GetId());
3795 event.SetEventObject(this);
3796
3797 return GetEventHandler()->ProcessEvent(event) && event.GetPaletteRealized();
3798 }
3799
3800 // Responds to colour changes: passes event on to children.
3801 void wxWindowMSW::OnSysColourChanged(wxSysColourChangedEvent& WXUNUSED(event))
3802 {
3803 // the top level window also reset the standard colour map as it might have
3804 // changed (there is no need to do it for the non top level windows as we
3805 // only have to do it once)
3806 if ( IsTopLevel() )
3807 {
3808 // FIXME-MT
3809 gs_hasStdCmap = FALSE;
3810 }
3811 wxWindowList::Node *node = GetChildren().GetFirst();
3812 while ( node )
3813 {
3814 // Only propagate to non-top-level windows because Windows already
3815 // sends this event to all top-level ones
3816 wxWindow *win = node->GetData();
3817 if ( !win->IsTopLevel() )
3818 {
3819 // we need to send the real WM_SYSCOLORCHANGE and not just trigger
3820 // EVT_SYS_COLOUR_CHANGED call because the latter wouldn't work for
3821 // the standard controls
3822 ::SendMessage(GetHwndOf(win), WM_SYSCOLORCHANGE, 0, 0);
3823 }
3824
3825 node = node->GetNext();
3826 }
3827
3828 // update the colours we use if they were not set explicitly by the user:
3829 // this must be done or OnCtlColor() would continue to use the old colours
3830 if ( !m_hasFgCol )
3831 {
3832 m_foregroundColour = wxSystemSettings::
3833 GetSystemColour(wxSYS_COLOUR_WINDOWTEXT);
3834 }
3835
3836 if ( !m_hasBgCol )
3837 {
3838 m_backgroundColour = wxSystemSettings::
3839 GetSystemColour(wxSYS_COLOUR_BTNFACE);
3840 }
3841 }
3842
3843 extern wxCOLORMAP *wxGetStdColourMap()
3844 {
3845 static COLORREF s_stdColours[wxSTD_COL_MAX];
3846 static wxCOLORMAP s_cmap[wxSTD_COL_MAX];
3847
3848 if ( !gs_hasStdCmap )
3849 {
3850 static bool s_coloursInit = FALSE;
3851
3852 if ( !s_coloursInit )
3853 {
3854 // When a bitmap is loaded, the RGB values can change (apparently
3855 // because Windows adjusts them to care for the old programs always
3856 // using 0xc0c0c0 while the transparent colour for the new Windows
3857 // versions is different). But we do this adjustment ourselves so
3858 // we want to avoid Windows' "help" and for this we need to have a
3859 // reference bitmap which can tell us what the RGB values change
3860 // to.
3861 wxBitmap stdColourBitmap(_T("wxBITMAP_STD_COLOURS"));
3862 if ( stdColourBitmap.Ok() )
3863 {
3864 // the pixels in the bitmap must correspond to wxSTD_COL_XXX!
3865 wxASSERT_MSG( stdColourBitmap.GetWidth() == wxSTD_COL_MAX,
3866 _T("forgot to update wxBITMAP_STD_COLOURS!") );
3867
3868 wxMemoryDC memDC;
3869 memDC.SelectObject(stdColourBitmap);
3870
3871 wxColour colour;
3872 for ( size_t i = 0; i < WXSIZEOF(s_stdColours); i++ )
3873 {
3874 memDC.GetPixel(i, 0, &colour);
3875 s_stdColours[i] = wxColourToRGB(colour);
3876 }
3877 }
3878 else // wxBITMAP_STD_COLOURS couldn't be loaded
3879 {
3880 s_stdColours[0] = RGB(000,000,000); // black
3881 s_stdColours[1] = RGB(128,128,128); // dark grey
3882 s_stdColours[2] = RGB(192,192,192); // light grey
3883 s_stdColours[3] = RGB(255,255,255); // white
3884 //s_stdColours[4] = RGB(000,000,255); // blue
3885 //s_stdColours[5] = RGB(255,000,255); // magenta
3886 }
3887
3888 s_coloursInit = TRUE;
3889 }
3890
3891 gs_hasStdCmap = TRUE;
3892
3893 // create the colour map
3894 #define INIT_CMAP_ENTRY(col) \
3895 s_cmap[wxSTD_COL_##col].from = s_stdColours[wxSTD_COL_##col]; \
3896 s_cmap[wxSTD_COL_##col].to = ::GetSysColor(COLOR_##col)
3897
3898 INIT_CMAP_ENTRY(BTNTEXT);
3899 INIT_CMAP_ENTRY(BTNSHADOW);
3900 INIT_CMAP_ENTRY(BTNFACE);
3901 INIT_CMAP_ENTRY(BTNHIGHLIGHT);
3902
3903 #undef INIT_CMAP_ENTRY
3904 }
3905
3906 return s_cmap;
3907 }
3908
3909 // ---------------------------------------------------------------------------
3910 // painting
3911 // ---------------------------------------------------------------------------
3912
3913 bool wxWindowMSW::HandlePaint()
3914 {
3915 #ifdef __WIN32__
3916 HRGN hRegion = ::CreateRectRgn(0, 0, 0, 0); // Dummy call to get a handle
3917 if ( !hRegion )
3918 wxLogLastError(wxT("CreateRectRgn"));
3919 if ( ::GetUpdateRgn(GetHwnd(), hRegion, FALSE) == ERROR )
3920 wxLogLastError(wxT("GetUpdateRgn"));
3921
3922 m_updateRegion = wxRegion((WXHRGN) hRegion);
3923 #else // Win16
3924 RECT updateRect;
3925 ::GetUpdateRect(GetHwnd(), &updateRect, FALSE);
3926
3927 m_updateRegion = wxRegion(updateRect.left, updateRect.top,
3928 updateRect.right - updateRect.left,
3929 updateRect.bottom - updateRect.top);
3930 #endif // Win32/16
3931
3932 wxPaintEvent event(m_windowId);
3933 event.SetEventObject(this);
3934
3935 bool processed = GetEventHandler()->ProcessEvent(event);
3936
3937 // note that we must generate NC event after the normal one as otherwise
3938 // BeginPaint() will happily overwrite our decorations with the background
3939 // colour
3940 wxNcPaintEvent eventNc(m_windowId);
3941 eventNc.SetEventObject(this);
3942 GetEventHandler()->ProcessEvent(eventNc);
3943
3944 return processed;
3945 }
3946
3947 // Can be called from an application's OnPaint handler
3948 void wxWindowMSW::OnPaint(wxPaintEvent& event)
3949 {
3950 #ifdef __WXUNIVERSAL__
3951 event.Skip();
3952 #else
3953 HDC hDC = (HDC) wxPaintDC::FindDCInCache((wxWindow*) event.GetEventObject());
3954 if (hDC != 0)
3955 {
3956 MSWDefWindowProc(WM_PAINT, (WPARAM) hDC, 0);
3957 }
3958 #endif
3959 }
3960
3961 bool wxWindowMSW::HandleEraseBkgnd(WXHDC hdc)
3962 {
3963 // Prevents flicker when dragging
3964 if ( ::IsIconic(GetHwnd()) )
3965 return TRUE;
3966
3967 wxDCTemp dc(hdc);
3968
3969 dc.SetHDC(hdc);
3970 dc.SetWindow((wxWindow *)this);
3971 dc.BeginDrawing();
3972
3973 wxEraseEvent event(m_windowId, &dc);
3974 event.SetEventObject(this);
3975 bool rc = GetEventHandler()->ProcessEvent(event);
3976
3977 dc.EndDrawing();
3978
3979 // must be called manually as ~wxDC doesn't do anything for wxDCTemp
3980 dc.SelectOldObjects(hdc);
3981
3982 return rc;
3983 }
3984
3985 void wxWindowMSW::OnEraseBackground(wxEraseEvent& event)
3986 {
3987 RECT rect;
3988 ::GetClientRect(GetHwnd(), &rect);
3989
3990 COLORREF ref = PALETTERGB(m_backgroundColour.Red(),
3991 m_backgroundColour.Green(),
3992 m_backgroundColour.Blue());
3993 HBRUSH hBrush = ::CreateSolidBrush(ref);
3994 if ( !hBrush )
3995 wxLogLastError(wxT("CreateSolidBrush"));
3996
3997 HDC hdc = (HDC)event.GetDC()->GetHDC();
3998
3999 int mode = ::SetMapMode(hdc, MM_TEXT);
4000
4001 ::FillRect(hdc, &rect, hBrush);
4002 ::DeleteObject(hBrush);
4003 ::SetMapMode(hdc, mode);
4004 }
4005
4006 // ---------------------------------------------------------------------------
4007 // moving and resizing
4008 // ---------------------------------------------------------------------------
4009
4010 bool wxWindowMSW::HandleMinimize()
4011 {
4012 wxIconizeEvent event(m_windowId);
4013 event.SetEventObject(this);
4014
4015 return GetEventHandler()->ProcessEvent(event);
4016 }
4017
4018 bool wxWindowMSW::HandleMaximize()
4019 {
4020 wxMaximizeEvent event(m_windowId);
4021 event.SetEventObject(this);
4022
4023 return GetEventHandler()->ProcessEvent(event);
4024 }
4025
4026 bool wxWindowMSW::HandleMove(int x, int y)
4027 {
4028 wxMoveEvent event(wxPoint(x, y), m_windowId);
4029 event.SetEventObject(this);
4030
4031 return GetEventHandler()->ProcessEvent(event);
4032 }
4033
4034 bool wxWindowMSW::HandleSize(int WXUNUSED(w), int WXUNUSED(h),
4035 WXUINT WXUNUSED(flag))
4036 {
4037 // don't use w and h parameters as they specify the client size while
4038 // according to the docs EVT_SIZE handler is supposed to receive the total
4039 // size
4040 wxSizeEvent event(GetSize(), m_windowId);
4041 event.SetEventObject(this);
4042
4043 return GetEventHandler()->ProcessEvent(event);
4044 }
4045
4046 bool wxWindowMSW::HandleGetMinMaxInfo(void *mmInfo)
4047 {
4048 MINMAXINFO *info = (MINMAXINFO *)mmInfo;
4049
4050 bool rc = FALSE;
4051
4052 int minWidth = GetMinWidth(),
4053 minHeight = GetMinHeight(),
4054 maxWidth = GetMaxWidth(),
4055 maxHeight = GetMaxHeight();
4056
4057 if ( minWidth != -1 )
4058 {
4059 info->ptMinTrackSize.x = minWidth;
4060 rc = TRUE;
4061 }
4062
4063 if ( minHeight != -1 )
4064 {
4065 info->ptMinTrackSize.y = minHeight;
4066 rc = TRUE;
4067 }
4068
4069 if ( maxWidth != -1 )
4070 {
4071 info->ptMaxTrackSize.x = maxWidth;
4072 rc = TRUE;
4073 }
4074
4075 if ( maxHeight != -1 )
4076 {
4077 info->ptMaxTrackSize.y = maxHeight;
4078 rc = TRUE;
4079 }
4080
4081 return rc;
4082 }
4083
4084 // ---------------------------------------------------------------------------
4085 // command messages
4086 // ---------------------------------------------------------------------------
4087
4088 bool wxWindowMSW::HandleCommand(WXWORD id, WXWORD cmd, WXHWND control)
4089 {
4090 #if wxUSE_MENUS_NATIVE
4091 if ( !cmd && wxCurrentPopupMenu )
4092 {
4093 wxMenu *popupMenu = wxCurrentPopupMenu;
4094 wxCurrentPopupMenu = NULL;
4095
4096 return popupMenu->MSWCommand(cmd, id);
4097 }
4098 #endif // wxUSE_MENUS_NATIVE
4099
4100 wxWindow *win = NULL;
4101
4102 // first try to find it from HWND - this works even with the broken
4103 // programs using the same ids for different controls
4104 if ( control )
4105 {
4106 win = wxFindWinFromHandle(control);
4107 }
4108
4109 // try the id
4110 if ( !win )
4111 {
4112 // must cast to a signed type before comparing with other ids!
4113 win = FindItem((signed short)id);
4114 }
4115
4116 if ( win )
4117 {
4118 return win->MSWCommand(cmd, id);
4119 }
4120
4121 // the messages sent from the in-place edit control used by the treectrl
4122 // for label editing have id == 0, but they should _not_ be treated as menu
4123 // messages (they are EN_XXX ones, in fact) so don't translate anything
4124 // coming from a control to wxEVT_COMMAND_MENU_SELECTED
4125 if ( !control )
4126 {
4127 // If no child window, it may be an accelerator, e.g. for a popup menu
4128 // command
4129
4130 wxCommandEvent event(wxEVT_COMMAND_MENU_SELECTED);
4131 event.SetEventObject(this);
4132 event.SetId(id);
4133 event.SetInt(id);
4134
4135 return GetEventHandler()->ProcessEvent(event);
4136 }
4137 #if wxUSE_SPINCTRL && !defined(__WXUNIVERSAL__)
4138 else
4139 {
4140 // the text ctrl which is logically part of wxSpinCtrl sends WM_COMMAND
4141 // notifications to its parent which we want to reflect back to
4142 // wxSpinCtrl
4143 wxSpinCtrl *spin = wxSpinCtrl::GetSpinForTextCtrl(control);
4144 if ( spin && spin->ProcessTextCommand(cmd, id) )
4145 return TRUE;
4146 }
4147 #endif // wxUSE_SPINCTRL
4148
4149 return FALSE;
4150 }
4151
4152 bool wxWindowMSW::HandleSysCommand(WXWPARAM wParam, WXLPARAM WXUNUSED(lParam))
4153 {
4154 // 4 bits are reserved
4155 switch ( wParam & 0xFFFFFFF0 )
4156 {
4157 case SC_MAXIMIZE:
4158 return HandleMaximize();
4159
4160 case SC_MINIMIZE:
4161 return HandleMinimize();
4162 }
4163
4164 return FALSE;
4165 }
4166
4167 // ---------------------------------------------------------------------------
4168 // mouse events
4169 // ---------------------------------------------------------------------------
4170
4171 void wxWindowMSW::InitMouseEvent(wxMouseEvent& event,
4172 int x, int y,
4173 WXUINT flags)
4174 {
4175 // our client coords are not quite the same as Windows ones
4176 wxPoint pt = GetClientAreaOrigin();
4177 event.m_x = x - pt.x;
4178 event.m_y = y - pt.y;
4179
4180 event.m_shiftDown = (flags & MK_SHIFT) != 0;
4181 event.m_controlDown = (flags & MK_CONTROL) != 0;
4182 event.m_leftDown = (flags & MK_LBUTTON) != 0;
4183 event.m_middleDown = (flags & MK_MBUTTON) != 0;
4184 event.m_rightDown = (flags & MK_RBUTTON) != 0;
4185 event.m_altDown = (::GetKeyState(VK_MENU) & 0x80000000) != 0;
4186
4187 event.SetTimestamp(s_currentMsg.time);
4188 event.m_eventObject = this;
4189 event.SetId(GetId());
4190
4191 #if wxUSE_MOUSEEVENT_HACK
4192 m_lastMouseX = x;
4193 m_lastMouseY = y;
4194 m_lastMouseEvent = event.GetEventType();
4195 #endif // wxUSE_MOUSEEVENT_HACK
4196 }
4197
4198 // Windows doesn't send the mouse events to the static controls (which are
4199 // transparent in the sense that their WM_NCHITTEST handler returns
4200 // HTTRANSPARENT) at all but we want all controls to receive the mouse events
4201 // and so we manually check if we don't have a child window under mouse and if
4202 // we do, send the event to it instead of the window Windows had sent WM_XXX
4203 // to.
4204 //
4205 // Notice that this is not done for the mouse move events because this could
4206 // (would?) be too slow, but only for clicks which means that the static texts
4207 // still don't get move, enter nor leave events.
4208 static wxWindowMSW *FindWindowForMouseEvent(wxWindowMSW *win, int *x, int *y) //TW:REQ:Univ
4209 {
4210 wxCHECK_MSG( x && y, win, _T("NULL pointer in FindWindowForMouseEvent") );
4211
4212 // first try to find a non transparent child: this allows us to send events
4213 // to a static text which is inside a static box, for example
4214 POINT pt = { *x, *y };
4215 HWND hwnd = GetHwndOf(win),
4216 hwndUnderMouse;
4217
4218 #ifdef __WIN32__
4219 hwndUnderMouse = ::ChildWindowFromPointEx
4220 (
4221 hwnd,
4222 pt,
4223 CWP_SKIPINVISIBLE |
4224 CWP_SKIPDISABLED |
4225 CWP_SKIPTRANSPARENT
4226 );
4227
4228 if ( !hwndUnderMouse || hwndUnderMouse == hwnd )
4229 #endif // __WIN32__
4230 {
4231 // now try any child window at all
4232 hwndUnderMouse = ::ChildWindowFromPoint(hwnd, pt);
4233 }
4234
4235 // check that we have a child window which is susceptible to receive mouse
4236 // events: for this it must be shown and enabled
4237 if ( hwndUnderMouse &&
4238 hwndUnderMouse != hwnd &&
4239 ::IsWindowVisible(hwndUnderMouse) &&
4240 ::IsWindowEnabled(hwndUnderMouse) )
4241 {
4242 wxWindow *winUnderMouse = wxFindWinFromHandle((WXHWND)hwndUnderMouse);
4243 if ( winUnderMouse )
4244 {
4245 // translate the mouse coords to the other window coords
4246 win->ClientToScreen(x, y);
4247 winUnderMouse->ScreenToClient(x, y);
4248
4249 win = winUnderMouse;
4250 }
4251 }
4252
4253 return win;
4254 }
4255
4256 bool wxWindowMSW::HandleMouseEvent(WXUINT msg, int x, int y, WXUINT flags)
4257 {
4258 // the mouse events take consecutive IDs from WM_MOUSEFIRST to
4259 // WM_MOUSELAST, so it's enough to substract WM_MOUSEMOVE == WM_MOUSEFIRST
4260 // from the message id and take the value in the table to get wxWin event
4261 // id
4262 static const wxEventType eventsMouse[] =
4263 {
4264 wxEVT_MOTION,
4265 wxEVT_LEFT_DOWN,
4266 wxEVT_LEFT_UP,
4267 wxEVT_LEFT_DCLICK,
4268 wxEVT_RIGHT_DOWN,
4269 wxEVT_RIGHT_UP,
4270 wxEVT_RIGHT_DCLICK,
4271 wxEVT_MIDDLE_DOWN,
4272 wxEVT_MIDDLE_UP,
4273 wxEVT_MIDDLE_DCLICK
4274 };
4275
4276 wxMouseEvent event(eventsMouse[msg - WM_MOUSEMOVE]);
4277 InitMouseEvent(event, x, y, flags);
4278
4279 return GetEventHandler()->ProcessEvent(event);
4280 }
4281
4282 bool wxWindowMSW::HandleMouseMove(int x, int y, WXUINT flags)
4283 {
4284 if ( !m_mouseInWindow )
4285 {
4286 // it would be wrong to assume that just because we get a mouse move
4287 // event that the mouse is inside the window: although this is usually
4288 // true, it is not if we had captured the mouse, so we need to check
4289 // the mouse coordinates here
4290 if ( !HasCapture() || IsMouseInWindow() )
4291 {
4292 // Generate an ENTER event
4293 m_mouseInWindow = TRUE;
4294
4295 wxMouseEvent event(wxEVT_ENTER_WINDOW);
4296 InitMouseEvent(event, x, y, flags);
4297
4298 (void)GetEventHandler()->ProcessEvent(event);
4299 }
4300 }
4301
4302 #if wxUSE_MOUSEEVENT_HACK
4303 // Window gets a click down message followed by a mouse move message even
4304 // if position isn't changed! We want to discard the trailing move event
4305 // if x and y are the same.
4306 if ( (m_lastMouseEvent == wxEVT_RIGHT_DOWN ||
4307 m_lastMouseEvent == wxEVT_LEFT_DOWN ||
4308 m_lastMouseEvent == wxEVT_MIDDLE_DOWN) &&
4309 (m_lastMouseX == x && m_lastMouseY == y) )
4310 {
4311 m_lastMouseEvent = wxEVT_MOTION;
4312
4313 return FALSE;
4314 }
4315 #endif // wxUSE_MOUSEEVENT_HACK
4316
4317 return HandleMouseEvent(WM_MOUSEMOVE, x, y, flags);
4318 }
4319
4320
4321 bool wxWindowMSW::HandleMouseWheel(WXWPARAM wParam, WXLPARAM lParam)
4322 {
4323 #if wxUSE_MOUSEWHEEL
4324 wxMouseEvent event(wxEVT_MOUSEWHEEL);
4325 InitMouseEvent(event,
4326 GET_X_LPARAM(lParam),
4327 GET_Y_LPARAM(lParam),
4328 LOWORD(wParam));
4329 event.m_wheelRotation = (short)HIWORD(wParam);
4330 event.m_wheelDelta = WHEEL_DELTA;
4331
4332 #ifdef __WIN32__
4333 static int s_linesPerRotation = -1;
4334 if ( s_linesPerRotation == -1 )
4335 {
4336 if ( !::SystemParametersInfo(SPI_GETWHEELSCROLLLINES, 0,
4337 &s_linesPerRotation, 0))
4338 {
4339 // this is not supposed to happen
4340 wxLogLastError(_T("SystemParametersInfo(GETWHEELSCROLLLINES)"));
4341
4342 // the default is 3, so use it if SystemParametersInfo() failed
4343 s_linesPerRotation = 3;
4344 }
4345 }
4346 #else // Win16
4347 // no SystemParametersInfo() under Win16
4348 static const int s_linesPerRotation = 3;
4349 #endif
4350
4351 event.m_linesPerAction = s_linesPerRotation;
4352 return GetEventHandler()->ProcessEvent(event);
4353
4354 #else
4355 (void) wParam;
4356 (void) lParam;
4357
4358 return FALSE;
4359 #endif
4360 }
4361
4362
4363 // ---------------------------------------------------------------------------
4364 // keyboard handling
4365 // ---------------------------------------------------------------------------
4366
4367 // create the key event of the given type for the given key - used by
4368 // HandleChar and HandleKeyDown/Up
4369 wxKeyEvent wxWindowMSW::CreateKeyEvent(wxEventType evType,
4370 int id,
4371 WXLPARAM lParam,
4372 WXWPARAM wParam) const
4373 {
4374 wxKeyEvent event(evType);
4375 event.SetId(GetId());
4376 event.m_shiftDown = wxIsShiftDown();
4377 event.m_controlDown = wxIsCtrlDown();
4378 event.m_altDown = (HIWORD(lParam) & KF_ALTDOWN) == KF_ALTDOWN;
4379
4380 event.m_eventObject = (wxWindow *)this; // const_cast
4381 event.m_keyCode = id;
4382 event.m_rawCode = (wxUint32) wParam;
4383 event.m_rawFlags = (wxUint32) lParam;
4384 event.SetTimestamp(s_currentMsg.time);
4385
4386 // translate the position to client coords
4387 POINT pt;
4388 GetCursorPos(&pt);
4389 RECT rect;
4390 GetWindowRect(GetHwnd(),&rect);
4391 pt.x -= rect.left;
4392 pt.y -= rect.top;
4393
4394 event.m_x = pt.x;
4395 event.m_y = pt.y;
4396
4397 return event;
4398 }
4399
4400 // isASCII is TRUE only when we're called from WM_CHAR handler and not from
4401 // WM_KEYDOWN one
4402 bool wxWindowMSW::HandleChar(WXWPARAM wParam, WXLPARAM lParam, bool isASCII)
4403 {
4404 bool ctrlDown = FALSE;
4405
4406 int id;
4407 if ( isASCII )
4408 {
4409 // If 1 -> 26, translate to either special keycode or just set
4410 // ctrlDown. IOW, Ctrl-C should result in keycode == 3 and
4411 // ControlDown() == TRUE.
4412 id = wParam;
4413 if ( (id > 0) && (id < 27) )
4414 {
4415 switch (id)
4416 {
4417 case 13:
4418 id = WXK_RETURN;
4419 break;
4420
4421 case 8:
4422 id = WXK_BACK;
4423 break;
4424
4425 case 9:
4426 id = WXK_TAB;
4427 break;
4428
4429 default:
4430 ctrlDown = TRUE;
4431 break;
4432 }
4433 }
4434 }
4435 else // we're called from WM_KEYDOWN
4436 {
4437 id = wxCharCodeMSWToWX(wParam);
4438 if ( id == 0 )
4439 {
4440 // it's ASCII and will be processed here only when called from
4441 // WM_CHAR (i.e. when isASCII = TRUE), don't process it now
4442 return FALSE;
4443 }
4444 }
4445
4446 wxKeyEvent event(CreateKeyEvent(wxEVT_CHAR, id, lParam, wParam));
4447
4448 // the alphanumeric keys produced by pressing AltGr+something on European
4449 // keyboards have both Ctrl and Alt modifiers which may confuse the user
4450 // code as, normally, keys with Ctrl and/or Alt don't result in anything
4451 // alphanumeric, so pretend that there are no modifiers at all (the
4452 // KEY_DOWN event would still have the correct modifiers if they're really
4453 // needed)
4454 if ( event.m_controlDown && event.m_altDown &&
4455 (id >= 32 && id < 256) )
4456 {
4457 event.m_controlDown =
4458 event.m_altDown = FALSE;
4459 }
4460
4461 return GetEventHandler()->ProcessEvent(event);
4462 }
4463
4464 bool wxWindowMSW::HandleKeyDown(WXWPARAM wParam, WXLPARAM lParam)
4465 {
4466 int id = wxCharCodeMSWToWX(wParam);
4467
4468 if ( !id )
4469 {
4470 // normal ASCII char
4471 id = wParam;
4472 }
4473
4474 if ( id != -1 ) // VZ: does this ever happen (FIXME)?
4475 {
4476 wxKeyEvent event(CreateKeyEvent(wxEVT_KEY_DOWN, id, lParam, wParam));
4477 if ( GetEventHandler()->ProcessEvent(event) )
4478 {
4479 return TRUE;
4480 }
4481 }
4482
4483 return FALSE;
4484 }
4485
4486 bool wxWindowMSW::HandleKeyUp(WXWPARAM wParam, WXLPARAM lParam)
4487 {
4488 int id = wxCharCodeMSWToWX(wParam);
4489
4490 if ( !id )
4491 {
4492 // normal ASCII char
4493 id = wParam;
4494 }
4495
4496 if ( id != -1 ) // VZ: does this ever happen (FIXME)?
4497 {
4498 wxKeyEvent event(CreateKeyEvent(wxEVT_KEY_UP, id, lParam, wParam));
4499 if ( GetEventHandler()->ProcessEvent(event) )
4500 return TRUE;
4501 }
4502
4503 return FALSE;
4504 }
4505
4506 #ifdef __WIN32__
4507
4508 int wxWindowMSW::HandleMenuChar(int chAccel, WXLPARAM lParam)
4509 {
4510 const HMENU hmenu = (HMENU)lParam;
4511
4512 MENUITEMINFO mii;
4513 wxZeroMemory(mii);
4514 mii.cbSize = sizeof(MENUITEMINFO);
4515 mii.fMask = MIIM_TYPE | MIIM_DATA;
4516
4517 // find if we have this letter in any owner drawn item
4518 const int count = ::GetMenuItemCount(hmenu);
4519 for ( int i = 0; i < count; i++ )
4520 {
4521 if ( ::GetMenuItemInfo(hmenu, i, TRUE, &mii) )
4522 {
4523 if ( mii.fType == MFT_OWNERDRAW )
4524 {
4525 // dwItemData member of the MENUITEMINFO is a
4526 // pointer to the associated wxMenuItem -- see the
4527 // menu creation code
4528 wxMenuItem *item = (wxMenuItem*)mii.dwItemData;
4529
4530 const wxChar *p = wxStrchr(item->GetText(), _T('&'));
4531 while ( p++ )
4532 {
4533 if ( *p == _T('&') )
4534 {
4535 // this is not the accel char, find the real one
4536 p = wxStrchr(p + 1, _T('&'));
4537 }
4538 else // got the accel char
4539 {
4540 // FIXME-UNICODE: this comparison doesn't risk to work
4541 // for non ASCII accelerator characters I'm afraid, but
4542 // what can we do?
4543 if ( wxToupper(*p) == chAccel )
4544 {
4545 return i;
4546 }
4547 else
4548 {
4549 // this one doesn't match
4550 break;
4551 }
4552 }
4553 }
4554 }
4555 }
4556 else // failed ot get the menu text?
4557 {
4558 // it's not fatal, so don't show error, but still log
4559 // it
4560 wxLogLastError(_T("GetMenuItemInfo"));
4561 }
4562 }
4563
4564 return wxNOT_FOUND;
4565 }
4566
4567 #endif // __WIN32__
4568
4569 // ---------------------------------------------------------------------------
4570 // joystick
4571 // ---------------------------------------------------------------------------
4572
4573 bool wxWindowMSW::HandleJoystickEvent(WXUINT msg, int x, int y, WXUINT flags)
4574 {
4575 #ifdef JOY_BUTTON1
4576 int change = 0;
4577 if ( flags & JOY_BUTTON1CHG )
4578 change = wxJOY_BUTTON1;
4579 if ( flags & JOY_BUTTON2CHG )
4580 change = wxJOY_BUTTON2;
4581 if ( flags & JOY_BUTTON3CHG )
4582 change = wxJOY_BUTTON3;
4583 if ( flags & JOY_BUTTON4CHG )
4584 change = wxJOY_BUTTON4;
4585
4586 int buttons = 0;
4587 if ( flags & JOY_BUTTON1 )
4588 buttons |= wxJOY_BUTTON1;
4589 if ( flags & JOY_BUTTON2 )
4590 buttons |= wxJOY_BUTTON2;
4591 if ( flags & JOY_BUTTON3 )
4592 buttons |= wxJOY_BUTTON3;
4593 if ( flags & JOY_BUTTON4 )
4594 buttons |= wxJOY_BUTTON4;
4595
4596 // the event ids aren't consecutive so we can't use table based lookup
4597 int joystick;
4598 wxEventType eventType;
4599 switch ( msg )
4600 {
4601 case MM_JOY1MOVE:
4602 joystick = 1;
4603 eventType = wxEVT_JOY_MOVE;
4604 break;
4605
4606 case MM_JOY2MOVE:
4607 joystick = 2;
4608 eventType = wxEVT_JOY_MOVE;
4609 break;
4610
4611 case MM_JOY1ZMOVE:
4612 joystick = 1;
4613 eventType = wxEVT_JOY_ZMOVE;
4614 break;
4615
4616 case MM_JOY2ZMOVE:
4617 joystick = 2;
4618 eventType = wxEVT_JOY_ZMOVE;
4619 break;
4620
4621 case MM_JOY1BUTTONDOWN:
4622 joystick = 1;
4623 eventType = wxEVT_JOY_BUTTON_DOWN;
4624 break;
4625
4626 case MM_JOY2BUTTONDOWN:
4627 joystick = 2;
4628 eventType = wxEVT_JOY_BUTTON_DOWN;
4629 break;
4630
4631 case MM_JOY1BUTTONUP:
4632 joystick = 1;
4633 eventType = wxEVT_JOY_BUTTON_UP;
4634 break;
4635
4636 case MM_JOY2BUTTONUP:
4637 joystick = 2;
4638 eventType = wxEVT_JOY_BUTTON_UP;
4639 break;
4640
4641 default:
4642 wxFAIL_MSG(wxT("no such joystick event"));
4643
4644 return FALSE;
4645 }
4646
4647 wxJoystickEvent event(eventType, buttons, joystick, change);
4648 event.SetPosition(wxPoint(x, y));
4649 event.SetEventObject(this);
4650
4651 return GetEventHandler()->ProcessEvent(event);
4652 #else
4653 return FALSE;
4654 #endif
4655 }
4656
4657 // ---------------------------------------------------------------------------
4658 // scrolling
4659 // ---------------------------------------------------------------------------
4660
4661 bool wxWindowMSW::MSWOnScroll(int orientation, WXWORD wParam,
4662 WXWORD pos, WXHWND control)
4663 {
4664 if ( control )
4665 {
4666 wxWindow *child = wxFindWinFromHandle(control);
4667 if ( child )
4668 return child->MSWOnScroll(orientation, wParam, pos, control);
4669 }
4670
4671 wxScrollWinEvent event;
4672 event.SetPosition(pos);
4673 event.SetOrientation(orientation);
4674 event.m_eventObject = this;
4675
4676 switch ( wParam )
4677 {
4678 case SB_TOP:
4679 event.m_eventType = wxEVT_SCROLLWIN_TOP;
4680 break;
4681
4682 case SB_BOTTOM:
4683 event.m_eventType = wxEVT_SCROLLWIN_BOTTOM;
4684 break;
4685
4686 case SB_LINEUP:
4687 event.m_eventType = wxEVT_SCROLLWIN_LINEUP;
4688 break;
4689
4690 case SB_LINEDOWN:
4691 event.m_eventType = wxEVT_SCROLLWIN_LINEDOWN;
4692 break;
4693
4694 case SB_PAGEUP:
4695 event.m_eventType = wxEVT_SCROLLWIN_PAGEUP;
4696 break;
4697
4698 case SB_PAGEDOWN:
4699 event.m_eventType = wxEVT_SCROLLWIN_PAGEDOWN;
4700 break;
4701
4702 case SB_THUMBPOSITION:
4703 case SB_THUMBTRACK:
4704 #ifdef __WIN32__
4705 // under Win32, the scrollbar range and position are 32 bit integers,
4706 // but WM_[HV]SCROLL only carry the low 16 bits of them, so we must
4707 // explicitly query the scrollbar for the correct position (this must
4708 // be done only for these two SB_ events as they are the only one
4709 // carrying the scrollbar position)
4710 {
4711 SCROLLINFO scrollInfo;
4712 wxZeroMemory(scrollInfo);
4713 scrollInfo.cbSize = sizeof(SCROLLINFO);
4714 scrollInfo.fMask = SIF_TRACKPOS;
4715
4716 if ( !::GetScrollInfo(GetHwnd(),
4717 orientation == wxHORIZONTAL ? SB_HORZ
4718 : SB_VERT,
4719 &scrollInfo) )
4720 {
4721 wxLogLastError(_T("GetScrollInfo"));
4722 }
4723
4724 event.SetPosition(scrollInfo.nTrackPos);
4725 }
4726 #endif // Win32
4727
4728 event.m_eventType = wParam == SB_THUMBPOSITION
4729 ? wxEVT_SCROLLWIN_THUMBRELEASE
4730 : wxEVT_SCROLLWIN_THUMBTRACK;
4731 break;
4732
4733 default:
4734 return FALSE;
4735 }
4736
4737 return GetEventHandler()->ProcessEvent(event);
4738 }
4739
4740 // ===========================================================================
4741 // global functions
4742 // ===========================================================================
4743
4744 void wxGetCharSize(WXHWND wnd, int *x, int *y, const wxFont *the_font)
4745 {
4746 TEXTMETRIC tm;
4747 HDC dc = ::GetDC((HWND) wnd);
4748 HFONT fnt =0;
4749 HFONT was = 0;
4750 if ( the_font )
4751 {
4752 // the_font->UseResource();
4753 // the_font->RealizeResource();
4754 fnt = (HFONT)((wxFont *)the_font)->GetResourceHandle(); // const_cast
4755 if ( fnt )
4756 was = (HFONT) SelectObject(dc,fnt);
4757 }
4758 GetTextMetrics(dc, &tm);
4759 if ( the_font && fnt && was )
4760 {
4761 SelectObject(dc,was);
4762 }
4763 ReleaseDC((HWND)wnd, dc);
4764
4765 if ( x )
4766 *x = tm.tmAveCharWidth;
4767 if ( y )
4768 *y = tm.tmHeight + tm.tmExternalLeading;
4769
4770 // if ( the_font )
4771 // the_font->ReleaseResource();
4772 }
4773
4774 // Returns 0 if was a normal ASCII value, not a special key. This indicates that
4775 // the key should be ignored by WM_KEYDOWN and processed by WM_CHAR instead.
4776 int wxCharCodeMSWToWX(int keySym)
4777 {
4778 int id;
4779 switch (keySym)
4780 {
4781 case VK_CANCEL: id = WXK_CANCEL; break;
4782 case VK_BACK: id = WXK_BACK; break;
4783 case VK_TAB: id = WXK_TAB; break;
4784 case VK_CLEAR: id = WXK_CLEAR; break;
4785 case VK_RETURN: id = WXK_RETURN; break;
4786 case VK_SHIFT: id = WXK_SHIFT; break;
4787 case VK_CONTROL: id = WXK_CONTROL; break;
4788 case VK_MENU : id = WXK_MENU; break;
4789 case VK_PAUSE: id = WXK_PAUSE; break;
4790 case VK_CAPITAL: id = WXK_CAPITAL; break;
4791 case VK_SPACE: id = WXK_SPACE; break;
4792 case VK_ESCAPE: id = WXK_ESCAPE; break;
4793 case VK_PRIOR: id = WXK_PRIOR; break;
4794 case VK_NEXT : id = WXK_NEXT; break;
4795 case VK_END: id = WXK_END; break;
4796 case VK_HOME : id = WXK_HOME; break;
4797 case VK_LEFT : id = WXK_LEFT; break;
4798 case VK_UP: id = WXK_UP; break;
4799 case VK_RIGHT: id = WXK_RIGHT; break;
4800 case VK_DOWN : id = WXK_DOWN; break;
4801 case VK_SELECT: id = WXK_SELECT; break;
4802 case VK_PRINT: id = WXK_PRINT; break;
4803 case VK_EXECUTE: id = WXK_EXECUTE; break;
4804 case VK_INSERT: id = WXK_INSERT; break;
4805 case VK_DELETE: id = WXK_DELETE; break;
4806 case VK_HELP : id = WXK_HELP; break;
4807 case VK_NUMPAD0: id = WXK_NUMPAD0; break;
4808 case VK_NUMPAD1: id = WXK_NUMPAD1; break;
4809 case VK_NUMPAD2: id = WXK_NUMPAD2; break;
4810 case VK_NUMPAD3: id = WXK_NUMPAD3; break;
4811 case VK_NUMPAD4: id = WXK_NUMPAD4; break;
4812 case VK_NUMPAD5: id = WXK_NUMPAD5; break;
4813 case VK_NUMPAD6: id = WXK_NUMPAD6; break;
4814 case VK_NUMPAD7: id = WXK_NUMPAD7; break;
4815 case VK_NUMPAD8: id = WXK_NUMPAD8; break;
4816 case VK_NUMPAD9: id = WXK_NUMPAD9; break;
4817 case VK_MULTIPLY: id = WXK_NUMPAD_MULTIPLY; break;
4818 case VK_ADD: id = WXK_NUMPAD_ADD; break;
4819 case VK_SUBTRACT: id = WXK_NUMPAD_SUBTRACT; break;
4820 case VK_DECIMAL: id = WXK_NUMPAD_DECIMAL; break;
4821 case VK_DIVIDE: id = WXK_NUMPAD_DIVIDE; break;
4822 case VK_F1: id = WXK_F1; break;
4823 case VK_F2: id = WXK_F2; break;
4824 case VK_F3: id = WXK_F3; break;
4825 case VK_F4: id = WXK_F4; break;
4826 case VK_F5: id = WXK_F5; break;
4827 case VK_F6: id = WXK_F6; break;
4828 case VK_F7: id = WXK_F7; break;
4829 case VK_F8: id = WXK_F8; break;
4830 case VK_F9: id = WXK_F9; break;
4831 case VK_F10: id = WXK_F10; break;
4832 case VK_F11: id = WXK_F11; break;
4833 case VK_F12: id = WXK_F12; break;
4834 case VK_F13: id = WXK_F13; break;
4835 case VK_F14: id = WXK_F14; break;
4836 case VK_F15: id = WXK_F15; break;
4837 case VK_F16: id = WXK_F16; break;
4838 case VK_F17: id = WXK_F17; break;
4839 case VK_F18: id = WXK_F18; break;
4840 case VK_F19: id = WXK_F19; break;
4841 case VK_F20: id = WXK_F20; break;
4842 case VK_F21: id = WXK_F21; break;
4843 case VK_F22: id = WXK_F22; break;
4844 case VK_F23: id = WXK_F23; break;
4845 case VK_F24: id = WXK_F24; break;
4846 case VK_NUMLOCK: id = WXK_NUMLOCK; break;
4847 case VK_SCROLL: id = WXK_SCROLL; break;
4848
4849 case VK_OEM_1: id = ';'; break;
4850 case VK_OEM_PLUS: id = '+'; break;
4851 case VK_OEM_COMMA: id = ','; break;
4852 case VK_OEM_MINUS: id = '-'; break;
4853 case VK_OEM_PERIOD: id = '.'; break;
4854 case VK_OEM_2: id = '/'; break;
4855 case VK_OEM_3: id = '~'; break;
4856 case VK_OEM_4: id = '['; break;
4857 case VK_OEM_5: id = '\\'; break;
4858 case VK_OEM_6: id = ']'; break;
4859 case VK_OEM_7: id = '\''; break;
4860
4861 #ifdef VK_APPS
4862 case VK_LWIN: id = WXK_WINDOWS_LEFT; break;
4863 case VK_RWIN: id = WXK_WINDOWS_RIGHT; break;
4864 case VK_APPS: id = WXK_WINDOWS_MENU; break;
4865 #endif // VK_APPS defined
4866
4867 default:
4868 id = 0;
4869 }
4870
4871 return id;
4872 }
4873
4874 int wxCharCodeWXToMSW(int id, bool *isVirtual)
4875 {
4876 *isVirtual = TRUE;
4877 int keySym = 0;
4878 switch (id)
4879 {
4880 case WXK_CANCEL: keySym = VK_CANCEL; break;
4881 case WXK_CLEAR: keySym = VK_CLEAR; break;
4882 case WXK_SHIFT: keySym = VK_SHIFT; break;
4883 case WXK_CONTROL: keySym = VK_CONTROL; break;
4884 case WXK_MENU : keySym = VK_MENU; break;
4885 case WXK_PAUSE: keySym = VK_PAUSE; break;
4886 case WXK_PRIOR: keySym = VK_PRIOR; break;
4887 case WXK_NEXT : keySym = VK_NEXT; break;
4888 case WXK_END: keySym = VK_END; break;
4889 case WXK_HOME : keySym = VK_HOME; break;
4890 case WXK_LEFT : keySym = VK_LEFT; break;
4891 case WXK_UP: keySym = VK_UP; break;
4892 case WXK_RIGHT: keySym = VK_RIGHT; break;
4893 case WXK_DOWN : keySym = VK_DOWN; break;
4894 case WXK_SELECT: keySym = VK_SELECT; break;
4895 case WXK_PRINT: keySym = VK_PRINT; break;
4896 case WXK_EXECUTE: keySym = VK_EXECUTE; break;
4897 case WXK_INSERT: keySym = VK_INSERT; break;
4898 case WXK_DELETE: keySym = VK_DELETE; break;
4899 case WXK_HELP : keySym = VK_HELP; break;
4900 case WXK_NUMPAD0: keySym = VK_NUMPAD0; break;
4901 case WXK_NUMPAD1: keySym = VK_NUMPAD1; break;
4902 case WXK_NUMPAD2: keySym = VK_NUMPAD2; break;
4903 case WXK_NUMPAD3: keySym = VK_NUMPAD3; break;
4904 case WXK_NUMPAD4: keySym = VK_NUMPAD4; break;
4905 case WXK_NUMPAD5: keySym = VK_NUMPAD5; break;
4906 case WXK_NUMPAD6: keySym = VK_NUMPAD6; break;
4907 case WXK_NUMPAD7: keySym = VK_NUMPAD7; break;
4908 case WXK_NUMPAD8: keySym = VK_NUMPAD8; break;
4909 case WXK_NUMPAD9: keySym = VK_NUMPAD9; break;
4910 case WXK_NUMPAD_MULTIPLY: keySym = VK_MULTIPLY; break;
4911 case WXK_NUMPAD_ADD: keySym = VK_ADD; break;
4912 case WXK_NUMPAD_SUBTRACT: keySym = VK_SUBTRACT; break;
4913 case WXK_NUMPAD_DECIMAL: keySym = VK_DECIMAL; break;
4914 case WXK_NUMPAD_DIVIDE: keySym = VK_DIVIDE; break;
4915 case WXK_F1: keySym = VK_F1; break;
4916 case WXK_F2: keySym = VK_F2; break;
4917 case WXK_F3: keySym = VK_F3; break;
4918 case WXK_F4: keySym = VK_F4; break;
4919 case WXK_F5: keySym = VK_F5; break;
4920 case WXK_F6: keySym = VK_F6; break;
4921 case WXK_F7: keySym = VK_F7; break;
4922 case WXK_F8: keySym = VK_F8; break;
4923 case WXK_F9: keySym = VK_F9; break;
4924 case WXK_F10: keySym = VK_F10; break;
4925 case WXK_F11: keySym = VK_F11; break;
4926 case WXK_F12: keySym = VK_F12; break;
4927 case WXK_F13: keySym = VK_F13; break;
4928 case WXK_F14: keySym = VK_F14; break;
4929 case WXK_F15: keySym = VK_F15; break;
4930 case WXK_F16: keySym = VK_F16; break;
4931 case WXK_F17: keySym = VK_F17; break;
4932 case WXK_F18: keySym = VK_F18; break;
4933 case WXK_F19: keySym = VK_F19; break;
4934 case WXK_F20: keySym = VK_F20; break;
4935 case WXK_F21: keySym = VK_F21; break;
4936 case WXK_F22: keySym = VK_F22; break;
4937 case WXK_F23: keySym = VK_F23; break;
4938 case WXK_F24: keySym = VK_F24; break;
4939 case WXK_NUMLOCK: keySym = VK_NUMLOCK; break;
4940 case WXK_SCROLL: keySym = VK_SCROLL; break;
4941 default:
4942 {
4943 *isVirtual = FALSE;
4944 keySym = id;
4945 break;
4946 }
4947 }
4948 return keySym;
4949 }
4950
4951 wxWindow *wxGetActiveWindow()
4952 {
4953 HWND hWnd = GetActiveWindow();
4954 if ( hWnd != 0 )
4955 {
4956 return wxFindWinFromHandle((WXHWND) hWnd);
4957 }
4958 return NULL;
4959 }
4960
4961 extern wxWindow *wxGetWindowFromHWND(WXHWND hWnd)
4962 {
4963 HWND hwnd = (HWND)hWnd;
4964
4965 // For a radiobutton, we get the radiobox from GWL_USERDATA (which is set
4966 // by code in msw/radiobox.cpp), for all the others we just search up the
4967 // window hierarchy
4968 wxWindow *win = (wxWindow *)NULL;
4969 if ( hwnd )
4970 {
4971 win = wxFindWinFromHandle((WXHWND)hwnd);
4972 if ( !win )
4973 {
4974 // all these hacks only work under Win32 anyhow
4975 #ifdef __WIN32__
4976
4977 #if wxUSE_RADIOBOX
4978 // native radiobuttons return DLGC_RADIOBUTTON here and for any
4979 // wxWindow class which overrides WM_GETDLGCODE processing to
4980 // do it as well, win would be already non NULL
4981 if ( ::SendMessage(hwnd, WM_GETDLGCODE, 0, 0) & DLGC_RADIOBUTTON )
4982 {
4983 win = (wxWindow *)::GetWindowLong(hwnd, GWL_USERDATA);
4984 }
4985 //else: it's a wxRadioButton, not a radiobutton from wxRadioBox
4986 #endif // wxUSE_RADIOBOX
4987
4988 // spin control text buddy window should be mapped to spin ctrl
4989 // itself so try it too
4990 #if wxUSE_SPINCTRL && !defined(__WXUNIVERSAL__)
4991 if ( !win )
4992 {
4993 win = wxSpinCtrl::GetSpinForTextCtrl((WXHWND)hwnd);
4994 }
4995 #endif // wxUSE_SPINCTRL
4996
4997 #endif // Win32
4998 }
4999 }
5000
5001 while ( hwnd && !win )
5002 {
5003 // this is a really ugly hack needed to avoid mistakenly returning the
5004 // parent frame wxWindow for the find/replace modeless dialog HWND -
5005 // this, in turn, is needed to call IsDialogMessage() from
5006 // wxApp::ProcessMessage() as for this we must return NULL from here
5007 //
5008 // FIXME: this is clearly not the best way to do it but I think we'll
5009 // need to change HWND <-> wxWindow code more heavily than I can
5010 // do it now to fix it
5011 #ifndef __WXMICROWIN__
5012 if ( ::GetWindow(hwnd, GW_OWNER) )
5013 {
5014 // it's a dialog box, don't go upwards
5015 break;
5016 }
5017 #endif
5018
5019 hwnd = ::GetParent(hwnd);
5020 win = wxFindWinFromHandle((WXHWND)hwnd);
5021 }
5022
5023 return win;
5024 }
5025
5026 #ifndef __WXMICROWIN__
5027
5028 // Windows keyboard hook. Allows interception of e.g. F1, ESCAPE
5029 // in active frames and dialogs, regardless of where the focus is.
5030 static HHOOK wxTheKeyboardHook = 0;
5031 static FARPROC wxTheKeyboardHookProc = 0;
5032 int APIENTRY _EXPORT
5033 wxKeyboardHook(int nCode, WORD wParam, DWORD lParam);
5034
5035 void wxSetKeyboardHook(bool doIt)
5036 {
5037 if ( doIt )
5038 {
5039 wxTheKeyboardHookProc = MakeProcInstance((FARPROC) wxKeyboardHook, wxGetInstance());
5040 wxTheKeyboardHook = SetWindowsHookEx(WH_KEYBOARD, (HOOKPROC) wxTheKeyboardHookProc, wxGetInstance(),
5041
5042 #if defined(__WIN32__) && !defined(__TWIN32__)
5043 GetCurrentThreadId()
5044 // (DWORD)GetCurrentProcess()); // This is another possibility. Which is right?
5045 #else
5046 GetCurrentTask()
5047 #endif
5048 );
5049 }
5050 else
5051 {
5052 UnhookWindowsHookEx(wxTheKeyboardHook);
5053
5054 // avoids warning about statement with no effect (FreeProcInstance
5055 // doesn't do anything under Win32)
5056 #if !defined(__WIN32__) && !defined(__NT__)
5057 FreeProcInstance(wxTheKeyboardHookProc);
5058 #endif
5059 }
5060 }
5061
5062 int APIENTRY _EXPORT
5063 wxKeyboardHook(int nCode, WORD wParam, DWORD lParam)
5064 {
5065 DWORD hiWord = HIWORD(lParam);
5066 if ( nCode != HC_NOREMOVE && ((hiWord & KF_UP) == 0) )
5067 {
5068 int id = wxCharCodeMSWToWX(wParam);
5069 if ( id != 0 )
5070 {
5071 wxKeyEvent event(wxEVT_CHAR_HOOK);
5072 if ( (HIWORD(lParam) & KF_ALTDOWN) == KF_ALTDOWN )
5073 event.m_altDown = TRUE;
5074
5075 event.m_eventObject = NULL;
5076 event.m_keyCode = id;
5077 event.m_shiftDown = wxIsShiftDown();
5078 event.m_controlDown = wxIsCtrlDown();
5079 event.SetTimestamp(s_currentMsg.time);
5080
5081 wxWindow *win = wxGetActiveWindow();
5082 wxEvtHandler *handler;
5083 if ( win )
5084 {
5085 handler = win->GetEventHandler();
5086 event.SetId(win->GetId());
5087 }
5088 else
5089 {
5090 handler = wxTheApp;
5091 event.SetId(-1);
5092 }
5093
5094 if ( handler && handler->ProcessEvent(event) )
5095 {
5096 // processed
5097 return 1;
5098 }
5099 }
5100 }
5101
5102 return (int)CallNextHookEx(wxTheKeyboardHook, nCode, wParam, lParam);
5103 }
5104
5105 #endif // !__WXMICROWIN__
5106
5107 #ifdef __WXDEBUG__
5108 const char *wxGetMessageName(int message)
5109 {
5110 switch ( message )
5111 {
5112 case 0x0000: return "WM_NULL";
5113 case 0x0001: return "WM_CREATE";
5114 case 0x0002: return "WM_DESTROY";
5115 case 0x0003: return "WM_MOVE";
5116 case 0x0005: return "WM_SIZE";
5117 case 0x0006: return "WM_ACTIVATE";
5118 case 0x0007: return "WM_SETFOCUS";
5119 case 0x0008: return "WM_KILLFOCUS";
5120 case 0x000A: return "WM_ENABLE";
5121 case 0x000B: return "WM_SETREDRAW";
5122 case 0x000C: return "WM_SETTEXT";
5123 case 0x000D: return "WM_GETTEXT";
5124 case 0x000E: return "WM_GETTEXTLENGTH";
5125 case 0x000F: return "WM_PAINT";
5126 case 0x0010: return "WM_CLOSE";
5127 case 0x0011: return "WM_QUERYENDSESSION";
5128 case 0x0012: return "WM_QUIT";
5129 case 0x0013: return "WM_QUERYOPEN";
5130 case 0x0014: return "WM_ERASEBKGND";
5131 case 0x0015: return "WM_SYSCOLORCHANGE";
5132 case 0x0016: return "WM_ENDSESSION";
5133 case 0x0017: return "WM_SYSTEMERROR";
5134 case 0x0018: return "WM_SHOWWINDOW";
5135 case 0x0019: return "WM_CTLCOLOR";
5136 case 0x001A: return "WM_WININICHANGE";
5137 case 0x001B: return "WM_DEVMODECHANGE";
5138 case 0x001C: return "WM_ACTIVATEAPP";
5139 case 0x001D: return "WM_FONTCHANGE";
5140 case 0x001E: return "WM_TIMECHANGE";
5141 case 0x001F: return "WM_CANCELMODE";
5142 case 0x0020: return "WM_SETCURSOR";
5143 case 0x0021: return "WM_MOUSEACTIVATE";
5144 case 0x0022: return "WM_CHILDACTIVATE";
5145 case 0x0023: return "WM_QUEUESYNC";
5146 case 0x0024: return "WM_GETMINMAXINFO";
5147 case 0x0026: return "WM_PAINTICON";
5148 case 0x0027: return "WM_ICONERASEBKGND";
5149 case 0x0028: return "WM_NEXTDLGCTL";
5150 case 0x002A: return "WM_SPOOLERSTATUS";
5151 case 0x002B: return "WM_DRAWITEM";
5152 case 0x002C: return "WM_MEASUREITEM";
5153 case 0x002D: return "WM_DELETEITEM";
5154 case 0x002E: return "WM_VKEYTOITEM";
5155 case 0x002F: return "WM_CHARTOITEM";
5156 case 0x0030: return "WM_SETFONT";
5157 case 0x0031: return "WM_GETFONT";
5158 case 0x0037: return "WM_QUERYDRAGICON";
5159 case 0x0039: return "WM_COMPAREITEM";
5160 case 0x0041: return "WM_COMPACTING";
5161 case 0x0044: return "WM_COMMNOTIFY";
5162 case 0x0046: return "WM_WINDOWPOSCHANGING";
5163 case 0x0047: return "WM_WINDOWPOSCHANGED";
5164 case 0x0048: return "WM_POWER";
5165
5166 #ifdef __WIN32__
5167 case 0x004A: return "WM_COPYDATA";
5168 case 0x004B: return "WM_CANCELJOURNAL";
5169 case 0x004E: return "WM_NOTIFY";
5170 case 0x0050: return "WM_INPUTLANGCHANGEREQUEST";
5171 case 0x0051: return "WM_INPUTLANGCHANGE";
5172 case 0x0052: return "WM_TCARD";
5173 case 0x0053: return "WM_HELP";
5174 case 0x0054: return "WM_USERCHANGED";
5175 case 0x0055: return "WM_NOTIFYFORMAT";
5176 case 0x007B: return "WM_CONTEXTMENU";
5177 case 0x007C: return "WM_STYLECHANGING";
5178 case 0x007D: return "WM_STYLECHANGED";
5179 case 0x007E: return "WM_DISPLAYCHANGE";
5180 case 0x007F: return "WM_GETICON";
5181 case 0x0080: return "WM_SETICON";
5182 #endif //WIN32
5183
5184 case 0x0081: return "WM_NCCREATE";
5185 case 0x0082: return "WM_NCDESTROY";
5186 case 0x0083: return "WM_NCCALCSIZE";
5187 case 0x0084: return "WM_NCHITTEST";
5188 case 0x0085: return "WM_NCPAINT";
5189 case 0x0086: return "WM_NCACTIVATE";
5190 case 0x0087: return "WM_GETDLGCODE";
5191 case 0x00A0: return "WM_NCMOUSEMOVE";
5192 case 0x00A1: return "WM_NCLBUTTONDOWN";
5193 case 0x00A2: return "WM_NCLBUTTONUP";
5194 case 0x00A3: return "WM_NCLBUTTONDBLCLK";
5195 case 0x00A4: return "WM_NCRBUTTONDOWN";
5196 case 0x00A5: return "WM_NCRBUTTONUP";
5197 case 0x00A6: return "WM_NCRBUTTONDBLCLK";
5198 case 0x00A7: return "WM_NCMBUTTONDOWN";
5199 case 0x00A8: return "WM_NCMBUTTONUP";
5200 case 0x00A9: return "WM_NCMBUTTONDBLCLK";
5201 case 0x0100: return "WM_KEYDOWN";
5202 case 0x0101: return "WM_KEYUP";
5203 case 0x0102: return "WM_CHAR";
5204 case 0x0103: return "WM_DEADCHAR";
5205 case 0x0104: return "WM_SYSKEYDOWN";
5206 case 0x0105: return "WM_SYSKEYUP";
5207 case 0x0106: return "WM_SYSCHAR";
5208 case 0x0107: return "WM_SYSDEADCHAR";
5209 case 0x0108: return "WM_KEYLAST";
5210
5211 #ifdef __WIN32__
5212 case 0x010D: return "WM_IME_STARTCOMPOSITION";
5213 case 0x010E: return "WM_IME_ENDCOMPOSITION";
5214 case 0x010F: return "WM_IME_COMPOSITION";
5215 #endif //WIN32
5216
5217 case 0x0110: return "WM_INITDIALOG";
5218 case 0x0111: return "WM_COMMAND";
5219 case 0x0112: return "WM_SYSCOMMAND";
5220 case 0x0113: return "WM_TIMER";
5221 case 0x0114: return "WM_HSCROLL";
5222 case 0x0115: return "WM_VSCROLL";
5223 case 0x0116: return "WM_INITMENU";
5224 case 0x0117: return "WM_INITMENUPOPUP";
5225 case 0x011F: return "WM_MENUSELECT";
5226 case 0x0120: return "WM_MENUCHAR";
5227 case 0x0121: return "WM_ENTERIDLE";
5228 case 0x0200: return "WM_MOUSEMOVE";
5229 case 0x0201: return "WM_LBUTTONDOWN";
5230 case 0x0202: return "WM_LBUTTONUP";
5231 case 0x0203: return "WM_LBUTTONDBLCLK";
5232 case 0x0204: return "WM_RBUTTONDOWN";
5233 case 0x0205: return "WM_RBUTTONUP";
5234 case 0x0206: return "WM_RBUTTONDBLCLK";
5235 case 0x0207: return "WM_MBUTTONDOWN";
5236 case 0x0208: return "WM_MBUTTONUP";
5237 case 0x0209: return "WM_MBUTTONDBLCLK";
5238 case 0x020A: return "WM_MOUSEWHEEL";
5239 case 0x0210: return "WM_PARENTNOTIFY";
5240 case 0x0211: return "WM_ENTERMENULOOP";
5241 case 0x0212: return "WM_EXITMENULOOP";
5242
5243 #ifdef __WIN32__
5244 case 0x0213: return "WM_NEXTMENU";
5245 case 0x0214: return "WM_SIZING";
5246 case 0x0215: return "WM_CAPTURECHANGED";
5247 case 0x0216: return "WM_MOVING";
5248 case 0x0218: return "WM_POWERBROADCAST";
5249 case 0x0219: return "WM_DEVICECHANGE";
5250 #endif //WIN32
5251
5252 case 0x0220: return "WM_MDICREATE";
5253 case 0x0221: return "WM_MDIDESTROY";
5254 case 0x0222: return "WM_MDIACTIVATE";
5255 case 0x0223: return "WM_MDIRESTORE";
5256 case 0x0224: return "WM_MDINEXT";
5257 case 0x0225: return "WM_MDIMAXIMIZE";
5258 case 0x0226: return "WM_MDITILE";
5259 case 0x0227: return "WM_MDICASCADE";
5260 case 0x0228: return "WM_MDIICONARRANGE";
5261 case 0x0229: return "WM_MDIGETACTIVE";
5262 case 0x0230: return "WM_MDISETMENU";
5263 case 0x0233: return "WM_DROPFILES";
5264
5265 #ifdef __WIN32__
5266 case 0x0281: return "WM_IME_SETCONTEXT";
5267 case 0x0282: return "WM_IME_NOTIFY";
5268 case 0x0283: return "WM_IME_CONTROL";
5269 case 0x0284: return "WM_IME_COMPOSITIONFULL";
5270 case 0x0285: return "WM_IME_SELECT";
5271 case 0x0286: return "WM_IME_CHAR";
5272 case 0x0290: return "WM_IME_KEYDOWN";
5273 case 0x0291: return "WM_IME_KEYUP";
5274 #endif //WIN32
5275
5276 case 0x0300: return "WM_CUT";
5277 case 0x0301: return "WM_COPY";
5278 case 0x0302: return "WM_PASTE";
5279 case 0x0303: return "WM_CLEAR";
5280 case 0x0304: return "WM_UNDO";
5281 case 0x0305: return "WM_RENDERFORMAT";
5282 case 0x0306: return "WM_RENDERALLFORMATS";
5283 case 0x0307: return "WM_DESTROYCLIPBOARD";
5284 case 0x0308: return "WM_DRAWCLIPBOARD";
5285 case 0x0309: return "WM_PAINTCLIPBOARD";
5286 case 0x030A: return "WM_VSCROLLCLIPBOARD";
5287 case 0x030B: return "WM_SIZECLIPBOARD";
5288 case 0x030C: return "WM_ASKCBFORMATNAME";
5289 case 0x030D: return "WM_CHANGECBCHAIN";
5290 case 0x030E: return "WM_HSCROLLCLIPBOARD";
5291 case 0x030F: return "WM_QUERYNEWPALETTE";
5292 case 0x0310: return "WM_PALETTEISCHANGING";
5293 case 0x0311: return "WM_PALETTECHANGED";
5294
5295 #ifdef __WIN32__
5296 // common controls messages - although they're not strictly speaking
5297 // standard, it's nice to decode them nevertheless
5298
5299 // listview
5300 case 0x1000 + 0: return "LVM_GETBKCOLOR";
5301 case 0x1000 + 1: return "LVM_SETBKCOLOR";
5302 case 0x1000 + 2: return "LVM_GETIMAGELIST";
5303 case 0x1000 + 3: return "LVM_SETIMAGELIST";
5304 case 0x1000 + 4: return "LVM_GETITEMCOUNT";
5305 case 0x1000 + 5: return "LVM_GETITEMA";
5306 case 0x1000 + 75: return "LVM_GETITEMW";
5307 case 0x1000 + 6: return "LVM_SETITEMA";
5308 case 0x1000 + 76: return "LVM_SETITEMW";
5309 case 0x1000 + 7: return "LVM_INSERTITEMA";
5310 case 0x1000 + 77: return "LVM_INSERTITEMW";
5311 case 0x1000 + 8: return "LVM_DELETEITEM";
5312 case 0x1000 + 9: return "LVM_DELETEALLITEMS";
5313 case 0x1000 + 10: return "LVM_GETCALLBACKMASK";
5314 case 0x1000 + 11: return "LVM_SETCALLBACKMASK";
5315 case 0x1000 + 12: return "LVM_GETNEXTITEM";
5316 case 0x1000 + 13: return "LVM_FINDITEMA";
5317 case 0x1000 + 83: return "LVM_FINDITEMW";
5318 case 0x1000 + 14: return "LVM_GETITEMRECT";
5319 case 0x1000 + 15: return "LVM_SETITEMPOSITION";
5320 case 0x1000 + 16: return "LVM_GETITEMPOSITION";
5321 case 0x1000 + 17: return "LVM_GETSTRINGWIDTHA";
5322 case 0x1000 + 87: return "LVM_GETSTRINGWIDTHW";
5323 case 0x1000 + 18: return "LVM_HITTEST";
5324 case 0x1000 + 19: return "LVM_ENSUREVISIBLE";
5325 case 0x1000 + 20: return "LVM_SCROLL";
5326 case 0x1000 + 21: return "LVM_REDRAWITEMS";
5327 case 0x1000 + 22: return "LVM_ARRANGE";
5328 case 0x1000 + 23: return "LVM_EDITLABELA";
5329 case 0x1000 + 118: return "LVM_EDITLABELW";
5330 case 0x1000 + 24: return "LVM_GETEDITCONTROL";
5331 case 0x1000 + 25: return "LVM_GETCOLUMNA";
5332 case 0x1000 + 95: return "LVM_GETCOLUMNW";
5333 case 0x1000 + 26: return "LVM_SETCOLUMNA";
5334 case 0x1000 + 96: return "LVM_SETCOLUMNW";
5335 case 0x1000 + 27: return "LVM_INSERTCOLUMNA";
5336 case 0x1000 + 97: return "LVM_INSERTCOLUMNW";
5337 case 0x1000 + 28: return "LVM_DELETECOLUMN";
5338 case 0x1000 + 29: return "LVM_GETCOLUMNWIDTH";
5339 case 0x1000 + 30: return "LVM_SETCOLUMNWIDTH";
5340 case 0x1000 + 31: return "LVM_GETHEADER";
5341 case 0x1000 + 33: return "LVM_CREATEDRAGIMAGE";
5342 case 0x1000 + 34: return "LVM_GETVIEWRECT";
5343 case 0x1000 + 35: return "LVM_GETTEXTCOLOR";
5344 case 0x1000 + 36: return "LVM_SETTEXTCOLOR";
5345 case 0x1000 + 37: return "LVM_GETTEXTBKCOLOR";
5346 case 0x1000 + 38: return "LVM_SETTEXTBKCOLOR";
5347 case 0x1000 + 39: return "LVM_GETTOPINDEX";
5348 case 0x1000 + 40: return "LVM_GETCOUNTPERPAGE";
5349 case 0x1000 + 41: return "LVM_GETORIGIN";
5350 case 0x1000 + 42: return "LVM_UPDATE";
5351 case 0x1000 + 43: return "LVM_SETITEMSTATE";
5352 case 0x1000 + 44: return "LVM_GETITEMSTATE";
5353 case 0x1000 + 45: return "LVM_GETITEMTEXTA";
5354 case 0x1000 + 115: return "LVM_GETITEMTEXTW";
5355 case 0x1000 + 46: return "LVM_SETITEMTEXTA";
5356 case 0x1000 + 116: return "LVM_SETITEMTEXTW";
5357 case 0x1000 + 47: return "LVM_SETITEMCOUNT";
5358 case 0x1000 + 48: return "LVM_SORTITEMS";
5359 case 0x1000 + 49: return "LVM_SETITEMPOSITION32";
5360 case 0x1000 + 50: return "LVM_GETSELECTEDCOUNT";
5361 case 0x1000 + 51: return "LVM_GETITEMSPACING";
5362 case 0x1000 + 52: return "LVM_GETISEARCHSTRINGA";
5363 case 0x1000 + 117: return "LVM_GETISEARCHSTRINGW";
5364 case 0x1000 + 53: return "LVM_SETICONSPACING";
5365 case 0x1000 + 54: return "LVM_SETEXTENDEDLISTVIEWSTYLE";
5366 case 0x1000 + 55: return "LVM_GETEXTENDEDLISTVIEWSTYLE";
5367 case 0x1000 + 56: return "LVM_GETSUBITEMRECT";
5368 case 0x1000 + 57: return "LVM_SUBITEMHITTEST";
5369 case 0x1000 + 58: return "LVM_SETCOLUMNORDERARRAY";
5370 case 0x1000 + 59: return "LVM_GETCOLUMNORDERARRAY";
5371 case 0x1000 + 60: return "LVM_SETHOTITEM";
5372 case 0x1000 + 61: return "LVM_GETHOTITEM";
5373 case 0x1000 + 62: return "LVM_SETHOTCURSOR";
5374 case 0x1000 + 63: return "LVM_GETHOTCURSOR";
5375 case 0x1000 + 64: return "LVM_APPROXIMATEVIEWRECT";
5376 case 0x1000 + 65: return "LVM_SETWORKAREA";
5377
5378 // tree view
5379 case 0x1100 + 0: return "TVM_INSERTITEMA";
5380 case 0x1100 + 50: return "TVM_INSERTITEMW";
5381 case 0x1100 + 1: return "TVM_DELETEITEM";
5382 case 0x1100 + 2: return "TVM_EXPAND";
5383 case 0x1100 + 4: return "TVM_GETITEMRECT";
5384 case 0x1100 + 5: return "TVM_GETCOUNT";
5385 case 0x1100 + 6: return "TVM_GETINDENT";
5386 case 0x1100 + 7: return "TVM_SETINDENT";
5387 case 0x1100 + 8: return "TVM_GETIMAGELIST";
5388 case 0x1100 + 9: return "TVM_SETIMAGELIST";
5389 case 0x1100 + 10: return "TVM_GETNEXTITEM";
5390 case 0x1100 + 11: return "TVM_SELECTITEM";
5391 case 0x1100 + 12: return "TVM_GETITEMA";
5392 case 0x1100 + 62: return "TVM_GETITEMW";
5393 case 0x1100 + 13: return "TVM_SETITEMA";
5394 case 0x1100 + 63: return "TVM_SETITEMW";
5395 case 0x1100 + 14: return "TVM_EDITLABELA";
5396 case 0x1100 + 65: return "TVM_EDITLABELW";
5397 case 0x1100 + 15: return "TVM_GETEDITCONTROL";
5398 case 0x1100 + 16: return "TVM_GETVISIBLECOUNT";
5399 case 0x1100 + 17: return "TVM_HITTEST";
5400 case 0x1100 + 18: return "TVM_CREATEDRAGIMAGE";
5401 case 0x1100 + 19: return "TVM_SORTCHILDREN";
5402 case 0x1100 + 20: return "TVM_ENSUREVISIBLE";
5403 case 0x1100 + 21: return "TVM_SORTCHILDRENCB";
5404 case 0x1100 + 22: return "TVM_ENDEDITLABELNOW";
5405 case 0x1100 + 23: return "TVM_GETISEARCHSTRINGA";
5406 case 0x1100 + 64: return "TVM_GETISEARCHSTRINGW";
5407 case 0x1100 + 24: return "TVM_SETTOOLTIPS";
5408 case 0x1100 + 25: return "TVM_GETTOOLTIPS";
5409
5410 // header
5411 case 0x1200 + 0: return "HDM_GETITEMCOUNT";
5412 case 0x1200 + 1: return "HDM_INSERTITEMA";
5413 case 0x1200 + 10: return "HDM_INSERTITEMW";
5414 case 0x1200 + 2: return "HDM_DELETEITEM";
5415 case 0x1200 + 3: return "HDM_GETITEMA";
5416 case 0x1200 + 11: return "HDM_GETITEMW";
5417 case 0x1200 + 4: return "HDM_SETITEMA";
5418 case 0x1200 + 12: return "HDM_SETITEMW";
5419 case 0x1200 + 5: return "HDM_LAYOUT";
5420 case 0x1200 + 6: return "HDM_HITTEST";
5421 case 0x1200 + 7: return "HDM_GETITEMRECT";
5422 case 0x1200 + 8: return "HDM_SETIMAGELIST";
5423 case 0x1200 + 9: return "HDM_GETIMAGELIST";
5424 case 0x1200 + 15: return "HDM_ORDERTOINDEX";
5425 case 0x1200 + 16: return "HDM_CREATEDRAGIMAGE";
5426 case 0x1200 + 17: return "HDM_GETORDERARRAY";
5427 case 0x1200 + 18: return "HDM_SETORDERARRAY";
5428 case 0x1200 + 19: return "HDM_SETHOTDIVIDER";
5429
5430 // tab control
5431 case 0x1300 + 2: return "TCM_GETIMAGELIST";
5432 case 0x1300 + 3: return "TCM_SETIMAGELIST";
5433 case 0x1300 + 4: return "TCM_GETITEMCOUNT";
5434 case 0x1300 + 5: return "TCM_GETITEMA";
5435 case 0x1300 + 60: return "TCM_GETITEMW";
5436 case 0x1300 + 6: return "TCM_SETITEMA";
5437 case 0x1300 + 61: return "TCM_SETITEMW";
5438 case 0x1300 + 7: return "TCM_INSERTITEMA";
5439 case 0x1300 + 62: return "TCM_INSERTITEMW";
5440 case 0x1300 + 8: return "TCM_DELETEITEM";
5441 case 0x1300 + 9: return "TCM_DELETEALLITEMS";
5442 case 0x1300 + 10: return "TCM_GETITEMRECT";
5443 case 0x1300 + 11: return "TCM_GETCURSEL";
5444 case 0x1300 + 12: return "TCM_SETCURSEL";
5445 case 0x1300 + 13: return "TCM_HITTEST";
5446 case 0x1300 + 14: return "TCM_SETITEMEXTRA";
5447 case 0x1300 + 40: return "TCM_ADJUSTRECT";
5448 case 0x1300 + 41: return "TCM_SETITEMSIZE";
5449 case 0x1300 + 42: return "TCM_REMOVEIMAGE";
5450 case 0x1300 + 43: return "TCM_SETPADDING";
5451 case 0x1300 + 44: return "TCM_GETROWCOUNT";
5452 case 0x1300 + 45: return "TCM_GETTOOLTIPS";
5453 case 0x1300 + 46: return "TCM_SETTOOLTIPS";
5454 case 0x1300 + 47: return "TCM_GETCURFOCUS";
5455 case 0x1300 + 48: return "TCM_SETCURFOCUS";
5456 case 0x1300 + 49: return "TCM_SETMINTABWIDTH";
5457 case 0x1300 + 50: return "TCM_DESELECTALL";
5458
5459 // toolbar
5460 case WM_USER+1: return "TB_ENABLEBUTTON";
5461 case WM_USER+2: return "TB_CHECKBUTTON";
5462 case WM_USER+3: return "TB_PRESSBUTTON";
5463 case WM_USER+4: return "TB_HIDEBUTTON";
5464 case WM_USER+5: return "TB_INDETERMINATE";
5465 case WM_USER+9: return "TB_ISBUTTONENABLED";
5466 case WM_USER+10: return "TB_ISBUTTONCHECKED";
5467 case WM_USER+11: return "TB_ISBUTTONPRESSED";
5468 case WM_USER+12: return "TB_ISBUTTONHIDDEN";
5469 case WM_USER+13: return "TB_ISBUTTONINDETERMINATE";
5470 case WM_USER+17: return "TB_SETSTATE";
5471 case WM_USER+18: return "TB_GETSTATE";
5472 case WM_USER+19: return "TB_ADDBITMAP";
5473 case WM_USER+20: return "TB_ADDBUTTONS";
5474 case WM_USER+21: return "TB_INSERTBUTTON";
5475 case WM_USER+22: return "TB_DELETEBUTTON";
5476 case WM_USER+23: return "TB_GETBUTTON";
5477 case WM_USER+24: return "TB_BUTTONCOUNT";
5478 case WM_USER+25: return "TB_COMMANDTOINDEX";
5479 case WM_USER+26: return "TB_SAVERESTOREA";
5480 case WM_USER+76: return "TB_SAVERESTOREW";
5481 case WM_USER+27: return "TB_CUSTOMIZE";
5482 case WM_USER+28: return "TB_ADDSTRINGA";
5483 case WM_USER+77: return "TB_ADDSTRINGW";
5484 case WM_USER+29: return "TB_GETITEMRECT";
5485 case WM_USER+30: return "TB_BUTTONSTRUCTSIZE";
5486 case WM_USER+31: return "TB_SETBUTTONSIZE";
5487 case WM_USER+32: return "TB_SETBITMAPSIZE";
5488 case WM_USER+33: return "TB_AUTOSIZE";
5489 case WM_USER+35: return "TB_GETTOOLTIPS";
5490 case WM_USER+36: return "TB_SETTOOLTIPS";
5491 case WM_USER+37: return "TB_SETPARENT";
5492 case WM_USER+39: return "TB_SETROWS";
5493 case WM_USER+40: return "TB_GETROWS";
5494 case WM_USER+42: return "TB_SETCMDID";
5495 case WM_USER+43: return "TB_CHANGEBITMAP";
5496 case WM_USER+44: return "TB_GETBITMAP";
5497 case WM_USER+45: return "TB_GETBUTTONTEXTA";
5498 case WM_USER+75: return "TB_GETBUTTONTEXTW";
5499 case WM_USER+46: return "TB_REPLACEBITMAP";
5500 case WM_USER+47: return "TB_SETINDENT";
5501 case WM_USER+48: return "TB_SETIMAGELIST";
5502 case WM_USER+49: return "TB_GETIMAGELIST";
5503 case WM_USER+50: return "TB_LOADIMAGES";
5504 case WM_USER+51: return "TB_GETRECT";
5505 case WM_USER+52: return "TB_SETHOTIMAGELIST";
5506 case WM_USER+53: return "TB_GETHOTIMAGELIST";
5507 case WM_USER+54: return "TB_SETDISABLEDIMAGELIST";
5508 case WM_USER+55: return "TB_GETDISABLEDIMAGELIST";
5509 case WM_USER+56: return "TB_SETSTYLE";
5510 case WM_USER+57: return "TB_GETSTYLE";
5511 case WM_USER+58: return "TB_GETBUTTONSIZE";
5512 case WM_USER+59: return "TB_SETBUTTONWIDTH";
5513 case WM_USER+60: return "TB_SETMAXTEXTROWS";
5514 case WM_USER+61: return "TB_GETTEXTROWS";
5515 case WM_USER+41: return "TB_GETBITMAPFLAGS";
5516
5517 #endif //WIN32
5518
5519 default:
5520 static char s_szBuf[128];
5521 sprintf(s_szBuf, "<unknown message = %d>", message);
5522 return s_szBuf;
5523 }
5524 }
5525 #endif //__WXDEBUG__
5526
5527 static void TranslateKbdEventToMouse(wxWindowMSW *win,
5528 int *x, int *y, WPARAM *flags)
5529 {
5530 // construct the key mask
5531 WPARAM& fwKeys = *flags;
5532
5533 fwKeys = MK_RBUTTON;
5534 if ( wxIsCtrlDown() )
5535 fwKeys |= MK_CONTROL;
5536 if ( wxIsShiftDown() )
5537 fwKeys |= MK_SHIFT;
5538
5539 // simulate right mouse button click
5540 DWORD dwPos = ::GetMessagePos();
5541 *x = GET_X_LPARAM(dwPos);
5542 *y = GET_Y_LPARAM(dwPos);
5543
5544 win->ScreenToClient(x, y);
5545 }
5546
5547 static TEXTMETRIC wxGetTextMetrics(const wxWindowMSW *win)
5548 {
5549 // prepare the DC
5550 TEXTMETRIC tm;
5551 HWND hwnd = GetHwndOf(win);
5552 HDC hdc = ::GetDC(hwnd);
5553
5554 #if !wxDIALOG_UNIT_COMPATIBILITY
5555 // and select the current font into it
5556 HFONT hfont = GetHfontOf(win->GetFont());
5557 if ( hfont )
5558 {
5559 hfont = (HFONT)::SelectObject(hdc, hfont);
5560 }
5561 #endif
5562
5563 // finally retrieve the text metrics from it
5564 GetTextMetrics(hdc, &tm);
5565
5566 #if !wxDIALOG_UNIT_COMPATIBILITY
5567 // and clean up
5568 if ( hfont )
5569 {
5570 (void)::SelectObject(hdc, hfont);
5571 }
5572 #endif
5573
5574 ::ReleaseDC(hwnd, hdc);
5575
5576 return tm;
5577 }
5578
5579 // Find the wxWindow at the current mouse position, returning the mouse
5580 // position.
5581 wxWindow* wxFindWindowAtPointer(wxPoint& pt)
5582 {
5583 pt = wxGetMousePosition();
5584 return wxFindWindowAtPoint(pt);
5585 }
5586
5587 wxWindow* wxFindWindowAtPoint(const wxPoint& pt)
5588 {
5589 POINT pt2;
5590 pt2.x = pt.x;
5591 pt2.y = pt.y;
5592 HWND hWndHit = ::WindowFromPoint(pt2);
5593
5594 wxWindow* win = wxFindWinFromHandle((WXHWND) hWndHit) ;
5595 HWND hWnd = hWndHit;
5596
5597 // Try to find a window with a wxWindow associated with it
5598 while (!win && (hWnd != 0))
5599 {
5600 hWnd = ::GetParent(hWnd);
5601 win = wxFindWinFromHandle((WXHWND) hWnd) ;
5602 }
5603 return win;
5604 }
5605
5606 // Get the current mouse position.
5607 wxPoint wxGetMousePosition()
5608 {
5609 POINT pt;
5610 GetCursorPos( & pt );
5611
5612 return wxPoint(pt.x, pt.y);
5613 }
5614
wxWidgets (Impactor)