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