]> git.saurik.com Git - wxWidgets.git/blob - src/msw/window.cpp
Further border style corrections.
[wxWidgets.git] / src / msw / window.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/msw/windows.cpp
3 // Purpose: wxWindow
4 // Author: Julian Smart
5 // Modified by: VZ on 13.05.99: no more Default(), MSWOnXXX() reorganisation
6 // Created: 04/01/98
7 // RCS-ID: $Id$
8 // Copyright: (c) Julian Smart
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 // ===========================================================================
13 // declarations
14 // ===========================================================================
15
16 // ---------------------------------------------------------------------------
17 // headers
18 // ---------------------------------------------------------------------------
19
20 #ifdef __GNUG__
21 #pragma implementation "window.h"
22 #endif
23
24 // For compilers that support precompilation, includes "wx.h".
25 #include "wx/wxprec.h"
26
27 #ifdef __BORLANDC__
28 #pragma hdrstop
29 #endif
30
31 #ifndef WX_PRECOMP
32 #include <windows.h>
33 #include "wx/msw/winundef.h"
34 #include "wx/window.h"
35 #include "wx/accel.h"
36 #include "wx/setup.h"
37 #include "wx/menu.h"
38 #include "wx/dc.h"
39 #include "wx/dcclient.h"
40 #include "wx/dcmemory.h"
41 #include "wx/utils.h"
42 #include "wx/app.h"
43 #include "wx/layout.h"
44 #include "wx/dialog.h"
45 #include "wx/frame.h"
46 #include "wx/listbox.h"
47 #include "wx/button.h"
48 #include "wx/msgdlg.h"
49 #include "wx/settings.h"
50 #include "wx/statbox.h"
51 #endif
52
53 #if wxUSE_OWNER_DRAWN
54 #include "wx/ownerdrw.h"
55 #endif
56
57 #if wxUSE_DRAG_AND_DROP
58 #include "wx/dnd.h"
59 #endif
60
61 #if wxUSE_ACCESSIBILITY
62 #include "wx/access.h"
63 #include <ole2.h>
64 #include <oleacc.h>
65 #ifndef WM_GETOBJECT
66 #define WM_GETOBJECT 0x003D
67 #endif
68 #ifndef OBJID_CLIENT
69 #define OBJID_CLIENT 0xFFFFFFFC
70 #endif
71 #endif
72
73 #include "wx/menuitem.h"
74 #include "wx/log.h"
75
76 #include "wx/msw/private.h"
77
78 #if wxUSE_TOOLTIPS
79 #include "wx/tooltip.h"
80 #endif
81
82 #if wxUSE_CARET
83 #include "wx/caret.h"
84 #endif // wxUSE_CARET
85
86 #if wxUSE_SPINCTRL
87 #include "wx/spinctrl.h"
88 #endif // wxUSE_SPINCTRL
89
90 #include "wx/intl.h"
91 #include "wx/log.h"
92
93 #include "wx/textctrl.h"
94 #include "wx/notebook.h"
95
96 #include <string.h>
97
98 #if (!defined(__GNUWIN32_OLD__) && !defined(__WXMICROWIN__)) || defined(__CYGWIN10__)
99 #include <shellapi.h>
100 #include <mmsystem.h>
101 #endif
102
103 #ifdef __WIN32__
104 #include <windowsx.h>
105 #endif
106
107 #if (!defined(__GNUWIN32_OLD__) && !defined(__WXMICROWIN__)) || defined(__CYGWIN10__)
108 #ifdef __WIN95__
109 #include <commctrl.h>
110 #endif
111 #elif !defined(__WXMICROWIN__) // broken compiler
112 #include "wx/msw/gnuwin32/extra.h"
113 #endif
114
115 // ----------------------------------------------------------------------------
116 // standard constants not available with all compilers/headers
117 // ----------------------------------------------------------------------------
118
119 // This didn't appear in mingw until 2.95.2
120 #ifndef SIF_TRACKPOS
121 #define SIF_TRACKPOS 16
122 #endif
123
124 #if wxUSE_MOUSEWHEEL
125 #ifndef WM_MOUSEWHEEL
126 #define WM_MOUSEWHEEL 0x020A
127 #endif
128 #ifndef WHEEL_DELTA
129 #define WHEEL_DELTA 120
130 #endif
131 #ifndef SPI_GETWHEELSCROLLLINES
132 #define SPI_GETWHEELSCROLLLINES 104
133 #endif
134 #endif // wxUSE_MOUSEWHEEL
135
136 #ifndef VK_OEM_1
137 #define VK_OEM_1 0xBA
138 #define VK_OEM_2 0xBF
139 #define VK_OEM_3 0xC0
140 #define VK_OEM_4 0xDB
141 #define VK_OEM_5 0xDC
142 #define VK_OEM_6 0xDD
143 #define VK_OEM_7 0xDE
144 #endif
145
146 #ifndef VK_OEM_COMMA
147 #define VK_OEM_PLUS 0xBB
148 #define VK_OEM_COMMA 0xBC
149 #define VK_OEM_MINUS 0xBD
150 #define VK_OEM_PERIOD 0xBE
151 #endif
152
153 // ---------------------------------------------------------------------------
154 // global variables
155 // ---------------------------------------------------------------------------
156
157 // the last Windows message we got (FIXME-MT)
158 extern MSG s_currentMsg;
159
160 #if wxUSE_MENUS_NATIVE
161 wxMenu *wxCurrentPopupMenu = NULL;
162 #endif // wxUSE_MENUS_NATIVE
163
164 extern const wxChar *wxCanvasClassName;
165
166 // true if we had already created the std colour map, used by
167 // wxGetStdColourMap() and wxWindow::OnSysColourChanged() (FIXME-MT)
168 static bool gs_hasStdCmap = FALSE;
169
170 // ---------------------------------------------------------------------------
171 // private functions
172 // ---------------------------------------------------------------------------
173
174 // the window proc for all our windows
175 #ifdef __DIGITALMARS__
176 extern "C" LRESULT WXDLLEXPORT APIENTRY _EXPORT wxWndProc(HWND hWnd, UINT message,
177 WPARAM wParam, LPARAM lParam);
178 #else
179 LRESULT WXDLLEXPORT APIENTRY _EXPORT wxWndProc(HWND hWnd, UINT message,
180 WPARAM wParam, LPARAM lParam);
181 #endif
182
183
184 #ifdef __WXDEBUG__
185 const char *wxGetMessageName(int message);
186 #endif //__WXDEBUG__
187
188 void wxRemoveHandleAssociation(wxWindowMSW *win);
189 #ifdef __DIGITALMARS__
190 extern "C" void wxAssociateWinWithHandle(HWND hWnd, wxWindowMSW *win);
191 #else
192 extern void wxAssociateWinWithHandle(HWND hWnd, wxWindowMSW *win);
193 #endif
194 wxWindow *wxFindWinFromHandle(WXHWND hWnd);
195
196 // this magical function is used to translate VK_APPS key presses to right
197 // mouse clicks
198 static void TranslateKbdEventToMouse(wxWindowMSW *win,
199 int *x, int *y, WPARAM *flags);
200
201 // get the text metrics for the current font
202 static TEXTMETRIC wxGetTextMetrics(const wxWindowMSW *win);
203
204 // find the window for the mouse event at the specified position
205 static wxWindowMSW *FindWindowForMouseEvent(wxWindowMSW *win, int *x, int *y); //TW:REQ:Univ
206
207 // wrapper around BringWindowToTop() API
208 static inline void wxBringWindowToTop(HWND hwnd)
209 {
210 #ifdef __WXMICROWIN__
211 // It seems that MicroWindows brings the _parent_ of the window to the top,
212 // which can be the wrong one.
213
214 // activate (set focus to) specified window
215 ::SetFocus(hwnd);
216
217 // raise top level parent to top of z order
218 ::SetWindowPos(hwnd, HWND_TOP, 0, 0, 0, 0, SWP_NOMOVE | SWP_NOSIZE);
219 #else // !__WXMICROWIN__
220 if ( !::BringWindowToTop(hwnd) )
221 {
222 wxLogLastError(_T("BringWindowToTop"));
223 }
224 #endif // __WXMICROWIN__/!__WXMICROWIN__
225 }
226
227 // ---------------------------------------------------------------------------
228 // event tables
229 // ---------------------------------------------------------------------------
230
231 // in wxUniv/MSW this class is abstract because it doesn't have DoPopupMenu()
232 // method
233 #ifdef __WXUNIVERSAL__
234 IMPLEMENT_ABSTRACT_CLASS(wxWindowMSW, wxWindowBase)
235 #else // __WXMSW__
236 IMPLEMENT_DYNAMIC_CLASS(wxWindow, wxWindowBase)
237 #endif // __WXUNIVERSAL__/__WXMSW__
238
239 BEGIN_EVENT_TABLE(wxWindowMSW, wxWindowBase)
240 EVT_ERASE_BACKGROUND(wxWindowMSW::OnEraseBackground)
241 EVT_SYS_COLOUR_CHANGED(wxWindowMSW::OnSysColourChanged)
242 EVT_INIT_DIALOG(wxWindowMSW::OnInitDialog)
243 EVT_IDLE(wxWindowMSW::OnIdle)
244 END_EVENT_TABLE()
245
246 // ===========================================================================
247 // implementation
248 // ===========================================================================
249
250 // ---------------------------------------------------------------------------
251 // wxWindow utility functions
252 // ---------------------------------------------------------------------------
253
254 // Find an item given the MS Windows id
255 wxWindow *wxWindowMSW::FindItem(long id) const
256 {
257 #if wxUSE_CONTROLS
258 wxControl *item = wxDynamicCastThis(wxControl);
259 if ( item )
260 {
261 // is it we or one of our "internal" children?
262 if ( item->GetId() == id
263 #ifndef __WXUNIVERSAL__
264 || (item->GetSubcontrols().Index(id) != wxNOT_FOUND)
265 #endif // __WXUNIVERSAL__
266 )
267 {
268 return item;
269 }
270 }
271 #endif // wxUSE_CONTROLS
272
273 wxWindowList::Node *current = GetChildren().GetFirst();
274 while (current)
275 {
276 wxWindow *childWin = current->GetData();
277
278 wxWindow *wnd = childWin->FindItem(id);
279 if ( wnd )
280 return wnd;
281
282 current = current->GetNext();
283 }
284
285 return NULL;
286 }
287
288 // Find an item given the MS Windows handle
289 wxWindow *wxWindowMSW::FindItemByHWND(WXHWND hWnd, bool controlOnly) const
290 {
291 wxWindowList::Node *current = GetChildren().GetFirst();
292 while (current)
293 {
294 wxWindow *parent = current->GetData();
295
296 // Do a recursive search.
297 wxWindow *wnd = parent->FindItemByHWND(hWnd);
298 if ( wnd )
299 return wnd;
300
301 if ( !controlOnly
302 #if wxUSE_CONTROLS
303 || parent->IsKindOf(CLASSINFO(wxControl))
304 #endif // wxUSE_CONTROLS
305 )
306 {
307 wxWindow *item = current->GetData();
308 if ( item->GetHWND() == hWnd )
309 return item;
310 else
311 {
312 if ( item->ContainsHWND(hWnd) )
313 return item;
314 }
315 }
316
317 current = current->GetNext();
318 }
319 return NULL;
320 }
321
322 // Default command handler
323 bool wxWindowMSW::MSWCommand(WXUINT WXUNUSED(param), WXWORD WXUNUSED(id))
324 {
325 return FALSE;
326 }
327
328 // ----------------------------------------------------------------------------
329 // constructors and such
330 // ----------------------------------------------------------------------------
331
332 void wxWindowMSW::Init()
333 {
334 // generic
335 InitBase();
336
337 // MSW specific
338 m_isBeingDeleted = FALSE;
339 m_oldWndProc = NULL;
340 m_useCtl3D = FALSE;
341 m_mouseInWindow = FALSE;
342 m_lastKeydownProcessed = FALSE;
343
344 m_childrenDisabled = NULL;
345
346 // wxWnd
347 m_hMenu = 0;
348
349 m_hWnd = 0;
350
351 m_xThumbSize = 0;
352 m_yThumbSize = 0;
353 m_backgroundTransparent = FALSE;
354
355 // as all windows are created with WS_VISIBLE style...
356 m_isShown = TRUE;
357
358 #if wxUSE_MOUSEEVENT_HACK
359 m_lastMouseX =
360 m_lastMouseY = -1;
361 m_lastMouseEvent = -1;
362 #endif // wxUSE_MOUSEEVENT_HACK
363 }
364
365 // Destructor
366 wxWindowMSW::~wxWindowMSW()
367 {
368 m_isBeingDeleted = TRUE;
369
370 #ifndef __WXUNIVERSAL__
371 // VS: make sure there's no wxFrame with last focus set to us:
372 for ( wxWindow *win = GetParent(); win; win = win->GetParent() )
373 {
374 wxTopLevelWindow *frame = wxDynamicCast(win, wxTopLevelWindow);
375 if ( frame )
376 {
377 if ( frame->GetLastFocus() == this )
378 {
379 frame->SetLastFocus(NULL);
380 }
381 break;
382 }
383 }
384 #endif // __WXUNIVERSAL__
385
386 // VS: destroy children first and _then_ detach *this from its parent.
387 // If we'd do it the other way around, children wouldn't be able
388 // find their parent frame (see above).
389 DestroyChildren();
390
391 if ( m_parent )
392 m_parent->RemoveChild(this);
393
394 if ( m_hWnd )
395 {
396 // VZ: test temp removed to understand what really happens here
397 //if (::IsWindow(GetHwnd()))
398 {
399 if ( !::DestroyWindow(GetHwnd()) )
400 wxLogLastError(wxT("DestroyWindow"));
401 }
402
403 // remove hWnd <-> wxWindow association
404 wxRemoveHandleAssociation(this);
405 }
406
407 delete m_childrenDisabled;
408 }
409
410 // real construction (Init() must have been called before!)
411 bool wxWindowMSW::Create(wxWindow *parent,
412 wxWindowID id,
413 const wxPoint& pos,
414 const wxSize& size,
415 long style,
416 const wxString& name)
417 {
418 wxCHECK_MSG( parent, FALSE, wxT("can't create wxWindow without parent") );
419
420 if ( !CreateBase(parent, id, pos, size, style, wxDefaultValidator, name) )
421 return FALSE;
422
423 parent->AddChild(this);
424
425 WXDWORD exstyle;
426 DWORD msflags = MSWGetCreateWindowFlags(&exstyle);
427
428 #ifdef __WXUNIVERSAL__
429 // no borders, we draw them ourselves
430 exstyle &= ~(WS_EX_DLGMODALFRAME |
431 WS_EX_STATICEDGE |
432 WS_EX_CLIENTEDGE |
433 WS_EX_WINDOWEDGE);
434 msflags &= ~WS_BORDER;
435 #endif // wxUniversal
436
437 // all windows are created visible by default except popup ones (which are
438 // like the wxTopLevelWindows in this aspect)
439 if ( style & wxPOPUP_WINDOW )
440 {
441 msflags &= ~WS_VISIBLE;
442 m_isShown = FALSE;
443 }
444 else
445 {
446 msflags |= WS_VISIBLE;
447 }
448
449 return MSWCreate(wxCanvasClassName, NULL, pos, size, msflags, exstyle);
450 }
451
452 // ---------------------------------------------------------------------------
453 // basic operations
454 // ---------------------------------------------------------------------------
455
456 void wxWindowMSW::SetFocus()
457 {
458 HWND hWnd = GetHwnd();
459 wxCHECK_RET( hWnd, _T("can't set focus to invalid window") );
460
461 #ifndef __WXMICROWIN__
462 ::SetLastError(0);
463 #endif
464
465 if ( !::SetFocus(hWnd) )
466 {
467 #if defined(__WXDEBUG__) && !defined(__WXMICROWIN__)
468 // was there really an error?
469 DWORD dwRes = ::GetLastError();
470 if ( dwRes )
471 {
472 HWND hwndFocus = ::GetFocus();
473 if ( hwndFocus != hWnd )
474 {
475 wxLogApiError(_T("SetFocus"), dwRes);
476 }
477 }
478 #endif // Debug
479 }
480 }
481
482 void wxWindowMSW::SetFocusFromKbd()
483 {
484 wxWindowBase::SetFocusFromKbd();
485
486 // when the focus is given to the control with DLGC_HASSETSEL style from
487 // keyboard its contents should be entirely selected: this is what
488 // ::IsDialogMessage() does and so we should do it as well to provide the
489 // same LNF as the native programs
490 if ( ::SendMessage(GetHwnd(), WM_GETDLGCODE, 0, 0) & DLGC_HASSETSEL )
491 {
492 ::SendMessage(GetHwnd(), EM_SETSEL, 0, -1);
493 }
494 }
495
496 // Get the window with the focus
497 wxWindow *wxWindowBase::FindFocus()
498 {
499 HWND hWnd = ::GetFocus();
500 if ( hWnd )
501 {
502 return wxGetWindowFromHWND((WXHWND)hWnd);
503 }
504
505 return NULL;
506 }
507
508 bool wxWindowMSW::Enable(bool enable)
509 {
510 if ( !wxWindowBase::Enable(enable) )
511 return FALSE;
512
513 HWND hWnd = GetHwnd();
514 if ( hWnd )
515 ::EnableWindow(hWnd, (BOOL)enable);
516
517 // the logic below doesn't apply to the top level windows -- otherwise
518 // showing a modal dialog would result in total greying out (and ungreying
519 // out later) of everything which would be really ugly
520 if ( IsTopLevel() )
521 return TRUE;
522
523 // when the parent is disabled, all of its children should be disabled as
524 // well but when it is enabled back, only those of the children which
525 // hadn't been already disabled in the beginning should be enabled again,
526 // so we have to keep the list of those children
527 for ( wxWindowList::Node *node = GetChildren().GetFirst();
528 node;
529 node = node->GetNext() )
530 {
531 wxWindow *child = node->GetData();
532 if ( child->IsTopLevel() )
533 {
534 // the logic below doesn't apply to top level children
535 continue;
536 }
537
538 if ( enable )
539 {
540 // enable the child back unless it had been disabled before us
541 if ( !m_childrenDisabled || !m_childrenDisabled->Find(child) )
542 child->Enable();
543 }
544 else // we're being disabled
545 {
546 if ( child->IsEnabled() )
547 {
548 // disable it as children shouldn't stay enabled while the
549 // parent is not
550 child->Disable();
551 }
552 else // child already disabled, remember it
553 {
554 // have we created the list of disabled children already?
555 if ( !m_childrenDisabled )
556 m_childrenDisabled = new wxWindowList;
557
558 m_childrenDisabled->Append(child);
559 }
560 }
561 }
562
563 if ( enable && m_childrenDisabled )
564 {
565 // we don't need this list any more, don't keep unused memory
566 delete m_childrenDisabled;
567 m_childrenDisabled = NULL;
568 }
569
570 return TRUE;
571 }
572
573 bool wxWindowMSW::Show(bool show)
574 {
575 if ( !wxWindowBase::Show(show) )
576 return FALSE;
577
578 HWND hWnd = GetHwnd();
579 int cshow = show ? SW_SHOW : SW_HIDE;
580 ::ShowWindow(hWnd, cshow);
581
582 if ( show )
583 {
584 wxBringWindowToTop(hWnd);
585 }
586
587 return TRUE;
588 }
589
590 // Raise the window to the top of the Z order
591 void wxWindowMSW::Raise()
592 {
593 wxBringWindowToTop(GetHwnd());
594 }
595
596 // Lower the window to the bottom of the Z order
597 void wxWindowMSW::Lower()
598 {
599 ::SetWindowPos(GetHwnd(), HWND_BOTTOM, 0, 0, 0, 0,
600 SWP_NOMOVE | SWP_NOSIZE | SWP_NOACTIVATE);
601 }
602
603 void wxWindowMSW::SetTitle( const wxString& title)
604 {
605 SetWindowText(GetHwnd(), title.c_str());
606 }
607
608 wxString wxWindowMSW::GetTitle() const
609 {
610 return wxGetWindowText(GetHWND());
611 }
612
613 void wxWindowMSW::DoCaptureMouse()
614 {
615 HWND hWnd = GetHwnd();
616 if ( hWnd )
617 {
618 ::SetCapture(hWnd);
619 }
620 }
621
622 void wxWindowMSW::DoReleaseMouse()
623 {
624 if ( !::ReleaseCapture() )
625 {
626 wxLogLastError(_T("ReleaseCapture"));
627 }
628 }
629
630 /* static */ wxWindow *wxWindowBase::GetCapture()
631 {
632 HWND hwnd = ::GetCapture();
633 return hwnd ? wxFindWinFromHandle((WXHWND)hwnd) : (wxWindow *)NULL;
634 }
635
636 bool wxWindowMSW::SetFont(const wxFont& font)
637 {
638 if ( !wxWindowBase::SetFont(font) )
639 {
640 // nothing to do
641 return FALSE;
642 }
643
644 HWND hWnd = GetHwnd();
645 if ( hWnd != 0 )
646 {
647 WXHANDLE hFont = m_font.GetResourceHandle();
648
649 wxASSERT_MSG( hFont, wxT("should have valid font") );
650
651 ::SendMessage(hWnd, WM_SETFONT, (WPARAM)hFont, MAKELPARAM(TRUE, 0));
652 }
653
654 return TRUE;
655 }
656 bool wxWindowMSW::SetCursor(const wxCursor& cursor)
657 {
658 if ( !wxWindowBase::SetCursor(cursor) )
659 {
660 // no change
661 return FALSE;
662 }
663
664 if ( m_cursor.Ok() )
665 {
666 HWND hWnd = GetHwnd();
667
668 // Change the cursor NOW if we're within the correct window
669 POINT point;
670 ::GetCursorPos(&point);
671
672 RECT rect = wxGetWindowRect(hWnd);
673
674 if ( ::PtInRect(&rect, point) && !wxIsBusy() )
675 ::SetCursor(GetHcursorOf(m_cursor));
676 }
677
678 return TRUE;
679 }
680
681 void wxWindowMSW::WarpPointer (int x, int y)
682 {
683 ClientToScreen(&x, &y);
684
685 if ( !::SetCursorPos(x, y) )
686 {
687 wxLogLastError(_T("SetCursorPos"));
688 }
689 }
690
691 #if WXWIN_COMPATIBILITY
692 void wxWindowMSW::MSWDeviceToLogical (float *x, float *y) const
693 {
694 }
695 #endif // WXWIN_COMPATIBILITY
696
697 // ---------------------------------------------------------------------------
698 // scrolling stuff
699 // ---------------------------------------------------------------------------
700
701 // convert wxHORIZONTAL/wxVERTICAL to SB_HORZ/SB_VERT
702 static inline int wxDirToWinStyle(int orient)
703 {
704 return orient == wxHORIZONTAL ? SB_HORZ : SB_VERT;
705 }
706
707 #if WXWIN_COMPATIBILITY
708 void wxWindowMSW::SetScrollRange(int orient, int range, bool refresh)
709 {
710 int range1 = range;
711
712 // Try to adjust the range to cope with page size > 1
713 // - a Windows API quirk
714 int pageSize = GetScrollPage(orient);
715 if ( pageSize > 1 && range > 0)
716 {
717 range1 += (pageSize - 1);
718 }
719
720 WinStruct<SCROLLINFO> info;
721 info.nPage = pageSize; // Have to set this, or scrollbar goes awry
722 info.nMin = 0;
723 info.nMax = range1;
724 info.fMask = SIF_RANGE | SIF_PAGE;
725
726 HWND hWnd = GetHwnd();
727 if ( hWnd )
728 ::SetScrollInfo(hWnd, wxDirToWinStyle(orient), &info, refresh);
729 }
730
731 void wxWindowMSW::SetScrollPage(int orient, int page, bool refresh)
732 {
733 WinStruct<SCROLLINFO> info;
734 info.nPage = page;
735 info.fMask = SIF_PAGE;
736
737 HWND hWnd = GetHwnd();
738 if ( hWnd )
739 ::SetScrollInfo(hWnd, wxDirToWinStyle(orient), &info, refresh);
740 }
741
742 int wxWindowMSW::GetScrollPage(int orient) const
743 {
744 return orient == wxHORIZONTAL ? m_xThumbSize : m_yThumbSize;
745 }
746
747 #endif // WXWIN_COMPATIBILITY
748
749 inline int GetScrollPosition(HWND hWnd, int wOrient)
750 {
751 #ifdef __WXMICROWIN__
752 return ::GetScrollPosWX(hWnd, wOrient);
753 #else
754 return ::GetScrollPos(hWnd, wOrient);
755 #endif
756 }
757
758 int wxWindowMSW::GetScrollPos(int orient) const
759 {
760 HWND hWnd = GetHwnd();
761 wxCHECK_MSG( hWnd, 0, _T("no HWND in GetScrollPos") );
762
763 return GetScrollPosition(hWnd, orient == wxHORIZONTAL ? SB_HORZ : SB_VERT);
764 }
765
766 // This now returns the whole range, not just the number
767 // of positions that we can scroll.
768 int wxWindowMSW::GetScrollRange(int orient) const
769 {
770 int minPos, maxPos;
771 HWND hWnd = GetHwnd();
772 if ( !hWnd )
773 return 0;
774
775 ::GetScrollRange(hWnd, orient == wxHORIZONTAL ? SB_HORZ : SB_VERT,
776 &minPos, &maxPos);
777
778 // undo "range - 1" done in SetScrollbar()
779 return maxPos + 1;
780 }
781
782 int wxWindowMSW::GetScrollThumb(int orient) const
783 {
784 return orient == wxHORIZONTAL ? m_xThumbSize : m_yThumbSize;
785 }
786
787 void wxWindowMSW::SetScrollPos(int orient, int pos, bool refresh)
788 {
789 HWND hWnd = GetHwnd();
790 wxCHECK_RET( hWnd, _T("SetScrollPos: no HWND") );
791
792 WinStruct<SCROLLINFO> info;
793 info.nPage = 0;
794 info.nMin = 0;
795 info.nPos = pos;
796 info.fMask = SIF_POS;
797
798 ::SetScrollInfo(hWnd, orient == wxHORIZONTAL ? SB_HORZ : SB_VERT,
799 &info, refresh);
800 }
801
802 // New function that will replace some of the above.
803 void wxWindowMSW::SetScrollbar(int orient,
804 int pos,
805 int pageSize,
806 int range,
807 bool refresh)
808 {
809 WinStruct<SCROLLINFO> info;
810 info.nPage = pageSize;
811 info.nMin = 0; // range is nMax - nMin + 1
812 info.nMax = range - 1; // as both nMax and nMax are inclusive
813 info.nPos = pos;
814 info.fMask = SIF_RANGE | SIF_PAGE | SIF_POS;
815
816 HWND hWnd = GetHwnd();
817 if ( hWnd )
818 {
819 ::SetScrollInfo(hWnd, orient == wxHORIZONTAL ? SB_HORZ : SB_VERT,
820 &info, refresh);
821 }
822
823 *(orient == wxHORIZONTAL ? &m_xThumbSize : &m_yThumbSize) = pageSize;
824 }
825
826 void wxWindowMSW::ScrollWindow(int dx, int dy, const wxRect *prect)
827 {
828 RECT rect;
829 RECT *pr;
830 if ( prect )
831 {
832 rect.left = prect->x;
833 rect.top = prect->y;
834 rect.right = prect->x + prect->width;
835 rect.bottom = prect->y + prect->height;
836 pr = &rect;
837 }
838 else
839 {
840 pr = NULL;
841 }
842
843 ::ScrollWindow(GetHwnd(), dx, dy, pr, pr);
844 }
845
846 static bool ScrollVertically(HWND hwnd, int kind, int count)
847 {
848 int posStart = GetScrollPosition(hwnd, SB_VERT);
849
850 int pos = posStart;
851 for ( int n = 0; n < count; n++ )
852 {
853 ::SendMessage(hwnd, WM_VSCROLL, kind, 0);
854
855 int posNew = GetScrollPosition(hwnd, SB_VERT);
856 if ( posNew == pos )
857 {
858 // don't bother to continue, we're already at top/bottom
859 break;
860 }
861
862 pos = posNew;
863 }
864
865 return pos != posStart;
866 }
867
868 bool wxWindowMSW::ScrollLines(int lines)
869 {
870 bool down = lines > 0;
871
872 return ScrollVertically(GetHwnd(),
873 down ? SB_LINEDOWN : SB_LINEUP,
874 down ? lines : -lines);
875 }
876
877 bool wxWindowMSW::ScrollPages(int pages)
878 {
879 bool down = pages > 0;
880
881 return ScrollVertically(GetHwnd(),
882 down ? SB_PAGEDOWN : SB_PAGEUP,
883 down ? pages : -pages);
884 }
885
886 // ---------------------------------------------------------------------------
887 // subclassing
888 // ---------------------------------------------------------------------------
889
890 void wxWindowMSW::SubclassWin(WXHWND hWnd)
891 {
892 wxASSERT_MSG( !m_oldWndProc, wxT("subclassing window twice?") );
893
894 HWND hwnd = (HWND)hWnd;
895 wxCHECK_RET( ::IsWindow(hwnd), wxT("invalid HWND in SubclassWin") );
896
897 wxAssociateWinWithHandle(hwnd, this);
898
899 m_oldWndProc = (WXFARPROC)::GetWindowLong((HWND)hWnd, GWL_WNDPROC);
900
901 // we don't need to subclass the window of our own class (in the Windows
902 // sense of the word)
903 if ( !wxCheckWindowWndProc(hWnd, (WXFARPROC)wxWndProc) )
904 {
905 ::SetWindowLong(hwnd, GWL_WNDPROC, (LONG) wxWndProc);
906 }
907 else
908 {
909 // don't bother restoring it neither: this also makes it easy to
910 // implement IsOfStandardClass() method which returns TRUE for the
911 // standard controls and FALSE for the wxWindows own windows as it can
912 // simply check m_oldWndProc
913 m_oldWndProc = NULL;
914 }
915 }
916
917 void wxWindowMSW::UnsubclassWin()
918 {
919 wxRemoveHandleAssociation(this);
920
921 // Restore old Window proc
922 HWND hwnd = GetHwnd();
923 if ( hwnd )
924 {
925 m_hWnd = 0;
926
927 wxCHECK_RET( ::IsWindow(hwnd), wxT("invalid HWND in UnsubclassWin") );
928
929 if ( m_oldWndProc )
930 {
931 if ( !wxCheckWindowWndProc((WXHWND)hwnd, m_oldWndProc) )
932 {
933 ::SetWindowLong(hwnd, GWL_WNDPROC, (LONG) m_oldWndProc);
934 }
935
936 m_oldWndProc = NULL;
937 }
938 }
939 }
940
941 bool wxCheckWindowWndProc(WXHWND hWnd, WXFARPROC wndProc)
942 {
943 // Unicows note: the code below works, but only because WNDCLASS contains
944 // original window handler rather that the unicows fake one. This may not
945 // be on purpose, though; if it stops working with future versions of
946 // unicows.dll, we can override unicows hooks by setting
947 // Unicows_{Set,Get}WindowLong and Unicows_RegisterClass to our own
948 // versions that keep track of fake<->real wnd proc mapping.
949 WNDCLASS cls;
950 if ( !::GetClassInfo(wxGetInstance(), wxGetWindowClass(hWnd), &cls) )
951 {
952 wxLogLastError(_T("GetClassInfo"));
953
954 return FALSE;
955 }
956
957 return wndProc == (WXFARPROC)cls.lpfnWndProc;
958 }
959
960 // ----------------------------------------------------------------------------
961 // Style handling
962 // ----------------------------------------------------------------------------
963
964 void wxWindowMSW::SetWindowStyleFlag(long flags)
965 {
966 long flagsOld = GetWindowStyleFlag();
967 if ( flags == flagsOld )
968 return;
969
970 // update the internal variable
971 wxWindowBase::SetWindowStyleFlag(flags);
972
973 // now update the Windows style as well if needed - and if the window had
974 // been already created
975 if ( !GetHwnd() )
976 return;
977
978 WXDWORD exstyle, exstyleOld;
979 long style = MSWGetStyle(flags, &exstyle),
980 styleOld = MSWGetStyle(flagsOld, &exstyleOld);
981
982 if ( style != styleOld )
983 {
984 // some flags (e.g. WS_VISIBLE or WS_DISABLED) should not be changed by
985 // this function so instead of simply setting the style to the new
986 // value we clear the bits which were set in styleOld but are set in
987 // the new one and set the ones which were not set before
988 long styleReal = ::GetWindowLong(GetHwnd(), GWL_STYLE);
989 styleReal &= ~styleOld;
990 styleReal |= style;
991
992 ::SetWindowLong(GetHwnd(), GWL_STYLE, styleReal);
993 }
994
995 // and the extended style
996 if ( exstyle != exstyleOld )
997 {
998 long exstyleReal = ::GetWindowLong(GetHwnd(), GWL_EXSTYLE);
999 exstyleReal &= ~exstyleOld;
1000 exstyleReal |= exstyle;
1001
1002 ::SetWindowLong(GetHwnd(), GWL_EXSTYLE, exstyleReal);
1003
1004 // we must call SetWindowPos() to flash the cached extended style and
1005 // also to make the change to wxSTAY_ON_TOP style take effect: just
1006 // setting the style simply doesn't work
1007 if ( !::SetWindowPos(GetHwnd(),
1008 exstyleReal & WS_EX_TOPMOST ? HWND_TOPMOST
1009 : HWND_NOTOPMOST,
1010 0, 0, 0, 0,
1011 SWP_NOMOVE | SWP_NOSIZE) )
1012 {
1013 wxLogLastError(_T("SetWindowPos"));
1014 }
1015 }
1016 }
1017
1018 WXDWORD wxWindowMSW::MSWGetStyle(long flags, WXDWORD *exstyle) const
1019 {
1020 // translate the style
1021 WXDWORD style = WS_CHILD | WS_VISIBLE;
1022
1023 if ( flags & wxCLIP_CHILDREN )
1024 style |= WS_CLIPCHILDREN;
1025
1026 if ( flags & wxCLIP_SIBLINGS )
1027 style |= WS_CLIPSIBLINGS;
1028
1029 wxBorder border = (wxBorder)(flags & wxBORDER_MASK);
1030
1031 // Check if we want to automatically give it a sunken style.
1032 // Note than because 'sunken' actually maps to WS_EX_CLIENTEDGE, which
1033 // is a more neutral term, we don't necessarily get a sunken effect in
1034 // Windows XP. Instead we get the appropriate style for the theme.
1035
1036 if (border == wxBORDER_DEFAULT && wxTheApp->GetAuto3D() &&
1037 IsKindOf(CLASSINFO(wxControl)) &&
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 // Returns different negative values on WinME and WinNT,
3970 // so simply test for negative value.
3971 event.m_altDown = ::GetKeyState(VK_MENU) < 0;
3972
3973 event.SetTimestamp(s_currentMsg.time);
3974 event.m_eventObject = this;
3975 event.SetId(GetId());
3976
3977 #if wxUSE_MOUSEEVENT_HACK
3978 m_lastMouseX = x;
3979 m_lastMouseY = y;
3980 m_lastMouseEvent = event.GetEventType();
3981 #endif // wxUSE_MOUSEEVENT_HACK
3982 }
3983
3984 // Windows doesn't send the mouse events to the static controls (which are
3985 // transparent in the sense that their WM_NCHITTEST handler returns
3986 // HTTRANSPARENT) at all but we want all controls to receive the mouse events
3987 // and so we manually check if we don't have a child window under mouse and if
3988 // we do, send the event to it instead of the window Windows had sent WM_XXX
3989 // to.
3990 //
3991 // Notice that this is not done for the mouse move events because this could
3992 // (would?) be too slow, but only for clicks which means that the static texts
3993 // still don't get move, enter nor leave events.
3994 static wxWindowMSW *FindWindowForMouseEvent(wxWindowMSW *win, int *x, int *y) //TW:REQ:Univ
3995 {
3996 wxCHECK_MSG( x && y, win, _T("NULL pointer in FindWindowForMouseEvent") );
3997
3998 // first try to find a non transparent child: this allows us to send events
3999 // to a static text which is inside a static box, for example
4000 POINT pt = { *x, *y };
4001 HWND hwnd = GetHwndOf(win),
4002 hwndUnderMouse;
4003
4004 #ifdef __WIN32__
4005 hwndUnderMouse = ::ChildWindowFromPointEx
4006 (
4007 hwnd,
4008 pt,
4009 CWP_SKIPINVISIBLE |
4010 CWP_SKIPDISABLED |
4011 CWP_SKIPTRANSPARENT
4012 );
4013
4014 if ( !hwndUnderMouse || hwndUnderMouse == hwnd )
4015 #endif // __WIN32__
4016 {
4017 // now try any child window at all
4018 hwndUnderMouse = ::ChildWindowFromPoint(hwnd, pt);
4019 }
4020
4021 // check that we have a child window which is susceptible to receive mouse
4022 // events: for this it must be shown and enabled
4023 if ( hwndUnderMouse &&
4024 hwndUnderMouse != hwnd &&
4025 ::IsWindowVisible(hwndUnderMouse) &&
4026 ::IsWindowEnabled(hwndUnderMouse) )
4027 {
4028 wxWindow *winUnderMouse = wxFindWinFromHandle((WXHWND)hwndUnderMouse);
4029 if ( winUnderMouse )
4030 {
4031 // translate the mouse coords to the other window coords
4032 win->ClientToScreen(x, y);
4033 winUnderMouse->ScreenToClient(x, y);
4034
4035 win = winUnderMouse;
4036 }
4037 }
4038
4039 return win;
4040 }
4041
4042 bool wxWindowMSW::HandleMouseEvent(WXUINT msg, int x, int y, WXUINT flags)
4043 {
4044 // the mouse events take consecutive IDs from WM_MOUSEFIRST to
4045 // WM_MOUSELAST, so it's enough to substract WM_MOUSEMOVE == WM_MOUSEFIRST
4046 // from the message id and take the value in the table to get wxWin event
4047 // id
4048 static const wxEventType eventsMouse[] =
4049 {
4050 wxEVT_MOTION,
4051 wxEVT_LEFT_DOWN,
4052 wxEVT_LEFT_UP,
4053 wxEVT_LEFT_DCLICK,
4054 wxEVT_RIGHT_DOWN,
4055 wxEVT_RIGHT_UP,
4056 wxEVT_RIGHT_DCLICK,
4057 wxEVT_MIDDLE_DOWN,
4058 wxEVT_MIDDLE_UP,
4059 wxEVT_MIDDLE_DCLICK
4060 };
4061
4062 wxMouseEvent event(eventsMouse[msg - WM_MOUSEMOVE]);
4063 InitMouseEvent(event, x, y, flags);
4064
4065 return GetEventHandler()->ProcessEvent(event);
4066 }
4067
4068 bool wxWindowMSW::HandleMouseMove(int x, int y, WXUINT flags)
4069 {
4070 if ( !m_mouseInWindow )
4071 {
4072 // it would be wrong to assume that just because we get a mouse move
4073 // event that the mouse is inside the window: although this is usually
4074 // true, it is not if we had captured the mouse, so we need to check
4075 // the mouse coordinates here
4076 if ( !HasCapture() || IsMouseInWindow() )
4077 {
4078 // Generate an ENTER event
4079 m_mouseInWindow = TRUE;
4080
4081 wxMouseEvent event(wxEVT_ENTER_WINDOW);
4082 InitMouseEvent(event, x, y, flags);
4083
4084 (void)GetEventHandler()->ProcessEvent(event);
4085 }
4086 }
4087
4088 #if wxUSE_MOUSEEVENT_HACK
4089 // Window gets a click down message followed by a mouse move message even
4090 // if position isn't changed! We want to discard the trailing move event
4091 // if x and y are the same.
4092 if ( (m_lastMouseEvent == wxEVT_RIGHT_DOWN ||
4093 m_lastMouseEvent == wxEVT_LEFT_DOWN ||
4094 m_lastMouseEvent == wxEVT_MIDDLE_DOWN) &&
4095 (m_lastMouseX == x && m_lastMouseY == y) )
4096 {
4097 m_lastMouseEvent = wxEVT_MOTION;
4098
4099 return FALSE;
4100 }
4101 #endif // wxUSE_MOUSEEVENT_HACK
4102
4103 return HandleMouseEvent(WM_MOUSEMOVE, x, y, flags);
4104 }
4105
4106
4107 bool wxWindowMSW::HandleMouseWheel(WXWPARAM wParam, WXLPARAM lParam)
4108 {
4109 #if wxUSE_MOUSEWHEEL
4110 wxMouseEvent event(wxEVT_MOUSEWHEEL);
4111 InitMouseEvent(event,
4112 GET_X_LPARAM(lParam),
4113 GET_Y_LPARAM(lParam),
4114 LOWORD(wParam));
4115 event.m_wheelRotation = (short)HIWORD(wParam);
4116 event.m_wheelDelta = WHEEL_DELTA;
4117
4118 #ifdef __WIN32__
4119 static int s_linesPerRotation = -1;
4120 if ( s_linesPerRotation == -1 )
4121 {
4122 if ( !::SystemParametersInfo(SPI_GETWHEELSCROLLLINES, 0,
4123 &s_linesPerRotation, 0))
4124 {
4125 // this is not supposed to happen
4126 wxLogLastError(_T("SystemParametersInfo(GETWHEELSCROLLLINES)"));
4127
4128 // the default is 3, so use it if SystemParametersInfo() failed
4129 s_linesPerRotation = 3;
4130 }
4131 }
4132 #else // Win16
4133 // no SystemParametersInfo() under Win16
4134 static const int s_linesPerRotation = 3;
4135 #endif
4136
4137 event.m_linesPerAction = s_linesPerRotation;
4138 return GetEventHandler()->ProcessEvent(event);
4139
4140 #else
4141 (void) wParam;
4142 (void) lParam;
4143
4144 return FALSE;
4145 #endif
4146 }
4147
4148
4149 // ---------------------------------------------------------------------------
4150 // keyboard handling
4151 // ---------------------------------------------------------------------------
4152
4153 // create the key event of the given type for the given key - used by
4154 // HandleChar and HandleKeyDown/Up
4155 wxKeyEvent wxWindowMSW::CreateKeyEvent(wxEventType evType,
4156 int id,
4157 WXLPARAM lParam,
4158 WXWPARAM wParam) const
4159 {
4160 wxKeyEvent event(evType);
4161 event.SetId(GetId());
4162 event.m_shiftDown = wxIsShiftDown();
4163 event.m_controlDown = wxIsCtrlDown();
4164 event.m_altDown = (HIWORD(lParam) & KF_ALTDOWN) == KF_ALTDOWN;
4165
4166 event.m_eventObject = (wxWindow *)this; // const_cast
4167 event.m_keyCode = id;
4168 event.m_rawCode = (wxUint32) wParam;
4169 event.m_rawFlags = (wxUint32) lParam;
4170 event.SetTimestamp(s_currentMsg.time);
4171
4172 // translate the position to client coords
4173 POINT pt;
4174 GetCursorPos(&pt);
4175 RECT rect;
4176 GetWindowRect(GetHwnd(),&rect);
4177 pt.x -= rect.left;
4178 pt.y -= rect.top;
4179
4180 event.m_x = pt.x;
4181 event.m_y = pt.y;
4182
4183 return event;
4184 }
4185
4186 // isASCII is TRUE only when we're called from WM_CHAR handler and not from
4187 // WM_KEYDOWN one
4188 bool wxWindowMSW::HandleChar(WXWPARAM wParam, WXLPARAM lParam, bool isASCII)
4189 {
4190 bool ctrlDown = FALSE;
4191
4192 int id;
4193 if ( isASCII )
4194 {
4195 // If 1 -> 26, translate to either special keycode or just set
4196 // ctrlDown. IOW, Ctrl-C should result in keycode == 3 and
4197 // ControlDown() == TRUE.
4198 id = wParam;
4199 if ( (id > 0) && (id < 27) )
4200 {
4201 switch (id)
4202 {
4203 case 13:
4204 id = WXK_RETURN;
4205 break;
4206
4207 case 8:
4208 id = WXK_BACK;
4209 break;
4210
4211 case 9:
4212 id = WXK_TAB;
4213 break;
4214
4215 default:
4216 ctrlDown = TRUE;
4217 break;
4218 }
4219 }
4220 }
4221 else // we're called from WM_KEYDOWN
4222 {
4223 id = wxCharCodeMSWToWX(wParam);
4224 if ( id == 0 )
4225 {
4226 // it's ASCII and will be processed here only when called from
4227 // WM_CHAR (i.e. when isASCII = TRUE), don't process it now
4228 return FALSE;
4229 }
4230 }
4231
4232 wxKeyEvent event(CreateKeyEvent(wxEVT_CHAR, id, lParam, wParam));
4233
4234 // the alphanumeric keys produced by pressing AltGr+something on European
4235 // keyboards have both Ctrl and Alt modifiers which may confuse the user
4236 // code as, normally, keys with Ctrl and/or Alt don't result in anything
4237 // alphanumeric, so pretend that there are no modifiers at all (the
4238 // KEY_DOWN event would still have the correct modifiers if they're really
4239 // needed)
4240 if ( event.m_controlDown && event.m_altDown &&
4241 (id >= 32 && id < 256) )
4242 {
4243 event.m_controlDown =
4244 event.m_altDown = FALSE;
4245 }
4246
4247 return GetEventHandler()->ProcessEvent(event);
4248 }
4249
4250 bool wxWindowMSW::HandleKeyDown(WXWPARAM wParam, WXLPARAM lParam)
4251 {
4252 int id = wxCharCodeMSWToWX(wParam);
4253
4254 if ( !id )
4255 {
4256 // normal ASCII char
4257 id = wParam;
4258 }
4259
4260 if ( id != -1 ) // VZ: does this ever happen (FIXME)?
4261 {
4262 wxKeyEvent event(CreateKeyEvent(wxEVT_KEY_DOWN, id, lParam, wParam));
4263 if ( GetEventHandler()->ProcessEvent(event) )
4264 {
4265 return TRUE;
4266 }
4267 }
4268
4269 return FALSE;
4270 }
4271
4272 bool wxWindowMSW::HandleKeyUp(WXWPARAM wParam, WXLPARAM lParam)
4273 {
4274 int id = wxCharCodeMSWToWX(wParam);
4275
4276 if ( !id )
4277 {
4278 // normal ASCII char
4279 id = wParam;
4280 }
4281
4282 if ( id != -1 ) // VZ: does this ever happen (FIXME)?
4283 {
4284 wxKeyEvent event(CreateKeyEvent(wxEVT_KEY_UP, id, lParam, wParam));
4285 if ( GetEventHandler()->ProcessEvent(event) )
4286 return TRUE;
4287 }
4288
4289 return FALSE;
4290 }
4291
4292 #ifdef __WIN32__
4293
4294 int wxWindowMSW::HandleMenuChar(int chAccel, WXLPARAM lParam)
4295 {
4296 const HMENU hmenu = (HMENU)lParam;
4297
4298 MENUITEMINFO mii;
4299 wxZeroMemory(mii);
4300 mii.cbSize = sizeof(MENUITEMINFO);
4301 mii.fMask = MIIM_TYPE | MIIM_DATA;
4302
4303 // find if we have this letter in any owner drawn item
4304 const int count = ::GetMenuItemCount(hmenu);
4305 for ( int i = 0; i < count; i++ )
4306 {
4307 if ( ::GetMenuItemInfo(hmenu, i, TRUE, &mii) )
4308 {
4309 if ( mii.fType == MFT_OWNERDRAW )
4310 {
4311 // dwItemData member of the MENUITEMINFO is a
4312 // pointer to the associated wxMenuItem -- see the
4313 // menu creation code
4314 wxMenuItem *item = (wxMenuItem*)mii.dwItemData;
4315
4316 const wxChar *p = wxStrchr(item->GetText(), _T('&'));
4317 while ( p++ )
4318 {
4319 if ( *p == _T('&') )
4320 {
4321 // this is not the accel char, find the real one
4322 p = wxStrchr(p + 1, _T('&'));
4323 }
4324 else // got the accel char
4325 {
4326 // FIXME-UNICODE: this comparison doesn't risk to work
4327 // for non ASCII accelerator characters I'm afraid, but
4328 // what can we do?
4329 if ( wxToupper(*p) == chAccel )
4330 {
4331 return i;
4332 }
4333 else
4334 {
4335 // this one doesn't match
4336 break;
4337 }
4338 }
4339 }
4340 }
4341 }
4342 else // failed ot get the menu text?
4343 {
4344 // it's not fatal, so don't show error, but still log
4345 // it
4346 wxLogLastError(_T("GetMenuItemInfo"));
4347 }
4348 }
4349
4350 return wxNOT_FOUND;
4351 }
4352
4353 #endif // __WIN32__
4354
4355 // ---------------------------------------------------------------------------
4356 // joystick
4357 // ---------------------------------------------------------------------------
4358
4359 bool wxWindowMSW::HandleJoystickEvent(WXUINT msg, int x, int y, WXUINT flags)
4360 {
4361 #ifdef JOY_BUTTON1
4362 int change = 0;
4363 if ( flags & JOY_BUTTON1CHG )
4364 change = wxJOY_BUTTON1;
4365 if ( flags & JOY_BUTTON2CHG )
4366 change = wxJOY_BUTTON2;
4367 if ( flags & JOY_BUTTON3CHG )
4368 change = wxJOY_BUTTON3;
4369 if ( flags & JOY_BUTTON4CHG )
4370 change = wxJOY_BUTTON4;
4371
4372 int buttons = 0;
4373 if ( flags & JOY_BUTTON1 )
4374 buttons |= wxJOY_BUTTON1;
4375 if ( flags & JOY_BUTTON2 )
4376 buttons |= wxJOY_BUTTON2;
4377 if ( flags & JOY_BUTTON3 )
4378 buttons |= wxJOY_BUTTON3;
4379 if ( flags & JOY_BUTTON4 )
4380 buttons |= wxJOY_BUTTON4;
4381
4382 // the event ids aren't consecutive so we can't use table based lookup
4383 int joystick;
4384 wxEventType eventType;
4385 switch ( msg )
4386 {
4387 case MM_JOY1MOVE:
4388 joystick = 1;
4389 eventType = wxEVT_JOY_MOVE;
4390 break;
4391
4392 case MM_JOY2MOVE:
4393 joystick = 2;
4394 eventType = wxEVT_JOY_MOVE;
4395 break;
4396
4397 case MM_JOY1ZMOVE:
4398 joystick = 1;
4399 eventType = wxEVT_JOY_ZMOVE;
4400 break;
4401
4402 case MM_JOY2ZMOVE:
4403 joystick = 2;
4404 eventType = wxEVT_JOY_ZMOVE;
4405 break;
4406
4407 case MM_JOY1BUTTONDOWN:
4408 joystick = 1;
4409 eventType = wxEVT_JOY_BUTTON_DOWN;
4410 break;
4411
4412 case MM_JOY2BUTTONDOWN:
4413 joystick = 2;
4414 eventType = wxEVT_JOY_BUTTON_DOWN;
4415 break;
4416
4417 case MM_JOY1BUTTONUP:
4418 joystick = 1;
4419 eventType = wxEVT_JOY_BUTTON_UP;
4420 break;
4421
4422 case MM_JOY2BUTTONUP:
4423 joystick = 2;
4424 eventType = wxEVT_JOY_BUTTON_UP;
4425 break;
4426
4427 default:
4428 wxFAIL_MSG(wxT("no such joystick event"));
4429
4430 return FALSE;
4431 }
4432
4433 wxJoystickEvent event(eventType, buttons, joystick, change);
4434 event.SetPosition(wxPoint(x, y));
4435 event.SetEventObject(this);
4436
4437 return GetEventHandler()->ProcessEvent(event);
4438 #else
4439 return FALSE;
4440 #endif
4441 }
4442
4443 // ---------------------------------------------------------------------------
4444 // scrolling
4445 // ---------------------------------------------------------------------------
4446
4447 bool wxWindowMSW::MSWOnScroll(int orientation, WXWORD wParam,
4448 WXWORD pos, WXHWND control)
4449 {
4450 if ( control )
4451 {
4452 wxWindow *child = wxFindWinFromHandle(control);
4453 if ( child )
4454 return child->MSWOnScroll(orientation, wParam, pos, control);
4455 }
4456
4457 wxScrollWinEvent event;
4458 event.SetPosition(pos);
4459 event.SetOrientation(orientation);
4460 event.m_eventObject = this;
4461
4462 switch ( wParam )
4463 {
4464 case SB_TOP:
4465 event.m_eventType = wxEVT_SCROLLWIN_TOP;
4466 break;
4467
4468 case SB_BOTTOM:
4469 event.m_eventType = wxEVT_SCROLLWIN_BOTTOM;
4470 break;
4471
4472 case SB_LINEUP:
4473 event.m_eventType = wxEVT_SCROLLWIN_LINEUP;
4474 break;
4475
4476 case SB_LINEDOWN:
4477 event.m_eventType = wxEVT_SCROLLWIN_LINEDOWN;
4478 break;
4479
4480 case SB_PAGEUP:
4481 event.m_eventType = wxEVT_SCROLLWIN_PAGEUP;
4482 break;
4483
4484 case SB_PAGEDOWN:
4485 event.m_eventType = wxEVT_SCROLLWIN_PAGEDOWN;
4486 break;
4487
4488 case SB_THUMBPOSITION:
4489 case SB_THUMBTRACK:
4490 #ifdef __WIN32__
4491 // under Win32, the scrollbar range and position are 32 bit integers,
4492 // but WM_[HV]SCROLL only carry the low 16 bits of them, so we must
4493 // explicitly query the scrollbar for the correct position (this must
4494 // be done only for these two SB_ events as they are the only one
4495 // carrying the scrollbar position)
4496 {
4497 WinStruct<SCROLLINFO> scrollInfo;
4498 scrollInfo.fMask = SIF_TRACKPOS;
4499
4500 if ( !::GetScrollInfo(GetHwnd(),
4501 orientation == wxHORIZONTAL ? SB_HORZ
4502 : SB_VERT,
4503 &scrollInfo) )
4504 {
4505 wxLogLastError(_T("GetScrollInfo"));
4506 }
4507
4508 event.SetPosition(scrollInfo.nTrackPos);
4509 }
4510 #endif // Win32
4511
4512 event.m_eventType = wParam == SB_THUMBPOSITION
4513 ? wxEVT_SCROLLWIN_THUMBRELEASE
4514 : wxEVT_SCROLLWIN_THUMBTRACK;
4515 break;
4516
4517 default:
4518 return FALSE;
4519 }
4520
4521 return GetEventHandler()->ProcessEvent(event);
4522 }
4523
4524 // ===========================================================================
4525 // global functions
4526 // ===========================================================================
4527
4528 void wxGetCharSize(WXHWND wnd, int *x, int *y, const wxFont *the_font)
4529 {
4530 TEXTMETRIC tm;
4531 HDC dc = ::GetDC((HWND) wnd);
4532 HFONT fnt =0;
4533 HFONT was = 0;
4534 if ( the_font )
4535 {
4536 // the_font->UseResource();
4537 // the_font->RealizeResource();
4538 fnt = (HFONT)((wxFont *)the_font)->GetResourceHandle(); // const_cast
4539 if ( fnt )
4540 was = (HFONT) SelectObject(dc,fnt);
4541 }
4542 GetTextMetrics(dc, &tm);
4543 if ( the_font && fnt && was )
4544 {
4545 SelectObject(dc,was);
4546 }
4547 ReleaseDC((HWND)wnd, dc);
4548
4549 if ( x )
4550 *x = tm.tmAveCharWidth;
4551 if ( y )
4552 *y = tm.tmHeight + tm.tmExternalLeading;
4553
4554 // if ( the_font )
4555 // the_font->ReleaseResource();
4556 }
4557
4558 // Returns 0 if was a normal ASCII value, not a special key. This indicates that
4559 // the key should be ignored by WM_KEYDOWN and processed by WM_CHAR instead.
4560 int wxCharCodeMSWToWX(int keySym)
4561 {
4562 int id;
4563 switch (keySym)
4564 {
4565 case VK_CANCEL: id = WXK_CANCEL; break;
4566 case VK_BACK: id = WXK_BACK; break;
4567 case VK_TAB: id = WXK_TAB; break;
4568 case VK_CLEAR: id = WXK_CLEAR; break;
4569 case VK_RETURN: id = WXK_RETURN; break;
4570 case VK_SHIFT: id = WXK_SHIFT; break;
4571 case VK_CONTROL: id = WXK_CONTROL; break;
4572 case VK_MENU : id = WXK_MENU; break;
4573 case VK_PAUSE: id = WXK_PAUSE; break;
4574 case VK_CAPITAL: id = WXK_CAPITAL; break;
4575 case VK_SPACE: id = WXK_SPACE; break;
4576 case VK_ESCAPE: id = WXK_ESCAPE; break;
4577 case VK_PRIOR: id = WXK_PRIOR; break;
4578 case VK_NEXT : id = WXK_NEXT; break;
4579 case VK_END: id = WXK_END; break;
4580 case VK_HOME : id = WXK_HOME; break;
4581 case VK_LEFT : id = WXK_LEFT; break;
4582 case VK_UP: id = WXK_UP; break;
4583 case VK_RIGHT: id = WXK_RIGHT; break;
4584 case VK_DOWN : id = WXK_DOWN; break;
4585 case VK_SELECT: id = WXK_SELECT; break;
4586 case VK_PRINT: id = WXK_PRINT; break;
4587 case VK_EXECUTE: id = WXK_EXECUTE; break;
4588 case VK_INSERT: id = WXK_INSERT; break;
4589 case VK_DELETE: id = WXK_DELETE; break;
4590 case VK_HELP : id = WXK_HELP; break;
4591 case VK_NUMPAD0: id = WXK_NUMPAD0; break;
4592 case VK_NUMPAD1: id = WXK_NUMPAD1; break;
4593 case VK_NUMPAD2: id = WXK_NUMPAD2; break;
4594 case VK_NUMPAD3: id = WXK_NUMPAD3; break;
4595 case VK_NUMPAD4: id = WXK_NUMPAD4; break;
4596 case VK_NUMPAD5: id = WXK_NUMPAD5; break;
4597 case VK_NUMPAD6: id = WXK_NUMPAD6; break;
4598 case VK_NUMPAD7: id = WXK_NUMPAD7; break;
4599 case VK_NUMPAD8: id = WXK_NUMPAD8; break;
4600 case VK_NUMPAD9: id = WXK_NUMPAD9; break;
4601 case VK_MULTIPLY: id = WXK_NUMPAD_MULTIPLY; break;
4602 case VK_ADD: id = WXK_NUMPAD_ADD; break;
4603 case VK_SUBTRACT: id = WXK_NUMPAD_SUBTRACT; break;
4604 case VK_DECIMAL: id = WXK_NUMPAD_DECIMAL; break;
4605 case VK_DIVIDE: id = WXK_NUMPAD_DIVIDE; break;
4606 case VK_F1: id = WXK_F1; break;
4607 case VK_F2: id = WXK_F2; break;
4608 case VK_F3: id = WXK_F3; break;
4609 case VK_F4: id = WXK_F4; break;
4610 case VK_F5: id = WXK_F5; break;
4611 case VK_F6: id = WXK_F6; break;
4612 case VK_F7: id = WXK_F7; break;
4613 case VK_F8: id = WXK_F8; break;
4614 case VK_F9: id = WXK_F9; break;
4615 case VK_F10: id = WXK_F10; break;
4616 case VK_F11: id = WXK_F11; break;
4617 case VK_F12: id = WXK_F12; break;
4618 case VK_F13: id = WXK_F13; break;
4619 case VK_F14: id = WXK_F14; break;
4620 case VK_F15: id = WXK_F15; break;
4621 case VK_F16: id = WXK_F16; break;
4622 case VK_F17: id = WXK_F17; break;
4623 case VK_F18: id = WXK_F18; break;
4624 case VK_F19: id = WXK_F19; break;
4625 case VK_F20: id = WXK_F20; break;
4626 case VK_F21: id = WXK_F21; break;
4627 case VK_F22: id = WXK_F22; break;
4628 case VK_F23: id = WXK_F23; break;
4629 case VK_F24: id = WXK_F24; break;
4630 case VK_NUMLOCK: id = WXK_NUMLOCK; break;
4631 case VK_SCROLL: id = WXK_SCROLL; break;
4632
4633 case VK_OEM_1: id = ';'; break;
4634 case VK_OEM_PLUS: id = '+'; break;
4635 case VK_OEM_COMMA: id = ','; break;
4636 case VK_OEM_MINUS: id = '-'; break;
4637 case VK_OEM_PERIOD: id = '.'; break;
4638 case VK_OEM_2: id = '/'; break;
4639 case VK_OEM_3: id = '~'; break;
4640 case VK_OEM_4: id = '['; break;
4641 case VK_OEM_5: id = '\\'; break;
4642 case VK_OEM_6: id = ']'; break;
4643 case VK_OEM_7: id = '\''; break;
4644
4645 #ifdef VK_APPS
4646 case VK_LWIN: id = WXK_WINDOWS_LEFT; break;
4647 case VK_RWIN: id = WXK_WINDOWS_RIGHT; break;
4648 case VK_APPS: id = WXK_WINDOWS_MENU; break;
4649 #endif // VK_APPS defined
4650
4651 default:
4652 id = 0;
4653 }
4654
4655 return id;
4656 }
4657
4658 int wxCharCodeWXToMSW(int id, bool *isVirtual)
4659 {
4660 *isVirtual = TRUE;
4661 int keySym = 0;
4662 switch (id)
4663 {
4664 case WXK_CANCEL: keySym = VK_CANCEL; break;
4665 case WXK_CLEAR: keySym = VK_CLEAR; break;
4666 case WXK_SHIFT: keySym = VK_SHIFT; break;
4667 case WXK_CONTROL: keySym = VK_CONTROL; break;
4668 case WXK_MENU : keySym = VK_MENU; break;
4669 case WXK_PAUSE: keySym = VK_PAUSE; break;
4670 case WXK_PRIOR: keySym = VK_PRIOR; break;
4671 case WXK_NEXT : keySym = VK_NEXT; break;
4672 case WXK_END: keySym = VK_END; break;
4673 case WXK_HOME : keySym = VK_HOME; break;
4674 case WXK_LEFT : keySym = VK_LEFT; break;
4675 case WXK_UP: keySym = VK_UP; break;
4676 case WXK_RIGHT: keySym = VK_RIGHT; break;
4677 case WXK_DOWN : keySym = VK_DOWN; break;
4678 case WXK_SELECT: keySym = VK_SELECT; break;
4679 case WXK_PRINT: keySym = VK_PRINT; break;
4680 case WXK_EXECUTE: keySym = VK_EXECUTE; break;
4681 case WXK_INSERT: keySym = VK_INSERT; break;
4682 case WXK_DELETE: keySym = VK_DELETE; break;
4683 case WXK_HELP : keySym = VK_HELP; break;
4684 case WXK_NUMPAD0: keySym = VK_NUMPAD0; break;
4685 case WXK_NUMPAD1: keySym = VK_NUMPAD1; break;
4686 case WXK_NUMPAD2: keySym = VK_NUMPAD2; break;
4687 case WXK_NUMPAD3: keySym = VK_NUMPAD3; break;
4688 case WXK_NUMPAD4: keySym = VK_NUMPAD4; break;
4689 case WXK_NUMPAD5: keySym = VK_NUMPAD5; break;
4690 case WXK_NUMPAD6: keySym = VK_NUMPAD6; break;
4691 case WXK_NUMPAD7: keySym = VK_NUMPAD7; break;
4692 case WXK_NUMPAD8: keySym = VK_NUMPAD8; break;
4693 case WXK_NUMPAD9: keySym = VK_NUMPAD9; break;
4694 case WXK_NUMPAD_MULTIPLY: keySym = VK_MULTIPLY; break;
4695 case WXK_NUMPAD_ADD: keySym = VK_ADD; break;
4696 case WXK_NUMPAD_SUBTRACT: keySym = VK_SUBTRACT; break;
4697 case WXK_NUMPAD_DECIMAL: keySym = VK_DECIMAL; break;
4698 case WXK_NUMPAD_DIVIDE: keySym = VK_DIVIDE; break;
4699 case WXK_F1: keySym = VK_F1; break;
4700 case WXK_F2: keySym = VK_F2; break;
4701 case WXK_F3: keySym = VK_F3; break;
4702 case WXK_F4: keySym = VK_F4; break;
4703 case WXK_F5: keySym = VK_F5; break;
4704 case WXK_F6: keySym = VK_F6; break;
4705 case WXK_F7: keySym = VK_F7; break;
4706 case WXK_F8: keySym = VK_F8; break;
4707 case WXK_F9: keySym = VK_F9; break;
4708 case WXK_F10: keySym = VK_F10; break;
4709 case WXK_F11: keySym = VK_F11; break;
4710 case WXK_F12: keySym = VK_F12; break;
4711 case WXK_F13: keySym = VK_F13; break;
4712 case WXK_F14: keySym = VK_F14; break;
4713 case WXK_F15: keySym = VK_F15; break;
4714 case WXK_F16: keySym = VK_F16; break;
4715 case WXK_F17: keySym = VK_F17; break;
4716 case WXK_F18: keySym = VK_F18; break;
4717 case WXK_F19: keySym = VK_F19; break;
4718 case WXK_F20: keySym = VK_F20; break;
4719 case WXK_F21: keySym = VK_F21; break;
4720 case WXK_F22: keySym = VK_F22; break;
4721 case WXK_F23: keySym = VK_F23; break;
4722 case WXK_F24: keySym = VK_F24; break;
4723 case WXK_NUMLOCK: keySym = VK_NUMLOCK; break;
4724 case WXK_SCROLL: keySym = VK_SCROLL; break;
4725 default:
4726 {
4727 *isVirtual = FALSE;
4728 keySym = id;
4729 break;
4730 }
4731 }
4732 return keySym;
4733 }
4734
4735 wxWindow *wxGetActiveWindow()
4736 {
4737 HWND hWnd = GetActiveWindow();
4738 if ( hWnd != 0 )
4739 {
4740 return wxFindWinFromHandle((WXHWND) hWnd);
4741 }
4742 return NULL;
4743 }
4744
4745 extern wxWindow *wxGetWindowFromHWND(WXHWND hWnd)
4746 {
4747 HWND hwnd = (HWND)hWnd;
4748
4749 // For a radiobutton, we get the radiobox from GWL_USERDATA (which is set
4750 // by code in msw/radiobox.cpp), for all the others we just search up the
4751 // window hierarchy
4752 wxWindow *win = (wxWindow *)NULL;
4753 if ( hwnd )
4754 {
4755 win = wxFindWinFromHandle((WXHWND)hwnd);
4756 if ( !win )
4757 {
4758 // all these hacks only work under Win32 anyhow
4759 #ifdef __WIN32__
4760
4761 #if wxUSE_RADIOBOX
4762 // native radiobuttons return DLGC_RADIOBUTTON here and for any
4763 // wxWindow class which overrides WM_GETDLGCODE processing to
4764 // do it as well, win would be already non NULL
4765 if ( ::SendMessage(hwnd, WM_GETDLGCODE, 0, 0) & DLGC_RADIOBUTTON )
4766 {
4767 win = (wxWindow *)::GetWindowLong(hwnd, GWL_USERDATA);
4768 }
4769 //else: it's a wxRadioButton, not a radiobutton from wxRadioBox
4770 #endif // wxUSE_RADIOBOX
4771
4772 // spin control text buddy window should be mapped to spin ctrl
4773 // itself so try it too
4774 #if wxUSE_SPINCTRL && !defined(__WXUNIVERSAL__)
4775 if ( !win )
4776 {
4777 win = wxSpinCtrl::GetSpinForTextCtrl((WXHWND)hwnd);
4778 }
4779 #endif // wxUSE_SPINCTRL
4780
4781 #endif // Win32
4782 }
4783 }
4784
4785 while ( hwnd && !win )
4786 {
4787 // this is a really ugly hack needed to avoid mistakenly returning the
4788 // parent frame wxWindow for the find/replace modeless dialog HWND -
4789 // this, in turn, is needed to call IsDialogMessage() from
4790 // wxApp::ProcessMessage() as for this we must return NULL from here
4791 //
4792 // FIXME: this is clearly not the best way to do it but I think we'll
4793 // need to change HWND <-> wxWindow code more heavily than I can
4794 // do it now to fix it
4795 #ifndef __WXMICROWIN__
4796 if ( ::GetWindow(hwnd, GW_OWNER) )
4797 {
4798 // it's a dialog box, don't go upwards
4799 break;
4800 }
4801 #endif
4802
4803 hwnd = ::GetParent(hwnd);
4804 win = wxFindWinFromHandle((WXHWND)hwnd);
4805 }
4806
4807 return win;
4808 }
4809
4810 #ifndef __WXMICROWIN__
4811
4812 // Windows keyboard hook. Allows interception of e.g. F1, ESCAPE
4813 // in active frames and dialogs, regardless of where the focus is.
4814 static HHOOK wxTheKeyboardHook = 0;
4815 static FARPROC wxTheKeyboardHookProc = 0;
4816 int APIENTRY _EXPORT
4817 wxKeyboardHook(int nCode, WORD wParam, DWORD lParam);
4818
4819 void wxSetKeyboardHook(bool doIt)
4820 {
4821 if ( doIt )
4822 {
4823 wxTheKeyboardHookProc = MakeProcInstance((FARPROC) wxKeyboardHook, wxGetInstance());
4824 wxTheKeyboardHook = SetWindowsHookEx(WH_KEYBOARD, (HOOKPROC) wxTheKeyboardHookProc, wxGetInstance(),
4825
4826 #if defined(__WIN32__)
4827 GetCurrentThreadId()
4828 // (DWORD)GetCurrentProcess()); // This is another possibility. Which is right?
4829 #else
4830 GetCurrentTask()
4831 #endif
4832 );
4833 }
4834 else
4835 {
4836 UnhookWindowsHookEx(wxTheKeyboardHook);
4837
4838 // avoids warning about statement with no effect (FreeProcInstance
4839 // doesn't do anything under Win32)
4840 #if !defined(__WIN32__) && !defined(__NT__)
4841 FreeProcInstance(wxTheKeyboardHookProc);
4842 #endif
4843 }
4844 }
4845
4846 int APIENTRY _EXPORT
4847 wxKeyboardHook(int nCode, WORD wParam, DWORD lParam)
4848 {
4849 DWORD hiWord = HIWORD(lParam);
4850 if ( nCode != HC_NOREMOVE && ((hiWord & KF_UP) == 0) )
4851 {
4852 int id = wxCharCodeMSWToWX(wParam);
4853 if ( id != 0 )
4854 {
4855 wxKeyEvent event(wxEVT_CHAR_HOOK);
4856 if ( (HIWORD(lParam) & KF_ALTDOWN) == KF_ALTDOWN )
4857 event.m_altDown = TRUE;
4858
4859 event.m_eventObject = NULL;
4860 event.m_keyCode = id;
4861 event.m_shiftDown = wxIsShiftDown();
4862 event.m_controlDown = wxIsCtrlDown();
4863 event.SetTimestamp(s_currentMsg.time);
4864
4865 wxWindow *win = wxGetActiveWindow();
4866 wxEvtHandler *handler;
4867 if ( win )
4868 {
4869 handler = win->GetEventHandler();
4870 event.SetId(win->GetId());
4871 }
4872 else
4873 {
4874 handler = wxTheApp;
4875 event.SetId(-1);
4876 }
4877
4878 if ( handler && handler->ProcessEvent(event) )
4879 {
4880 // processed
4881 return 1;
4882 }
4883 }
4884 }
4885
4886 return (int)CallNextHookEx(wxTheKeyboardHook, nCode, wParam, lParam);
4887 }
4888
4889 #endif // !__WXMICROWIN__
4890
4891 #ifdef __WXDEBUG__
4892 const char *wxGetMessageName(int message)
4893 {
4894 switch ( message )
4895 {
4896 case 0x0000: return "WM_NULL";
4897 case 0x0001: return "WM_CREATE";
4898 case 0x0002: return "WM_DESTROY";
4899 case 0x0003: return "WM_MOVE";
4900 case 0x0005: return "WM_SIZE";
4901 case 0x0006: return "WM_ACTIVATE";
4902 case 0x0007: return "WM_SETFOCUS";
4903 case 0x0008: return "WM_KILLFOCUS";
4904 case 0x000A: return "WM_ENABLE";
4905 case 0x000B: return "WM_SETREDRAW";
4906 case 0x000C: return "WM_SETTEXT";
4907 case 0x000D: return "WM_GETTEXT";
4908 case 0x000E: return "WM_GETTEXTLENGTH";
4909 case 0x000F: return "WM_PAINT";
4910 case 0x0010: return "WM_CLOSE";
4911 case 0x0011: return "WM_QUERYENDSESSION";
4912 case 0x0012: return "WM_QUIT";
4913 case 0x0013: return "WM_QUERYOPEN";
4914 case 0x0014: return "WM_ERASEBKGND";
4915 case 0x0015: return "WM_SYSCOLORCHANGE";
4916 case 0x0016: return "WM_ENDSESSION";
4917 case 0x0017: return "WM_SYSTEMERROR";
4918 case 0x0018: return "WM_SHOWWINDOW";
4919 case 0x0019: return "WM_CTLCOLOR";
4920 case 0x001A: return "WM_WININICHANGE";
4921 case 0x001B: return "WM_DEVMODECHANGE";
4922 case 0x001C: return "WM_ACTIVATEAPP";
4923 case 0x001D: return "WM_FONTCHANGE";
4924 case 0x001E: return "WM_TIMECHANGE";
4925 case 0x001F: return "WM_CANCELMODE";
4926 case 0x0020: return "WM_SETCURSOR";
4927 case 0x0021: return "WM_MOUSEACTIVATE";
4928 case 0x0022: return "WM_CHILDACTIVATE";
4929 case 0x0023: return "WM_QUEUESYNC";
4930 case 0x0024: return "WM_GETMINMAXINFO";
4931 case 0x0026: return "WM_PAINTICON";
4932 case 0x0027: return "WM_ICONERASEBKGND";
4933 case 0x0028: return "WM_NEXTDLGCTL";
4934 case 0x002A: return "WM_SPOOLERSTATUS";
4935 case 0x002B: return "WM_DRAWITEM";
4936 case 0x002C: return "WM_MEASUREITEM";
4937 case 0x002D: return "WM_DELETEITEM";
4938 case 0x002E: return "WM_VKEYTOITEM";
4939 case 0x002F: return "WM_CHARTOITEM";
4940 case 0x0030: return "WM_SETFONT";
4941 case 0x0031: return "WM_GETFONT";
4942 case 0x0037: return "WM_QUERYDRAGICON";
4943 case 0x0039: return "WM_COMPAREITEM";
4944 case 0x0041: return "WM_COMPACTING";
4945 case 0x0044: return "WM_COMMNOTIFY";
4946 case 0x0046: return "WM_WINDOWPOSCHANGING";
4947 case 0x0047: return "WM_WINDOWPOSCHANGED";
4948 case 0x0048: return "WM_POWER";
4949
4950 #ifdef __WIN32__
4951 case 0x004A: return "WM_COPYDATA";
4952 case 0x004B: return "WM_CANCELJOURNAL";
4953 case 0x004E: return "WM_NOTIFY";
4954 case 0x0050: return "WM_INPUTLANGCHANGEREQUEST";
4955 case 0x0051: return "WM_INPUTLANGCHANGE";
4956 case 0x0052: return "WM_TCARD";
4957 case 0x0053: return "WM_HELP";
4958 case 0x0054: return "WM_USERCHANGED";
4959 case 0x0055: return "WM_NOTIFYFORMAT";
4960 case 0x007B: return "WM_CONTEXTMENU";
4961 case 0x007C: return "WM_STYLECHANGING";
4962 case 0x007D: return "WM_STYLECHANGED";
4963 case 0x007E: return "WM_DISPLAYCHANGE";
4964 case 0x007F: return "WM_GETICON";
4965 case 0x0080: return "WM_SETICON";
4966 #endif //WIN32
4967
4968 case 0x0081: return "WM_NCCREATE";
4969 case 0x0082: return "WM_NCDESTROY";
4970 case 0x0083: return "WM_NCCALCSIZE";
4971 case 0x0084: return "WM_NCHITTEST";
4972 case 0x0085: return "WM_NCPAINT";
4973 case 0x0086: return "WM_NCACTIVATE";
4974 case 0x0087: return "WM_GETDLGCODE";
4975 case 0x00A0: return "WM_NCMOUSEMOVE";
4976 case 0x00A1: return "WM_NCLBUTTONDOWN";
4977 case 0x00A2: return "WM_NCLBUTTONUP";
4978 case 0x00A3: return "WM_NCLBUTTONDBLCLK";
4979 case 0x00A4: return "WM_NCRBUTTONDOWN";
4980 case 0x00A5: return "WM_NCRBUTTONUP";
4981 case 0x00A6: return "WM_NCRBUTTONDBLCLK";
4982 case 0x00A7: return "WM_NCMBUTTONDOWN";
4983 case 0x00A8: return "WM_NCMBUTTONUP";
4984 case 0x00A9: return "WM_NCMBUTTONDBLCLK";
4985 case 0x0100: return "WM_KEYDOWN";
4986 case 0x0101: return "WM_KEYUP";
4987 case 0x0102: return "WM_CHAR";
4988 case 0x0103: return "WM_DEADCHAR";
4989 case 0x0104: return "WM_SYSKEYDOWN";
4990 case 0x0105: return "WM_SYSKEYUP";
4991 case 0x0106: return "WM_SYSCHAR";
4992 case 0x0107: return "WM_SYSDEADCHAR";
4993 case 0x0108: return "WM_KEYLAST";
4994
4995 #ifdef __WIN32__
4996 case 0x010D: return "WM_IME_STARTCOMPOSITION";
4997 case 0x010E: return "WM_IME_ENDCOMPOSITION";
4998 case 0x010F: return "WM_IME_COMPOSITION";
4999 #endif //WIN32
5000
5001 case 0x0110: return "WM_INITDIALOG";
5002 case 0x0111: return "WM_COMMAND";
5003 case 0x0112: return "WM_SYSCOMMAND";
5004 case 0x0113: return "WM_TIMER";
5005 case 0x0114: return "WM_HSCROLL";
5006 case 0x0115: return "WM_VSCROLL";
5007 case 0x0116: return "WM_INITMENU";
5008 case 0x0117: return "WM_INITMENUPOPUP";
5009 case 0x011F: return "WM_MENUSELECT";
5010 case 0x0120: return "WM_MENUCHAR";
5011 case 0x0121: return "WM_ENTERIDLE";
5012 case 0x0200: return "WM_MOUSEMOVE";
5013 case 0x0201: return "WM_LBUTTONDOWN";
5014 case 0x0202: return "WM_LBUTTONUP";
5015 case 0x0203: return "WM_LBUTTONDBLCLK";
5016 case 0x0204: return "WM_RBUTTONDOWN";
5017 case 0x0205: return "WM_RBUTTONUP";
5018 case 0x0206: return "WM_RBUTTONDBLCLK";
5019 case 0x0207: return "WM_MBUTTONDOWN";
5020 case 0x0208: return "WM_MBUTTONUP";
5021 case 0x0209: return "WM_MBUTTONDBLCLK";
5022 case 0x020A: return "WM_MOUSEWHEEL";
5023 case 0x0210: return "WM_PARENTNOTIFY";
5024 case 0x0211: return "WM_ENTERMENULOOP";
5025 case 0x0212: return "WM_EXITMENULOOP";
5026
5027 #ifdef __WIN32__
5028 case 0x0213: return "WM_NEXTMENU";
5029 case 0x0214: return "WM_SIZING";
5030 case 0x0215: return "WM_CAPTURECHANGED";
5031 case 0x0216: return "WM_MOVING";
5032 case 0x0218: return "WM_POWERBROADCAST";
5033 case 0x0219: return "WM_DEVICECHANGE";
5034 #endif //WIN32
5035
5036 case 0x0220: return "WM_MDICREATE";
5037 case 0x0221: return "WM_MDIDESTROY";
5038 case 0x0222: return "WM_MDIACTIVATE";
5039 case 0x0223: return "WM_MDIRESTORE";
5040 case 0x0224: return "WM_MDINEXT";
5041 case 0x0225: return "WM_MDIMAXIMIZE";
5042 case 0x0226: return "WM_MDITILE";
5043 case 0x0227: return "WM_MDICASCADE";
5044 case 0x0228: return "WM_MDIICONARRANGE";
5045 case 0x0229: return "WM_MDIGETACTIVE";
5046 case 0x0230: return "WM_MDISETMENU";
5047 case 0x0233: return "WM_DROPFILES";
5048
5049 #ifdef __WIN32__
5050 case 0x0281: return "WM_IME_SETCONTEXT";
5051 case 0x0282: return "WM_IME_NOTIFY";
5052 case 0x0283: return "WM_IME_CONTROL";
5053 case 0x0284: return "WM_IME_COMPOSITIONFULL";
5054 case 0x0285: return "WM_IME_SELECT";
5055 case 0x0286: return "WM_IME_CHAR";
5056 case 0x0290: return "WM_IME_KEYDOWN";
5057 case 0x0291: return "WM_IME_KEYUP";
5058 #endif //WIN32
5059
5060 case 0x0300: return "WM_CUT";
5061 case 0x0301: return "WM_COPY";
5062 case 0x0302: return "WM_PASTE";
5063 case 0x0303: return "WM_CLEAR";
5064 case 0x0304: return "WM_UNDO";
5065 case 0x0305: return "WM_RENDERFORMAT";
5066 case 0x0306: return "WM_RENDERALLFORMATS";
5067 case 0x0307: return "WM_DESTROYCLIPBOARD";
5068 case 0x0308: return "WM_DRAWCLIPBOARD";
5069 case 0x0309: return "WM_PAINTCLIPBOARD";
5070 case 0x030A: return "WM_VSCROLLCLIPBOARD";
5071 case 0x030B: return "WM_SIZECLIPBOARD";
5072 case 0x030C: return "WM_ASKCBFORMATNAME";
5073 case 0x030D: return "WM_CHANGECBCHAIN";
5074 case 0x030E: return "WM_HSCROLLCLIPBOARD";
5075 case 0x030F: return "WM_QUERYNEWPALETTE";
5076 case 0x0310: return "WM_PALETTEISCHANGING";
5077 case 0x0311: return "WM_PALETTECHANGED";
5078
5079 #ifdef __WIN32__
5080 // common controls messages - although they're not strictly speaking
5081 // standard, it's nice to decode them nevertheless
5082
5083 // listview
5084 case 0x1000 + 0: return "LVM_GETBKCOLOR";
5085 case 0x1000 + 1: return "LVM_SETBKCOLOR";
5086 case 0x1000 + 2: return "LVM_GETIMAGELIST";
5087 case 0x1000 + 3: return "LVM_SETIMAGELIST";
5088 case 0x1000 + 4: return "LVM_GETITEMCOUNT";
5089 case 0x1000 + 5: return "LVM_GETITEMA";
5090 case 0x1000 + 75: return "LVM_GETITEMW";
5091 case 0x1000 + 6: return "LVM_SETITEMA";
5092 case 0x1000 + 76: return "LVM_SETITEMW";
5093 case 0x1000 + 7: return "LVM_INSERTITEMA";
5094 case 0x1000 + 77: return "LVM_INSERTITEMW";
5095 case 0x1000 + 8: return "LVM_DELETEITEM";
5096 case 0x1000 + 9: return "LVM_DELETEALLITEMS";
5097 case 0x1000 + 10: return "LVM_GETCALLBACKMASK";
5098 case 0x1000 + 11: return "LVM_SETCALLBACKMASK";
5099 case 0x1000 + 12: return "LVM_GETNEXTITEM";
5100 case 0x1000 + 13: return "LVM_FINDITEMA";
5101 case 0x1000 + 83: return "LVM_FINDITEMW";
5102 case 0x1000 + 14: return "LVM_GETITEMRECT";
5103 case 0x1000 + 15: return "LVM_SETITEMPOSITION";
5104 case 0x1000 + 16: return "LVM_GETITEMPOSITION";
5105 case 0x1000 + 17: return "LVM_GETSTRINGWIDTHA";
5106 case 0x1000 + 87: return "LVM_GETSTRINGWIDTHW";
5107 case 0x1000 + 18: return "LVM_HITTEST";
5108 case 0x1000 + 19: return "LVM_ENSUREVISIBLE";
5109 case 0x1000 + 20: return "LVM_SCROLL";
5110 case 0x1000 + 21: return "LVM_REDRAWITEMS";
5111 case 0x1000 + 22: return "LVM_ARRANGE";
5112 case 0x1000 + 23: return "LVM_EDITLABELA";
5113 case 0x1000 + 118: return "LVM_EDITLABELW";
5114 case 0x1000 + 24: return "LVM_GETEDITCONTROL";
5115 case 0x1000 + 25: return "LVM_GETCOLUMNA";
5116 case 0x1000 + 95: return "LVM_GETCOLUMNW";
5117 case 0x1000 + 26: return "LVM_SETCOLUMNA";
5118 case 0x1000 + 96: return "LVM_SETCOLUMNW";
5119 case 0x1000 + 27: return "LVM_INSERTCOLUMNA";
5120 case 0x1000 + 97: return "LVM_INSERTCOLUMNW";
5121 case 0x1000 + 28: return "LVM_DELETECOLUMN";
5122 case 0x1000 + 29: return "LVM_GETCOLUMNWIDTH";
5123 case 0x1000 + 30: return "LVM_SETCOLUMNWIDTH";
5124 case 0x1000 + 31: return "LVM_GETHEADER";
5125 case 0x1000 + 33: return "LVM_CREATEDRAGIMAGE";
5126 case 0x1000 + 34: return "LVM_GETVIEWRECT";
5127 case 0x1000 + 35: return "LVM_GETTEXTCOLOR";
5128 case 0x1000 + 36: return "LVM_SETTEXTCOLOR";
5129 case 0x1000 + 37: return "LVM_GETTEXTBKCOLOR";
5130 case 0x1000 + 38: return "LVM_SETTEXTBKCOLOR";
5131 case 0x1000 + 39: return "LVM_GETTOPINDEX";
5132 case 0x1000 + 40: return "LVM_GETCOUNTPERPAGE";
5133 case 0x1000 + 41: return "LVM_GETORIGIN";
5134 case 0x1000 + 42: return "LVM_UPDATE";
5135 case 0x1000 + 43: return "LVM_SETITEMSTATE";
5136 case 0x1000 + 44: return "LVM_GETITEMSTATE";
5137 case 0x1000 + 45: return "LVM_GETITEMTEXTA";
5138 case 0x1000 + 115: return "LVM_GETITEMTEXTW";
5139 case 0x1000 + 46: return "LVM_SETITEMTEXTA";
5140 case 0x1000 + 116: return "LVM_SETITEMTEXTW";
5141 case 0x1000 + 47: return "LVM_SETITEMCOUNT";
5142 case 0x1000 + 48: return "LVM_SORTITEMS";
5143 case 0x1000 + 49: return "LVM_SETITEMPOSITION32";
5144 case 0x1000 + 50: return "LVM_GETSELECTEDCOUNT";
5145 case 0x1000 + 51: return "LVM_GETITEMSPACING";
5146 case 0x1000 + 52: return "LVM_GETISEARCHSTRINGA";
5147 case 0x1000 + 117: return "LVM_GETISEARCHSTRINGW";
5148 case 0x1000 + 53: return "LVM_SETICONSPACING";
5149 case 0x1000 + 54: return "LVM_SETEXTENDEDLISTVIEWSTYLE";
5150 case 0x1000 + 55: return "LVM_GETEXTENDEDLISTVIEWSTYLE";
5151 case 0x1000 + 56: return "LVM_GETSUBITEMRECT";
5152 case 0x1000 + 57: return "LVM_SUBITEMHITTEST";
5153 case 0x1000 + 58: return "LVM_SETCOLUMNORDERARRAY";
5154 case 0x1000 + 59: return "LVM_GETCOLUMNORDERARRAY";
5155 case 0x1000 + 60: return "LVM_SETHOTITEM";
5156 case 0x1000 + 61: return "LVM_GETHOTITEM";
5157 case 0x1000 + 62: return "LVM_SETHOTCURSOR";
5158 case 0x1000 + 63: return "LVM_GETHOTCURSOR";
5159 case 0x1000 + 64: return "LVM_APPROXIMATEVIEWRECT";
5160 case 0x1000 + 65: return "LVM_SETWORKAREA";
5161
5162 // tree view
5163 case 0x1100 + 0: return "TVM_INSERTITEMA";
5164 case 0x1100 + 50: return "TVM_INSERTITEMW";
5165 case 0x1100 + 1: return "TVM_DELETEITEM";
5166 case 0x1100 + 2: return "TVM_EXPAND";
5167 case 0x1100 + 4: return "TVM_GETITEMRECT";
5168 case 0x1100 + 5: return "TVM_GETCOUNT";
5169 case 0x1100 + 6: return "TVM_GETINDENT";
5170 case 0x1100 + 7: return "TVM_SETINDENT";
5171 case 0x1100 + 8: return "TVM_GETIMAGELIST";
5172 case 0x1100 + 9: return "TVM_SETIMAGELIST";
5173 case 0x1100 + 10: return "TVM_GETNEXTITEM";
5174 case 0x1100 + 11: return "TVM_SELECTITEM";
5175 case 0x1100 + 12: return "TVM_GETITEMA";
5176 case 0x1100 + 62: return "TVM_GETITEMW";
5177 case 0x1100 + 13: return "TVM_SETITEMA";
5178 case 0x1100 + 63: return "TVM_SETITEMW";
5179 case 0x1100 + 14: return "TVM_EDITLABELA";
5180 case 0x1100 + 65: return "TVM_EDITLABELW";
5181 case 0x1100 + 15: return "TVM_GETEDITCONTROL";
5182 case 0x1100 + 16: return "TVM_GETVISIBLECOUNT";
5183 case 0x1100 + 17: return "TVM_HITTEST";
5184 case 0x1100 + 18: return "TVM_CREATEDRAGIMAGE";
5185 case 0x1100 + 19: return "TVM_SORTCHILDREN";
5186 case 0x1100 + 20: return "TVM_ENSUREVISIBLE";
5187 case 0x1100 + 21: return "TVM_SORTCHILDRENCB";
5188 case 0x1100 + 22: return "TVM_ENDEDITLABELNOW";
5189 case 0x1100 + 23: return "TVM_GETISEARCHSTRINGA";
5190 case 0x1100 + 64: return "TVM_GETISEARCHSTRINGW";
5191 case 0x1100 + 24: return "TVM_SETTOOLTIPS";
5192 case 0x1100 + 25: return "TVM_GETTOOLTIPS";
5193
5194 // header
5195 case 0x1200 + 0: return "HDM_GETITEMCOUNT";
5196 case 0x1200 + 1: return "HDM_INSERTITEMA";
5197 case 0x1200 + 10: return "HDM_INSERTITEMW";
5198 case 0x1200 + 2: return "HDM_DELETEITEM";
5199 case 0x1200 + 3: return "HDM_GETITEMA";
5200 case 0x1200 + 11: return "HDM_GETITEMW";
5201 case 0x1200 + 4: return "HDM_SETITEMA";
5202 case 0x1200 + 12: return "HDM_SETITEMW";
5203 case 0x1200 + 5: return "HDM_LAYOUT";
5204 case 0x1200 + 6: return "HDM_HITTEST";
5205 case 0x1200 + 7: return "HDM_GETITEMRECT";
5206 case 0x1200 + 8: return "HDM_SETIMAGELIST";
5207 case 0x1200 + 9: return "HDM_GETIMAGELIST";
5208 case 0x1200 + 15: return "HDM_ORDERTOINDEX";
5209 case 0x1200 + 16: return "HDM_CREATEDRAGIMAGE";
5210 case 0x1200 + 17: return "HDM_GETORDERARRAY";
5211 case 0x1200 + 18: return "HDM_SETORDERARRAY";
5212 case 0x1200 + 19: return "HDM_SETHOTDIVIDER";
5213
5214 // tab control
5215 case 0x1300 + 2: return "TCM_GETIMAGELIST";
5216 case 0x1300 + 3: return "TCM_SETIMAGELIST";
5217 case 0x1300 + 4: return "TCM_GETITEMCOUNT";
5218 case 0x1300 + 5: return "TCM_GETITEMA";
5219 case 0x1300 + 60: return "TCM_GETITEMW";
5220 case 0x1300 + 6: return "TCM_SETITEMA";
5221 case 0x1300 + 61: return "TCM_SETITEMW";
5222 case 0x1300 + 7: return "TCM_INSERTITEMA";
5223 case 0x1300 + 62: return "TCM_INSERTITEMW";
5224 case 0x1300 + 8: return "TCM_DELETEITEM";
5225 case 0x1300 + 9: return "TCM_DELETEALLITEMS";
5226 case 0x1300 + 10: return "TCM_GETITEMRECT";
5227 case 0x1300 + 11: return "TCM_GETCURSEL";
5228 case 0x1300 + 12: return "TCM_SETCURSEL";
5229 case 0x1300 + 13: return "TCM_HITTEST";
5230 case 0x1300 + 14: return "TCM_SETITEMEXTRA";
5231 case 0x1300 + 40: return "TCM_ADJUSTRECT";
5232 case 0x1300 + 41: return "TCM_SETITEMSIZE";
5233 case 0x1300 + 42: return "TCM_REMOVEIMAGE";
5234 case 0x1300 + 43: return "TCM_SETPADDING";
5235 case 0x1300 + 44: return "TCM_GETROWCOUNT";
5236 case 0x1300 + 45: return "TCM_GETTOOLTIPS";
5237 case 0x1300 + 46: return "TCM_SETTOOLTIPS";
5238 case 0x1300 + 47: return "TCM_GETCURFOCUS";
5239 case 0x1300 + 48: return "TCM_SETCURFOCUS";
5240 case 0x1300 + 49: return "TCM_SETMINTABWIDTH";
5241 case 0x1300 + 50: return "TCM_DESELECTALL";
5242
5243 // toolbar
5244 case WM_USER+1: return "TB_ENABLEBUTTON";
5245 case WM_USER+2: return "TB_CHECKBUTTON";
5246 case WM_USER+3: return "TB_PRESSBUTTON";
5247 case WM_USER+4: return "TB_HIDEBUTTON";
5248 case WM_USER+5: return "TB_INDETERMINATE";
5249 case WM_USER+9: return "TB_ISBUTTONENABLED";
5250 case WM_USER+10: return "TB_ISBUTTONCHECKED";
5251 case WM_USER+11: return "TB_ISBUTTONPRESSED";
5252 case WM_USER+12: return "TB_ISBUTTONHIDDEN";
5253 case WM_USER+13: return "TB_ISBUTTONINDETERMINATE";
5254 case WM_USER+17: return "TB_SETSTATE";
5255 case WM_USER+18: return "TB_GETSTATE";
5256 case WM_USER+19: return "TB_ADDBITMAP";
5257 case WM_USER+20: return "TB_ADDBUTTONS";
5258 case WM_USER+21: return "TB_INSERTBUTTON";
5259 case WM_USER+22: return "TB_DELETEBUTTON";
5260 case WM_USER+23: return "TB_GETBUTTON";
5261 case WM_USER+24: return "TB_BUTTONCOUNT";
5262 case WM_USER+25: return "TB_COMMANDTOINDEX";
5263 case WM_USER+26: return "TB_SAVERESTOREA";
5264 case WM_USER+76: return "TB_SAVERESTOREW";
5265 case WM_USER+27: return "TB_CUSTOMIZE";
5266 case WM_USER+28: return "TB_ADDSTRINGA";
5267 case WM_USER+77: return "TB_ADDSTRINGW";
5268 case WM_USER+29: return "TB_GETITEMRECT";
5269 case WM_USER+30: return "TB_BUTTONSTRUCTSIZE";
5270 case WM_USER+31: return "TB_SETBUTTONSIZE";
5271 case WM_USER+32: return "TB_SETBITMAPSIZE";
5272 case WM_USER+33: return "TB_AUTOSIZE";
5273 case WM_USER+35: return "TB_GETTOOLTIPS";
5274 case WM_USER+36: return "TB_SETTOOLTIPS";
5275 case WM_USER+37: return "TB_SETPARENT";
5276 case WM_USER+39: return "TB_SETROWS";
5277 case WM_USER+40: return "TB_GETROWS";
5278 case WM_USER+42: return "TB_SETCMDID";
5279 case WM_USER+43: return "TB_CHANGEBITMAP";
5280 case WM_USER+44: return "TB_GETBITMAP";
5281 case WM_USER+45: return "TB_GETBUTTONTEXTA";
5282 case WM_USER+75: return "TB_GETBUTTONTEXTW";
5283 case WM_USER+46: return "TB_REPLACEBITMAP";
5284 case WM_USER+47: return "TB_SETINDENT";
5285 case WM_USER+48: return "TB_SETIMAGELIST";
5286 case WM_USER+49: return "TB_GETIMAGELIST";
5287 case WM_USER+50: return "TB_LOADIMAGES";
5288 case WM_USER+51: return "TB_GETRECT";
5289 case WM_USER+52: return "TB_SETHOTIMAGELIST";
5290 case WM_USER+53: return "TB_GETHOTIMAGELIST";
5291 case WM_USER+54: return "TB_SETDISABLEDIMAGELIST";
5292 case WM_USER+55: return "TB_GETDISABLEDIMAGELIST";
5293 case WM_USER+56: return "TB_SETSTYLE";
5294 case WM_USER+57: return "TB_GETSTYLE";
5295 case WM_USER+58: return "TB_GETBUTTONSIZE";
5296 case WM_USER+59: return "TB_SETBUTTONWIDTH";
5297 case WM_USER+60: return "TB_SETMAXTEXTROWS";
5298 case WM_USER+61: return "TB_GETTEXTROWS";
5299 case WM_USER+41: return "TB_GETBITMAPFLAGS";
5300
5301 #endif //WIN32
5302
5303 default:
5304 static char s_szBuf[128];
5305 sprintf(s_szBuf, "<unknown message = %d>", message);
5306 return s_szBuf;
5307 }
5308 }
5309 #endif //__WXDEBUG__
5310
5311 static void TranslateKbdEventToMouse(wxWindowMSW *win,
5312 int *x, int *y, WPARAM *flags)
5313 {
5314 // construct the key mask
5315 WPARAM& fwKeys = *flags;
5316
5317 fwKeys = MK_RBUTTON;
5318 if ( wxIsCtrlDown() )
5319 fwKeys |= MK_CONTROL;
5320 if ( wxIsShiftDown() )
5321 fwKeys |= MK_SHIFT;
5322
5323 // simulate right mouse button click
5324 DWORD dwPos = ::GetMessagePos();
5325 *x = GET_X_LPARAM(dwPos);
5326 *y = GET_Y_LPARAM(dwPos);
5327
5328 win->ScreenToClient(x, y);
5329 }
5330
5331 static TEXTMETRIC wxGetTextMetrics(const wxWindowMSW *win)
5332 {
5333 // prepare the DC
5334 TEXTMETRIC tm;
5335 HWND hwnd = GetHwndOf(win);
5336 HDC hdc = ::GetDC(hwnd);
5337
5338 #if !wxDIALOG_UNIT_COMPATIBILITY
5339 // and select the current font into it
5340 HFONT hfont = GetHfontOf(win->GetFont());
5341 if ( hfont )
5342 {
5343 hfont = (HFONT)::SelectObject(hdc, hfont);
5344 }
5345 #endif
5346
5347 // finally retrieve the text metrics from it
5348 GetTextMetrics(hdc, &tm);
5349
5350 #if !wxDIALOG_UNIT_COMPATIBILITY
5351 // and clean up
5352 if ( hfont )
5353 {
5354 (void)::SelectObject(hdc, hfont);
5355 }
5356 #endif
5357
5358 ::ReleaseDC(hwnd, hdc);
5359
5360 return tm;
5361 }
5362
5363 // Find the wxWindow at the current mouse position, returning the mouse
5364 // position.
5365 wxWindow* wxFindWindowAtPointer(wxPoint& pt)
5366 {
5367 pt = wxGetMousePosition();
5368 return wxFindWindowAtPoint(pt);
5369 }
5370
5371 wxWindow* wxFindWindowAtPoint(const wxPoint& pt)
5372 {
5373 POINT pt2;
5374 pt2.x = pt.x;
5375 pt2.y = pt.y;
5376 HWND hWndHit = ::WindowFromPoint(pt2);
5377
5378 wxWindow* win = wxFindWinFromHandle((WXHWND) hWndHit) ;
5379 HWND hWnd = hWndHit;
5380
5381 // Try to find a window with a wxWindow associated with it
5382 while (!win && (hWnd != 0))
5383 {
5384 hWnd = ::GetParent(hWnd);
5385 win = wxFindWinFromHandle((WXHWND) hWnd) ;
5386 }
5387 return win;
5388 }
5389
5390 // Get the current mouse position.
5391 wxPoint wxGetMousePosition()
5392 {
5393 POINT pt;
5394 GetCursorPos( & pt );
5395
5396 return wxPoint(pt.x, pt.y);
5397 }
5398