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