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