src/msw/window.cpp

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