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