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