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