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