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