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