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