src/msw/window.cpp

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