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