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