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