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