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