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