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