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