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