src/msw/window.cpp

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