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