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
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // ===========================================================================
  13 // declarations
  14 // ===========================================================================
  15
  16 // ---------------------------------------------------------------------------
  17 // headers
  18 // ---------------------------------------------------------------------------
  19
  20 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
  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 "wx/msw/wrapwin.h"
  33     #include "wx/window.h"
  34     #include "wx/accel.h"
  35     #include "wx/setup.h"
  36     #include "wx/menu.h"
  37     #include "wx/dc.h"
  38     #include "wx/dcclient.h"
  39     #include "wx/dcmemory.h"
  40     #include "wx/utils.h"
  41     #include "wx/app.h"
  42     #include "wx/layout.h"
  43     #include "wx/dialog.h"
  44     #include "wx/frame.h"
  45     #include "wx/listbox.h"
  46     #include "wx/button.h"
  47     #include "wx/msgdlg.h"
  48     #include "wx/settings.h"
  49     #include "wx/statbox.h"
  50 #endif
  51
  52 #if wxUSE_OWNER_DRAWN && !defined(__WXUNIVERSAL__)
  53     #include "wx/ownerdrw.h"
  54 #endif
  55
  56 #include "wx/module.h"
  57
  58 #if wxUSE_DRAG_AND_DROP
  59     #include "wx/dnd.h"
  60 #endif
  61
  62 #if wxUSE_ACCESSIBILITY
  63     #include "wx/access.h"
  64     #include <ole2.h>
  65     #include <oleacc.h>
  66     #ifndef WM_GETOBJECT
  67         #define WM_GETOBJECT 0x003D
  68     #endif
  69     #ifndef OBJID_CLIENT
  70         #define OBJID_CLIENT 0xFFFFFFFC
  71     #endif
  72 #endif
  73
  74 #include "wx/menuitem.h"
  75 #include "wx/log.h"
  76
  77 #include "wx/msw/private.h"
  78
  79 #if wxUSE_TOOLTIPS
  80     #include "wx/tooltip.h"
  81 #endif
  82
  83 #if wxUSE_CARET
  84     #include "wx/caret.h"
  85 #endif // wxUSE_CARET
  86
  87 #if wxUSE_SPINCTRL
  88     #include "wx/spinctrl.h"
  89 #endif // wxUSE_SPINCTRL
  90
  91 #include "wx/intl.h"
  92 #include "wx/log.h"
  93
  94 #include "wx/textctrl.h"
  95 #include "wx/notebook.h"
  96 #include "wx/listctrl.h"
  97
  98 #include <string.h>
  99
 100 #if (!defined(__GNUWIN32_OLD__) && !defined(__WXMICROWIN__) /* && !defined(__WXWINCE__) */ ) || defined(__CYGWIN10__)
 101     #include <shellapi.h>
 102     #include <mmsystem.h>
 103 #endif
 104
 105 #ifdef __WIN32__
 106     #include <windowsx.h>
 107 #endif
 108
 109 #if (!defined(__GNUWIN32_OLD__) && !defined(__WXMICROWIN__) /* && !defined(__WXWINCE__) */ ) || defined(__CYGWIN10__)
 110     #ifdef __WIN95__
 111         #include <commctrl.h>
 112     #endif
 113 #elif !defined(__WXMICROWIN__) && !defined(__WXWINCE__) // broken compiler
 114     #include "wx/msw/gnuwin32/extra.h"
 115 #endif
 116
 117 #include "wx/msw/missing.h"
 118
 119 #if defined(__WXWINCE__)
 120 #include "wx/msw/wince/missing.h"
 121 #endif
 122
 123 // ---------------------------------------------------------------------------
 124 // global variables
 125 // ---------------------------------------------------------------------------
 126
 127 #if wxUSE_MENUS_NATIVE
 128 wxMenu *wxCurrentPopupMenu = NULL;
 129 #endif // wxUSE_MENUS_NATIVE
 130
 131 #ifdef __WXWINCE__
 132 extern       wxChar *wxCanvasClassName;
 133 #else
 134 extern const wxChar *wxCanvasClassName;
 135 #endif
 136
 137 // true if we had already created the std colour map, used by
 138 // wxGetStdColourMap() and wxWindow::OnSysColourChanged()           (FIXME-MT)
 139 static bool gs_hasStdCmap = false;
 140
 141 // ---------------------------------------------------------------------------
 142 // private functions
 143 // ---------------------------------------------------------------------------
 144
 145 // the window proc for all our windows
 146 LRESULT WXDLLEXPORT APIENTRY _EXPORT wxWndProc(HWND hWnd, UINT message,
 147                                    WPARAM wParam, LPARAM lParam);
 148
 149
 150 #ifdef  __WXDEBUG__
 151     const char *wxGetMessageName(int message);
 152 #endif  //__WXDEBUG__
 153
 154 void wxRemoveHandleAssociation(wxWindowMSW *win);
 155 extern void wxAssociateWinWithHandle(HWND hWnd, wxWindowMSW *win);
 156 wxWindow *wxFindWinFromHandle(WXHWND hWnd);
 157
 158 // this magical function is used to translate VK_APPS key presses to right
 159 // mouse clicks
 160 static void TranslateKbdEventToMouse(wxWindowMSW *win,
 161                                      int *x, int *y, WPARAM *flags);
 162
 163 // get the text metrics for the current font
 164 static TEXTMETRIC wxGetTextMetrics(const wxWindowMSW *win);
 165
 166 // find the window for the mouse event at the specified position
 167 static wxWindowMSW *FindWindowForMouseEvent(wxWindowMSW *win, int *x, int *y); //TW:REQ:Univ
 168
 169 // wrapper around BringWindowToTop() API
 170 static inline void wxBringWindowToTop(HWND hwnd)
 171 {
 172 #ifdef __WXMICROWIN__
 173     // It seems that MicroWindows brings the _parent_ of the window to the top,
 174     // which can be the wrong one.
 175
 176     // activate (set focus to) specified window
 177     ::SetFocus(hwnd);
 178 #endif
 179
 180     // raise top level parent to top of z order
 181     if (!::SetWindowPos(hwnd, HWND_TOP, 0, 0, 0, 0, SWP_NOMOVE | SWP_NOSIZE))
 182     {
 183         wxLogLastError(_T("SetWindowPos"));
 184     }
 185 }
 186
 187 #ifndef __WXWINCE__
 188
 189 // ensure that all our parent windows have WS_EX_CONTROLPARENT style
 190 static void EnsureParentHasControlParentStyle(wxWindow *parent)
 191 {
 192     /*
 193        If we have WS_EX_CONTROLPARENT flag we absolutely *must* set it for our
 194        parent as well as otherwise several Win32 functions using
 195        GetNextDlgTabItem() to iterate over all controls such as
 196        IsDialogMessage() or DefDlgProc() would enter an infinite loop: indeed,
 197        all of them iterate over all the controls starting from the currently
 198        focused one and stop iterating when they get back to the focus but
 199        unless all parents have WS_EX_CONTROLPARENT bit set, they would never
 200        get back to the initial (focused) window: as we do have this style,
 201        GetNextDlgTabItem() will leave this window and continue in its parent,
 202        but if the parent doesn't have it, it wouldn't recurse inside it later
 203        on and so wouldn't have a chance of getting back to this window neither.
 204      */
 205     while ( parent && !parent->IsTopLevel() )
 206     {
 207         LONG exStyle = ::GetWindowLong(GetHwndOf(parent), GWL_EXSTYLE);
 208         if ( !(exStyle & WS_EX_CONTROLPARENT) )
 209         {
 210             // force the parent to have this style
 211             ::SetWindowLong(GetHwndOf(parent), GWL_EXSTYLE,
 212                             exStyle | WS_EX_CONTROLPARENT);
 213         }
 214
 215         parent = parent->GetParent();
 216     }
 217 }
 218
 219 #endif // !__WXWINCE__
 220
 221 // ---------------------------------------------------------------------------
 222 // event tables
 223 // ---------------------------------------------------------------------------
 224
 225 // in wxUniv/MSW this class is abstract because it doesn't have DoPopupMenu()
 226 // method
 227 #ifdef __WXUNIVERSAL__
 228     IMPLEMENT_ABSTRACT_CLASS(wxWindowMSW, wxWindowBase)
 229 #else // __WXMSW__
 230 #if wxUSE_EXTENDED_RTTI
 231
 232 // windows that are created from a parent window during its Create method, eg. spin controls in a calendar controls
 233 // must never been streamed out separately otherwise chaos occurs. Right now easiest is to test for negative ids, as
 234 // windows with negative ids never can be recreated anyway
 235
 236 bool wxWindowStreamingCallback( const wxObject *object, wxWriter * , wxPersister * , wxxVariantArray & )
 237 {
 238     const wxWindow * win = dynamic_cast<const wxWindow*>(object) ;
 239     if ( win && win->GetId() < 0 )
 240         return false ;
 241     return true ;
 242 }
 243
 244 IMPLEMENT_DYNAMIC_CLASS_XTI_CALLBACK(wxWindow, wxWindowBase,"wx/window.h", wxWindowStreamingCallback)
 245
 246 // make wxWindowList known before the property is used
 247
 248 wxCOLLECTION_TYPE_INFO( wxWindow* , wxWindowList ) ;
 249
 250 template<> void wxCollectionToVariantArray( wxWindowList const &theList, wxxVariantArray &value)
 251 {
 252     wxListCollectionToVariantArray<wxWindowList::compatibility_iterator>( theList , value ) ;
 253 }
 254
 255 WX_DEFINE_FLAGS( wxWindowStyle )
 256
 257 wxBEGIN_FLAGS( wxWindowStyle )
 258     // new style border flags, we put them first to
 259     // use them for streaming out
 260
 261     wxFLAGS_MEMBER(wxBORDER_SIMPLE)
 262     wxFLAGS_MEMBER(wxBORDER_SUNKEN)
 263     wxFLAGS_MEMBER(wxBORDER_DOUBLE)
 264     wxFLAGS_MEMBER(wxBORDER_RAISED)
 265     wxFLAGS_MEMBER(wxBORDER_STATIC)
 266     wxFLAGS_MEMBER(wxBORDER_NONE)
 267
 268     // old style border flags
 269     wxFLAGS_MEMBER(wxSIMPLE_BORDER)
 270     wxFLAGS_MEMBER(wxSUNKEN_BORDER)
 271     wxFLAGS_MEMBER(wxDOUBLE_BORDER)
 272     wxFLAGS_MEMBER(wxRAISED_BORDER)
 273     wxFLAGS_MEMBER(wxSTATIC_BORDER)
 274     wxFLAGS_MEMBER(wxBORDER)
 275
 276     // standard window styles
 277     wxFLAGS_MEMBER(wxTAB_TRAVERSAL)
 278     wxFLAGS_MEMBER(wxCLIP_CHILDREN)
 279     wxFLAGS_MEMBER(wxTRANSPARENT_WINDOW)
 280     wxFLAGS_MEMBER(wxWANTS_CHARS)
 281     wxFLAGS_MEMBER(wxFULL_REPAINT_ON_RESIZE)
 282     wxFLAGS_MEMBER(wxALWAYS_SHOW_SB )
 283     wxFLAGS_MEMBER(wxVSCROLL)
 284     wxFLAGS_MEMBER(wxHSCROLL)
 285
 286 wxEND_FLAGS( wxWindowStyle )
 287
 288 wxBEGIN_PROPERTIES_TABLE(wxWindow)
 289     wxEVENT_PROPERTY( Close , wxEVT_CLOSE_WINDOW , wxCloseEvent)
 290     wxEVENT_PROPERTY( Create , wxEVT_CREATE , wxWindowCreateEvent )
 291     wxEVENT_PROPERTY( Destroy , wxEVT_DESTROY , wxWindowDestroyEvent )
 292     // Always constructor Properties first
 293
 294     wxREADONLY_PROPERTY( Parent,wxWindow*, GetParent, EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
 295     wxPROPERTY( Id,wxWindowID, SetId, GetId, wxID_ANY, 0 /*flags*/ , wxT("Helpstring") , wxT("group") )
 296     wxPROPERTY( Position,wxPoint, SetPosition , GetPosition, wxDefaultPosition , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // pos
 297     wxPROPERTY( Size,wxSize, SetSize, GetSize, wxDefaultSize , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // size
 298     wxPROPERTY( WindowStyle , long , SetWindowStyleFlag , GetWindowStyleFlag , EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // style
 299
 300     // Then all relations of the object graph
 301
 302     wxREADONLY_PROPERTY_COLLECTION( Children , wxWindowList , wxWindowBase* , GetWindowChildren , wxPROP_OBJECT_GRAPH /*flags*/ , wxT("Helpstring") , wxT("group"))
 303
 304    // and finally all other properties
 305
 306     wxPROPERTY( ExtraStyle , long , SetExtraStyle , GetExtraStyle , EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // extstyle
 307     wxPROPERTY( BackgroundColour , wxColour , SetBackgroundColour , GetBackgroundColour , EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // bg
 308     wxPROPERTY( ForegroundColour , wxColour , SetForegroundColour , GetForegroundColour , EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // fg
 309     wxPROPERTY( Enabled , bool , Enable , IsEnabled , wxxVariant((bool)true) , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
 310     wxPROPERTY( Shown , bool , Show , IsShown , wxxVariant((bool)true) , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
 311 #if 0
 312     // possible property candidates (not in xrc) or not valid in all subclasses
 313     wxPROPERTY( Title,wxString, SetTitle, GetTitle, wxT("") )
 314     wxPROPERTY( Font , wxFont , SetFont , GetWindowFont  , )
 315     wxPROPERTY( Label,wxString, SetLabel, GetLabel, wxT("") )
 316     // MaxHeight, Width , MinHeight , Width
 317     // TODO switch label to control and title to toplevels
 318
 319     wxPROPERTY( ThemeEnabled , bool , SetThemeEnabled , GetThemeEnabled , )
 320     //wxPROPERTY( Cursor , wxCursor , SetCursor , GetCursor , )
 321     // wxPROPERTY( ToolTip , wxString , SetToolTip , GetToolTipText , )
 322     wxPROPERTY( AutoLayout , bool , SetAutoLayout , GetAutoLayout , )
 323
 324
 325
 326 #endif
 327 wxEND_PROPERTIES_TABLE()
 328
 329 wxBEGIN_HANDLERS_TABLE(wxWindow)
 330 wxEND_HANDLERS_TABLE()
 331
 332 wxCONSTRUCTOR_DUMMY(wxWindow)
 333
 334 #else
 335     IMPLEMENT_DYNAMIC_CLASS(wxWindow, wxWindowBase)
 336 #endif
 337 #endif // __WXUNIVERSAL__/__WXMSW__
 338
 339 BEGIN_EVENT_TABLE(wxWindowMSW, wxWindowBase)
 340     EVT_ERASE_BACKGROUND(wxWindowMSW::OnEraseBackground)
 341     EVT_SYS_COLOUR_CHANGED(wxWindowMSW::OnSysColourChanged)
 342     EVT_INIT_DIALOG(wxWindowMSW::OnInitDialog)
 343 END_EVENT_TABLE()
 344
 345 // ===========================================================================
 346 // implementation
 347 // ===========================================================================
 348
 349 // ---------------------------------------------------------------------------
 350 // wxWindow utility functions
 351 // ---------------------------------------------------------------------------
 352
 353 // Find an item given the MS Windows id
 354 wxWindow *wxWindowMSW::FindItem(long id) const
 355 {
 356 #if wxUSE_CONTROLS
 357     wxControl *item = wxDynamicCastThis(wxControl);
 358     if ( item )
 359     {
 360         // is it we or one of our "internal" children?
 361         if ( item->GetId() == id
 362 #ifndef __WXUNIVERSAL__
 363                 || (item->GetSubcontrols().Index(id) != wxNOT_FOUND)
 364 #endif // __WXUNIVERSAL__
 365            )
 366         {
 367             return item;
 368         }
 369     }
 370 #endif // wxUSE_CONTROLS
 371
 372     wxWindowList::compatibility_iterator current = GetChildren().GetFirst();
 373     while (current)
 374     {
 375         wxWindow *childWin = current->GetData();
 376
 377         wxWindow *wnd = childWin->FindItem(id);
 378         if ( wnd )
 379             return wnd;
 380
 381         current = current->GetNext();
 382     }
 383
 384     return NULL;
 385 }
 386
 387 // Find an item given the MS Windows handle
 388 wxWindow *wxWindowMSW::FindItemByHWND(WXHWND hWnd, bool controlOnly) const
 389 {
 390     wxWindowList::compatibility_iterator current = GetChildren().GetFirst();
 391     while (current)
 392     {
 393         wxWindow *parent = current->GetData();
 394
 395         // Do a recursive search.
 396         wxWindow *wnd = parent->FindItemByHWND(hWnd);
 397         if ( wnd )
 398             return wnd;
 399
 400         if ( !controlOnly
 401 #if wxUSE_CONTROLS
 402                 || parent->IsKindOf(CLASSINFO(wxControl))
 403 #endif // wxUSE_CONTROLS
 404            )
 405         {
 406             wxWindow *item = current->GetData();
 407             if ( item->GetHWND() == hWnd )
 408                 return item;
 409             else
 410             {
 411                 if ( item->ContainsHWND(hWnd) )
 412                     return item;
 413             }
 414         }
 415
 416         current = current->GetNext();
 417     }
 418     return NULL;
 419 }
 420
 421 // Default command handler
 422 bool wxWindowMSW::MSWCommand(WXUINT WXUNUSED(param), WXWORD WXUNUSED(id))
 423 {
 424     return false;
 425 }
 426
 427 // ----------------------------------------------------------------------------
 428 // constructors and such
 429 // ----------------------------------------------------------------------------
 430
 431 void wxWindowMSW::Init()
 432 {
 433     // MSW specific
 434     m_isBeingDeleted = false;
 435     m_oldWndProc = NULL;
 436     m_mouseInWindow = false;
 437     m_lastKeydownProcessed = false;
 438
 439     m_childrenDisabled = NULL;
 440     m_frozenness = 0;
 441
 442     // wxWnd
 443     m_hMenu = 0;
 444
 445     m_hWnd = 0;
 446
 447     m_xThumbSize = 0;
 448     m_yThumbSize = 0;
 449
 450 #if wxUSE_MOUSEEVENT_HACK
 451     m_lastMouseX =
 452     m_lastMouseY = -1;
 453     m_lastMouseEvent = -1;
 454 #endif // wxUSE_MOUSEEVENT_HACK
 455 }
 456
 457 // Destructor
 458 wxWindowMSW::~wxWindowMSW()
 459 {
 460     m_isBeingDeleted = true;
 461
 462 #ifndef __WXUNIVERSAL__
 463     // VS: make sure there's no wxFrame with last focus set to us:
 464     for ( wxWindow *win = GetParent(); win; win = win->GetParent() )
 465     {
 466         wxTopLevelWindow *frame = wxDynamicCast(win, wxTopLevelWindow);
 467         if ( frame )
 468         {
 469             if ( frame->GetLastFocus() == this )
 470             {
 471                 frame->SetLastFocus(NULL);
 472             }
 473             break;
 474         }
 475     }
 476 #endif // __WXUNIVERSAL__
 477
 478     // VS: destroy children first and _then_ detach *this from its parent.
 479     //     If we'd do it the other way around, children wouldn't be able
 480     //     find their parent frame (see above).
 481     DestroyChildren();
 482
 483     if ( m_hWnd )
 484     {
 485         // VZ: test temp removed to understand what really happens here
 486         //if (::IsWindow(GetHwnd()))
 487         {
 488             if ( !::DestroyWindow(GetHwnd()) )
 489                 wxLogLastError(wxT("DestroyWindow"));
 490         }
 491
 492         // remove hWnd <-> wxWindow association
 493         wxRemoveHandleAssociation(this);
 494     }
 495
 496     delete m_childrenDisabled;
 497 }
 498
 499 // real construction (Init() must have been called before!)
 500 bool wxWindowMSW::Create(wxWindow *parent,
 501                          wxWindowID id,
 502                          const wxPoint& pos,
 503                          const wxSize& size,
 504                          long style,
 505                          const wxString& name)
 506 {
 507     wxCHECK_MSG( parent, false, wxT("can't create wxWindow without parent") );
 508
 509     if ( !CreateBase(parent, id, pos, size, style, wxDefaultValidator, name) )
 510         return false;
 511
 512     parent->AddChild(this);
 513
 514     WXDWORD exstyle;
 515     DWORD msflags = MSWGetCreateWindowFlags(&exstyle);
 516
 517 #ifdef __WXUNIVERSAL__
 518     // no borders, we draw them ourselves
 519     exstyle &= ~(WS_EX_DLGMODALFRAME |
 520                  WS_EX_STATICEDGE |
 521                  WS_EX_CLIENTEDGE |
 522                  WS_EX_WINDOWEDGE);
 523     msflags &= ~WS_BORDER;
 524 #endif // wxUniversal
 525
 526     if ( IsShown() )
 527     {
 528         msflags |= WS_VISIBLE;
 529     }
 530
 531     if ( !MSWCreate(wxCanvasClassName, NULL, pos, size, msflags, exstyle) )
 532         return false;
 533
 534     InheritAttributes();
 535
 536     return true;
 537 }
 538
 539 // ---------------------------------------------------------------------------
 540 // basic operations
 541 // ---------------------------------------------------------------------------
 542
 543 void wxWindowMSW::SetFocus()
 544 {
 545     HWND hWnd = GetHwnd();
 546     wxCHECK_RET( hWnd, _T("can't set focus to invalid window") );
 547
 548 #if !defined(__WXMICROWIN__) && !defined(__WXWINCE__)
 549     ::SetLastError(0);
 550 #endif
 551
 552     if ( !::SetFocus(hWnd) )
 553     {
 554 #if defined(__WXDEBUG__) && !defined(__WXMICROWIN__)
 555         // was there really an error?
 556         DWORD dwRes = ::GetLastError();
 557         if ( dwRes )
 558         {
 559             HWND hwndFocus = ::GetFocus();
 560             if ( hwndFocus != hWnd )
 561             {
 562                 wxLogApiError(_T("SetFocus"), dwRes);
 563             }
 564         }
 565 #endif // Debug
 566     }
 567 }
 568
 569 void wxWindowMSW::SetFocusFromKbd()
 570 {
 571     // when the focus is given to the control with DLGC_HASSETSEL style from
 572     // keyboard its contents should be entirely selected: this is what
 573     // ::IsDialogMessage() does and so we should do it as well to provide the
 574     // same LNF as the native programs
 575     if ( ::SendMessage(GetHwnd(), WM_GETDLGCODE, 0, 0) & DLGC_HASSETSEL )
 576     {
 577         ::SendMessage(GetHwnd(), EM_SETSEL, 0, -1);
 578     }
 579
 580     // do this after (maybe) setting the selection as like this when
 581     // wxEVT_SET_FOCUS handler is called, the selection would have been already
 582     // set correctly -- this may be important
 583     wxWindowBase::SetFocusFromKbd();
 584 }
 585
 586 // Get the window with the focus
 587 wxWindow *wxWindowBase::FindFocus()
 588 {
 589     HWND hWnd = ::GetFocus();
 590     if ( hWnd )
 591     {
 592         return wxGetWindowFromHWND((WXHWND)hWnd);
 593     }
 594
 595     return NULL;
 596 }
 597
 598 bool wxWindowMSW::Enable(bool enable)
 599 {
 600     if ( !wxWindowBase::Enable(enable) )
 601         return false;
 602
 603     HWND hWnd = GetHwnd();
 604     if ( hWnd )
 605         ::EnableWindow(hWnd, (BOOL)enable);
 606
 607     // the logic below doesn't apply to the top level windows -- otherwise
 608     // showing a modal dialog would result in total greying out (and ungreying
 609     // out later) of everything which would be really ugly
 610     if ( IsTopLevel() )
 611         return true;
 612
 613     // when the parent is disabled, all of its children should be disabled as
 614     // well but when it is enabled back, only those of the children which
 615     // hadn't been already disabled in the beginning should be enabled again,
 616     // so we have to keep the list of those children
 617     for ( wxWindowList::compatibility_iterator node = GetChildren().GetFirst();
 618           node;
 619           node = node->GetNext() )
 620     {
 621         wxWindow *child = node->GetData();
 622         if ( child->IsTopLevel() )
 623         {
 624             // the logic below doesn't apply to top level children
 625             continue;
 626         }
 627
 628         if ( enable )
 629         {
 630             // enable the child back unless it had been disabled before us
 631             if ( !m_childrenDisabled || !m_childrenDisabled->Find(child) )
 632                 child->Enable();
 633         }
 634         else // we're being disabled
 635         {
 636             if ( child->IsEnabled() )
 637             {
 638                 // disable it as children shouldn't stay enabled while the
 639                 // parent is not
 640                 child->Disable();
 641             }
 642             else // child already disabled, remember it
 643             {
 644                 // have we created the list of disabled children already?
 645                 if ( !m_childrenDisabled )
 646                     m_childrenDisabled = new wxWindowList;
 647
 648                 m_childrenDisabled->Append(child);
 649             }
 650         }
 651     }
 652
 653     if ( enable && m_childrenDisabled )
 654     {
 655         // we don't need this list any more, don't keep unused memory
 656         delete m_childrenDisabled;
 657         m_childrenDisabled = NULL;
 658     }
 659
 660     return true;
 661 }
 662
 663 bool wxWindowMSW::Show(bool show)
 664 {
 665     if ( !wxWindowBase::Show(show) )
 666         return false;
 667
 668     HWND hWnd = GetHwnd();
 669     int cshow = show ? SW_SHOW : SW_HIDE;
 670     ::ShowWindow(hWnd, cshow);
 671
 672     if ( show && IsTopLevel() )
 673     {
 674         wxBringWindowToTop(hWnd);
 675     }
 676
 677     return true;
 678 }
 679
 680 // Raise the window to the top of the Z order
 681 void wxWindowMSW::Raise()
 682 {
 683     wxBringWindowToTop(GetHwnd());
 684 }
 685
 686 // Lower the window to the bottom of the Z order
 687 void wxWindowMSW::Lower()
 688 {
 689     ::SetWindowPos(GetHwnd(), HWND_BOTTOM, 0, 0, 0, 0,
 690                    SWP_NOMOVE | SWP_NOSIZE | SWP_NOACTIVATE);
 691 }
 692
 693 void wxWindowMSW::SetTitle( const wxString& title)
 694 {
 695     SetWindowText(GetHwnd(), title.c_str());
 696 }
 697
 698 wxString wxWindowMSW::GetTitle() const
 699 {
 700     return wxGetWindowText(GetHWND());
 701 }
 702
 703 void wxWindowMSW::DoCaptureMouse()
 704 {
 705     HWND hWnd = GetHwnd();
 706     if ( hWnd )
 707     {
 708         ::SetCapture(hWnd);
 709     }
 710 }
 711
 712 void wxWindowMSW::DoReleaseMouse()
 713 {
 714     if ( !::ReleaseCapture() )
 715     {
 716         wxLogLastError(_T("ReleaseCapture"));
 717     }
 718 }
 719
 720 /* static */ wxWindow *wxWindowBase::GetCapture()
 721 {
 722     HWND hwnd = ::GetCapture();
 723     return hwnd ? wxFindWinFromHandle((WXHWND)hwnd) : (wxWindow *)NULL;
 724 }
 725
 726 bool wxWindowMSW::SetFont(const wxFont& font)
 727 {
 728     if ( !wxWindowBase::SetFont(font) )
 729     {
 730         // nothing to do
 731         return false;
 732     }
 733
 734     HWND hWnd = GetHwnd();
 735     if ( hWnd != 0 )
 736     {
 737         WXHANDLE hFont = m_font.GetResourceHandle();
 738
 739         wxASSERT_MSG( hFont, wxT("should have valid font") );
 740
 741         ::SendMessage(hWnd, WM_SETFONT, (WPARAM)hFont, MAKELPARAM(TRUE, 0));
 742     }
 743
 744     return true;
 745 }
 746 bool wxWindowMSW::SetCursor(const wxCursor& cursor)
 747 {
 748     if ( !wxWindowBase::SetCursor(cursor) )
 749     {
 750         // no change
 751         return false;
 752     }
 753
 754     if ( m_cursor.Ok() )
 755     {
 756         HWND hWnd = GetHwnd();
 757
 758         // Change the cursor NOW if we're within the correct window
 759         POINT point;
 760         ::GetCursorPos(&point);
 761
 762         RECT rect = wxGetWindowRect(hWnd);
 763
 764         if ( ::PtInRect(&rect, point) && !wxIsBusy() )
 765             ::SetCursor(GetHcursorOf(m_cursor));
 766     }
 767
 768     return true;
 769 }
 770
 771 void wxWindowMSW::WarpPointer (int x, int y)
 772 {
 773     ClientToScreen(&x, &y);
 774
 775     if ( !::SetCursorPos(x, y) )
 776     {
 777         wxLogLastError(_T("SetCursorPos"));
 778     }
 779 }
 780
 781 // ---------------------------------------------------------------------------
 782 // scrolling stuff
 783 // ---------------------------------------------------------------------------
 784
 785 // convert wxHORIZONTAL/wxVERTICAL to SB_HORZ/SB_VERT
 786 static inline int wxDirToWinStyle(int orient)
 787 {
 788     return orient == wxHORIZONTAL ? SB_HORZ : SB_VERT;
 789 }
 790
 791 inline int GetScrollPosition(HWND hWnd, int wOrient)
 792 {
 793 #ifdef __WXMICROWIN__
 794     return ::GetScrollPosWX(hWnd, wOrient);
 795 #else
 796     WinStruct<SCROLLINFO> scrollInfo;
 797     scrollInfo.cbSize = sizeof(SCROLLINFO);
 798     scrollInfo.fMask = SIF_POS;
 799     if ( !::GetScrollInfo(hWnd,
 800                           wOrient,
 801                           &scrollInfo) )
 802     {
 803         // Not neccessarily an error, if there are no scrollbars yet.
 804         // wxLogLastError(_T("GetScrollInfo"));
 805     }
 806     return scrollInfo.nPos;
 807 //    return ::GetScrollPos(hWnd, wOrient);
 808 #endif
 809 }
 810
 811 int wxWindowMSW::GetScrollPos(int orient) const
 812 {
 813     HWND hWnd = GetHwnd();
 814     wxCHECK_MSG( hWnd, 0, _T("no HWND in GetScrollPos") );
 815
 816     return GetScrollPosition(hWnd, orient == wxHORIZONTAL ? SB_HORZ : SB_VERT);
 817 }
 818
 819 // This now returns the whole range, not just the number
 820 // of positions that we can scroll.
 821 int wxWindowMSW::GetScrollRange(int orient) const
 822 {
 823     int maxPos;
 824     HWND hWnd = GetHwnd();
 825     if ( !hWnd )
 826         return 0;
 827 #if 0
 828     ::GetScrollRange(hWnd, orient == wxHORIZONTAL ? SB_HORZ : SB_VERT,
 829                      &minPos, &maxPos);
 830 #endif
 831     WinStruct<SCROLLINFO> scrollInfo;
 832     scrollInfo.fMask = SIF_RANGE;
 833     if ( !::GetScrollInfo(hWnd,
 834                           orient == wxHORIZONTAL ? SB_HORZ : SB_VERT,
 835                           &scrollInfo) )
 836     {
 837         // Most of the time this is not really an error, since the return
 838         // value can also be zero when there is no scrollbar yet.
 839         // wxLogLastError(_T("GetScrollInfo"));
 840     }
 841     maxPos = scrollInfo.nMax;
 842
 843     // undo "range - 1" done in SetScrollbar()
 844     return maxPos + 1;
 845 }
 846
 847 int wxWindowMSW::GetScrollThumb(int orient) const
 848 {
 849     return orient == wxHORIZONTAL ? m_xThumbSize : m_yThumbSize;
 850 }
 851
 852 void wxWindowMSW::SetScrollPos(int orient, int pos, bool refresh)
 853 {
 854     HWND hWnd = GetHwnd();
 855     wxCHECK_RET( hWnd, _T("SetScrollPos: no HWND") );
 856
 857     WinStruct<SCROLLINFO> info;
 858     info.nPage = 0;
 859     info.nMin = 0;
 860     info.nPos = pos;
 861     info.fMask = SIF_POS;
 862     if ( HasFlag(wxALWAYS_SHOW_SB) )
 863     {
 864         // disable scrollbar instead of removing it then
 865         info.fMask |= SIF_DISABLENOSCROLL;
 866     }
 867
 868     ::SetScrollInfo(hWnd, orient == wxHORIZONTAL ? SB_HORZ : SB_VERT,
 869                     &info, refresh);
 870 }
 871
 872 // New function that will replace some of the above.
 873 void wxWindowMSW::SetScrollbar(int orient,
 874                                int pos,
 875                                int pageSize,
 876                                int range,
 877                                bool refresh)
 878 {
 879     WinStruct<SCROLLINFO> info;
 880     info.nPage = pageSize;
 881     info.nMin = 0;              // range is nMax - nMin + 1
 882     info.nMax = range - 1;      //  as both nMax and nMax are inclusive
 883     info.nPos = pos;
 884     info.fMask = SIF_RANGE | SIF_PAGE | SIF_POS;
 885     if ( HasFlag(wxALWAYS_SHOW_SB) )
 886     {
 887         // disable scrollbar instead of removing it then
 888         info.fMask |= SIF_DISABLENOSCROLL;
 889     }
 890
 891     HWND hWnd = GetHwnd();
 892     if ( hWnd )
 893     {
 894         ::SetScrollInfo(hWnd, orient == wxHORIZONTAL ? SB_HORZ : SB_VERT,
 895                         &info, refresh);
 896     }
 897
 898     *(orient == wxHORIZONTAL ? &m_xThumbSize : &m_yThumbSize) = pageSize;
 899 }
 900
 901 void wxWindowMSW::ScrollWindow(int dx, int dy, const wxRect *prect)
 902 {
 903     RECT rect;
 904     RECT *pr;
 905     if ( prect )
 906     {
 907         rect.left = prect->x;
 908         rect.top = prect->y;
 909         rect.right = prect->x + prect->width;
 910         rect.bottom = prect->y + prect->height;
 911         pr = &rect;
 912     }
 913     else
 914     {
 915         pr = NULL;
 916
 917     }
 918
 919 #ifdef __WXWINCE__
 920     // FIXME: is this the exact equivalent of the line below?
 921     ::ScrollWindowEx(GetHwnd(), dx, dy, pr, pr, 0, 0, SW_SCROLLCHILDREN|SW_ERASE|SW_INVALIDATE);
 922 #else
 923     ::ScrollWindow(GetHwnd(), dx, dy, pr, pr);
 924 #endif
 925 }
 926
 927 static bool ScrollVertically(HWND hwnd, int kind, int count)
 928 {
 929     int posStart = GetScrollPosition(hwnd, SB_VERT);
 930
 931     int pos = posStart;
 932     for ( int n = 0; n < count; n++ )
 933     {
 934         ::SendMessage(hwnd, WM_VSCROLL, kind, 0);
 935
 936         int posNew = GetScrollPosition(hwnd, SB_VERT);
 937         if ( posNew == pos )
 938         {
 939             // don't bother to continue, we're already at top/bottom
 940             break;
 941         }
 942
 943         pos = posNew;
 944     }
 945
 946     return pos != posStart;
 947 }
 948
 949 bool wxWindowMSW::ScrollLines(int lines)
 950 {
 951     bool down = lines > 0;
 952
 953     return ScrollVertically(GetHwnd(),
 954                             down ? SB_LINEDOWN : SB_LINEUP,
 955                             down ? lines : -lines);
 956 }
 957
 958 bool wxWindowMSW::ScrollPages(int pages)
 959 {
 960     bool down = pages > 0;
 961
 962     return ScrollVertically(GetHwnd(),
 963                             down ? SB_PAGEDOWN : SB_PAGEUP,
 964                             down ? pages : -pages);
 965 }
 966
 967 // ---------------------------------------------------------------------------
 968 // subclassing
 969 // ---------------------------------------------------------------------------
 970
 971 void wxWindowMSW::SubclassWin(WXHWND hWnd)
 972 {
 973     wxASSERT_MSG( !m_oldWndProc, wxT("subclassing window twice?") );
 974
 975     HWND hwnd = (HWND)hWnd;
 976     wxCHECK_RET( ::IsWindow(hwnd), wxT("invalid HWND in SubclassWin") );
 977
 978     wxAssociateWinWithHandle(hwnd, this);
 979
 980     m_oldWndProc = (WXFARPROC)wxGetWindowProc((HWND)hWnd);
 981
 982     // we don't need to subclass the window of our own class (in the Windows
 983     // sense of the word)
 984     if ( !wxCheckWindowWndProc(hWnd, (WXFARPROC)wxWndProc) )
 985     {
 986         wxSetWindowProc(hwnd, wxWndProc);
 987     }
 988     else
 989     {
 990         // don't bother restoring it neither: this also makes it easy to
 991         // implement IsOfStandardClass() method which returns true for the
 992         // standard controls and false for the wxWidgets own windows as it can
 993         // simply check m_oldWndProc
 994         m_oldWndProc = NULL;
 995     }
 996 }
 997
 998 void wxWindowMSW::UnsubclassWin()
 999 {
1000     wxRemoveHandleAssociation(this);
1001
1002     // Restore old Window proc
1003     HWND hwnd = GetHwnd();
1004     if ( hwnd )
1005     {
1006         m_hWnd = 0;
1007
1008         wxCHECK_RET( ::IsWindow(hwnd), wxT("invalid HWND in UnsubclassWin") );
1009
1010         if ( m_oldWndProc )
1011         {
1012             if ( !wxCheckWindowWndProc((WXHWND)hwnd, m_oldWndProc) )
1013             {
1014                 wxSetWindowProc(hwnd, (WNDPROC)m_oldWndProc);
1015             }
1016
1017             m_oldWndProc = NULL;
1018         }
1019     }
1020 }
1021
1022 bool wxCheckWindowWndProc(WXHWND hWnd, WXFARPROC wndProc)
1023 {
1024     // Unicows note: the code below works, but only because WNDCLASS contains
1025     // original window handler rather that the unicows fake one. This may not
1026     // be on purpose, though; if it stops working with future versions of
1027     // unicows.dll, we can override unicows hooks by setting
1028     // Unicows_{Set,Get}WindowLong and Unicows_RegisterClass to our own
1029     // versions that keep track of fake<->real wnd proc mapping.
1030
1031     // On WinCE (at least), the wndproc comparison doesn't work,
1032     // so have to use something like this.
1033 #ifdef __WXWINCE__
1034     extern       wxChar *wxCanvasClassName;
1035     extern       wxChar *wxCanvasClassNameNR;
1036     extern const wxChar *wxMDIFrameClassName;
1037     extern const wxChar *wxMDIFrameClassNameNoRedraw;
1038     extern const wxChar *wxMDIChildFrameClassName;
1039     extern const wxChar *wxMDIChildFrameClassNameNoRedraw;
1040     wxString str(wxGetWindowClass(hWnd));
1041     if (str == wxCanvasClassName ||
1042         str == wxCanvasClassNameNR ||
1043         str == wxMDIFrameClassName ||
1044         str == wxMDIFrameClassNameNoRedraw ||
1045         str == wxMDIChildFrameClassName ||
1046         str == wxMDIChildFrameClassNameNoRedraw ||
1047         str == _T("wxTLWHiddenParent"))
1048         return true; // Effectively means don't subclass
1049     else
1050         return false;
1051 #else
1052     WNDCLASS cls;
1053     if ( !::GetClassInfo(wxGetInstance(), wxGetWindowClass(hWnd), &cls) )
1054     {
1055         wxLogLastError(_T("GetClassInfo"));
1056
1057         return false;
1058     }
1059
1060     return wndProc == (WXFARPROC)cls.lpfnWndProc;
1061 #endif
1062 }
1063
1064 // ----------------------------------------------------------------------------
1065 // Style handling
1066 // ----------------------------------------------------------------------------
1067
1068 void wxWindowMSW::SetWindowStyleFlag(long flags)
1069 {
1070     long flagsOld = GetWindowStyleFlag();
1071     if ( flags == flagsOld )
1072         return;
1073
1074     // update the internal variable
1075     wxWindowBase::SetWindowStyleFlag(flags);
1076
1077     // now update the Windows style as well if needed - and if the window had
1078     // been already created
1079     if ( !GetHwnd() )
1080         return;
1081
1082     WXDWORD exstyle, exstyleOld;
1083     long style = MSWGetStyle(flags, &exstyle),
1084          styleOld = MSWGetStyle(flagsOld, &exstyleOld);
1085
1086     if ( style != styleOld )
1087     {
1088         // some flags (e.g. WS_VISIBLE or WS_DISABLED) should not be changed by
1089         // this function so instead of simply setting the style to the new
1090         // value we clear the bits which were set in styleOld but are set in
1091         // the new one and set the ones which were not set before
1092         long styleReal = ::GetWindowLong(GetHwnd(), GWL_STYLE);
1093         styleReal &= ~styleOld;
1094         styleReal |= style;
1095
1096         ::SetWindowLong(GetHwnd(), GWL_STYLE, styleReal);
1097     }
1098
1099     // and the extended style
1100     if ( exstyle != exstyleOld )
1101     {
1102         long exstyleReal = ::GetWindowLong(GetHwnd(), GWL_EXSTYLE);
1103         exstyleReal &= ~exstyleOld;
1104         exstyleReal |= exstyle;
1105
1106         ::SetWindowLong(GetHwnd(), GWL_EXSTYLE, exstyleReal);
1107
1108         // we must call SetWindowPos() to flash the cached extended style and
1109         // also to make the change to wxSTAY_ON_TOP style take effect: just
1110         // setting the style simply doesn't work
1111         if ( !::SetWindowPos(GetHwnd(),
1112                              exstyleReal & WS_EX_TOPMOST ? HWND_TOPMOST
1113                                                          : HWND_NOTOPMOST,
1114                              0, 0, 0, 0,
1115                              SWP_NOMOVE | SWP_NOSIZE) )
1116         {
1117             wxLogLastError(_T("SetWindowPos"));
1118         }
1119     }
1120 }
1121
1122 WXDWORD wxWindowMSW::MSWGetStyle(long flags, WXDWORD *exstyle) const
1123 {
1124     // translate common wxWidgets styles to Windows ones
1125
1126     // most of windows are child ones, those which are not (such as
1127     // wxTopLevelWindow) should remove WS_CHILD in their MSWGetStyle()
1128     WXDWORD style = WS_CHILD;
1129
1130     if ( flags & wxCLIP_CHILDREN )
1131         style |= WS_CLIPCHILDREN;
1132
1133     if ( flags & wxCLIP_SIBLINGS )
1134         style |= WS_CLIPSIBLINGS;
1135
1136     if ( flags & wxVSCROLL )
1137         style |= WS_VSCROLL;
1138
1139     if ( flags & wxHSCROLL )
1140         style |= WS_HSCROLL;
1141
1142     const wxBorder border = GetBorder(flags);
1143
1144     // WS_BORDER is only required for wxBORDER_SIMPLE
1145     if ( border == wxBORDER_SIMPLE )
1146         style |= WS_BORDER;
1147
1148     // now deal with ext style if the caller wants it
1149     if ( exstyle )
1150     {
1151         *exstyle = 0;
1152
1153 #ifndef __WXWINCE__
1154         if ( flags & wxTRANSPARENT_WINDOW )
1155             *exstyle |= WS_EX_TRANSPARENT;
1156 #endif
1157
1158         switch ( border )
1159         {
1160             default:
1161             case wxBORDER_DEFAULT:
1162                 wxFAIL_MSG( _T("unknown border style") );
1163                 // fall through
1164
1165             case wxBORDER_NONE:
1166             case wxBORDER_SIMPLE:
1167                 break;
1168
1169             case wxBORDER_STATIC:
1170                 *exstyle |= WS_EX_STATICEDGE;
1171                 break;
1172
1173             case wxBORDER_RAISED:
1174                 *exstyle |= WS_EX_DLGMODALFRAME;
1175                 break;
1176
1177             case wxBORDER_SUNKEN:
1178                 *exstyle |= WS_EX_CLIENTEDGE;
1179                 style &= ~WS_BORDER;
1180                 break;
1181
1182             case wxBORDER_DOUBLE:
1183                 *exstyle |= WS_EX_DLGMODALFRAME;
1184                 break;
1185         }
1186
1187         // wxUniv doesn't use Windows dialog navigation functions at all
1188 #if !defined(__WXUNIVERSAL__) && !defined(__WXWINCE__)
1189         // to make the dialog navigation work with the nested panels we must
1190         // use this style (top level windows such as dialogs don't need it)
1191         if ( (flags & wxTAB_TRAVERSAL) && !IsTopLevel() )
1192         {
1193             *exstyle |= WS_EX_CONTROLPARENT;
1194         }
1195 #endif // __WXUNIVERSAL__
1196     }
1197
1198     return style;
1199 }
1200
1201 // Setup background and foreground colours correctly
1202 void wxWindowMSW::SetupColours()
1203 {
1204     if ( GetParent() )
1205         SetBackgroundColour(GetParent()->GetBackgroundColour());
1206 }
1207
1208 bool wxWindowMSW::IsMouseInWindow() const
1209 {
1210     // get the mouse position
1211     POINT pt;
1212     ::GetCursorPos(&pt);
1213
1214     // find the window which currently has the cursor and go up the window
1215     // chain until we find this window - or exhaust it
1216     HWND hwnd = ::WindowFromPoint(pt);
1217     while ( hwnd && (hwnd != GetHwnd()) )
1218         hwnd = ::GetParent(hwnd);
1219
1220     return hwnd != NULL;
1221 }
1222
1223 void wxWindowMSW::OnInternalIdle()
1224 {
1225     // Check if we need to send a LEAVE event
1226     if ( m_mouseInWindow )
1227     {
1228         // note that we should generate the leave event whether the window has
1229         // or doesn't have mouse capture
1230         if ( !IsMouseInWindow() )
1231         {
1232             // Generate a LEAVE event
1233             m_mouseInWindow = false;
1234
1235             // Unfortunately the mouse button and keyboard state may have
1236             // changed by the time the OnInternalIdle function is called, so 'state'
1237             // may be meaningless.
1238             int state = 0;
1239             if ( wxIsShiftDown() )
1240                 state |= MK_SHIFT;
1241             if ( wxIsCtrlDown() )
1242                 state |= MK_CONTROL;
1243             if ( GetKeyState( VK_LBUTTON ) )
1244                 state |= MK_LBUTTON;
1245             if ( GetKeyState( VK_MBUTTON ) )
1246                 state |= MK_MBUTTON;
1247             if ( GetKeyState( VK_RBUTTON ) )
1248                 state |= MK_RBUTTON;
1249
1250             POINT pt;
1251             if ( !::GetCursorPos(&pt) )
1252             {
1253                 wxLogLastError(_T("GetCursorPos"));
1254             }
1255
1256             // we need to have client coordinates here for symmetry with
1257             // wxEVT_ENTER_WINDOW
1258             RECT rect = wxGetWindowRect(GetHwnd());
1259             pt.x -= rect.left;
1260             pt.y -= rect.top;
1261
1262             wxMouseEvent event2(wxEVT_LEAVE_WINDOW);
1263             InitMouseEvent(event2, pt.x, pt.y, state);
1264
1265             (void)GetEventHandler()->ProcessEvent(event2);
1266         }
1267     }
1268
1269     if (wxUpdateUIEvent::CanUpdate(this))
1270         UpdateWindowUI(wxUPDATE_UI_FROMIDLE);
1271 }
1272
1273 // Set this window to be the child of 'parent'.
1274 bool wxWindowMSW::Reparent(wxWindowBase *parent)
1275 {
1276     if ( !wxWindowBase::Reparent(parent) )
1277         return false;
1278
1279     HWND hWndChild = GetHwnd();
1280     HWND hWndParent = GetParent() ? GetWinHwnd(GetParent()) : (HWND)0;
1281
1282     ::SetParent(hWndChild, hWndParent);
1283
1284 #ifndef __WXWINCE__
1285     if ( ::GetWindowLong(hWndChild, GWL_EXSTYLE) & WS_EX_CONTROLPARENT )
1286     {
1287         EnsureParentHasControlParentStyle(GetParent());
1288     }
1289 #endif // !__WXWINCE__
1290
1291     return true;
1292 }
1293
1294 static inline void SendSetRedraw(HWND hwnd, bool on)
1295 {
1296 #ifndef __WXMICROWIN__
1297     ::SendMessage(hwnd, WM_SETREDRAW, (WPARAM)on, 0);
1298 #endif
1299 }
1300
1301 void wxWindowMSW::Freeze()
1302 {
1303     if ( !m_frozenness++ )
1304     {
1305         SendSetRedraw(GetHwnd(), false);
1306     }
1307 }
1308
1309 void wxWindowMSW::Thaw()
1310 {
1311     wxASSERT_MSG( m_frozenness > 0, _T("Thaw() without matching Freeze()") );
1312
1313     if ( !--m_frozenness )
1314     {
1315         SendSetRedraw(GetHwnd(), true);
1316
1317         // we need to refresh everything or otherwise he invalidated area is not
1318         // repainted
1319         Refresh();
1320     }
1321 }
1322
1323 void wxWindowMSW::Refresh(bool eraseBack, const wxRect *rect)
1324 {
1325     HWND hWnd = GetHwnd();
1326     if ( hWnd )
1327     {
1328         if ( rect )
1329         {
1330             RECT mswRect;
1331             mswRect.left = rect->x;
1332             mswRect.top = rect->y;
1333             mswRect.right = rect->x + rect->width;
1334             mswRect.bottom = rect->y + rect->height;
1335
1336             ::InvalidateRect(hWnd, &mswRect, eraseBack);
1337         }
1338         else
1339             ::InvalidateRect(hWnd, NULL, eraseBack);
1340     }
1341 }
1342
1343 void wxWindowMSW::Update()
1344 {
1345     if ( !::UpdateWindow(GetHwnd()) )
1346     {
1347         wxLogLastError(_T("UpdateWindow"));
1348     }
1349
1350 #if !defined(__WXMICROWIN__) && !defined(__WXWINCE__)
1351     // just calling UpdateWindow() is not enough, what we did in our WM_PAINT
1352     // handler needs to be really drawn right now
1353     (void)::GdiFlush();
1354 #endif // __WIN32__
1355 }
1356
1357 // ---------------------------------------------------------------------------
1358 // drag and drop
1359 // ---------------------------------------------------------------------------
1360
1361
1362 #if wxUSE_DRAG_AND_DROP
1363 void wxWindowMSW::SetDropTarget(wxDropTarget *pDropTarget)
1364 {
1365     if ( m_dropTarget != 0 ) {
1366         m_dropTarget->Revoke(m_hWnd);
1367         delete m_dropTarget;
1368     }
1369
1370     m_dropTarget = pDropTarget;
1371     if ( m_dropTarget != 0 )
1372         m_dropTarget->Register(m_hWnd);
1373 }
1374 #endif // wxUSE_DRAG_AND_DROP
1375
1376 // old style file-manager drag&drop support: we retain the old-style
1377 // DragAcceptFiles in parallel with SetDropTarget.
1378 void wxWindowMSW::DragAcceptFiles(bool accept)
1379 {
1380 #if !defined(__WXWINCE__)
1381     HWND hWnd = GetHwnd();
1382     if ( hWnd )
1383         ::DragAcceptFiles(hWnd, (BOOL)accept);
1384 #endif
1385 }
1386
1387 // ----------------------------------------------------------------------------
1388 // tooltips
1389 // ----------------------------------------------------------------------------
1390
1391 #if wxUSE_TOOLTIPS
1392
1393 void wxWindowMSW::DoSetToolTip(wxToolTip *tooltip)
1394 {
1395     wxWindowBase::DoSetToolTip(tooltip);
1396
1397     if ( m_tooltip )
1398         m_tooltip->SetWindow((wxWindow *)this);
1399 }
1400
1401 #endif // wxUSE_TOOLTIPS
1402
1403 // ---------------------------------------------------------------------------
1404 // moving and resizing
1405 // ---------------------------------------------------------------------------
1406
1407 // Get total size
1408 void wxWindowMSW::DoGetSize(int *x, int *y) const
1409 {
1410     RECT rect = wxGetWindowRect(GetHwnd());
1411
1412     if ( x )
1413         *x = rect.right - rect.left;
1414     if ( y )
1415         *y = rect.bottom - rect.top;
1416 }
1417
1418 // Get size *available for subwindows* i.e. excluding menu bar etc.
1419 void wxWindowMSW::DoGetClientSize(int *x, int *y) const
1420 {
1421     RECT rect = wxGetClientRect(GetHwnd());
1422
1423     if ( x )
1424         *x = rect.right;
1425     if ( y )
1426         *y = rect.bottom;
1427 }
1428
1429 void wxWindowMSW::DoGetPosition(int *x, int *y) const
1430 {
1431     RECT rect = wxGetWindowRect(GetHwnd());
1432
1433     POINT point;
1434     point.x = rect.left;
1435     point.y = rect.top;
1436
1437     // we do the adjustments with respect to the parent only for the "real"
1438     // children, not for the dialogs/frames
1439     if ( !IsTopLevel() )
1440     {
1441         HWND hParentWnd = 0;
1442         wxWindow *parent = GetParent();
1443         if ( parent )
1444             hParentWnd = GetWinHwnd(parent);
1445
1446         // Since we now have the absolute screen coords, if there's a parent we
1447         // must subtract its top left corner
1448         if ( hParentWnd )
1449         {
1450             ::ScreenToClient(hParentWnd, &point);
1451         }
1452
1453         if ( parent )
1454         {
1455             // We may be faking the client origin. So a window that's really at (0,
1456             // 30) may appear (to wxWin apps) to be at (0, 0).
1457             wxPoint pt(parent->GetClientAreaOrigin());
1458             point.x -= pt.x;
1459             point.y -= pt.y;
1460         }
1461     }
1462
1463     if ( x )
1464         *x = point.x;
1465     if ( y )
1466         *y = point.y;
1467 }
1468
1469 void wxWindowMSW::DoScreenToClient(int *x, int *y) const
1470 {
1471     POINT pt;
1472     if ( x )
1473         pt.x = *x;
1474     if ( y )
1475         pt.y = *y;
1476
1477     ::ScreenToClient(GetHwnd(), &pt);
1478
1479     if ( x )
1480         *x = pt.x;
1481     if ( y )
1482         *y = pt.y;
1483 }
1484
1485 void wxWindowMSW::DoClientToScreen(int *x, int *y) const
1486 {
1487     POINT pt;
1488     if ( x )
1489         pt.x = *x;
1490     if ( y )
1491         pt.y = *y;
1492
1493     ::ClientToScreen(GetHwnd(), &pt);
1494
1495     if ( x )
1496         *x = pt.x;
1497     if ( y )
1498         *y = pt.y;
1499 }
1500
1501 void wxWindowMSW::DoMoveWindow(int x, int y, int width, int height)
1502 {
1503     // TODO: is this consistent with other platforms?
1504     // Still, negative width or height shouldn't be allowed
1505     if (width < 0)
1506         width = 0;
1507     if (height < 0)
1508         height = 0;
1509     if ( !::MoveWindow(GetHwnd(), x, y, width, height, IsShown() /*Repaint?*/) )
1510     {
1511         wxLogLastError(wxT("MoveWindow"));
1512     }
1513 }
1514
1515 // set the size of the window: if the dimensions are positive, just use them,
1516 // but if any of them is equal to -1, it means that we must find the value for
1517 // it ourselves (unless sizeFlags contains wxSIZE_ALLOW_MINUS_ONE flag, in
1518 // which case -1 is a valid value for x and y)
1519 //
1520 // If sizeFlags contains wxSIZE_AUTO_WIDTH/HEIGHT flags (default), we calculate
1521 // the width/height to best suit our contents, otherwise we reuse the current
1522 // width/height
1523 void wxWindowMSW::DoSetSize(int x, int y, int width, int height, int sizeFlags)
1524 {
1525     // get the current size and position...
1526     int currentX, currentY;
1527     GetPosition(&currentX, &currentY);
1528     int currentW,currentH;
1529     GetSize(&currentW, &currentH);
1530
1531     // ... and don't do anything (avoiding flicker) if it's already ok
1532     if ( x == currentX && y == currentY &&
1533          width == currentW && height == currentH )
1534     {
1535         return;
1536     }
1537
1538     if ( x == wxDefaultPosition.x && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE) )
1539         x = currentX;
1540     if ( y == wxDefaultPosition.y && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE) )
1541         y = currentY;
1542
1543     AdjustForParentClientOrigin(x, y, sizeFlags);
1544
1545     wxSize size = wxDefaultSize;
1546     if ( width == wxDefaultSize.x )
1547     {
1548         if ( sizeFlags & wxSIZE_AUTO_WIDTH )
1549         {
1550             size = DoGetBestSize();
1551             width = size.x;
1552         }
1553         else
1554         {
1555             // just take the current one
1556             width = currentW;
1557         }
1558     }
1559
1560     if ( height == wxDefaultSize.y )
1561     {
1562         if ( sizeFlags & wxSIZE_AUTO_HEIGHT )
1563         {
1564             if ( size.x == wxDefaultSize.x )
1565             {
1566                 size = DoGetBestSize();
1567             }
1568             //else: already called DoGetBestSize() above
1569
1570             height = size.y;
1571         }
1572         else
1573         {
1574             // just take the current one
1575             height = currentH;
1576         }
1577     }
1578
1579     DoMoveWindow(x, y, width, height);
1580 }
1581
1582 void wxWindowMSW::DoSetClientSize(int width, int height)
1583 {
1584     // setting the client size is less obvious than it it could have been
1585     // because in the result of changing the total size the window scrollbar
1586     // may [dis]appear and/or its menubar may [un]wrap and so the client size
1587     // will not be correct as the difference between the total and client size
1588     // changes - so we keep changing it until we get it right
1589     //
1590     // normally this loop shouldn't take more than 3 iterations (usually 1 but
1591     // if scrollbars [dis]appear as the result of the first call, then 2 and it
1592     // may become 3 if the window had 0 size originally and so we didn't
1593     // calculate the scrollbar correction correctly during the first iteration)
1594     // but just to be on the safe side we check for it instead of making it an
1595     // "infinite" loop (i.e. leaving break inside as the only way to get out)
1596     for ( int i = 0; i < 4; i++ )
1597     {
1598         RECT rectClient;
1599         ::GetClientRect(GetHwnd(), &rectClient);
1600
1601         // if the size is already ok, stop here (rectClient.left = top = 0)
1602         if ( (rectClient.right == width || width == wxDefaultSize.x) &&
1603              (rectClient.bottom == height || height == wxDefaultSize.y) )
1604         {
1605             break;
1606         }
1607
1608         int widthClient = width,
1609             heightClient = height;
1610
1611         // Find the difference between the entire window (title bar and all)
1612         // and the client area; add this to the new client size to move the
1613         // window
1614         RECT rectWin;
1615         ::GetWindowRect(GetHwnd(), &rectWin);
1616
1617         widthClient += rectWin.right - rectWin.left - rectClient.right;
1618         heightClient += rectWin.bottom - rectWin.top - rectClient.bottom;
1619
1620         POINT point;
1621         point.x = rectWin.left;
1622         point.y = rectWin.top;
1623
1624         // MoveWindow positions the child windows relative to the parent, so
1625         // adjust if necessary
1626         if ( !IsTopLevel() )
1627         {
1628             wxWindow *parent = GetParent();
1629             if ( parent )
1630             {
1631                 ::ScreenToClient(GetHwndOf(parent), &point);
1632             }
1633         }
1634
1635         DoMoveWindow(point.x, point.y, widthClient, heightClient);
1636     }
1637 }
1638
1639 // For implementation purposes - sometimes decorations make the client area
1640 // smaller
1641 wxPoint wxWindowMSW::GetClientAreaOrigin() const
1642 {
1643     return wxPoint(0, 0);
1644 }
1645
1646 // ---------------------------------------------------------------------------
1647 // text metrics
1648 // ---------------------------------------------------------------------------
1649
1650 int wxWindowMSW::GetCharHeight() const
1651 {
1652     return wxGetTextMetrics(this).tmHeight;
1653 }
1654
1655 int wxWindowMSW::GetCharWidth() const
1656 {
1657     // +1 is needed because Windows apparently adds it when calculating the
1658     // dialog units size in pixels
1659 #if wxDIALOG_UNIT_COMPATIBILITY
1660     return wxGetTextMetrics(this).tmAveCharWidth;
1661 #else
1662     return wxGetTextMetrics(this).tmAveCharWidth + 1;
1663 #endif
1664 }
1665
1666 void wxWindowMSW::GetTextExtent(const wxString& string,
1667                              int *x, int *y,
1668                              int *descent, int *externalLeading,
1669                              const wxFont *theFont) const
1670 {
1671     wxASSERT_MSG( !theFont || theFont->Ok(),
1672                     _T("invalid font in GetTextExtent()") );
1673
1674     wxFont fontToUse;
1675     if (theFont)
1676         fontToUse = *theFont;
1677     else
1678         fontToUse = GetFont();
1679
1680     WindowHDC hdc(GetHwnd());
1681     SelectInHDC selectFont(hdc, GetHfontOf(fontToUse));
1682
1683     SIZE sizeRect;
1684     TEXTMETRIC tm;
1685     GetTextExtentPoint(hdc, string, string.length(), &sizeRect);
1686     GetTextMetrics(hdc, &tm);
1687
1688     if ( x )
1689         *x = sizeRect.cx;
1690     if ( y )
1691         *y = sizeRect.cy;
1692     if ( descent )
1693         *descent = tm.tmDescent;
1694     if ( externalLeading )
1695         *externalLeading = tm.tmExternalLeading;
1696 }
1697
1698 // ---------------------------------------------------------------------------
1699 // popup menu
1700 // ---------------------------------------------------------------------------
1701
1702 #if wxUSE_MENUS_NATIVE
1703
1704 // yield for WM_COMMAND events only, i.e. process all WM_COMMANDs in the queue
1705 // immediately, without waiting for the next event loop iteration
1706 //
1707 // NB: this function should probably be made public later as it can almost
1708 //     surely replace wxYield() elsewhere as well
1709 static void wxYieldForCommandsOnly()
1710 {
1711     // peek all WM_COMMANDs (it will always return WM_QUIT too but we don't
1712     // want to process it here)
1713     MSG msg;
1714     while ( ::PeekMessage(&msg, (HWND)0, WM_COMMAND, WM_COMMAND, PM_REMOVE) )
1715     {
1716         if ( msg.message == WM_QUIT )
1717         {
1718             // if we retrieved a WM_QUIT, insert back into the message queue.
1719             ::PostQuitMessage(0);
1720             break;
1721         }
1722
1723         // luckily (as we don't have access to wxEventLoopImpl method from here
1724         // anyhow...) we don't need to pre process WM_COMMANDs so dispatch it
1725         // immediately
1726         ::TranslateMessage(&msg);
1727         ::DispatchMessage(&msg);
1728     }
1729 }
1730
1731 bool wxWindowMSW::DoPopupMenu(wxMenu *menu, int x, int y)
1732 {
1733     menu->SetInvokingWindow(this);
1734     menu->UpdateUI();
1735
1736     if ( x == -1 && y == -1 )
1737     {
1738         wxPoint mouse = ScreenToClient(wxGetMousePosition());
1739         x = mouse.x; y = mouse.y;
1740     }
1741
1742     HWND hWnd = GetHwnd();
1743     HMENU hMenu = GetHmenuOf(menu);
1744     POINT point;
1745     point.x = x;
1746     point.y = y;
1747     ::ClientToScreen(hWnd, &point);
1748     wxCurrentPopupMenu = menu;
1749 #if defined(__WXWINCE__)
1750     UINT flags = 0;
1751 #else
1752     UINT flags = TPM_RIGHTBUTTON;
1753 #endif
1754     ::TrackPopupMenu(hMenu, flags, point.x, point.y, 0, hWnd, NULL);
1755
1756     // we need to do it righ now as otherwise the events are never going to be
1757     // sent to wxCurrentPopupMenu from HandleCommand()
1758     //
1759     // note that even eliminating (ugly) wxCurrentPopupMenu global wouldn't
1760     // help and we'd still need wxYieldForCommandsOnly() as the menu may be
1761     // destroyed as soon as we return (it can be a local variable in the caller
1762     // for example) and so we do need to process the event immediately
1763     wxYieldForCommandsOnly();
1764
1765     wxCurrentPopupMenu = NULL;
1766
1767     menu->SetInvokingWindow(NULL);
1768
1769     return true;
1770 }
1771
1772 #endif // wxUSE_MENUS_NATIVE
1773
1774 // ===========================================================================
1775 // pre/post message processing
1776 // ===========================================================================
1777
1778 WXLRESULT wxWindowMSW::MSWDefWindowProc(WXUINT nMsg, WXWPARAM wParam, WXLPARAM lParam)
1779 {
1780     if ( m_oldWndProc )
1781         return ::CallWindowProc(CASTWNDPROC m_oldWndProc, GetHwnd(), (UINT) nMsg, (WPARAM) wParam, (LPARAM) lParam);
1782     else
1783         return ::DefWindowProc(GetHwnd(), nMsg, wParam, lParam);
1784 }
1785
1786 bool wxWindowMSW::MSWProcessMessage(WXMSG* pMsg)
1787 {
1788     // wxUniversal implements tab traversal itself
1789 #ifndef __WXUNIVERSAL__
1790     if ( m_hWnd != 0 && (GetWindowStyleFlag() & wxTAB_TRAVERSAL) )
1791     {
1792         // intercept dialog navigation keys
1793         MSG *msg = (MSG *)pMsg;
1794
1795         // here we try to do all the job which ::IsDialogMessage() usually does
1796         // internally
1797 #if 1
1798         if ( msg->message == WM_KEYDOWN )
1799         {
1800             bool bCtrlDown = wxIsCtrlDown();
1801             bool bShiftDown = wxIsShiftDown();
1802
1803             // WM_GETDLGCODE: ask the control if it wants the key for itself,
1804             // don't process it if it's the case (except for Ctrl-Tab/Enter
1805             // combinations which are always processed)
1806             LONG lDlgCode = 0;
1807             if ( !bCtrlDown )
1808             {
1809                 lDlgCode = ::SendMessage(msg->hwnd, WM_GETDLGCODE, 0, 0);
1810
1811                 // surprizingly, DLGC_WANTALLKEYS bit mask doesn't contain the
1812                 // DLGC_WANTTAB nor DLGC_WANTARROWS bits although, logically,
1813                 // it, of course, implies them
1814                 if ( lDlgCode & DLGC_WANTALLKEYS )
1815                 {
1816                     lDlgCode |= DLGC_WANTTAB | DLGC_WANTARROWS;
1817                 }
1818             }
1819
1820             bool bForward = true,
1821                  bWindowChange = false;
1822
1823             // should we process this message specially?
1824             bool bProcess = true;
1825             switch ( msg->wParam )
1826             {
1827                 case VK_TAB:
1828                     if ( lDlgCode & DLGC_WANTTAB ) {
1829                         bProcess = false;
1830                     }
1831                     else {
1832                         // Ctrl-Tab cycles thru notebook pages
1833                         bWindowChange = bCtrlDown;
1834                         bForward = !bShiftDown;
1835                     }
1836                     break;
1837
1838                 case VK_UP:
1839                 case VK_LEFT:
1840                     if ( (lDlgCode & DLGC_WANTARROWS) || bCtrlDown )
1841                         bProcess = false;
1842                     else
1843                         bForward = false;
1844                     break;
1845
1846                 case VK_DOWN:
1847                 case VK_RIGHT:
1848                     if ( (lDlgCode & DLGC_WANTARROWS) || bCtrlDown )
1849                         bProcess = false;
1850                     break;
1851
1852                 case VK_ESCAPE:
1853                     {
1854 #if wxUSE_BUTTON
1855                         wxButton *btn = wxDynamicCast(FindWindow(wxID_CANCEL),
1856                                                       wxButton);
1857                         if ( btn && btn->IsEnabled() )
1858                         {
1859                             // if we do have a cancel button, do press it
1860                             btn->MSWCommand(BN_CLICKED, 0 /* unused */);
1861
1862                             // we consumed the message
1863                             return true;
1864                         }
1865 #endif // wxUSE_BUTTON
1866
1867                         bProcess = false;
1868                     }
1869                     break;
1870
1871                 case VK_RETURN:
1872                     {
1873                         if ( (lDlgCode & DLGC_WANTMESSAGE) && !bCtrlDown )
1874                         {
1875                             // control wants to process Enter itself, don't
1876                             // call IsDialogMessage() which would interpret
1877                             // it
1878                             return false;
1879                         }
1880                         else if ( lDlgCode & DLGC_BUTTON )
1881                         {
1882                             // let IsDialogMessage() handle this for all
1883                             // buttons except the owner-drawn ones which it
1884                             // just seems to ignore
1885                             long style = ::GetWindowLong(msg->hwnd, GWL_STYLE);
1886                             if ( (style & BS_OWNERDRAW) == BS_OWNERDRAW )
1887                             {
1888                                 // emulate the button click
1889                                 wxWindow *btn = wxFindWinFromHandle((WXHWND)msg->hwnd);
1890                                 if ( btn )
1891                                     btn->MSWCommand(BN_CLICKED, 0 /* unused */);
1892                             }
1893
1894                             bProcess = false;
1895                         }
1896                         // FIXME: this should be handled by
1897                         //        wxNavigationKeyEvent handler and not here!!
1898                         else
1899                         {
1900 #if wxUSE_BUTTON
1901                             wxButton *btn = wxDynamicCast(GetDefaultItem(),
1902                                                           wxButton);
1903                             if ( btn && btn->IsEnabled() )
1904                             {
1905                                 // if we do have a default button, do press it
1906                                 btn->MSWCommand(BN_CLICKED, 0 /* unused */);
1907
1908                                 return true;
1909                             }
1910                             else // no default button
1911 #endif // wxUSE_BUTTON
1912                             {
1913                                 // this is a quick and dirty test for a text
1914                                 // control
1915                                 if ( !(lDlgCode & DLGC_HASSETSEL) )
1916                                 {
1917                                     // don't process Enter, the control might
1918                                     // need it for itself and don't let
1919                                     // ::IsDialogMessage() have it as it can
1920                                     // eat the Enter events sometimes
1921                                     return false;
1922                                 }
1923                                 else if (!IsTopLevel())
1924                                 {
1925                                     // if not a top level window, let parent
1926                                     // handle it
1927                                     return false;
1928                                 }
1929                                 //else: treat Enter as TAB: pass to the next
1930                                 //      control as this is the best thing to do
1931                                 //      if the text doesn't handle Enter itself
1932                             }
1933                         }
1934                     }
1935                     break;
1936
1937                 default:
1938                     bProcess = false;
1939             }
1940
1941             if ( bProcess )
1942             {
1943                 wxNavigationKeyEvent event;
1944                 event.SetDirection(bForward);
1945                 event.SetWindowChange(bWindowChange);
1946                 event.SetEventObject(this);
1947
1948                 if ( GetEventHandler()->ProcessEvent(event) )
1949                 {
1950                     return true;
1951                 }
1952             }
1953         }
1954 #else // 0
1955         // let ::IsDialogMessage() do almost everything and handle just the
1956         // things it doesn't here: Ctrl-TAB for switching notebook pages
1957         if ( msg->message == WM_KEYDOWN )
1958         {
1959             // don't process system keys here
1960             if ( !(HIWORD(msg->lParam) & KF_ALTDOWN) )
1961             {
1962                 if ( (msg->wParam == VK_TAB) && wxIsCtrlDown() )
1963                 {
1964                     // find the first notebook parent and change its page
1965                     wxWindow *win = this;
1966                     wxNotebook *nbook = NULL;
1967                     while ( win && !nbook )
1968                     {
1969                         nbook = wxDynamicCast(win, wxNotebook);
1970                         win = win->GetParent();
1971                     }
1972
1973                     if ( nbook )
1974                     {
1975                         bool forward = !wxIsShiftDown();
1976
1977                         nbook->AdvanceSelection(forward);
1978                     }
1979                 }
1980             }
1981         }
1982 #endif // 1/0
1983
1984         // don't let IsDialogMessage() get VK_ESCAPE as it _always_ eats the
1985         // message even when there is no cancel button and when the message is
1986         // needed by the control itself: in particular, it prevents the tree in
1987         // place edit control from being closed with Escape in a dialog
1988         if ( msg->message != WM_KEYDOWN || msg->wParam != VK_ESCAPE )
1989         {
1990             // ::IsDialogMessage() is broken and may sometimes hang the
1991             // application by going into an infinite loop, so we try to detect
1992             // [some of] the situatations when this may happen and not call it
1993             // then
1994
1995             // assume we can call it by default
1996             bool canSafelyCallIsDlgMsg = true;
1997
1998             HWND hwndFocus = ::GetFocus();
1999
2000             // if the currently focused window itself has WS_EX_CONTROLPARENT style, ::IsDialogMessage() will also enter
2001             // an infinite loop, because it will recursively check the child
2002             // windows but not the window itself and so if none of the children
2003             // accepts focus it loops forever (as it only stops when it gets
2004             // back to the window it started from)
2005             //
2006             // while it is very unusual that a window with WS_EX_CONTROLPARENT
2007             // style has the focus, it can happen. One such possibility is if
2008             // all windows are either toplevel, wxDialog, wxPanel or static
2009             // controls and no window can actually accept keyboard input.
2010 #if !defined(__WXWINCE__)
2011             if ( ::GetWindowLong(hwndFocus, GWL_EXSTYLE) & WS_EX_CONTROLPARENT )
2012             {
2013                 // passimistic by default
2014                 canSafelyCallIsDlgMsg = false;
2015                 for ( wxWindowList::compatibility_iterator node = GetChildren().GetFirst();
2016                       node;
2017                       node = node->GetNext() )
2018                 {
2019                     wxWindow * const win = node->GetData();
2020                     if ( win->AcceptsFocus() &&
2021                             !(::GetWindowLong(GetHwndOf(win), GWL_EXSTYLE) &
2022                                 WS_EX_CONTROLPARENT) )
2023                     {
2024                         // it shouldn't hang...
2025                         canSafelyCallIsDlgMsg = true;
2026
2027                         break;
2028                     }
2029                 }
2030             }
2031 #endif // !__WXWINCE__
2032
2033             if ( canSafelyCallIsDlgMsg )
2034             {
2035                 // ::IsDialogMessage() can enter in an infinite loop when the
2036                 // currently focused window is disabled or hidden and its
2037                 // parent has WS_EX_CONTROLPARENT style, so don't call it in
2038                 // this case
2039                 while ( hwndFocus )
2040                 {
2041                     if ( !::IsWindowEnabled(hwndFocus) ||
2042                             !::IsWindowVisible(hwndFocus) )
2043                     {
2044                         // it would enter an infinite loop if we do this!
2045                         canSafelyCallIsDlgMsg = false;
2046
2047                         break;
2048                     }
2049
2050                     if ( !(::GetWindowLong(hwndFocus, GWL_STYLE) & WS_CHILD) )
2051                     {
2052                         // it's a top level window, don't go further -- e.g. even
2053                         // if the parent of a dialog is disabled, this doesn't
2054                         // break navigation inside the dialog
2055                         break;
2056                     }
2057
2058                     hwndFocus = ::GetParent(hwndFocus);
2059                 }
2060             }
2061
2062             // let IsDialogMessage() have the message if it's safe to call it
2063             if ( canSafelyCallIsDlgMsg && ::IsDialogMessage(GetHwnd(), msg) )
2064             {
2065                 // IsDialogMessage() did something...
2066                 return true;
2067             }
2068         }
2069     }
2070 #endif // __WXUNIVERSAL__
2071
2072 #if wxUSE_TOOLTIPS
2073     if ( m_tooltip )
2074     {
2075         // relay mouse move events to the tooltip control
2076         MSG *msg = (MSG *)pMsg;
2077         if ( msg->message == WM_MOUSEMOVE )
2078             m_tooltip->RelayEvent(pMsg);
2079     }
2080 #endif // wxUSE_TOOLTIPS
2081
2082     return false;
2083 }
2084
2085 bool wxWindowMSW::MSWTranslateMessage(WXMSG* pMsg)
2086 {
2087 #if wxUSE_ACCEL && !defined(__WXUNIVERSAL__)
2088     return m_acceleratorTable.Translate(this, pMsg);
2089 #else
2090     (void) pMsg;
2091     return false;
2092 #endif // wxUSE_ACCEL
2093 }
2094
2095 bool wxWindowMSW::MSWShouldPreProcessMessage(WXMSG* WXUNUSED(pMsg))
2096 {
2097     // preprocess all messages by default
2098     return true;
2099 }
2100
2101 // ---------------------------------------------------------------------------
2102 // message params unpackers
2103 // ---------------------------------------------------------------------------
2104
2105 void wxWindowMSW::UnpackCommand(WXWPARAM wParam, WXLPARAM lParam,
2106                              WORD *id, WXHWND *hwnd, WORD *cmd)
2107 {
2108     *id = LOWORD(wParam);
2109     *hwnd = (WXHWND)lParam;
2110     *cmd = HIWORD(wParam);
2111 }
2112
2113 void wxWindowMSW::UnpackActivate(WXWPARAM wParam, WXLPARAM lParam,
2114                               WXWORD *state, WXWORD *minimized, WXHWND *hwnd)
2115 {
2116     *state = LOWORD(wParam);
2117     *minimized = HIWORD(wParam);
2118     *hwnd = (WXHWND)lParam;
2119 }
2120
2121 void wxWindowMSW::UnpackScroll(WXWPARAM wParam, WXLPARAM lParam,
2122                             WXWORD *code, WXWORD *pos, WXHWND *hwnd)
2123 {
2124     *code = LOWORD(wParam);
2125     *pos = HIWORD(wParam);
2126     *hwnd = (WXHWND)lParam;
2127 }
2128
2129 void wxWindowMSW::UnpackCtlColor(WXWPARAM wParam, WXLPARAM lParam,
2130                               WXWORD *nCtlColor, WXHDC *hdc, WXHWND *hwnd)
2131 {
2132 #ifndef __WXMICROWIN__
2133     *nCtlColor = CTLCOLOR_BTN;
2134     *hwnd = (WXHWND)lParam;
2135     *hdc = (WXHDC)wParam;
2136 #endif
2137 }
2138
2139 void wxWindowMSW::UnpackMenuSelect(WXWPARAM wParam, WXLPARAM lParam,
2140                                 WXWORD *item, WXWORD *flags, WXHMENU *hmenu)
2141 {
2142     *item = (WXWORD)wParam;
2143     *flags = HIWORD(wParam);
2144     *hmenu = (WXHMENU)lParam;
2145 }
2146
2147 // ---------------------------------------------------------------------------
2148 // Main wxWidgets window proc and the window proc for wxWindow
2149 // ---------------------------------------------------------------------------
2150
2151 // Hook for new window just as it's being created, when the window isn't yet
2152 // associated with the handle
2153 static wxWindowMSW *gs_winBeingCreated = NULL;
2154
2155 // implementation of wxWindowCreationHook class: it just sets gs_winBeingCreated to the
2156 // window being created and insures that it's always unset back later
2157 wxWindowCreationHook::wxWindowCreationHook(wxWindowMSW *winBeingCreated)
2158 {
2159     gs_winBeingCreated = winBeingCreated;
2160 }
2161
2162 wxWindowCreationHook::~wxWindowCreationHook()
2163 {
2164     gs_winBeingCreated = NULL;
2165 }
2166
2167 // Main window proc
2168 LRESULT WXDLLEXPORT APIENTRY _EXPORT wxWndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
2169 {
2170     // trace all messages - useful for the debugging
2171 #ifdef __WXDEBUG__
2172     wxLogTrace(wxTraceMessages,
2173                wxT("Processing %s(hWnd=%08lx, wParam=%8lx, lParam=%8lx)"),
2174                wxGetMessageName(message), (long)hWnd, (long)wParam, lParam);
2175 #endif // __WXDEBUG__
2176
2177     wxWindowMSW *wnd = wxFindWinFromHandle((WXHWND) hWnd);
2178
2179     // when we get the first message for the HWND we just created, we associate
2180     // it with wxWindow stored in gs_winBeingCreated
2181     if ( !wnd && gs_winBeingCreated )
2182     {
2183         wxAssociateWinWithHandle(hWnd, gs_winBeingCreated);
2184         wnd = gs_winBeingCreated;
2185         gs_winBeingCreated = NULL;
2186         wnd->SetHWND((WXHWND)hWnd);
2187     }
2188
2189     LRESULT rc;
2190
2191     if ( wnd )
2192         rc = wnd->MSWWindowProc(message, wParam, lParam);
2193     else
2194         rc = ::DefWindowProc(hWnd, message, wParam, lParam);
2195
2196     return rc;
2197 }
2198
2199 WXLRESULT wxWindowMSW::MSWWindowProc(WXUINT message, WXWPARAM wParam, WXLPARAM lParam)
2200 {
2201     // did we process the message?
2202     bool processed = false;
2203
2204     // the return value
2205     union
2206     {
2207         bool        allow;
2208         WXLRESULT   result;
2209         WXHICON     hIcon;
2210         WXHBRUSH    hBrush;
2211     } rc;
2212
2213     // for most messages we should return 0 when we do process the message
2214     rc.result = 0;
2215
2216     switch ( message )
2217     {
2218         case WM_CREATE:
2219             {
2220                 bool mayCreate;
2221                 processed = HandleCreate((WXLPCREATESTRUCT)lParam, &mayCreate);
2222                 if ( processed )
2223                 {
2224                     // return 0 to allow window creation
2225                     rc.result = mayCreate ? 0 : -1;
2226                 }
2227             }
2228             break;
2229
2230         case WM_DESTROY:
2231             // never set processed to true and *always* pass WM_DESTROY to
2232             // DefWindowProc() as Windows may do some internal cleanup when
2233             // processing it and failing to pass the message along may cause
2234             // memory and resource leaks!
2235             (void)HandleDestroy();
2236             break;
2237
2238         case WM_MOVE:
2239             processed = HandleMove(GET_X_LPARAM(lParam), GET_Y_LPARAM(lParam));
2240             break;
2241
2242 #if !defined(__WXWINCE__)
2243         case WM_MOVING:
2244             {
2245                 LPRECT pRect = (LPRECT)lParam;
2246                 wxRect rc;
2247                 rc.SetLeft(pRect->left);
2248                 rc.SetTop(pRect->top);
2249                 rc.SetRight(pRect->right);
2250                 rc.SetBottom(pRect->bottom);
2251                 processed = HandleMoving(rc);
2252                 if (processed) {
2253                     pRect->left = rc.GetLeft();
2254                     pRect->top = rc.GetTop();
2255                     pRect->right = rc.GetRight();
2256                     pRect->bottom = rc.GetBottom();
2257                 }
2258             }
2259             break;
2260 #endif
2261
2262         case WM_SIZE:
2263             switch ( wParam )
2264             {
2265                 case SIZE_MAXHIDE:
2266                 case SIZE_MAXSHOW:
2267                     // we're not interested in these messages at all
2268                     break;
2269
2270                 case SIZE_MINIMIZED:
2271                     // we shouldn't send sizev events for these messages as the
2272                     // client size may be negative which breaks existing code
2273                     //
2274                     // OTOH we might send another (wxMinimizedEvent?) one or
2275                     // add an additional parameter to wxSizeEvent if this is
2276                     // useful to anybody
2277                     break;
2278
2279                 default:
2280                     wxFAIL_MSG( _T("unexpected WM_SIZE parameter") );
2281                     // fall through nevertheless
2282
2283                 case SIZE_MAXIMIZED:
2284                 case SIZE_RESTORED:
2285                     processed = HandleSize(LOWORD(lParam), HIWORD(lParam),
2286                                            wParam);
2287             }
2288             break;
2289
2290 #if !defined(__WXWINCE__)
2291         case WM_SIZING:
2292             {
2293                 LPRECT pRect = (LPRECT)lParam;
2294                 wxRect rc;
2295                 rc.SetLeft(pRect->left);
2296                 rc.SetTop(pRect->top);
2297                 rc.SetRight(pRect->right);
2298                 rc.SetBottom(pRect->bottom);
2299                 processed = HandleSizing(rc);
2300                 if (processed) {
2301                     pRect->left = rc.GetLeft();
2302                     pRect->top = rc.GetTop();
2303                     pRect->right = rc.GetRight();
2304                     pRect->bottom = rc.GetBottom();
2305                 }
2306             }
2307             break;
2308 #endif
2309
2310 #if !defined(__WXMICROWIN__) && !defined(__WXWINCE__)
2311         case WM_ACTIVATEAPP:
2312             wxTheApp->SetActive(wParam != 0, FindFocus());
2313             break;
2314 #endif
2315
2316         case WM_ACTIVATE:
2317             {
2318                 WXWORD state, minimized;
2319                 WXHWND hwnd;
2320                 UnpackActivate(wParam, lParam, &state, &minimized, &hwnd);
2321
2322                 processed = HandleActivate(state, minimized != 0, (WXHWND)hwnd);
2323             }
2324             break;
2325
2326         case WM_SETFOCUS:
2327             processed = HandleSetFocus((WXHWND)(HWND)wParam);
2328             break;
2329
2330         case WM_KILLFOCUS:
2331             processed = HandleKillFocus((WXHWND)(HWND)wParam);
2332             break;
2333
2334         case WM_PAINT:
2335             {
2336                 if ( wParam )
2337                 {
2338                     // cast to wxWindow is needed for wxUniv
2339                     wxPaintDCEx dc((wxWindow *)this, (WXHDC)wParam);
2340                     processed = HandlePaint();
2341                 }
2342                 else
2343                 {
2344                     processed = HandlePaint();
2345                 }
2346                 break;
2347             }
2348
2349 #ifndef __WXWINCE__
2350         case WM_PRINT:
2351             {
2352 #if wxUSE_LISTCTRL
2353                 // Don't call the wx handlers in this case
2354                 if ( wxIsKindOf(this, wxListCtrl) )
2355                     break;
2356 #endif
2357
2358                 if ( lParam & PRF_ERASEBKGND )
2359                     HandleEraseBkgnd((WXHDC)(HDC)wParam);
2360
2361                 wxPaintDCEx dc((wxWindow *)this, (WXHDC)wParam);
2362                 processed = HandlePaint();
2363             }
2364             break;
2365 #endif
2366
2367         case WM_CLOSE:
2368 #ifdef __WXUNIVERSAL__
2369             // Universal uses its own wxFrame/wxDialog, so we don't receive
2370             // close events unless we have this.
2371             Close();
2372             processed = true;
2373             rc.result = TRUE;
2374 #else
2375             // don't let the DefWindowProc() destroy our window - we'll do it
2376             // ourselves in ~wxWindow
2377             processed = true;
2378             rc.result = TRUE;
2379 #endif
2380             break;
2381
2382         case WM_SHOWWINDOW:
2383             processed = HandleShow(wParam != 0, (int)lParam);
2384             break;
2385
2386         case WM_MOUSEMOVE:
2387             processed = HandleMouseMove(GET_X_LPARAM(lParam),
2388                                         GET_Y_LPARAM(lParam),
2389                                         wParam);
2390             break;
2391
2392             // Seems to be broken currently
2393 #if 0 // ndef __WXWINCE__
2394         case WM_MOUSELEAVE:
2395            {
2396             wxASSERT_MSG( !m_mouseInWindow, wxT("the mouse should be in a window to generate this event!") );
2397
2398             // only process this message if the mouse is not in the window,
2399             // This can also check for children in composite windows.
2400             // however, this may mean the the wxEVT_LEAVE_WINDOW is never sent
2401             // if the mouse does not enter the window from it's child before
2402             // leaving the scope of the window. ( perhaps this can be picked
2403             // up in the OnIdle code as before, for this special case )
2404             if ( /*IsComposite() && */ !IsMouseInWindow() )
2405             {
2406                 m_mouseInWindow = false;
2407
2408                 // Unfortunately no mouse state is passed with a WM_MOUSE_LEAVE
2409                 int state = 0;
2410                 if ( wxIsShiftDown() )
2411                     state |= MK_SHIFT;
2412                 if ( wxIsCtrlDown() )
2413                     state |= MK_CONTROL;
2414                 if ( GetKeyState( VK_LBUTTON ) )
2415                     state |= MK_LBUTTON;
2416                 if ( GetKeyState( VK_MBUTTON ) )
2417                     state |= MK_MBUTTON;
2418                 if ( GetKeyState( VK_RBUTTON ) )
2419                     state |= MK_RBUTTON;
2420
2421                 POINT pt;
2422                 if ( !::GetCursorPos(&pt) )
2423                 {
2424                     wxLogLastError(_T("GetCursorPos"));
2425                 }
2426
2427                 // we need to have client coordinates here for symmetry with
2428                 // wxEVT_ENTER_WINDOW
2429                 RECT rect = wxGetWindowRect(GetHwnd());
2430                 pt.x -= rect.left;
2431                 pt.y -= rect.top;
2432
2433                 wxMouseEvent event2(wxEVT_LEAVE_WINDOW);
2434                 InitMouseEvent(event2, pt.x, pt.y, state);
2435
2436                 (void)GetEventHandler()->ProcessEvent(event2);
2437             }
2438             // always pass processed back as false, this allows the window
2439             // manager to process the message too.  This is needed to ensure
2440             // windows XP themes work properly as the mouse moves over widgets
2441             // like buttons.
2442             processed = false;
2443            }
2444            break;
2445 #endif
2446  // __WXWINCE__
2447
2448 #if wxUSE_MOUSEWHEEL
2449         case WM_MOUSEWHEEL:
2450             processed = HandleMouseWheel(wParam, lParam);
2451             break;
2452 #endif
2453
2454         case WM_LBUTTONDOWN:
2455         case WM_LBUTTONUP:
2456         case WM_LBUTTONDBLCLK:
2457         case WM_RBUTTONDOWN:
2458         case WM_RBUTTONUP:
2459         case WM_RBUTTONDBLCLK:
2460         case WM_MBUTTONDOWN:
2461         case WM_MBUTTONUP:
2462         case WM_MBUTTONDBLCLK:
2463             {
2464 #ifdef __WXMICROWIN__
2465                 // MicroWindows seems to ignore the fact that a window is
2466                 // disabled. So catch mouse events and throw them away if
2467                 // necessary.
2468                 wxWindowMSW* win = this;
2469                 for ( ;; )
2470                 {
2471                     if (!win->IsEnabled())
2472                     {
2473                         processed = true;
2474                         break;
2475                     }
2476
2477                     win = win->GetParent();
2478                     if ( !win || win->IsTopLevel() )
2479                         break;
2480                 }
2481
2482                 if ( processed )
2483                     break;
2484
2485 #endif // __WXMICROWIN__
2486                 int x = GET_X_LPARAM(lParam),
2487                     y = GET_Y_LPARAM(lParam);
2488
2489                 // redirect the event to a static control if necessary by
2490                 // finding one under mouse
2491                 wxWindowMSW *win;
2492                 if ( GetCapture() == this )
2493                 {
2494                     // but don't do it if the mouse is captured by this window
2495                     // because then it should really get this event itself
2496                     win = this;
2497                 }
2498                 else
2499                 {
2500                     win = FindWindowForMouseEvent(this, &x, &y);
2501
2502                     // this should never happen
2503                     wxCHECK_MSG( win, 0,
2504                                  _T("FindWindowForMouseEvent() returned NULL") );
2505
2506                     // for the standard classes their WndProc sets the focus to
2507                     // them anyhow and doing it from here results in some weird
2508                     // problems, but for our windows we want them to acquire
2509                     // focus when clicked
2510                     if ( !win->IsOfStandardClass() )
2511                     {
2512                         if ( message == WM_LBUTTONDOWN && win->AcceptsFocus() )
2513                             win->SetFocus();
2514                     }
2515                 }
2516
2517                 processed = win->HandleMouseEvent(message, x, y, wParam);
2518             }
2519             break;
2520
2521 #ifdef MM_JOY1MOVE
2522         case MM_JOY1MOVE:
2523         case MM_JOY2MOVE:
2524         case MM_JOY1ZMOVE:
2525         case MM_JOY2ZMOVE:
2526         case MM_JOY1BUTTONDOWN:
2527         case MM_JOY2BUTTONDOWN:
2528         case MM_JOY1BUTTONUP:
2529         case MM_JOY2BUTTONUP:
2530             processed = HandleJoystickEvent(message,
2531                                             GET_X_LPARAM(lParam),
2532                                             GET_Y_LPARAM(lParam),
2533                                             wParam);
2534             break;
2535 #endif // __WXMICROWIN__
2536
2537         case WM_COMMAND:
2538             {
2539                 WORD id, cmd;
2540                 WXHWND hwnd;
2541                 UnpackCommand(wParam, lParam, &id, &hwnd, &cmd);
2542
2543                 processed = HandleCommand(id, cmd, hwnd);
2544             }
2545             break;
2546
2547         case WM_NOTIFY:
2548             processed = HandleNotify((int)wParam, lParam, &rc.result);
2549             break;
2550
2551         // we only need to reply to WM_NOTIFYFORMAT manually when using MSLU,
2552         // otherwise DefWindowProc() does it perfectly fine for us, but MSLU
2553         // apparently doesn't always behave properly and needs some help
2554 #if wxUSE_UNICODE_MSLU && defined(NF_QUERY)
2555         case WM_NOTIFYFORMAT:
2556             if ( lParam == NF_QUERY )
2557             {
2558                 processed = true;
2559                 rc.result = NFR_UNICODE;
2560             }
2561             break;
2562 #endif // wxUSE_UNICODE_MSLU
2563
2564             // for these messages we must return true if process the message
2565 #ifdef WM_DRAWITEM
2566         case WM_DRAWITEM:
2567         case WM_MEASUREITEM:
2568             {
2569                 int idCtrl = (UINT)wParam;
2570                 if ( message == WM_DRAWITEM )
2571                 {
2572                     processed = MSWOnDrawItem(idCtrl,
2573                                               (WXDRAWITEMSTRUCT *)lParam);
2574                 }
2575                 else
2576                 {
2577                     processed = MSWOnMeasureItem(idCtrl,
2578                                                  (WXMEASUREITEMSTRUCT *)lParam);
2579                 }
2580
2581                 if ( processed )
2582                     rc.result = TRUE;
2583             }
2584             break;
2585 #endif // defined(WM_DRAWITEM)
2586
2587         case WM_GETDLGCODE:
2588             if ( !IsOfStandardClass() )
2589             {
2590                 // we always want to get the char events
2591                 rc.result = DLGC_WANTCHARS;
2592
2593                 if ( GetWindowStyleFlag() & wxWANTS_CHARS )
2594                 {
2595                     // in fact, we want everything
2596                     rc.result |= DLGC_WANTARROWS |
2597                                  DLGC_WANTTAB |
2598                                  DLGC_WANTALLKEYS;
2599                 }
2600
2601                 processed = true;
2602             }
2603             //else: get the dlg code from the DefWindowProc()
2604             break;
2605
2606         case WM_SYSKEYDOWN:
2607         case WM_KEYDOWN:
2608             // If this has been processed by an event handler, return 0 now
2609             // (we've handled it).
2610             m_lastKeydownProcessed = HandleKeyDown((WORD) wParam, lParam);
2611             if ( m_lastKeydownProcessed )
2612             {
2613                 processed = true;
2614             }
2615
2616             if ( !processed )
2617             {
2618                 switch ( wParam )
2619                 {
2620                     // we consider these message "not interesting" to OnChar, so
2621                     // just don't do anything more with them
2622                     case VK_SHIFT:
2623                     case VK_CONTROL:
2624                     case VK_MENU:
2625                     case VK_CAPITAL:
2626                     case VK_NUMLOCK:
2627                     case VK_SCROLL:
2628                         processed = true;
2629                         break;
2630
2631                     // avoid duplicate messages to OnChar for these ASCII keys:
2632                     // they will be translated by TranslateMessage() and received
2633                     // in WM_CHAR
2634                     case VK_ESCAPE:
2635                     case VK_SPACE:
2636                     case VK_RETURN:
2637                     case VK_BACK:
2638                     case VK_TAB:
2639                     case VK_ADD:
2640                     case VK_SUBTRACT:
2641                     case VK_MULTIPLY:
2642                     case VK_DIVIDE:
2643                     case VK_OEM_1:
2644                     case VK_OEM_2:
2645                     case VK_OEM_3:
2646                     case VK_OEM_4:
2647                     case VK_OEM_5:
2648                     case VK_OEM_6:
2649                     case VK_OEM_7:
2650                     case VK_OEM_PLUS:
2651                     case VK_OEM_COMMA:
2652                     case VK_OEM_MINUS:
2653                     case VK_OEM_PERIOD:
2654                         // but set processed to false, not true to still pass them
2655                         // to the control's default window proc - otherwise
2656                         // built-in keyboard handling won't work
2657                         processed = false;
2658                         break;
2659
2660 #ifdef VK_APPS
2661                     // special case of VK_APPS: treat it the same as right mouse
2662                     // click because both usually pop up a context menu
2663                     case VK_APPS:
2664                         {
2665                             WPARAM flags;
2666                             int x, y;
2667
2668                             TranslateKbdEventToMouse(this, &x, &y, &flags);
2669                             processed = HandleMouseEvent(WM_RBUTTONDOWN, x, y, flags);
2670                         }
2671                         break;
2672 #endif // VK_APPS
2673
2674                     default:
2675                         // do generate a CHAR event
2676                         processed = HandleChar((WORD)wParam, lParam);
2677                 }
2678             }
2679             if (message == WM_SYSKEYDOWN)  // Let Windows still handle the SYSKEYs
2680                 processed = false;
2681             break;
2682
2683         case WM_SYSKEYUP:
2684         case WM_KEYUP:
2685 #ifdef VK_APPS
2686             // special case of VK_APPS: treat it the same as right mouse button
2687             if ( wParam == VK_APPS )
2688             {
2689                 WPARAM flags;
2690                 int x, y;
2691
2692                 TranslateKbdEventToMouse(this, &x, &y, &flags);
2693                 processed = HandleMouseEvent(WM_RBUTTONUP, x, y, flags);
2694             }
2695             else
2696 #endif // VK_APPS
2697             {
2698                 processed = HandleKeyUp((WORD) wParam, lParam);
2699             }
2700             break;
2701
2702         case WM_SYSCHAR:
2703         case WM_CHAR: // Always an ASCII character
2704             if ( m_lastKeydownProcessed )
2705             {
2706                 // The key was handled in the EVT_KEY_DOWN and handling
2707                 // a key in an EVT_KEY_DOWN handler is meant, by
2708                 // design, to prevent EVT_CHARs from happening
2709                 m_lastKeydownProcessed = false;
2710                 processed = true;
2711             }
2712             else
2713             {
2714                 processed = HandleChar((WORD)wParam, lParam, true);
2715             }
2716             break;
2717
2718 #if wxUSE_HOTKEY
2719         case WM_HOTKEY:
2720             processed = HandleHotKey((WORD)wParam, lParam);
2721             break;
2722 #endif // wxUSE_HOTKEY
2723
2724         case WM_HSCROLL:
2725         case WM_VSCROLL:
2726             {
2727                 WXWORD code, pos;
2728                 WXHWND hwnd;
2729                 UnpackScroll(wParam, lParam, &code, &pos, &hwnd);
2730
2731                 processed = MSWOnScroll(message == WM_HSCROLL ? wxHORIZONTAL
2732                                                               : wxVERTICAL,
2733                                         code, pos, hwnd);
2734             }
2735             break;
2736
2737         // CTLCOLOR messages are sent by children to query the parent for their
2738         // colors#ifndef __WXMICROWIN__
2739 #ifndef __WXMICROWIN__
2740         case WM_CTLCOLORMSGBOX:
2741         case WM_CTLCOLOREDIT:
2742         case WM_CTLCOLORLISTBOX:
2743         case WM_CTLCOLORBTN:
2744         case WM_CTLCOLORDLG:
2745         case WM_CTLCOLORSCROLLBAR:
2746         case WM_CTLCOLORSTATIC:
2747             {
2748                 WXWORD nCtlColor;
2749                 WXHDC hdc;
2750                 WXHWND hwnd;
2751                 UnpackCtlColor(wParam, lParam, &nCtlColor, &hdc, &hwnd);
2752
2753                 processed = HandleCtlColor(&rc.hBrush,
2754                                            (WXHDC)hdc,
2755                                            (WXHWND)hwnd,
2756                                            nCtlColor,
2757                                            message,
2758                                            wParam,
2759                                            lParam);
2760             }
2761             break;
2762 #endif // !__WXMICROWIN__
2763
2764         case WM_SYSCOLORCHANGE:
2765             // the return value for this message is ignored
2766             processed = HandleSysColorChange();
2767             break;
2768
2769 #if !defined(__WXWINCE__)
2770         case WM_DISPLAYCHANGE:
2771             processed = HandleDisplayChange();
2772             break;
2773 #endif
2774
2775         case WM_PALETTECHANGED:
2776             processed = HandlePaletteChanged((WXHWND) (HWND) wParam);
2777             break;
2778
2779         case WM_CAPTURECHANGED:
2780             processed = HandleCaptureChanged((WXHWND) (HWND) lParam);
2781             break;
2782
2783         case WM_QUERYNEWPALETTE:
2784             processed = HandleQueryNewPalette();
2785             break;
2786
2787         case WM_ERASEBKGND:
2788             processed = HandleEraseBkgnd((WXHDC)(HDC)wParam);
2789             if ( processed )
2790             {
2791                 // we processed the message, i.e. erased the background
2792                 rc.result = TRUE;
2793             }
2794             break;
2795
2796 #if !defined(__WXWINCE__)
2797         case WM_DROPFILES:
2798             processed = HandleDropFiles(wParam);
2799             break;
2800 #endif
2801
2802         case WM_INITDIALOG:
2803             processed = HandleInitDialog((WXHWND)(HWND)wParam);
2804
2805             if ( processed )
2806             {
2807                 // we never set focus from here
2808                 rc.result = FALSE;
2809             }
2810             break;
2811
2812 #if !defined(__WXWINCE__)
2813         case WM_QUERYENDSESSION:
2814             processed = HandleQueryEndSession(lParam, &rc.allow);
2815             break;
2816
2817         case WM_ENDSESSION:
2818             processed = HandleEndSession(wParam != 0, lParam);
2819             break;
2820
2821         case WM_GETMINMAXINFO:
2822             processed = HandleGetMinMaxInfo((MINMAXINFO*)lParam);
2823             break;
2824 #endif
2825
2826         case WM_SETCURSOR:
2827             processed = HandleSetCursor((WXHWND)(HWND)wParam,
2828                                         LOWORD(lParam),     // hit test
2829                                         HIWORD(lParam));    // mouse msg
2830
2831             if ( processed )
2832             {
2833                 // returning TRUE stops the DefWindowProc() from further
2834                 // processing this message - exactly what we need because we've
2835                 // just set the cursor.
2836                 rc.result = TRUE;
2837             }
2838             break;
2839
2840 #if wxUSE_ACCESSIBILITY
2841         case WM_GETOBJECT:
2842             {
2843                 //WPARAM dwFlags = (WPARAM) (DWORD) wParam;
2844                 LPARAM dwObjId = (LPARAM) (DWORD) lParam;
2845
2846                 if (dwObjId == (LPARAM)OBJID_CLIENT && GetOrCreateAccessible())
2847                 {
2848                     return LresultFromObject(IID_IAccessible, wParam, (IUnknown*) GetAccessible()->GetIAccessible());
2849                 }
2850                 break;
2851             }
2852 #endif
2853
2854 #if defined(WM_HELP)
2855         case WM_HELP:
2856             {
2857                 // HELPINFO doesn't seem to be supported on WinCE.
2858 #ifndef __WXWINCE__
2859                 HELPINFO* info = (HELPINFO*) lParam;
2860                 // Don't yet process menu help events, just windows
2861                 if (info->iContextType == HELPINFO_WINDOW)
2862                 {
2863 #endif
2864                     wxWindowMSW* subjectOfHelp = this;
2865                     bool eventProcessed = false;
2866                     while (subjectOfHelp && !eventProcessed)
2867                     {
2868                         wxHelpEvent helpEvent(wxEVT_HELP,
2869                                               subjectOfHelp->GetId(),
2870 #ifdef __WXWINCE__
2871                                               wxPoint(0, 0)
2872 #else
2873                                               wxPoint(info->MousePos.x, info->MousePos.y)
2874 #endif
2875                                               );
2876
2877                         helpEvent.SetEventObject(this);
2878                         eventProcessed =
2879                             GetEventHandler()->ProcessEvent(helpEvent);
2880
2881                         // Go up the window hierarchy until the event is
2882                         // handled (or not)
2883                         subjectOfHelp = subjectOfHelp->GetParent();
2884                     }
2885
2886                     processed = eventProcessed;
2887 #ifndef __WXWINCE__
2888                 }
2889                 else if (info->iContextType == HELPINFO_MENUITEM)
2890                 {
2891                     wxHelpEvent helpEvent(wxEVT_HELP, info->iCtrlId);
2892                     helpEvent.SetEventObject(this);
2893                     processed = GetEventHandler()->ProcessEvent(helpEvent);
2894
2895                 }
2896                 //else: processed is already false
2897 #endif
2898             }
2899             break;
2900 #endif
2901
2902 #if !defined(__WXWINCE__)
2903         case WM_CONTEXTMENU:
2904             {
2905                 // we don't convert from screen to client coordinates as
2906                 // the event may be handled by a parent window
2907                 wxPoint pt(GET_X_LPARAM(lParam), GET_Y_LPARAM(lParam));
2908
2909                 wxContextMenuEvent evtCtx(wxEVT_CONTEXT_MENU, GetId(), pt);
2910
2911                 // we could have got an event from our child, reflect it back
2912                 // to it if this is the case
2913                 wxWindowMSW *win = NULL;
2914                 if ( (WXHWND)wParam != m_hWnd )
2915                 {
2916                     win = FindItemByHWND((WXHWND)wParam);
2917                 }
2918
2919                 if ( !win )
2920                     win = this;
2921
2922                 evtCtx.SetEventObject(win);
2923                 processed = win->GetEventHandler()->ProcessEvent(evtCtx);
2924             }
2925             break;
2926 #endif
2927
2928         case WM_MENUCHAR:
2929             // we're only interested in our own menus, not MF_SYSMENU
2930             if ( HIWORD(wParam) == MF_POPUP )
2931             {
2932                 // handle menu chars for ownerdrawn menu items
2933                 int i = HandleMenuChar(toupper(LOWORD(wParam)), lParam);
2934                 if ( i != wxNOT_FOUND )
2935                 {
2936                     rc.result = MAKELRESULT(i, MNC_EXECUTE);
2937                     processed = true;
2938                 }
2939             }
2940             break;
2941     }
2942
2943     if ( !processed )
2944     {
2945 #ifdef __WXDEBUG__
2946         wxLogTrace(wxTraceMessages, wxT("Forwarding %s to DefWindowProc."),
2947                    wxGetMessageName(message));
2948 #endif // __WXDEBUG__
2949         rc.result = MSWDefWindowProc(message, wParam, lParam);
2950     }
2951
2952     return rc.result;
2953 }
2954
2955 // ----------------------------------------------------------------------------
2956 // wxWindow <-> HWND map
2957 // ----------------------------------------------------------------------------
2958
2959 wxWinHashTable *wxWinHandleHash = NULL;
2960
2961 wxWindow *wxFindWinFromHandle(WXHWND hWnd)
2962 {
2963     return (wxWindow*)wxWinHandleHash->Get((long)hWnd);
2964 }
2965
2966 void wxAssociateWinWithHandle(HWND hWnd, wxWindowMSW *win)
2967 {
2968     // adding NULL hWnd is (first) surely a result of an error and
2969     // (secondly) breaks menu command processing
2970     wxCHECK_RET( hWnd != (HWND)NULL,
2971                  wxT("attempt to add a NULL hWnd to window list ignored") );
2972
2973     wxWindow *oldWin = wxFindWinFromHandle((WXHWND) hWnd);
2974 #ifdef __WXDEBUG__
2975     if ( oldWin && (oldWin != win) )
2976     {
2977         wxLogDebug(wxT("HWND %X already associated with another window (%s)"),
2978                    (int) hWnd, win->GetClassInfo()->GetClassName());
2979     }
2980     else
2981 #endif // __WXDEBUG__
2982     if (!oldWin)
2983     {
2984         wxWinHandleHash->Put((long)hWnd, (wxWindow *)win);
2985     }
2986 }
2987
2988 void wxRemoveHandleAssociation(wxWindowMSW *win)
2989 {
2990     wxWinHandleHash->Delete((long)win->GetHWND());
2991 }
2992
2993 // ----------------------------------------------------------------------------
2994 // various MSW speciic class dependent functions
2995 // ----------------------------------------------------------------------------
2996
2997 // Default destroyer - override if you destroy it in some other way
2998 // (e.g. with MDI child windows)
2999 void wxWindowMSW::MSWDestroyWindow()
3000 {
3001 }
3002
3003 bool wxWindowMSW::MSWGetCreateWindowCoords(const wxPoint& pos,
3004                                            const wxSize& size,
3005                                            int& x, int& y,
3006                                            int& w, int& h) const
3007 {
3008     // yes, those are just some arbitrary hardcoded numbers
3009     static const int DEFAULT_Y = 200;
3010
3011     bool nonDefault = false;
3012
3013     if ( pos.x == wxDefaultPosition.x )
3014     {
3015         // if x is set to CW_USEDEFAULT, y parameter is ignored anyhow so we
3016         // can just as well set it to CW_USEDEFAULT as well
3017         x =
3018         y = CW_USEDEFAULT;
3019     }
3020     else
3021     {
3022         // OTOH, if x is not set to CW_USEDEFAULT, y shouldn't be set to it
3023         // neither because it is not handled as a special value by Windows then
3024         // and so we have to choose some default value for it
3025         x = pos.x;
3026         y = pos.y == wxDefaultPosition.y ? DEFAULT_Y : pos.y;
3027
3028         nonDefault = true;
3029     }
3030
3031     /*
3032       NB: there used to be some code here which set the initial size of the
3033           window to the client size of the parent if no explicit size was
3034           specified. This was wrong because wxWidgets programs often assume
3035           that they get a WM_SIZE (EVT_SIZE) upon creation, however this broke
3036           it. To see why, you should understand that Windows sends WM_SIZE from
3037           inside ::CreateWindow() anyhow. However, ::CreateWindow() is called
3038           from some base class ctor and so this WM_SIZE is not processed in the
3039           real class' OnSize() (because it's not fully constructed yet and the
3040           event goes to some base class OnSize() instead). So the WM_SIZE we
3041           rely on is the one sent when the parent frame resizes its children
3042           but here is the problem: if the child already has just the right
3043           size, nothing will happen as both wxWidgets and Windows check for
3044           this and ignore any attempts to change the window size to the size it
3045           already has - so no WM_SIZE would be sent.
3046      */
3047
3048
3049     // we don't use CW_USEDEFAULT here for several reasons:
3050     //
3051     //  1. it results in huge frames on modern screens (1000*800 is not
3052     //     uncommon on my 1280*1024 screen) which is way too big for a half
3053     //     empty frame of most of wxWidgets samples for example)
3054     //
3055     //  2. it is buggy for frames with wxFRAME_TOOL_WINDOW style for which
3056     //     the default is for whatever reason 8*8 which breaks client <->
3057     //     window size calculations (it would be nice if it didn't, but it
3058     //     does and the simplest way to fix it seemed to change the broken
3059     //     default size anyhow)
3060     //
3061     //  3. there is just no advantage in doing it: with x and y it is
3062     //     possible that [future versions of] Windows position the new top
3063     //     level window in some smart way which we can't do, but we can
3064     //     guess a reasonably good size for a new window just as well
3065     //     ourselves
3066
3067     // However, on PocketPC devices, we must use the default
3068     // size if possible.
3069 #ifdef _WIN32_WCE
3070     if (size.x == wxDefaultSize.x)
3071         w = CW_USEDEFAULT;
3072     else
3073         w = size.x;
3074     if (size.y == wxDefaultSize.y)
3075         h = CW_USEDEFAULT;
3076     else
3077         h = size.y;
3078 #else
3079     if ( size.x == wxDefaultSize.x || size.y == wxDefaultSize.y)
3080     {
3081         nonDefault = true;
3082     }
3083     w = WidthDefault(size.x);
3084     h = HeightDefault(size.y);
3085 #endif
3086
3087     AdjustForParentClientOrigin(x, y);
3088
3089     return nonDefault;
3090 }
3091
3092 WXHWND wxWindowMSW::MSWGetParent() const
3093 {
3094     return m_parent ? m_parent->GetHWND() : WXHWND(NULL);
3095 }
3096
3097 bool wxWindowMSW::MSWCreate(const wxChar *wclass,
3098                             const wxChar *title,
3099                             const wxPoint& pos,
3100                             const wxSize& size,
3101                             WXDWORD style,
3102                             WXDWORD extendedStyle)
3103 {
3104     // choose the position/size for the new window
3105     int x, y, w, h;
3106     (void)MSWGetCreateWindowCoords(pos, size, x, y, w, h);
3107
3108     // controlId is menu handle for the top level windows, so set it to 0
3109     // unless we're creating a child window
3110     int controlId = style & WS_CHILD ? GetId() : 0;
3111
3112     // for each class "Foo" we have we also have "FooNR" ("no repaint") class
3113     // which is the same but without CS_[HV]REDRAW class styles so using it
3114     // ensures that the window is not fully repainted on each resize
3115     wxString className(wclass);
3116     if ( !HasFlag(wxFULL_REPAINT_ON_RESIZE) )
3117     {
3118         className += wxT("NR");
3119     }
3120
3121     // do create the window
3122     wxWindowCreationHook hook(this);
3123
3124     // VZ: anyonce cares to explain why is this done for CE?
3125 #ifdef __WXWINCE__
3126     if (extendedStyle == 0)
3127     {
3128         m_hWnd = (WXHWND)::CreateWindow
3129             (
3130             className,
3131             title ? title : wxEmptyString,
3132             style,
3133             x, y, w, h,
3134             (HWND)MSWGetParent(),
3135             (HMENU)controlId,
3136             wxGetInstance(),
3137             NULL                        // no extra data
3138             );
3139     }
3140     else
3141 #endif // __WXWINCE__
3142     {
3143         m_hWnd = (WXHWND)::CreateWindowEx
3144             (
3145             extendedStyle,
3146             className,
3147             title ? title : wxEmptyString,
3148             style,
3149             x, y, w, h,
3150             (HWND)MSWGetParent(),
3151             (HMENU)controlId,
3152             wxGetInstance(),
3153             NULL                        // no extra data
3154             );
3155     }
3156
3157     if ( !m_hWnd )
3158     {
3159         wxLogSysError(_("Can't create window of class %s"), wclass);
3160
3161         return false;
3162     }
3163
3164     SubclassWin(m_hWnd);
3165
3166     return true;
3167 }
3168
3169 // ===========================================================================
3170 // MSW message handlers
3171 // ===========================================================================
3172
3173 // ---------------------------------------------------------------------------
3174 // WM_NOTIFY
3175 // ---------------------------------------------------------------------------
3176
3177 #ifdef __WIN95__
3178
3179 bool wxWindowMSW::HandleNotify(int idCtrl, WXLPARAM lParam, WXLPARAM *result)
3180 {
3181 #ifndef __WXMICROWIN__
3182     LPNMHDR hdr = (LPNMHDR)lParam;
3183     HWND hWnd = hdr->hwndFrom;
3184     wxWindow *win = wxFindWinFromHandle((WXHWND)hWnd);
3185
3186     // if the control is one of our windows, let it handle the message itself
3187     if ( win )
3188     {
3189         return win->MSWOnNotify(idCtrl, lParam, result);
3190     }
3191
3192     // VZ: why did we do it? normally this is unnecessary and, besides, it
3193     //     breaks the message processing for the toolbars because the tooltip
3194     //     notifications were being forwarded to the toolbar child controls
3195     //     (if it had any) before being passed to the toolbar itself, so in my
3196     //     example the tooltip for the combobox was always shown instead of the
3197     //     correct button tooltips
3198 #if 0
3199     // try all our children
3200     wxWindowList::compatibility_iterator node = GetChildren().GetFirst();
3201     while ( node )
3202     {
3203         wxWindow *child = node->GetData();
3204         if ( child->MSWOnNotify(idCtrl, lParam, result) )
3205         {
3206             return true;
3207         }
3208
3209         node = node->GetNext();
3210     }
3211 #endif // 0
3212
3213     // by default, handle it ourselves
3214     return MSWOnNotify(idCtrl, lParam, result);
3215 #else // __WXMICROWIN__
3216     return false;
3217 #endif
3218 }
3219
3220 #if wxUSE_TOOLTIPS
3221
3222 bool wxWindowMSW::HandleTooltipNotify(WXUINT code,
3223                                       WXLPARAM lParam,
3224                                       const wxString& ttip)
3225 {
3226     // I don't know why it happens, but the versions of comctl32.dll starting
3227     // from 4.70 sometimes send TTN_NEEDTEXTW even to ANSI programs (normally,
3228     // this message is supposed to be sent to Unicode programs only) -- hence
3229     // we need to handle it as well, otherwise no tooltips will be shown in
3230     // this case
3231 #ifndef __WXWINCE__
3232     if ( !(code == (WXUINT) TTN_NEEDTEXTA || code == (WXUINT) TTN_NEEDTEXTW)
3233             || ttip.empty() )
3234     {
3235         // not a tooltip message or no tooltip to show anyhow
3236         return false;
3237     }
3238 #endif
3239
3240     LPTOOLTIPTEXT ttText = (LPTOOLTIPTEXT)lParam;
3241
3242     // We don't want to use the szText buffer because it has a limit of 80
3243     // bytes and this is not enough, especially for Unicode build where it
3244     // limits the tooltip string length to only 40 characters
3245     //
3246     // The best would be, of course, to not impose any length limitations at
3247     // all but then the buffer would have to be dynamic and someone would have
3248     // to free it and we don't have the tooltip owner object here any more, so
3249     // for now use our own static buffer with a higher fixed max length.
3250     //
3251     // Note that using a static buffer should not be a problem as only a single
3252     // tooltip can be shown at the same time anyhow.
3253 #if !wxUSE_UNICODE
3254     if ( code == (WXUINT) TTN_NEEDTEXTW )
3255     {
3256         // We need to convert tooltip from multi byte to Unicode on the fly.
3257         static wchar_t buf[513];
3258
3259         // Truncate tooltip length if needed as otherwise we might not have
3260         // enough space for it in the buffer and MultiByteToWideChar() would
3261         // return an error
3262         size_t tipLength = wxMin(ttip.Len(), WXSIZEOF(buf) - 1);
3263
3264         // Convert to WideChar without adding the NULL character. The NULL
3265         // character is added afterwards (this is more efficient).
3266         int len = ::MultiByteToWideChar
3267                     (
3268                         CP_ACP,
3269                         0,                      // no flags
3270                         ttip,
3271                         tipLength,
3272                         buf,
3273                         WXSIZEOF(buf) - 1
3274                     );
3275
3276         if ( !len )
3277         {
3278             wxLogLastError(_T("MultiByteToWideChar()"));
3279         }
3280
3281         buf[len] = L'\0';
3282         ttText->lpszText = (LPSTR) buf;
3283     }
3284     else // TTN_NEEDTEXTA
3285 #endif // !wxUSE_UNICODE
3286     {
3287         // we get here if we got TTN_NEEDTEXTA (only happens in ANSI build) or
3288         // if we got TTN_NEEDTEXTW in Unicode build: in this case we just have
3289         // to copy the string we have into the buffer
3290         static wxChar buf[513];
3291         wxStrncpy(buf, ttip.c_str(), WXSIZEOF(buf) - 1);
3292         buf[WXSIZEOF(buf) - 1] = _T('\0');
3293         ttText->lpszText = buf;
3294     }
3295
3296     return true;
3297 }
3298
3299 #endif // wxUSE_TOOLTIPS
3300
3301 bool wxWindowMSW::MSWOnNotify(int WXUNUSED(idCtrl),
3302                               WXLPARAM lParam,
3303                               WXLPARAM* WXUNUSED(result))
3304 {
3305 #if wxUSE_TOOLTIPS
3306     if ( m_tooltip )
3307     {
3308         NMHDR* hdr = (NMHDR *)lParam;
3309         if ( HandleTooltipNotify(hdr->code, lParam, m_tooltip->GetTip()))
3310         {
3311             // processed
3312             return true;
3313         }
3314     }
3315 #else
3316     wxUnusedVar(lParam);
3317 #endif // wxUSE_TOOLTIPS
3318
3319     return false;
3320 }
3321
3322 #endif // __WIN95__
3323
3324 // ---------------------------------------------------------------------------
3325 // end session messages
3326 // ---------------------------------------------------------------------------
3327
3328 bool wxWindowMSW::HandleQueryEndSession(long logOff, bool *mayEnd)
3329 {
3330 #ifndef __WXWINCE__
3331     wxCloseEvent event(wxEVT_QUERY_END_SESSION, wxID_ANY);
3332     event.SetEventObject(wxTheApp);
3333     event.SetCanVeto(true);
3334     event.SetLoggingOff(logOff == (long)ENDSESSION_LOGOFF);
3335
3336     bool rc = wxTheApp->ProcessEvent(event);
3337
3338     if ( rc )
3339     {
3340         // we may end only if the app didn't veto session closing (double
3341         // negation...)
3342         *mayEnd = !event.GetVeto();
3343     }
3344
3345     return rc;
3346 #else
3347     return false;
3348 #endif
3349 }
3350
3351 bool wxWindowMSW::HandleEndSession(bool endSession, long logOff)
3352 {
3353 #ifndef __WXWINCE__
3354     // do nothing if the session isn't ending
3355     if ( !endSession )
3356         return false;
3357
3358     // only send once
3359     if ( (this != wxTheApp->GetTopWindow()) )
3360         return false;
3361
3362     wxCloseEvent event(wxEVT_END_SESSION, wxID_ANY);
3363     event.SetEventObject(wxTheApp);
3364     event.SetCanVeto(false);
3365     event.SetLoggingOff( (logOff == (long)ENDSESSION_LOGOFF) );
3366
3367     return wxTheApp->ProcessEvent(event);
3368 #else
3369     return false;
3370 #endif
3371 }
3372
3373 // ---------------------------------------------------------------------------
3374 // window creation/destruction
3375 // ---------------------------------------------------------------------------
3376
3377 bool wxWindowMSW::HandleCreate(WXLPCREATESTRUCT cs, bool *mayCreate)
3378 {
3379     // VZ: why is this commented out for WinCE? If it doesn't support
3380     //     WS_EX_CONTROLPARENT at all it should be somehow handled globally,
3381     //     not with multiple #ifdef's!
3382 #ifndef __WXWINCE__
3383     if ( ((CREATESTRUCT *)cs)->dwExStyle & WS_EX_CONTROLPARENT )
3384         EnsureParentHasControlParentStyle(GetParent());
3385 #endif // !__WXWINCE__
3386
3387     // TODO: should generate this event from WM_NCCREATE
3388     wxWindowCreateEvent event((wxWindow *)this);
3389     (void)GetEventHandler()->ProcessEvent(event);
3390
3391     *mayCreate = true;
3392
3393     return true;
3394 }
3395
3396 bool wxWindowMSW::HandleDestroy()
3397 {
3398     SendDestroyEvent();
3399
3400     // delete our drop target if we've got one
3401 #if wxUSE_DRAG_AND_DROP
3402     if ( m_dropTarget != NULL )
3403     {
3404         m_dropTarget->Revoke(m_hWnd);
3405
3406         delete m_dropTarget;
3407         m_dropTarget = NULL;
3408     }
3409 #endif // wxUSE_DRAG_AND_DROP
3410
3411     // WM_DESTROY handled
3412     return true;
3413 }
3414
3415 // ---------------------------------------------------------------------------
3416 // activation/focus
3417 // ---------------------------------------------------------------------------
3418
3419 bool wxWindowMSW::HandleActivate(int state,
3420                               bool WXUNUSED(minimized),
3421                               WXHWND WXUNUSED(activate))
3422 {
3423     wxActivateEvent event(wxEVT_ACTIVATE,
3424                           (state == WA_ACTIVE) || (state == WA_CLICKACTIVE),
3425                           m_windowId);
3426     event.SetEventObject(this);
3427
3428     return GetEventHandler()->ProcessEvent(event);
3429 }
3430
3431 bool wxWindowMSW::HandleSetFocus(WXHWND hwnd)
3432 {
3433     // notify the parent keeping track of focus for the kbd navigation
3434     // purposes that we got it
3435     wxChildFocusEvent eventFocus((wxWindow *)this);
3436     (void)GetEventHandler()->ProcessEvent(eventFocus);
3437
3438 #if wxUSE_CARET
3439     // Deal with caret
3440     if ( m_caret )
3441     {
3442         m_caret->OnSetFocus();
3443     }
3444 #endif // wxUSE_CARET
3445
3446 #if wxUSE_TEXTCTRL
3447     // If it's a wxTextCtrl don't send the event as it will be done
3448     // after the control gets to process it from EN_FOCUS handler
3449     if ( wxDynamicCastThis(wxTextCtrl) )
3450     {
3451         return false;
3452     }
3453 #endif // wxUSE_TEXTCTRL
3454
3455     wxFocusEvent event(wxEVT_SET_FOCUS, m_windowId);
3456     event.SetEventObject(this);
3457
3458     // wxFindWinFromHandle() may return NULL, it is ok
3459     event.SetWindow(wxFindWinFromHandle(hwnd));
3460
3461     return GetEventHandler()->ProcessEvent(event);
3462 }
3463
3464 bool wxWindowMSW::HandleKillFocus(WXHWND hwnd)
3465 {
3466 #if wxUSE_CARET
3467     // Deal with caret
3468     if ( m_caret )
3469     {
3470         m_caret->OnKillFocus();
3471     }
3472 #endif // wxUSE_CARET
3473
3474 #if wxUSE_TEXTCTRL
3475     // If it's a wxTextCtrl don't send the event as it will be done
3476     // after the control gets to process it.
3477     wxTextCtrl *ctrl = wxDynamicCastThis(wxTextCtrl);
3478     if ( ctrl )
3479     {
3480         return false;
3481     }
3482 #endif
3483
3484     // Don't send the event when in the process of being deleted.  This can
3485     // only cause problems if the event handler tries to access the object.
3486     if ( m_isBeingDeleted )
3487     {
3488         return false;
3489     }
3490
3491     wxFocusEvent event(wxEVT_KILL_FOCUS, m_windowId);
3492     event.SetEventObject(this);
3493
3494     // wxFindWinFromHandle() may return NULL, it is ok
3495     event.SetWindow(wxFindWinFromHandle(hwnd));
3496
3497     return GetEventHandler()->ProcessEvent(event);
3498 }
3499
3500 // ---------------------------------------------------------------------------
3501 // miscellaneous
3502 // ---------------------------------------------------------------------------
3503
3504 bool wxWindowMSW::HandleShow(bool show, int WXUNUSED(status))
3505 {
3506     wxShowEvent event(GetId(), show);
3507     event.m_eventObject = this;
3508
3509     return GetEventHandler()->ProcessEvent(event);
3510 }
3511
3512 bool wxWindowMSW::HandleInitDialog(WXHWND WXUNUSED(hWndFocus))
3513 {
3514     wxInitDialogEvent event(GetId());
3515     event.m_eventObject = this;
3516
3517     return GetEventHandler()->ProcessEvent(event);
3518 }
3519
3520 bool wxWindowMSW::HandleDropFiles(WXWPARAM wParam)
3521 {
3522 #if defined (__WXMICROWIN__) || defined(__WXWINCE__)
3523     return false;
3524 #else // __WXMICROWIN__
3525     HDROP hFilesInfo = (HDROP) wParam;
3526
3527     // Get the total number of files dropped
3528     UINT gwFilesDropped = ::DragQueryFile
3529                             (
3530                                 (HDROP)hFilesInfo,
3531                                 (UINT)-1,
3532                                 (LPTSTR)0,
3533                                 (UINT)0
3534                             );
3535
3536     wxString *files = new wxString[gwFilesDropped];
3537     for ( UINT wIndex = 0; wIndex < gwFilesDropped; wIndex++ )
3538     {
3539         // first get the needed buffer length (+1 for terminating NUL)
3540         size_t len = ::DragQueryFile(hFilesInfo, wIndex, NULL, 0) + 1;
3541
3542         // and now get the file name
3543         ::DragQueryFile(hFilesInfo, wIndex,
3544                         wxStringBuffer(files[wIndex], len), len);
3545     }
3546     DragFinish (hFilesInfo);
3547
3548     wxDropFilesEvent event(wxEVT_DROP_FILES, gwFilesDropped, files);
3549     event.m_eventObject = this;
3550
3551     POINT dropPoint;
3552     DragQueryPoint(hFilesInfo, (LPPOINT) &dropPoint);
3553     event.m_pos.x = dropPoint.x;
3554     event.m_pos.y = dropPoint.y;
3555
3556     return GetEventHandler()->ProcessEvent(event);
3557 #endif
3558 }
3559
3560
3561 bool wxWindowMSW::HandleSetCursor(WXHWND WXUNUSED(hWnd),
3562                                   short nHitTest,
3563                                   int WXUNUSED(mouseMsg))
3564 {
3565 #ifndef __WXMICROWIN__
3566     // the logic is as follows:
3567     // -1. don't set cursor for non client area, including but not limited to
3568     //     the title bar, scrollbars, &c
3569     //  0. allow the user to override default behaviour by using EVT_SET_CURSOR
3570     //  1. if we have the cursor set it unless wxIsBusy()
3571     //  2. if we're a top level window, set some cursor anyhow
3572     //  3. if wxIsBusy(), set the busy cursor, otherwise the global one
3573
3574     if ( nHitTest != HTCLIENT )
3575     {
3576         return false;
3577     }
3578
3579     HCURSOR hcursor = 0;
3580
3581     // first ask the user code - it may wish to set the cursor in some very
3582     // specific way (for example, depending on the current position)
3583     POINT pt;
3584     if ( !::GetCursorPos(&pt) )
3585     {
3586         wxLogLastError(wxT("GetCursorPos"));
3587     }
3588
3589     int x = pt.x,
3590         y = pt.y;
3591     ScreenToClient(&x, &y);
3592     wxSetCursorEvent event(x, y);
3593
3594     bool processedEvtSetCursor = GetEventHandler()->ProcessEvent(event);
3595     if ( processedEvtSetCursor && event.HasCursor() )
3596     {
3597         hcursor = GetHcursorOf(event.GetCursor());
3598     }
3599
3600     if ( !hcursor )
3601     {
3602         bool isBusy = wxIsBusy();
3603
3604         // the test for processedEvtSetCursor is here to prevent using m_cursor
3605         // if the user code caught EVT_SET_CURSOR() and returned nothing from
3606         // it - this is a way to say that our cursor shouldn't be used for this
3607         // point
3608         if ( !processedEvtSetCursor && m_cursor.Ok() )
3609         {
3610             hcursor = GetHcursorOf(m_cursor);
3611         }
3612
3613         if ( !GetParent() )
3614         {
3615             if ( isBusy )
3616             {
3617                 hcursor = wxGetCurrentBusyCursor();
3618             }
3619             else if ( !hcursor )
3620             {
3621                 const wxCursor *cursor = wxGetGlobalCursor();
3622                 if ( cursor && cursor->Ok() )
3623                 {
3624                     hcursor = GetHcursorOf(*cursor);
3625                 }
3626             }
3627         }
3628     }
3629
3630     if ( hcursor )
3631     {
3632 //        wxLogDebug("HandleSetCursor: Setting cursor %ld", (long) hcursor);
3633
3634         ::SetCursor(hcursor);
3635
3636         // cursor set, stop here
3637         return true;
3638     }
3639 #endif // __WXMICROWIN__
3640
3641     // pass up the window chain
3642     return false;
3643 }
3644
3645 // ---------------------------------------------------------------------------
3646 // owner drawn stuff
3647 // ---------------------------------------------------------------------------
3648
3649 #if (wxUSE_OWNER_DRAWN && wxUSE_MENUS_NATIVE) || \
3650         (wxUSE_CONTROLS && !defined(__WXUNIVERSAL__))
3651     #define WXUNUSED_UNLESS_ODRAWN(param) param
3652 #else
3653     #define WXUNUSED_UNLESS_ODRAWN(param)
3654 #endif
3655
3656 bool
3657 wxWindowMSW::MSWOnDrawItem(int WXUNUSED_UNLESS_ODRAWN(id),
3658                            WXDRAWITEMSTRUCT * WXUNUSED_UNLESS_ODRAWN(itemStruct))
3659 {
3660 #if wxUSE_OWNER_DRAWN
3661
3662 #if wxUSE_MENUS_NATIVE
3663     // is it a menu item?
3664     DRAWITEMSTRUCT *pDrawStruct = (DRAWITEMSTRUCT *)itemStruct;
3665     if ( id == 0 && pDrawStruct->CtlType == ODT_MENU )
3666     {
3667         wxMenuItem *pMenuItem = (wxMenuItem *)(pDrawStruct->itemData);
3668
3669         wxCHECK( pMenuItem->IsKindOf(CLASSINFO(wxMenuItem)), false );
3670
3671         // prepare to call OnDrawItem(): notice using of wxDCTemp to prevent
3672         // the DC from being released
3673         wxDCTemp dc((WXHDC)pDrawStruct->hDC);
3674         wxRect rect(pDrawStruct->rcItem.left, pDrawStruct->rcItem.top,
3675                     pDrawStruct->rcItem.right - pDrawStruct->rcItem.left,
3676                     pDrawStruct->rcItem.bottom - pDrawStruct->rcItem.top);
3677
3678         return pMenuItem->OnDrawItem
3679                (
3680                 dc,
3681                 rect,
3682                 (wxOwnerDrawn::wxODAction)pDrawStruct->itemAction,
3683                 (wxOwnerDrawn::wxODStatus)pDrawStruct->itemState
3684                );
3685     }
3686 #endif // wxUSE_MENUS_NATIVE
3687
3688 #endif // USE_OWNER_DRAWN
3689
3690 #if wxUSE_CONTROLS && !defined(__WXUNIVERSAL__)
3691
3692 #if wxUSE_OWNER_DRAWN
3693     wxControl *item = wxDynamicCast(FindItem(id), wxControl);
3694 #else // !wxUSE_OWNER_DRAWN
3695     // we may still have owner-drawn buttons internally because we have to make
3696     // them owner-drawn to support colour change
3697     wxControl *item =
3698 #                     if wxUSE_BUTTON
3699                          wxDynamicCast(FindItem(id), wxButton)
3700 #                     else
3701                          NULL
3702 #                     endif
3703                     ;
3704 #endif // USE_OWNER_DRAWN
3705
3706     if ( item )
3707     {
3708         return item->MSWOnDraw(itemStruct);
3709     }
3710
3711 #endif // wxUSE_CONTROLS
3712
3713     return false;
3714 }
3715
3716 bool
3717 wxWindowMSW::MSWOnMeasureItem(int WXUNUSED_UNLESS_ODRAWN(id),
3718                               WXMEASUREITEMSTRUCT *
3719                                   WXUNUSED_UNLESS_ODRAWN(itemStruct))
3720 {
3721 #if wxUSE_OWNER_DRAWN && wxUSE_MENUS_NATIVE
3722     // is it a menu item?
3723     MEASUREITEMSTRUCT *pMeasureStruct = (MEASUREITEMSTRUCT *)itemStruct;
3724     if ( id == 0 && pMeasureStruct->CtlType == ODT_MENU )
3725     {
3726         wxMenuItem *pMenuItem = (wxMenuItem *)(pMeasureStruct->itemData);
3727
3728         wxCHECK( pMenuItem->IsKindOf(CLASSINFO(wxMenuItem)), false );
3729
3730         size_t w, h;
3731         bool rc = pMenuItem->OnMeasureItem(&w, &h);
3732
3733         pMeasureStruct->itemWidth = w;
3734         pMeasureStruct->itemHeight = h;
3735
3736         return rc;
3737     }
3738
3739     wxControl *item = wxDynamicCast(FindItem(id), wxControl);
3740     if ( item )
3741     {
3742         return item->MSWOnMeasure(itemStruct);
3743     }
3744 #endif // wxUSE_OWNER_DRAWN
3745
3746     return false;
3747 }
3748
3749 // ---------------------------------------------------------------------------
3750 // colours and palettes
3751 // ---------------------------------------------------------------------------
3752
3753 bool wxWindowMSW::HandleSysColorChange()
3754 {
3755     wxSysColourChangedEvent event;
3756     event.SetEventObject(this);
3757
3758     (void)GetEventHandler()->ProcessEvent(event);
3759
3760     // always let the system carry on the default processing to allow the
3761     // native controls to react to the colours update
3762     return false;
3763 }
3764
3765 bool wxWindowMSW::HandleDisplayChange()
3766 {
3767     wxDisplayChangedEvent event;
3768     event.SetEventObject(this);
3769
3770     return GetEventHandler()->ProcessEvent(event);
3771 }
3772
3773 bool wxWindowMSW::HandleCtlColor(WXHBRUSH *brush,
3774                               WXHDC pDC,
3775                               WXHWND pWnd,
3776                               WXUINT nCtlColor,
3777                               WXUINT message,
3778                               WXWPARAM wParam,
3779                               WXLPARAM lParam)
3780 {
3781 #ifndef __WXMICROWIN__
3782     WXHBRUSH hBrush = 0;
3783
3784 #ifdef __WXWINCE__
3785     if (false)
3786 #else
3787     if ( nCtlColor == CTLCOLOR_DLG )
3788 #endif
3789     {
3790         hBrush = OnCtlColor(pDC, pWnd, nCtlColor, message, wParam, lParam);
3791     }
3792 #if wxUSE_CONTROLS
3793     else
3794     {
3795         wxControl *item = (wxControl *)FindItemByHWND(pWnd, true);
3796         if ( item )
3797             hBrush = item->OnCtlColor(pDC, pWnd, nCtlColor, message, wParam, lParam);
3798     }
3799 #endif // wxUSE_CONTROLS
3800
3801     if ( hBrush )
3802         *brush = hBrush;
3803
3804     return hBrush != 0;
3805 #else // __WXMICROWIN__
3806     return false;
3807 #endif
3808 }
3809
3810 // Define for each class of dialog and control
3811 WXHBRUSH wxWindowMSW::OnCtlColor(WXHDC WXUNUSED(hDC),
3812                                  WXHWND WXUNUSED(hWnd),
3813                                  WXUINT WXUNUSED(nCtlColor),
3814                                  WXUINT WXUNUSED(message),
3815                                  WXWPARAM WXUNUSED(wParam),
3816                                  WXLPARAM WXUNUSED(lParam))
3817 {
3818     return (WXHBRUSH)0;
3819 }
3820
3821 bool wxWindowMSW::HandlePaletteChanged(WXHWND hWndPalChange)
3822 {
3823 #if wxUSE_PALETTE
3824     // same as below except we don't respond to our own messages
3825     if ( hWndPalChange != GetHWND() )
3826     {
3827         // check to see if we our our parents have a custom palette
3828         wxWindowMSW *win = this;
3829         while ( win && !win->HasCustomPalette() )
3830         {
3831             win = win->GetParent();
3832         }
3833
3834         if ( win && win->HasCustomPalette() )
3835         {
3836             // realize the palette to see whether redrawing is needed
3837             HDC hdc = ::GetDC((HWND) hWndPalChange);
3838             win->m_palette.SetHPALETTE((WXHPALETTE)
3839                     ::SelectPalette(hdc, GetHpaletteOf(win->m_palette), FALSE));
3840
3841             int result = ::RealizePalette(hdc);
3842
3843             // restore the palette (before releasing the DC)
3844             win->m_palette.SetHPALETTE((WXHPALETTE)
3845                     ::SelectPalette(hdc, GetHpaletteOf(win->m_palette), FALSE));
3846             ::RealizePalette(hdc);
3847             ::ReleaseDC((HWND) hWndPalChange, hdc);
3848
3849             // now check for the need to redraw
3850             if (result > 0)
3851                 ::InvalidateRect((HWND) hWndPalChange, NULL, TRUE);
3852         }
3853
3854     }
3855 #endif // wxUSE_PALETTE
3856
3857     wxPaletteChangedEvent event(GetId());
3858     event.SetEventObject(this);
3859     event.SetChangedWindow(wxFindWinFromHandle(hWndPalChange));
3860
3861     return GetEventHandler()->ProcessEvent(event);
3862 }
3863
3864 bool wxWindowMSW::HandleCaptureChanged(WXHWND hWndGainedCapture)
3865 {
3866     wxMouseCaptureChangedEvent event(GetId(), wxFindWinFromHandle(hWndGainedCapture));
3867     event.SetEventObject(this);
3868
3869     return GetEventHandler()->ProcessEvent(event);
3870 }
3871
3872 bool wxWindowMSW::HandleQueryNewPalette()
3873 {
3874
3875 #if wxUSE_PALETTE
3876     // check to see if we our our parents have a custom palette
3877     wxWindowMSW *win = this;
3878     while (!win->HasCustomPalette() && win->GetParent()) win = win->GetParent();
3879     if (win->HasCustomPalette()) {
3880         /* realize the palette to see whether redrawing is needed */
3881         HDC hdc = ::GetDC((HWND) GetHWND());
3882         win->m_palette.SetHPALETTE( (WXHPALETTE)
3883              ::SelectPalette(hdc, (HPALETTE) win->m_palette.GetHPALETTE(), FALSE) );
3884
3885         int result = ::RealizePalette(hdc);
3886         /* restore the palette (before releasing the DC) */
3887         win->m_palette.SetHPALETTE( (WXHPALETTE)
3888              ::SelectPalette(hdc, (HPALETTE) win->m_palette.GetHPALETTE(), TRUE) );
3889         ::RealizePalette(hdc);
3890         ::ReleaseDC((HWND) GetHWND(), hdc);
3891         /* now check for the need to redraw */
3892         if (result > 0)
3893             ::InvalidateRect((HWND) GetHWND(), NULL, TRUE);
3894         }
3895 #endif // wxUSE_PALETTE
3896
3897     wxQueryNewPaletteEvent event(GetId());
3898     event.SetEventObject(this);
3899
3900     return GetEventHandler()->ProcessEvent(event) && event.GetPaletteRealized();
3901 }
3902
3903 // Responds to colour changes: passes event on to children.
3904 void wxWindowMSW::OnSysColourChanged(wxSysColourChangedEvent& WXUNUSED(event))
3905 {
3906     // the top level window also reset the standard colour map as it might have
3907     // changed (there is no need to do it for the non top level windows as we
3908     // only have to do it once)
3909     if ( IsTopLevel() )
3910     {
3911         // FIXME-MT
3912         gs_hasStdCmap = false;
3913     }
3914     wxWindowList::compatibility_iterator node = GetChildren().GetFirst();
3915     while ( node )
3916     {
3917         // Only propagate to non-top-level windows because Windows already
3918         // sends this event to all top-level ones
3919         wxWindow *win = node->GetData();
3920         if ( !win->IsTopLevel() )
3921         {
3922             // we need to send the real WM_SYSCOLORCHANGE and not just trigger
3923             // EVT_SYS_COLOUR_CHANGED call because the latter wouldn't work for
3924             // the standard controls
3925             ::SendMessage(GetHwndOf(win), WM_SYSCOLORCHANGE, 0, 0);
3926         }
3927
3928         node = node->GetNext();
3929     }
3930 }
3931
3932 extern wxCOLORMAP *wxGetStdColourMap()
3933 {
3934     static COLORREF s_stdColours[wxSTD_COL_MAX];
3935     static wxCOLORMAP s_cmap[wxSTD_COL_MAX];
3936
3937     if ( !gs_hasStdCmap )
3938     {
3939         static bool s_coloursInit = false;
3940
3941         if ( !s_coloursInit )
3942         {
3943             // When a bitmap is loaded, the RGB values can change (apparently
3944             // because Windows adjusts them to care for the old programs always
3945             // using 0xc0c0c0 while the transparent colour for the new Windows
3946             // versions is different). But we do this adjustment ourselves so
3947             // we want to avoid Windows' "help" and for this we need to have a
3948             // reference bitmap which can tell us what the RGB values change
3949             // to.
3950             wxBitmap stdColourBitmap(_T("wxBITMAP_STD_COLOURS"));
3951             if ( stdColourBitmap.Ok() )
3952             {
3953                 // the pixels in the bitmap must correspond to wxSTD_COL_XXX!
3954                 wxASSERT_MSG( stdColourBitmap.GetWidth() == wxSTD_COL_MAX,
3955                               _T("forgot to update wxBITMAP_STD_COLOURS!") );
3956
3957                 wxMemoryDC memDC;
3958                 memDC.SelectObject(stdColourBitmap);
3959
3960                 wxColour colour;
3961                 for ( size_t i = 0; i < WXSIZEOF(s_stdColours); i++ )
3962                 {
3963                     memDC.GetPixel(i, 0, &colour);
3964                     s_stdColours[i] = wxColourToRGB(colour);
3965                 }
3966             }
3967             else // wxBITMAP_STD_COLOURS couldn't be loaded
3968             {
3969                 s_stdColours[0] = RGB(000,000,000);     // black
3970                 s_stdColours[1] = RGB(128,128,128);     // dark grey
3971                 s_stdColours[2] = RGB(192,192,192);     // light grey
3972                 s_stdColours[3] = RGB(255,255,255);     // white
3973                 //s_stdColours[4] = RGB(000,000,255);     // blue
3974                 //s_stdColours[5] = RGB(255,000,255);     // magenta
3975             }
3976
3977             s_coloursInit = true;
3978         }
3979
3980         gs_hasStdCmap = true;
3981
3982         // create the colour map
3983 #define INIT_CMAP_ENTRY(col) \
3984             s_cmap[wxSTD_COL_##col].from = s_stdColours[wxSTD_COL_##col]; \
3985             s_cmap[wxSTD_COL_##col].to = ::GetSysColor(COLOR_##col)
3986
3987         INIT_CMAP_ENTRY(BTNTEXT);
3988         INIT_CMAP_ENTRY(BTNSHADOW);
3989         INIT_CMAP_ENTRY(BTNFACE);
3990         INIT_CMAP_ENTRY(BTNHIGHLIGHT);
3991
3992 #undef INIT_CMAP_ENTRY
3993     }
3994
3995     return s_cmap;
3996 }
3997
3998 // ---------------------------------------------------------------------------
3999 // painting
4000 // ---------------------------------------------------------------------------
4001
4002 bool wxWindowMSW::HandlePaint()
4003 {
4004 //    if (GetExtraStyle() & wxWS_EX_THEMED_BACKGROUND)
4005 //        return FALSE;
4006
4007     HRGN hRegion = ::CreateRectRgn(0, 0, 0, 0); // Dummy call to get a handle
4008     if ( !hRegion )
4009         wxLogLastError(wxT("CreateRectRgn"));
4010     if ( ::GetUpdateRgn(GetHwnd(), hRegion, FALSE) == ERROR )
4011         wxLogLastError(wxT("GetUpdateRgn"));
4012
4013     m_updateRegion = wxRegion((WXHRGN) hRegion);
4014
4015     wxPaintEvent event(m_windowId);
4016     event.SetEventObject(this);
4017
4018     bool processed = GetEventHandler()->ProcessEvent(event);
4019
4020     // note that we must generate NC event after the normal one as otherwise
4021     // BeginPaint() will happily overwrite our decorations with the background
4022     // colour
4023     wxNcPaintEvent eventNc(m_windowId);
4024     eventNc.SetEventObject(this);
4025     GetEventHandler()->ProcessEvent(eventNc);
4026
4027     return processed;
4028 }
4029
4030 // Can be called from an application's OnPaint handler
4031 void wxWindowMSW::OnPaint(wxPaintEvent& event)
4032 {
4033 #ifdef __WXUNIVERSAL__
4034     event.Skip();
4035 #else
4036     HDC hDC = (HDC) wxPaintDC::FindDCInCache((wxWindow*) event.GetEventObject());
4037     if (hDC != 0)
4038     {
4039         MSWDefWindowProc(WM_PAINT, (WPARAM) hDC, 0);
4040     }
4041 #endif
4042 }
4043
4044 bool wxWindowMSW::HandleEraseBkgnd(WXHDC hdc)
4045 {
4046     // Prevents flicker when dragging
4047     if ( ::IsIconic(GetHwnd()) )
4048         return true;
4049
4050 #if 0
4051     if (GetParent() && GetParent()->GetExtraStyle() & wxWS_EX_THEMED_BACKGROUND)
4052     {
4053         return false;
4054     }
4055
4056     if (GetExtraStyle() & wxWS_EX_THEMED_BACKGROUND)
4057     {
4058         if (wxUxThemeEngine::Get())
4059         {
4060             WXHTHEME hTheme = wxUxThemeEngine::Get()->m_pfnOpenThemeData(GetHWND(), L"TAB");
4061             if (hTheme)
4062             {
4063                 WXURECT rect;
4064                 ::GetClientRect((HWND) GetHWND(), (RECT*) & rect);
4065                 wxUxThemeEngine::Get()->m_pfnDrawThemeBackground(hTheme, hdc, 10 /* TABP_BODY */, 0, &rect, &rect);
4066                 wxUxThemeEngine::Get()->m_pfnCloseThemeData(hTheme);
4067                 return true;
4068             }
4069         }
4070     }
4071 #endif
4072
4073     wxDCTemp dc(hdc);
4074
4075     dc.SetHDC(hdc);
4076     dc.SetWindow((wxWindow *)this);
4077     dc.BeginDrawing();
4078
4079     wxEraseEvent event(m_windowId, &dc);
4080     event.SetEventObject(this);
4081     bool rc = GetEventHandler()->ProcessEvent(event);
4082
4083     dc.EndDrawing();
4084
4085     // must be called manually as ~wxDC doesn't do anything for wxDCTemp
4086     dc.SelectOldObjects(hdc);
4087
4088     return rc;
4089 }
4090
4091 void wxWindowMSW::OnEraseBackground(wxEraseEvent& event)
4092 {
4093     RECT rect;
4094     ::GetClientRect(GetHwnd(), &rect);
4095
4096     wxColour backgroundColour( GetBackgroundColour());
4097     COLORREF ref = PALETTERGB(backgroundColour.Red(),
4098                               backgroundColour.Green(),
4099                               backgroundColour.Blue());
4100     HBRUSH hBrush = ::CreateSolidBrush(ref);
4101     if ( !hBrush )
4102         wxLogLastError(wxT("CreateSolidBrush"));
4103
4104     HDC hdc = (HDC)event.GetDC()->GetHDC();
4105
4106 #ifndef __WXWINCE__
4107     int mode = ::SetMapMode(hdc, MM_TEXT);
4108 #endif
4109
4110     ::FillRect(hdc, &rect, hBrush);
4111     ::DeleteObject(hBrush);
4112
4113 #ifndef __WXWINCE__
4114     ::SetMapMode(hdc, mode);
4115 #endif
4116 }
4117
4118 // ---------------------------------------------------------------------------
4119 // moving and resizing
4120 // ---------------------------------------------------------------------------
4121
4122 bool wxWindowMSW::HandleMinimize()
4123 {
4124     wxIconizeEvent event(m_windowId);
4125     event.SetEventObject(this);
4126
4127     return GetEventHandler()->ProcessEvent(event);
4128 }
4129
4130 bool wxWindowMSW::HandleMaximize()
4131 {
4132     wxMaximizeEvent event(m_windowId);
4133     event.SetEventObject(this);
4134
4135     return GetEventHandler()->ProcessEvent(event);
4136 }
4137
4138 bool wxWindowMSW::HandleMove(int x, int y)
4139 {
4140     wxMoveEvent event(wxPoint(x, y), m_windowId);
4141     event.SetEventObject(this);
4142
4143     return GetEventHandler()->ProcessEvent(event);
4144 }
4145
4146 bool wxWindowMSW::HandleMoving(wxRect& rect)
4147 {
4148     wxMoveEvent event(rect, m_windowId);
4149     event.SetEventObject(this);
4150
4151     bool rc = GetEventHandler()->ProcessEvent(event);
4152     if (rc)
4153         rect = event.GetRect();
4154     return rc;
4155 }
4156
4157 bool wxWindowMSW::HandleSize(int WXUNUSED(w), int WXUNUSED(h),
4158                              WXUINT WXUNUSED(flag))
4159 {
4160     // don't use w and h parameters as they specify the client size while
4161     // according to the docs EVT_SIZE handler is supposed to receive the total
4162     // size
4163     wxSizeEvent event(GetSize(), m_windowId);
4164     event.SetEventObject(this);
4165
4166     return GetEventHandler()->ProcessEvent(event);
4167 }
4168
4169 bool wxWindowMSW::HandleSizing(wxRect& rect)
4170 {
4171     wxSizeEvent event(rect, m_windowId);
4172     event.SetEventObject(this);
4173
4174     bool rc = GetEventHandler()->ProcessEvent(event);
4175     if (rc)
4176         rect = event.GetRect();
4177     return rc;
4178 }
4179
4180 bool wxWindowMSW::HandleGetMinMaxInfo(void *mmInfo)
4181 {
4182 #ifdef __WXWINCE__
4183     return false;
4184 #else
4185     MINMAXINFO *info = (MINMAXINFO *)mmInfo;
4186
4187     bool rc = false;
4188
4189     int minWidth = GetMinWidth(),
4190         minHeight = GetMinHeight(),
4191         maxWidth = GetMaxWidth(),
4192         maxHeight = GetMaxHeight();
4193
4194     if ( minWidth != wxDefaultSize.x )
4195     {
4196         info->ptMinTrackSize.x = minWidth;
4197         rc = true;
4198     }
4199
4200     if ( minHeight != wxDefaultSize.y )
4201     {
4202         info->ptMinTrackSize.y = minHeight;
4203         rc = true;
4204     }
4205
4206     if ( maxWidth != wxDefaultSize.x )
4207     {
4208         info->ptMaxTrackSize.x = maxWidth;
4209         rc = true;
4210     }
4211
4212     if ( maxHeight != wxDefaultSize.y )
4213     {
4214         info->ptMaxTrackSize.y = maxHeight;
4215         rc = true;
4216     }
4217
4218     return rc;
4219 #endif
4220 }
4221
4222 // ---------------------------------------------------------------------------
4223 // command messages
4224 // ---------------------------------------------------------------------------
4225
4226 bool wxWindowMSW::HandleCommand(WXWORD id, WXWORD cmd, WXHWND control)
4227 {
4228 #if wxUSE_MENUS_NATIVE
4229     if ( !cmd && wxCurrentPopupMenu )
4230     {
4231         wxMenu *popupMenu = wxCurrentPopupMenu;
4232         wxCurrentPopupMenu = NULL;
4233
4234         return popupMenu->MSWCommand(cmd, id);
4235     }
4236 #endif // wxUSE_MENUS_NATIVE
4237
4238     wxWindow *win = NULL;
4239
4240     // first try to find it from HWND - this works even with the broken
4241     // programs using the same ids for different controls
4242     if ( control )
4243     {
4244         win = wxFindWinFromHandle(control);
4245     }
4246
4247     // try the id
4248     if ( !win )
4249     {
4250         // must cast to a signed type before comparing with other ids!
4251         win = FindItem((signed short)id);
4252     }
4253
4254     if ( win )
4255     {
4256         return win->MSWCommand(cmd, id);
4257     }
4258
4259     // the messages sent from the in-place edit control used by the treectrl
4260     // for label editing have id == 0, but they should _not_ be treated as menu
4261     // messages (they are EN_XXX ones, in fact) so don't translate anything
4262     // coming from a control to wxEVT_COMMAND_MENU_SELECTED
4263     if ( !control )
4264     {
4265         // If no child window, it may be an accelerator, e.g. for a popup menu
4266         // command
4267
4268         wxCommandEvent event(wxEVT_COMMAND_MENU_SELECTED);
4269         event.SetEventObject(this);
4270         event.SetId(id);
4271         event.SetInt(id);
4272
4273         return GetEventHandler()->ProcessEvent(event);
4274     }
4275 #if wxUSE_SPINCTRL && !defined(__WXUNIVERSAL__)
4276     else
4277     {
4278         // the text ctrl which is logically part of wxSpinCtrl sends WM_COMMAND
4279         // notifications to its parent which we want to reflect back to
4280         // wxSpinCtrl
4281         wxSpinCtrl *spin = wxSpinCtrl::GetSpinForTextCtrl(control);
4282         if ( spin && spin->ProcessTextCommand(cmd, id) )
4283             return true;
4284     }
4285 #endif // wxUSE_SPINCTRL
4286
4287     return false;
4288 }
4289
4290 // ---------------------------------------------------------------------------
4291 // mouse events
4292 // ---------------------------------------------------------------------------
4293
4294 void wxWindowMSW::InitMouseEvent(wxMouseEvent& event,
4295                                  int x, int y,
4296                                  WXUINT flags)
4297 {
4298     // our client coords are not quite the same as Windows ones
4299     wxPoint pt = GetClientAreaOrigin();
4300     event.m_x = x - pt.x;
4301     event.m_y = y - pt.y;
4302
4303     event.m_shiftDown = (flags & MK_SHIFT) != 0;
4304     event.m_controlDown = (flags & MK_CONTROL) != 0;
4305     event.m_leftDown = (flags & MK_LBUTTON) != 0;
4306     event.m_middleDown = (flags & MK_MBUTTON) != 0;
4307     event.m_rightDown = (flags & MK_RBUTTON) != 0;
4308  //   event.m_altDown = (::GetKeyState(VK_MENU) & 0x80000000) != 0;
4309     // Returns different negative values on WinME and WinNT,
4310     // so simply test for negative value.
4311     event.m_altDown = ::GetKeyState(VK_MENU) < 0;
4312
4313 #ifndef __WXWINCE__
4314     event.SetTimestamp(::GetMessageTime());
4315 #endif
4316
4317     event.m_eventObject = this;
4318     event.SetId(GetId());
4319
4320 #if wxUSE_MOUSEEVENT_HACK
4321     m_lastMouseX = x;
4322     m_lastMouseY = y;
4323     m_lastMouseEvent = event.GetEventType();
4324 #endif // wxUSE_MOUSEEVENT_HACK
4325 }
4326
4327 // Windows doesn't send the mouse events to the static controls (which are
4328 // transparent in the sense that their WM_NCHITTEST handler returns
4329 // HTTRANSPARENT) at all but we want all controls to receive the mouse events
4330 // and so we manually check if we don't have a child window under mouse and if
4331 // we do, send the event to it instead of the window Windows had sent WM_XXX
4332 // to.
4333 //
4334 // Notice that this is not done for the mouse move events because this could
4335 // (would?) be too slow, but only for clicks which means that the static texts
4336 // still don't get move, enter nor leave events.
4337 static wxWindowMSW *FindWindowForMouseEvent(wxWindowMSW *win, int *x, int *y) //TW:REQ:Univ
4338 {
4339     wxCHECK_MSG( x && y, win, _T("NULL pointer in FindWindowForMouseEvent") );
4340
4341     // first try to find a non transparent child: this allows us to send events
4342     // to a static text which is inside a static box, for example
4343     POINT pt = { *x, *y };
4344     HWND hwnd = GetHwndOf(win),
4345          hwndUnderMouse;
4346
4347 #ifdef __WXWINCE__
4348     hwndUnderMouse = ::ChildWindowFromPoint
4349                        (
4350                         hwnd,
4351                         pt
4352                        );
4353 #else
4354     hwndUnderMouse = ::ChildWindowFromPointEx
4355                        (
4356                         hwnd,
4357                         pt,
4358                         CWP_SKIPINVISIBLE   |
4359                         CWP_SKIPDISABLED    |
4360                         CWP_SKIPTRANSPARENT
4361                        );
4362 #endif
4363
4364     if ( !hwndUnderMouse || hwndUnderMouse == hwnd )
4365     {
4366         // now try any child window at all
4367         hwndUnderMouse = ::ChildWindowFromPoint(hwnd, pt);
4368     }
4369
4370     // check that we have a child window which is susceptible to receive mouse
4371     // events: for this it must be shown and enabled
4372     if ( hwndUnderMouse &&
4373             hwndUnderMouse != hwnd &&
4374                 ::IsWindowVisible(hwndUnderMouse) &&
4375                     ::IsWindowEnabled(hwndUnderMouse) )
4376     {
4377         wxWindow *winUnderMouse = wxFindWinFromHandle((WXHWND)hwndUnderMouse);
4378         if ( winUnderMouse )
4379         {
4380             // translate the mouse coords to the other window coords
4381             win->ClientToScreen(x, y);
4382             winUnderMouse->ScreenToClient(x, y);
4383
4384             win = winUnderMouse;
4385         }
4386     }
4387
4388     return win;
4389 }
4390
4391 bool wxWindowMSW::HandleMouseEvent(WXUINT msg, int x, int y, WXUINT flags)
4392 {
4393     // the mouse events take consecutive IDs from WM_MOUSEFIRST to
4394     // WM_MOUSELAST, so it's enough to substract WM_MOUSEMOVE == WM_MOUSEFIRST
4395     // from the message id and take the value in the table to get wxWin event
4396     // id
4397     static const wxEventType eventsMouse[] =
4398     {
4399         wxEVT_MOTION,
4400         wxEVT_LEFT_DOWN,
4401         wxEVT_LEFT_UP,
4402         wxEVT_LEFT_DCLICK,
4403         wxEVT_RIGHT_DOWN,
4404         wxEVT_RIGHT_UP,
4405         wxEVT_RIGHT_DCLICK,
4406         wxEVT_MIDDLE_DOWN,
4407         wxEVT_MIDDLE_UP,
4408         wxEVT_MIDDLE_DCLICK
4409     };
4410
4411     wxMouseEvent event(eventsMouse[msg - WM_MOUSEMOVE]);
4412     InitMouseEvent(event, x, y, flags);
4413
4414     return GetEventHandler()->ProcessEvent(event);
4415 }
4416
4417 bool wxWindowMSW::HandleMouseMove(int x, int y, WXUINT flags)
4418 {
4419     if ( !m_mouseInWindow )
4420     {
4421         // it would be wrong to assume that just because we get a mouse move
4422         // event that the mouse is inside the window: although this is usually
4423         // true, it is not if we had captured the mouse, so we need to check
4424         // the mouse coordinates here
4425         if ( !HasCapture() || IsMouseInWindow() )
4426         {
4427             // Generate an ENTER event
4428             m_mouseInWindow = true;
4429 #if _WIN32_WINNT >= 0x0400
4430 #ifndef __WXWINCE__
4431             TRACKMOUSEEVENT trackinfo;
4432
4433             trackinfo.cbSize = sizeof(trackinfo);
4434             trackinfo.dwFlags = TME_LEAVE;
4435             trackinfo.hwndTrack = GetHwnd();
4436             //Use the commctrl.h _TrackMouseEvent, which will call the
4437             // appropriate TrackMouseEvent or emulate it ( win95 )
4438             // else we need _WIN32_WINNT >= 0x0400
4439             _TrackMouseEvent(&trackinfo);
4440 #endif
4441 #endif
4442             wxMouseEvent event(wxEVT_ENTER_WINDOW);
4443             InitMouseEvent(event, x, y, flags);
4444
4445             (void)GetEventHandler()->ProcessEvent(event);
4446         }
4447     }
4448
4449 #if wxUSE_MOUSEEVENT_HACK
4450     // Window gets a click down message followed by a mouse move message even
4451     // if position isn't changed!  We want to discard the trailing move event
4452     // if x and y are the same.
4453     if ( (m_lastMouseEvent == wxEVT_RIGHT_DOWN ||
4454           m_lastMouseEvent == wxEVT_LEFT_DOWN ||
4455           m_lastMouseEvent == wxEVT_MIDDLE_DOWN) &&
4456          (m_lastMouseX == x && m_lastMouseY == y) )
4457     {
4458         m_lastMouseEvent = wxEVT_MOTION;
4459
4460         return false;
4461     }
4462 #endif // wxUSE_MOUSEEVENT_HACK
4463
4464     return HandleMouseEvent(WM_MOUSEMOVE, x, y, flags);
4465 }
4466
4467
4468 bool wxWindowMSW::HandleMouseWheel(WXWPARAM wParam, WXLPARAM lParam)
4469 {
4470 #if wxUSE_MOUSEWHEEL
4471     wxMouseEvent event(wxEVT_MOUSEWHEEL);
4472     InitMouseEvent(event,
4473                    GET_X_LPARAM(lParam),
4474                    GET_Y_LPARAM(lParam),
4475                    LOWORD(wParam));
4476     event.m_wheelRotation = (short)HIWORD(wParam);
4477     event.m_wheelDelta = WHEEL_DELTA;
4478
4479     static int s_linesPerRotation = -1;
4480     if ( s_linesPerRotation == -1 )
4481     {
4482         if ( !::SystemParametersInfo(SPI_GETWHEELSCROLLLINES, 0,
4483                                      &s_linesPerRotation, 0))
4484         {
4485             // this is not supposed to happen
4486             wxLogLastError(_T("SystemParametersInfo(GETWHEELSCROLLLINES)"));
4487
4488             // the default is 3, so use it if SystemParametersInfo() failed
4489             s_linesPerRotation = 3;
4490         }
4491     }
4492
4493     event.m_linesPerAction = s_linesPerRotation;
4494     return GetEventHandler()->ProcessEvent(event);
4495
4496 #else
4497     (void) wParam;
4498     (void) lParam;
4499
4500     return false;
4501 #endif
4502 }
4503
4504
4505 // ---------------------------------------------------------------------------
4506 // keyboard handling
4507 // ---------------------------------------------------------------------------
4508
4509 // create the key event of the given type for the given key - used by
4510 // HandleChar and HandleKeyDown/Up
4511 wxKeyEvent wxWindowMSW::CreateKeyEvent(wxEventType evType,
4512                                        int id,
4513                                        WXLPARAM lParam,
4514                                        WXWPARAM wParam) const
4515 {
4516     wxKeyEvent event(evType);
4517     event.SetId(GetId());
4518     event.m_shiftDown = wxIsShiftDown();
4519     event.m_controlDown = wxIsCtrlDown();
4520     event.m_altDown = (HIWORD(lParam) & KF_ALTDOWN) == KF_ALTDOWN;
4521
4522     event.m_eventObject = (wxWindow *)this; // const_cast
4523     event.m_keyCode = id;
4524 #if wxUSE_UNICODE
4525     event.m_uniChar = wParam;
4526 #endif
4527     event.m_rawCode = (wxUint32) wParam;
4528     event.m_rawFlags = (wxUint32) lParam;
4529 #ifndef __WXWINCE__
4530     event.SetTimestamp(::GetMessageTime());
4531 #endif
4532
4533     // translate the position to client coords
4534     POINT pt;
4535     GetCursorPos(&pt);
4536     RECT rect;
4537     GetWindowRect(GetHwnd(),&rect);
4538     pt.x -= rect.left;
4539     pt.y -= rect.top;
4540
4541     event.m_x = pt.x;
4542     event.m_y = pt.y;
4543
4544     return event;
4545 }
4546
4547 // isASCII is true only when we're called from WM_CHAR handler and not from
4548 // WM_KEYDOWN one
4549 bool wxWindowMSW::HandleChar(WXWPARAM wParam, WXLPARAM lParam, bool isASCII)
4550 {
4551     int id;
4552     if ( isASCII )
4553     {
4554         // If 1 -> 26, translate to either special keycode or just set
4555         // ctrlDown.  IOW, Ctrl-C should result in keycode == 3 and
4556         // ControlDown() == true.
4557         id = wParam;
4558         if ( (id > 0) && (id < 27) )
4559         {
4560             switch (id)
4561             {
4562                 case 13:
4563                     id = WXK_RETURN;
4564                     break;
4565
4566                 case 8:
4567                     id = WXK_BACK;
4568                     break;
4569
4570                 case 9:
4571                     id = WXK_TAB;
4572                     break;
4573
4574                 default:
4575                     //ctrlDown = true;
4576                     break;
4577             }
4578         }
4579     }
4580     else // we're called from WM_KEYDOWN
4581     {
4582         id = wxCharCodeMSWToWX(wParam, lParam);
4583         if ( id == 0 )
4584         {
4585             // it's ASCII and will be processed here only when called from
4586             // WM_CHAR (i.e. when isASCII = true), don't process it now
4587             return false;
4588         }
4589     }
4590
4591     wxKeyEvent event(CreateKeyEvent(wxEVT_CHAR, id, lParam, wParam));
4592
4593     // the alphanumeric keys produced by pressing AltGr+something on European
4594     // keyboards have both Ctrl and Alt modifiers which may confuse the user
4595     // code as, normally, keys with Ctrl and/or Alt don't result in anything
4596     // alphanumeric, so pretend that there are no modifiers at all (the
4597     // KEY_DOWN event would still have the correct modifiers if they're really
4598     // needed)
4599     if ( event.m_controlDown && event.m_altDown &&
4600             (id >= 32 && id < 256) )
4601     {
4602         event.m_controlDown =
4603         event.m_altDown = false;
4604     }
4605
4606     return GetEventHandler()->ProcessEvent(event);
4607 }
4608
4609 bool wxWindowMSW::HandleKeyDown(WXWPARAM wParam, WXLPARAM lParam)
4610 {
4611     int id = wxCharCodeMSWToWX(wParam, lParam);
4612
4613     if ( !id )
4614     {
4615         // normal ASCII char
4616         id = wParam;
4617     }
4618
4619     if ( id != -1 ) // VZ: does this ever happen (FIXME)?
4620     {
4621         wxKeyEvent event(CreateKeyEvent(wxEVT_KEY_DOWN, id, lParam, wParam));
4622         if ( GetEventHandler()->ProcessEvent(event) )
4623         {
4624             return true;
4625         }
4626     }
4627
4628     return false;
4629 }
4630
4631 bool wxWindowMSW::HandleKeyUp(WXWPARAM wParam, WXLPARAM lParam)
4632 {
4633     int id = wxCharCodeMSWToWX(wParam, lParam);
4634
4635     if ( !id )
4636     {
4637         // normal ASCII char
4638         id = wParam;
4639     }
4640
4641     if ( id != -1 ) // VZ: does this ever happen (FIXME)?
4642     {
4643         wxKeyEvent event(CreateKeyEvent(wxEVT_KEY_UP, id, lParam, wParam));
4644         if ( GetEventHandler()->ProcessEvent(event) )
4645             return true;
4646     }
4647
4648     return false;
4649 }
4650
4651 int wxWindowMSW::HandleMenuChar(int chAccel, WXLPARAM lParam)
4652 {
4653     // FIXME: implement GetMenuItemCount for WinCE, possibly
4654     // in terms of GetMenuItemInfo
4655 #ifndef __WXWINCE__
4656     const HMENU hmenu = (HMENU)lParam;
4657
4658     MENUITEMINFO mii;
4659     wxZeroMemory(mii);
4660     mii.cbSize = sizeof(MENUITEMINFO);
4661     mii.fMask = MIIM_TYPE | MIIM_DATA;
4662
4663     // find if we have this letter in any owner drawn item
4664     const int count = ::GetMenuItemCount(hmenu);
4665     for ( int i = 0; i < count; i++ )
4666     {
4667         if ( ::GetMenuItemInfo(hmenu, i, TRUE, &mii) )
4668         {
4669             if ( mii.fType == MFT_OWNERDRAW )
4670             {
4671                 //  dwItemData member of the MENUITEMINFO is a
4672                 //  pointer to the associated wxMenuItem -- see the
4673                 //  menu creation code
4674                 wxMenuItem *item = (wxMenuItem*)mii.dwItemData;
4675
4676                 const wxChar *p = wxStrchr(item->GetText(), _T('&'));
4677                 while ( p++ )
4678                 {
4679                     if ( *p == _T('&') )
4680                     {
4681                         // this is not the accel char, find the real one
4682                         p = wxStrchr(p + 1, _T('&'));
4683                     }
4684                     else // got the accel char
4685                     {
4686                         // FIXME-UNICODE: this comparison doesn't risk to work
4687                         // for non ASCII accelerator characters I'm afraid, but
4688                         // what can we do?
4689                         if ( wxToupper(*p) == chAccel )
4690                         {
4691                             return i;
4692                         }
4693                         else
4694                         {
4695                             // this one doesn't match
4696                             break;
4697                         }
4698                     }
4699                 }
4700             }
4701         }
4702         else // failed to get the menu text?
4703         {
4704             // it's not fatal, so don't show error, but still log
4705             // it
4706             wxLogLastError(_T("GetMenuItemInfo"));
4707         }
4708     }
4709 #else
4710     wxUnusedVar(chAccel);
4711     wxUnusedVar(lParam);
4712 #endif
4713     return wxNOT_FOUND;
4714 }
4715
4716 // ---------------------------------------------------------------------------
4717 // joystick
4718 // ---------------------------------------------------------------------------
4719
4720 bool wxWindowMSW::HandleJoystickEvent(WXUINT msg, int x, int y, WXUINT flags)
4721 {
4722 #ifdef JOY_BUTTON1
4723     int change = 0;
4724     if ( flags & JOY_BUTTON1CHG )
4725         change = wxJOY_BUTTON1;
4726     if ( flags & JOY_BUTTON2CHG )
4727         change = wxJOY_BUTTON2;
4728     if ( flags & JOY_BUTTON3CHG )
4729         change = wxJOY_BUTTON3;
4730     if ( flags & JOY_BUTTON4CHG )
4731         change = wxJOY_BUTTON4;
4732
4733     int buttons = 0;
4734     if ( flags & JOY_BUTTON1 )
4735         buttons |= wxJOY_BUTTON1;
4736     if ( flags & JOY_BUTTON2 )
4737         buttons |= wxJOY_BUTTON2;
4738     if ( flags & JOY_BUTTON3 )
4739         buttons |= wxJOY_BUTTON3;
4740     if ( flags & JOY_BUTTON4 )
4741         buttons |= wxJOY_BUTTON4;
4742
4743     // the event ids aren't consecutive so we can't use table based lookup
4744     int joystick;
4745     wxEventType eventType;
4746     switch ( msg )
4747     {
4748         case MM_JOY1MOVE:
4749             joystick = 1;
4750             eventType = wxEVT_JOY_MOVE;
4751             break;
4752
4753         case MM_JOY2MOVE:
4754             joystick = 2;
4755             eventType = wxEVT_JOY_MOVE;
4756             break;
4757
4758         case MM_JOY1ZMOVE:
4759             joystick = 1;
4760             eventType = wxEVT_JOY_ZMOVE;
4761             break;
4762
4763         case MM_JOY2ZMOVE:
4764             joystick = 2;
4765             eventType = wxEVT_JOY_ZMOVE;
4766             break;
4767
4768         case MM_JOY1BUTTONDOWN:
4769             joystick = 1;
4770             eventType = wxEVT_JOY_BUTTON_DOWN;
4771             break;
4772
4773         case MM_JOY2BUTTONDOWN:
4774             joystick = 2;
4775             eventType = wxEVT_JOY_BUTTON_DOWN;
4776             break;
4777
4778         case MM_JOY1BUTTONUP:
4779             joystick = 1;
4780             eventType = wxEVT_JOY_BUTTON_UP;
4781             break;
4782
4783         case MM_JOY2BUTTONUP:
4784             joystick = 2;
4785             eventType = wxEVT_JOY_BUTTON_UP;
4786             break;
4787
4788         default:
4789             wxFAIL_MSG(wxT("no such joystick event"));
4790
4791             return false;
4792     }
4793
4794     wxJoystickEvent event(eventType, buttons, joystick, change);
4795     event.SetPosition(wxPoint(x, y));
4796     event.SetEventObject(this);
4797
4798     return GetEventHandler()->ProcessEvent(event);
4799 #else
4800     wxUnusedVar(msg);
4801     wxUnusedVar(x);
4802     wxUnusedVar(y);
4803     wxUnusedVar(flags);
4804     return false;
4805 #endif
4806 }
4807
4808 // ---------------------------------------------------------------------------
4809 // scrolling
4810 // ---------------------------------------------------------------------------
4811
4812 bool wxWindowMSW::MSWOnScroll(int orientation, WXWORD wParam,
4813                               WXWORD pos, WXHWND control)
4814 {
4815     if ( control && control != m_hWnd ) // Prevent infinite recursion
4816     {
4817         wxWindow *child = wxFindWinFromHandle(control);
4818         if ( child )
4819             return child->MSWOnScroll(orientation, wParam, pos, control);
4820     }
4821
4822     wxScrollWinEvent event;
4823     event.SetPosition(pos);
4824     event.SetOrientation(orientation);
4825     event.m_eventObject = this;
4826
4827     switch ( wParam )
4828     {
4829     case SB_TOP:
4830         event.m_eventType = wxEVT_SCROLLWIN_TOP;
4831         break;
4832
4833     case SB_BOTTOM:
4834         event.m_eventType = wxEVT_SCROLLWIN_BOTTOM;
4835         break;
4836
4837     case SB_LINEUP:
4838         event.m_eventType = wxEVT_SCROLLWIN_LINEUP;
4839         break;
4840
4841     case SB_LINEDOWN:
4842         event.m_eventType = wxEVT_SCROLLWIN_LINEDOWN;
4843         break;
4844
4845     case SB_PAGEUP:
4846         event.m_eventType = wxEVT_SCROLLWIN_PAGEUP;
4847         break;
4848
4849     case SB_PAGEDOWN:
4850         event.m_eventType = wxEVT_SCROLLWIN_PAGEDOWN;
4851         break;
4852
4853     case SB_THUMBPOSITION:
4854     case SB_THUMBTRACK:
4855         // under Win32, the scrollbar range and position are 32 bit integers,
4856         // but WM_[HV]SCROLL only carry the low 16 bits of them, so we must
4857         // explicitly query the scrollbar for the correct position (this must
4858         // be done only for these two SB_ events as they are the only one
4859         // carrying the scrollbar position)
4860         {
4861             WinStruct<SCROLLINFO> scrollInfo;
4862             scrollInfo.fMask = SIF_TRACKPOS;
4863
4864             if ( !::GetScrollInfo(GetHwnd(),
4865                                   orientation == wxHORIZONTAL ? SB_HORZ
4866                                                               : SB_VERT,
4867                                   &scrollInfo) )
4868             {
4869                 // Not neccessarily an error, if there are no scrollbars yet.
4870                 // wxLogLastError(_T("GetScrollInfo"));
4871             }
4872
4873             event.SetPosition(scrollInfo.nTrackPos);
4874         }
4875
4876         event.m_eventType = wParam == SB_THUMBPOSITION
4877                                 ? wxEVT_SCROLLWIN_THUMBRELEASE
4878                                 : wxEVT_SCROLLWIN_THUMBTRACK;
4879         break;
4880
4881     default:
4882         return false;
4883     }
4884
4885     return GetEventHandler()->ProcessEvent(event);
4886 }
4887
4888 // ===========================================================================
4889 // global functions
4890 // ===========================================================================
4891
4892 void wxGetCharSize(WXHWND wnd, int *x, int *y, const wxFont& the_font)
4893 {
4894     TEXTMETRIC tm;
4895     HDC dc = ::GetDC((HWND) wnd);
4896     HFONT was = 0;
4897
4898     //    the_font.UseResource();
4899     //    the_font.RealizeResource();
4900     HFONT fnt = (HFONT)the_font.GetResourceHandle(); // const_cast
4901     if ( fnt )
4902         was = (HFONT) SelectObject(dc,fnt);
4903
4904     GetTextMetrics(dc, &tm);
4905     if ( fnt && was )
4906     {
4907         SelectObject(dc,was);
4908     }
4909     ReleaseDC((HWND)wnd, dc);
4910
4911     if ( x )
4912         *x = tm.tmAveCharWidth;
4913     if ( y )
4914         *y = tm.tmHeight + tm.tmExternalLeading;
4915
4916     //   the_font.ReleaseResource();
4917 }
4918
4919 // Returns 0 if was a normal ASCII value, not a special key. This indicates that
4920 // the key should be ignored by WM_KEYDOWN and processed by WM_CHAR instead.
4921 int wxCharCodeMSWToWX(int keySym, WXLPARAM lParam)
4922 {
4923     int id;
4924     switch (keySym)
4925     {
4926         case VK_CANCEL:     id = WXK_CANCEL; break;
4927         case VK_BACK:       id = WXK_BACK; break;
4928         case VK_TAB:        id = WXK_TAB; break;
4929         case VK_CLEAR:      id = WXK_CLEAR; break;
4930         case VK_SHIFT:      id = WXK_SHIFT; break;
4931         case VK_CONTROL:    id = WXK_CONTROL; break;
4932         case VK_MENU :      id = WXK_MENU; break;
4933         case VK_PAUSE:      id = WXK_PAUSE; break;
4934         case VK_CAPITAL:    id = WXK_CAPITAL; break;
4935         case VK_SPACE:      id = WXK_SPACE; break;
4936         case VK_ESCAPE:     id = WXK_ESCAPE; break;
4937         case VK_PRIOR:      id = WXK_PRIOR; break;
4938         case VK_NEXT :      id = WXK_NEXT; break;
4939         case VK_END:        id = WXK_END; break;
4940         case VK_HOME :      id = WXK_HOME; break;
4941         case VK_LEFT :      id = WXK_LEFT; break;
4942         case VK_UP:         id = WXK_UP; break;
4943         case VK_RIGHT:      id = WXK_RIGHT; break;
4944         case VK_DOWN :      id = WXK_DOWN; break;
4945         case VK_SELECT:     id = WXK_SELECT; break;
4946         case VK_PRINT:      id = WXK_PRINT; break;
4947         case VK_EXECUTE:    id = WXK_EXECUTE; break;
4948         case VK_INSERT:     id = WXK_INSERT; break;
4949         case VK_DELETE:     id = WXK_DELETE; break;
4950         case VK_HELP :      id = WXK_HELP; break;
4951         case VK_NUMPAD0:    id = WXK_NUMPAD0; break;
4952         case VK_NUMPAD1:    id = WXK_NUMPAD1; break;
4953         case VK_NUMPAD2:    id = WXK_NUMPAD2; break;
4954         case VK_NUMPAD3:    id = WXK_NUMPAD3; break;
4955         case VK_NUMPAD4:    id = WXK_NUMPAD4; break;
4956         case VK_NUMPAD5:    id = WXK_NUMPAD5; break;
4957         case VK_NUMPAD6:    id = WXK_NUMPAD6; break;
4958         case VK_NUMPAD7:    id = WXK_NUMPAD7; break;
4959         case VK_NUMPAD8:    id = WXK_NUMPAD8; break;
4960         case VK_NUMPAD9:    id = WXK_NUMPAD9; break;
4961         case VK_MULTIPLY:   id = WXK_NUMPAD_MULTIPLY; break;
4962         case VK_ADD:        id = WXK_NUMPAD_ADD; break;
4963         case VK_SUBTRACT:   id = WXK_NUMPAD_SUBTRACT; break;
4964         case VK_DECIMAL:    id = WXK_NUMPAD_DECIMAL; break;
4965         case VK_DIVIDE:     id = WXK_NUMPAD_DIVIDE; break;
4966         case VK_F1:         id = WXK_F1; break;
4967         case VK_F2:         id = WXK_F2; break;
4968         case VK_F3:         id = WXK_F3; break;
4969         case VK_F4:         id = WXK_F4; break;
4970         case VK_F5:         id = WXK_F5; break;
4971         case VK_F6:         id = WXK_F6; break;
4972         case VK_F7:         id = WXK_F7; break;
4973         case VK_F8:         id = WXK_F8; break;
4974         case VK_F9:         id = WXK_F9; break;
4975         case VK_F10:        id = WXK_F10; break;
4976         case VK_F11:        id = WXK_F11; break;
4977         case VK_F12:        id = WXK_F12; break;
4978         case VK_F13:        id = WXK_F13; break;
4979         case VK_F14:        id = WXK_F14; break;
4980         case VK_F15:        id = WXK_F15; break;
4981         case VK_F16:        id = WXK_F16; break;
4982         case VK_F17:        id = WXK_F17; break;
4983         case VK_F18:        id = WXK_F18; break;
4984         case VK_F19:        id = WXK_F19; break;
4985         case VK_F20:        id = WXK_F20; break;
4986         case VK_F21:        id = WXK_F21; break;
4987         case VK_F22:        id = WXK_F22; break;
4988         case VK_F23:        id = WXK_F23; break;
4989         case VK_F24:        id = WXK_F24; break;
4990         case VK_NUMLOCK:    id = WXK_NUMLOCK; break;
4991         case VK_SCROLL:     id = WXK_SCROLL; break;
4992
4993         case VK_OEM_1:      id = ';'; break;
4994         case VK_OEM_PLUS:   id = '+'; break;
4995         case VK_OEM_COMMA:  id = ','; break;
4996         case VK_OEM_MINUS:  id = '-'; break;
4997         case VK_OEM_PERIOD: id = '.'; break;
4998         case VK_OEM_2:      id = '/'; break;
4999         case VK_OEM_3:      id = '~'; break;
5000         case VK_OEM_4:      id = '['; break;
5001         case VK_OEM_5:      id = '\\'; break;
5002         case VK_OEM_6:      id = ']'; break;
5003         case VK_OEM_7:      id = '\''; break;
5004
5005 #ifdef VK_APPS
5006         case VK_LWIN:       id = WXK_WINDOWS_LEFT; break;
5007         case VK_RWIN:       id = WXK_WINDOWS_RIGHT; break;
5008         case VK_APPS:       id = WXK_WINDOWS_MENU; break;
5009 #endif // VK_APPS defined
5010
5011         case VK_RETURN:
5012             // the same key is sent for both the "return" key on the main
5013             // keyboard and the numeric keypad but we want to distinguish
5014             // between them: we do this using the "extended" bit (24) of lParam
5015             id = lParam & (1 << 24) ? WXK_NUMPAD_ENTER : WXK_RETURN;
5016             break;
5017
5018         default:
5019             id = 0;
5020     }
5021
5022     return id;
5023 }
5024
5025 int wxCharCodeWXToMSW(int id, bool *isVirtual)
5026 {
5027     *isVirtual = true;
5028     int keySym;
5029     switch (id)
5030     {
5031     case WXK_CANCEL:    keySym = VK_CANCEL; break;
5032     case WXK_CLEAR:     keySym = VK_CLEAR; break;
5033     case WXK_SHIFT:     keySym = VK_SHIFT; break;
5034     case WXK_CONTROL:   keySym = VK_CONTROL; break;
5035     case WXK_ALT:       keySym = VK_MENU; break;
5036     case WXK_MENU :     keySym = VK_MENU; break;
5037     case WXK_PAUSE:     keySym = VK_PAUSE; break;
5038     case WXK_CAPITAL:   keySym = VK_CAPITAL; break;
5039     case WXK_PRIOR:     keySym = VK_PRIOR; break;
5040     case WXK_NEXT :     keySym = VK_NEXT; break;
5041     case WXK_END:       keySym = VK_END; break;
5042     case WXK_HOME :     keySym = VK_HOME; break;
5043     case WXK_LEFT :     keySym = VK_LEFT; break;
5044     case WXK_UP:        keySym = VK_UP; break;
5045     case WXK_RIGHT:     keySym = VK_RIGHT; break;
5046     case WXK_DOWN :     keySym = VK_DOWN; break;
5047     case WXK_SELECT:    keySym = VK_SELECT; break;
5048     case WXK_PRINT:     keySym = VK_PRINT; break;
5049     case WXK_EXECUTE:   keySym = VK_EXECUTE; break;
5050     case WXK_INSERT:    keySym = VK_INSERT; break;
5051     case WXK_DELETE:    keySym = VK_DELETE; break;
5052     case WXK_HELP :     keySym = VK_HELP; break;
5053     case WXK_NUMPAD0:   keySym = VK_NUMPAD0; break;
5054     case WXK_NUMPAD1:   keySym = VK_NUMPAD1; break;
5055     case WXK_NUMPAD2:   keySym = VK_NUMPAD2; break;
5056     case WXK_NUMPAD3:   keySym = VK_NUMPAD3; break;
5057     case WXK_NUMPAD4:   keySym = VK_NUMPAD4; break;
5058     case WXK_NUMPAD5:   keySym = VK_NUMPAD5; break;
5059     case WXK_NUMPAD6:   keySym = VK_NUMPAD6; break;
5060     case WXK_NUMPAD7:   keySym = VK_NUMPAD7; break;
5061     case WXK_NUMPAD8:   keySym = VK_NUMPAD8; break;
5062     case WXK_NUMPAD9:   keySym = VK_NUMPAD9; break;
5063     case WXK_NUMPAD_MULTIPLY:  keySym = VK_MULTIPLY; break;
5064     case WXK_NUMPAD_ADD:       keySym = VK_ADD; break;
5065     case WXK_NUMPAD_SUBTRACT:  keySym = VK_SUBTRACT; break;
5066     case WXK_NUMPAD_DECIMAL:   keySym = VK_DECIMAL; break;
5067     case WXK_NUMPAD_DIVIDE:    keySym = VK_DIVIDE; break;
5068     case WXK_F1:        keySym = VK_F1; break;
5069     case WXK_F2:        keySym = VK_F2; break;
5070     case WXK_F3:        keySym = VK_F3; break;
5071     case WXK_F4:        keySym = VK_F4; break;
5072     case WXK_F5:        keySym = VK_F5; break;
5073     case WXK_F6:        keySym = VK_F6; break;
5074     case WXK_F7:        keySym = VK_F7; break;
5075     case WXK_F8:        keySym = VK_F8; break;
5076     case WXK_F9:        keySym = VK_F9; break;
5077     case WXK_F10:       keySym = VK_F10; break;
5078     case WXK_F11:       keySym = VK_F11; break;
5079     case WXK_F12:       keySym = VK_F12; break;
5080     case WXK_F13:       keySym = VK_F13; break;
5081     case WXK_F14:       keySym = VK_F14; break;
5082     case WXK_F15:       keySym = VK_F15; break;
5083     case WXK_F16:       keySym = VK_F16; break;
5084     case WXK_F17:       keySym = VK_F17; break;
5085     case WXK_F18:       keySym = VK_F18; break;
5086     case WXK_F19:       keySym = VK_F19; break;
5087     case WXK_F20:       keySym = VK_F20; break;
5088     case WXK_F21:       keySym = VK_F21; break;
5089     case WXK_F22:       keySym = VK_F22; break;
5090     case WXK_F23:       keySym = VK_F23; break;
5091     case WXK_F24:       keySym = VK_F24; break;
5092     case WXK_NUMLOCK:   keySym = VK_NUMLOCK; break;
5093     case WXK_SCROLL:    keySym = VK_SCROLL; break;
5094     default:
5095         {
5096             *isVirtual = false;
5097             keySym = id;
5098             break;
5099         }
5100     }
5101     return keySym;
5102 }
5103
5104 bool wxGetKeyState(wxKeyCode key)
5105 {
5106     bool bVirtual;
5107     int vkey = wxCharCodeWXToMSW(key, &bVirtual);
5108     SHORT state;
5109
5110     switch (key)
5111     {
5112     case WXK_NUMLOCK:
5113     case WXK_CAPITAL:
5114     case WXK_SCROLL:
5115         // get the toggle state of the special key
5116         state = GetKeyState(vkey);
5117         break;
5118
5119     default:
5120         // Get the current state of the physical key
5121         state = GetAsyncKeyState(vkey);
5122         break;
5123     }
5124     // if the most significant bit is set then the key is down
5125     return ( state & 0x0001 ) != 0;
5126 }
5127
5128 wxWindow *wxGetActiveWindow()
5129 {
5130     HWND hWnd = GetActiveWindow();
5131     if ( hWnd != 0 )
5132     {
5133         return wxFindWinFromHandle((WXHWND) hWnd);
5134     }
5135     return NULL;
5136 }
5137
5138 extern wxWindow *wxGetWindowFromHWND(WXHWND hWnd)
5139 {
5140     HWND hwnd = (HWND)hWnd;
5141
5142     // For a radiobutton, we get the radiobox from GWL_USERDATA (which is set
5143     // by code in msw/radiobox.cpp), for all the others we just search up the
5144     // window hierarchy
5145     wxWindow *win = (wxWindow *)NULL;
5146     if ( hwnd )
5147     {
5148         win = wxFindWinFromHandle((WXHWND)hwnd);
5149         if ( !win )
5150         {
5151 #if wxUSE_RADIOBOX
5152             // native radiobuttons return DLGC_RADIOBUTTON here and for any
5153             // wxWindow class which overrides WM_GETDLGCODE processing to
5154             // do it as well, win would be already non NULL
5155             if ( ::SendMessage(hwnd, WM_GETDLGCODE, 0, 0) & DLGC_RADIOBUTTON )
5156             {
5157                 win = (wxWindow *)wxGetWindowUserData(hwnd);
5158             }
5159             //else: it's a wxRadioButton, not a radiobutton from wxRadioBox
5160 #endif // wxUSE_RADIOBOX
5161
5162             // spin control text buddy window should be mapped to spin ctrl
5163             // itself so try it too
5164 #if wxUSE_SPINCTRL && !defined(__WXUNIVERSAL__)
5165             if ( !win )
5166             {
5167                 win = wxSpinCtrl::GetSpinForTextCtrl((WXHWND)hwnd);
5168             }
5169 #endif // wxUSE_SPINCTRL
5170         }
5171     }
5172
5173     while ( hwnd && !win )
5174     {
5175         // this is a really ugly hack needed to avoid mistakenly returning the
5176         // parent frame wxWindow for the find/replace modeless dialog HWND -
5177         // this, in turn, is needed to call IsDialogMessage() from
5178         // wxApp::ProcessMessage() as for this we must return NULL from here
5179         //
5180         // FIXME: this is clearly not the best way to do it but I think we'll
5181         //        need to change HWND <-> wxWindow code more heavily than I can
5182         //        do it now to fix it
5183 #ifndef __WXMICROWIN__
5184         if ( ::GetWindow(hwnd, GW_OWNER) )
5185         {
5186             // it's a dialog box, don't go upwards
5187             break;
5188         }
5189 #endif
5190
5191         hwnd = ::GetParent(hwnd);
5192         win = wxFindWinFromHandle((WXHWND)hwnd);
5193     }
5194
5195     return win;
5196 }
5197
5198 #if !defined(__WXMICROWIN__) && !defined(__WXWINCE__)
5199
5200 // Windows keyboard hook. Allows interception of e.g. F1, ESCAPE
5201 // in active frames and dialogs, regardless of where the focus is.
5202 static HHOOK wxTheKeyboardHook = 0;
5203 static FARPROC wxTheKeyboardHookProc = 0;
5204 int APIENTRY _EXPORT
5205 wxKeyboardHook(int nCode, WORD wParam, DWORD lParam);
5206
5207 void wxSetKeyboardHook(bool doIt)
5208 {
5209     if ( doIt )
5210     {
5211         wxTheKeyboardHookProc = MakeProcInstance((FARPROC) wxKeyboardHook, wxGetInstance());
5212         wxTheKeyboardHook = SetWindowsHookEx(WH_KEYBOARD, (HOOKPROC) wxTheKeyboardHookProc, wxGetInstance(),
5213
5214             GetCurrentThreadId()
5215         //      (DWORD)GetCurrentProcess()); // This is another possibility. Which is right?
5216             );
5217     }
5218     else
5219     {
5220         UnhookWindowsHookEx(wxTheKeyboardHook);
5221     }
5222 }
5223
5224 int APIENTRY _EXPORT
5225 wxKeyboardHook(int nCode, WORD wParam, DWORD lParam)
5226 {
5227     DWORD hiWord = HIWORD(lParam);
5228     if ( nCode != HC_NOREMOVE && ((hiWord & KF_UP) == 0) )
5229     {
5230         int id = wxCharCodeMSWToWX(wParam, lParam);
5231         if ( id != 0 )
5232         {
5233             wxKeyEvent event(wxEVT_CHAR_HOOK);
5234             if ( (HIWORD(lParam) & KF_ALTDOWN) == KF_ALTDOWN )
5235                 event.m_altDown = true;
5236
5237             event.m_eventObject = NULL;
5238             event.m_keyCode = id;
5239             event.m_shiftDown = wxIsShiftDown();
5240             event.m_controlDown = wxIsCtrlDown();
5241 #ifndef __WXWINCE__
5242             event.SetTimestamp(::GetMessageTime());
5243 #endif
5244             wxWindow *win = wxGetActiveWindow();
5245             wxEvtHandler *handler;
5246             if ( win )
5247             {
5248                 handler = win->GetEventHandler();
5249                 event.SetId(win->GetId());
5250             }
5251             else
5252             {
5253                 handler = wxTheApp;
5254                 event.SetId(wxID_ANY);
5255             }
5256
5257             if ( handler && handler->ProcessEvent(event) )
5258             {
5259                 // processed
5260                 return 1;
5261             }
5262         }
5263     }
5264
5265     return (int)CallNextHookEx(wxTheKeyboardHook, nCode, wParam, lParam);
5266 }
5267
5268 #endif // !__WXMICROWIN__
5269
5270 #ifdef __WXDEBUG__
5271 const char *wxGetMessageName(int message)
5272 {
5273     switch ( message )
5274     {
5275         case 0x0000: return "WM_NULL";
5276         case 0x0001: return "WM_CREATE";
5277         case 0x0002: return "WM_DESTROY";
5278         case 0x0003: return "WM_MOVE";
5279         case 0x0005: return "WM_SIZE";
5280         case 0x0006: return "WM_ACTIVATE";
5281         case 0x0007: return "WM_SETFOCUS";
5282         case 0x0008: return "WM_KILLFOCUS";
5283         case 0x000A: return "WM_ENABLE";
5284         case 0x000B: return "WM_SETREDRAW";
5285         case 0x000C: return "WM_SETTEXT";
5286         case 0x000D: return "WM_GETTEXT";
5287         case 0x000E: return "WM_GETTEXTLENGTH";
5288         case 0x000F: return "WM_PAINT";
5289         case 0x0010: return "WM_CLOSE";
5290         case 0x0011: return "WM_QUERYENDSESSION";
5291         case 0x0012: return "WM_QUIT";
5292         case 0x0013: return "WM_QUERYOPEN";
5293         case 0x0014: return "WM_ERASEBKGND";
5294         case 0x0015: return "WM_SYSCOLORCHANGE";
5295         case 0x0016: return "WM_ENDSESSION";
5296         case 0x0017: return "WM_SYSTEMERROR";
5297         case 0x0018: return "WM_SHOWWINDOW";
5298         case 0x0019: return "WM_CTLCOLOR";
5299         case 0x001A: return "WM_WININICHANGE";
5300         case 0x001B: return "WM_DEVMODECHANGE";
5301         case 0x001C: return "WM_ACTIVATEAPP";
5302         case 0x001D: return "WM_FONTCHANGE";
5303         case 0x001E: return "WM_TIMECHANGE";
5304         case 0x001F: return "WM_CANCELMODE";
5305         case 0x0020: return "WM_SETCURSOR";
5306         case 0x0021: return "WM_MOUSEACTIVATE";
5307         case 0x0022: return "WM_CHILDACTIVATE";
5308         case 0x0023: return "WM_QUEUESYNC";
5309         case 0x0024: return "WM_GETMINMAXINFO";
5310         case 0x0026: return "WM_PAINTICON";
5311         case 0x0027: return "WM_ICONERASEBKGND";
5312         case 0x0028: return "WM_NEXTDLGCTL";
5313         case 0x002A: return "WM_SPOOLERSTATUS";
5314         case 0x002B: return "WM_DRAWITEM";
5315         case 0x002C: return "WM_MEASUREITEM";
5316         case 0x002D: return "WM_DELETEITEM";
5317         case 0x002E: return "WM_VKEYTOITEM";
5318         case 0x002F: return "WM_CHARTOITEM";
5319         case 0x0030: return "WM_SETFONT";
5320         case 0x0031: return "WM_GETFONT";
5321         case 0x0037: return "WM_QUERYDRAGICON";
5322         case 0x0039: return "WM_COMPAREITEM";
5323         case 0x0041: return "WM_COMPACTING";
5324         case 0x0044: return "WM_COMMNOTIFY";
5325         case 0x0046: return "WM_WINDOWPOSCHANGING";
5326         case 0x0047: return "WM_WINDOWPOSCHANGED";
5327         case 0x0048: return "WM_POWER";
5328
5329         case 0x004A: return "WM_COPYDATA";
5330         case 0x004B: return "WM_CANCELJOURNAL";
5331         case 0x004E: return "WM_NOTIFY";
5332         case 0x0050: return "WM_INPUTLANGCHANGEREQUEST";
5333         case 0x0051: return "WM_INPUTLANGCHANGE";
5334         case 0x0052: return "WM_TCARD";
5335         case 0x0053: return "WM_HELP";
5336         case 0x0054: return "WM_USERCHANGED";
5337         case 0x0055: return "WM_NOTIFYFORMAT";
5338         case 0x007B: return "WM_CONTEXTMENU";
5339         case 0x007C: return "WM_STYLECHANGING";
5340         case 0x007D: return "WM_STYLECHANGED";
5341         case 0x007E: return "WM_DISPLAYCHANGE";
5342         case 0x007F: return "WM_GETICON";
5343         case 0x0080: return "WM_SETICON";
5344
5345         case 0x0081: return "WM_NCCREATE";
5346         case 0x0082: return "WM_NCDESTROY";
5347         case 0x0083: return "WM_NCCALCSIZE";
5348         case 0x0084: return "WM_NCHITTEST";
5349         case 0x0085: return "WM_NCPAINT";
5350         case 0x0086: return "WM_NCACTIVATE";
5351         case 0x0087: return "WM_GETDLGCODE";
5352         case 0x00A0: return "WM_NCMOUSEMOVE";
5353         case 0x00A1: return "WM_NCLBUTTONDOWN";
5354         case 0x00A2: return "WM_NCLBUTTONUP";
5355         case 0x00A3: return "WM_NCLBUTTONDBLCLK";
5356         case 0x00A4: return "WM_NCRBUTTONDOWN";
5357         case 0x00A5: return "WM_NCRBUTTONUP";
5358         case 0x00A6: return "WM_NCRBUTTONDBLCLK";
5359         case 0x00A7: return "WM_NCMBUTTONDOWN";
5360         case 0x00A8: return "WM_NCMBUTTONUP";
5361         case 0x00A9: return "WM_NCMBUTTONDBLCLK";
5362         case 0x0100: return "WM_KEYDOWN";
5363         case 0x0101: return "WM_KEYUP";
5364         case 0x0102: return "WM_CHAR";
5365         case 0x0103: return "WM_DEADCHAR";
5366         case 0x0104: return "WM_SYSKEYDOWN";
5367         case 0x0105: return "WM_SYSKEYUP";
5368         case 0x0106: return "WM_SYSCHAR";
5369         case 0x0107: return "WM_SYSDEADCHAR";
5370         case 0x0108: return "WM_KEYLAST";
5371
5372         case 0x010D: return "WM_IME_STARTCOMPOSITION";
5373         case 0x010E: return "WM_IME_ENDCOMPOSITION";
5374         case 0x010F: return "WM_IME_COMPOSITION";
5375
5376         case 0x0110: return "WM_INITDIALOG";
5377         case 0x0111: return "WM_COMMAND";
5378         case 0x0112: return "WM_SYSCOMMAND";
5379         case 0x0113: return "WM_TIMER";
5380         case 0x0114: return "WM_HSCROLL";
5381         case 0x0115: return "WM_VSCROLL";
5382         case 0x0116: return "WM_INITMENU";
5383         case 0x0117: return "WM_INITMENUPOPUP";
5384         case 0x011F: return "WM_MENUSELECT";
5385         case 0x0120: return "WM_MENUCHAR";
5386         case 0x0121: return "WM_ENTERIDLE";
5387         case 0x0200: return "WM_MOUSEMOVE";
5388         case 0x0201: return "WM_LBUTTONDOWN";
5389         case 0x0202: return "WM_LBUTTONUP";
5390         case 0x0203: return "WM_LBUTTONDBLCLK";
5391         case 0x0204: return "WM_RBUTTONDOWN";
5392         case 0x0205: return "WM_RBUTTONUP";
5393         case 0x0206: return "WM_RBUTTONDBLCLK";
5394         case 0x0207: return "WM_MBUTTONDOWN";
5395         case 0x0208: return "WM_MBUTTONUP";
5396         case 0x0209: return "WM_MBUTTONDBLCLK";
5397         case 0x020A: return "WM_MOUSEWHEEL";
5398         case 0x0210: return "WM_PARENTNOTIFY";
5399         case 0x0211: return "WM_ENTERMENULOOP";
5400         case 0x0212: return "WM_EXITMENULOOP";
5401
5402         case 0x0213: return "WM_NEXTMENU";
5403         case 0x0214: return "WM_SIZING";
5404         case 0x0215: return "WM_CAPTURECHANGED";
5405         case 0x0216: return "WM_MOVING";
5406         case 0x0218: return "WM_POWERBROADCAST";
5407         case 0x0219: return "WM_DEVICECHANGE";
5408
5409         case 0x0220: return "WM_MDICREATE";
5410         case 0x0221: return "WM_MDIDESTROY";
5411         case 0x0222: return "WM_MDIACTIVATE";
5412         case 0x0223: return "WM_MDIRESTORE";
5413         case 0x0224: return "WM_MDINEXT";
5414         case 0x0225: return "WM_MDIMAXIMIZE";
5415         case 0x0226: return "WM_MDITILE";
5416         case 0x0227: return "WM_MDICASCADE";
5417         case 0x0228: return "WM_MDIICONARRANGE";
5418         case 0x0229: return "WM_MDIGETACTIVE";
5419         case 0x0230: return "WM_MDISETMENU";
5420         case 0x0233: return "WM_DROPFILES";
5421
5422         case 0x0281: return "WM_IME_SETCONTEXT";
5423         case 0x0282: return "WM_IME_NOTIFY";
5424         case 0x0283: return "WM_IME_CONTROL";
5425         case 0x0284: return "WM_IME_COMPOSITIONFULL";
5426         case 0x0285: return "WM_IME_SELECT";
5427         case 0x0286: return "WM_IME_CHAR";
5428         case 0x0290: return "WM_IME_KEYDOWN";
5429         case 0x0291: return "WM_IME_KEYUP";
5430
5431         case 0x0300: return "WM_CUT";
5432         case 0x0301: return "WM_COPY";
5433         case 0x0302: return "WM_PASTE";
5434         case 0x0303: return "WM_CLEAR";
5435         case 0x0304: return "WM_UNDO";
5436         case 0x0305: return "WM_RENDERFORMAT";
5437         case 0x0306: return "WM_RENDERALLFORMATS";
5438         case 0x0307: return "WM_DESTROYCLIPBOARD";
5439         case 0x0308: return "WM_DRAWCLIPBOARD";
5440         case 0x0309: return "WM_PAINTCLIPBOARD";
5441         case 0x030A: return "WM_VSCROLLCLIPBOARD";
5442         case 0x030B: return "WM_SIZECLIPBOARD";
5443         case 0x030C: return "WM_ASKCBFORMATNAME";
5444         case 0x030D: return "WM_CHANGECBCHAIN";
5445         case 0x030E: return "WM_HSCROLLCLIPBOARD";
5446         case 0x030F: return "WM_QUERYNEWPALETTE";
5447         case 0x0310: return "WM_PALETTEISCHANGING";
5448         case 0x0311: return "WM_PALETTECHANGED";
5449 #if wxUSE_HOTKEY
5450         case 0x0312: return "WM_HOTKEY";
5451 #endif
5452
5453         // common controls messages - although they're not strictly speaking
5454         // standard, it's nice to decode them nevertheless
5455
5456         // listview
5457         case 0x1000 + 0: return "LVM_GETBKCOLOR";
5458         case 0x1000 + 1: return "LVM_SETBKCOLOR";
5459         case 0x1000 + 2: return "LVM_GETIMAGELIST";
5460         case 0x1000 + 3: return "LVM_SETIMAGELIST";
5461         case 0x1000 + 4: return "LVM_GETITEMCOUNT";
5462         case 0x1000 + 5: return "LVM_GETITEMA";
5463         case 0x1000 + 75: return "LVM_GETITEMW";
5464         case 0x1000 + 6: return "LVM_SETITEMA";
5465         case 0x1000 + 76: return "LVM_SETITEMW";
5466         case 0x1000 + 7: return "LVM_INSERTITEMA";
5467         case 0x1000 + 77: return "LVM_INSERTITEMW";
5468         case 0x1000 + 8: return "LVM_DELETEITEM";
5469         case 0x1000 + 9: return "LVM_DELETEALLITEMS";
5470         case 0x1000 + 10: return "LVM_GETCALLBACKMASK";
5471         case 0x1000 + 11: return "LVM_SETCALLBACKMASK";
5472         case 0x1000 + 12: return "LVM_GETNEXTITEM";
5473         case 0x1000 + 13: return "LVM_FINDITEMA";
5474         case 0x1000 + 83: return "LVM_FINDITEMW";
5475         case 0x1000 + 14: return "LVM_GETITEMRECT";
5476         case 0x1000 + 15: return "LVM_SETITEMPOSITION";
5477         case 0x1000 + 16: return "LVM_GETITEMPOSITION";
5478         case 0x1000 + 17: return "LVM_GETSTRINGWIDTHA";
5479         case 0x1000 + 87: return "LVM_GETSTRINGWIDTHW";
5480         case 0x1000 + 18: return "LVM_HITTEST";
5481         case 0x1000 + 19: return "LVM_ENSUREVISIBLE";
5482         case 0x1000 + 20: return "LVM_SCROLL";
5483         case 0x1000 + 21: return "LVM_REDRAWITEMS";
5484         case 0x1000 + 22: return "LVM_ARRANGE";
5485         case 0x1000 + 23: return "LVM_EDITLABELA";
5486         case 0x1000 + 118: return "LVM_EDITLABELW";
5487         case 0x1000 + 24: return "LVM_GETEDITCONTROL";
5488         case 0x1000 + 25: return "LVM_GETCOLUMNA";
5489         case 0x1000 + 95: return "LVM_GETCOLUMNW";
5490         case 0x1000 + 26: return "LVM_SETCOLUMNA";
5491         case 0x1000 + 96: return "LVM_SETCOLUMNW";
5492         case 0x1000 + 27: return "LVM_INSERTCOLUMNA";
5493         case 0x1000 + 97: return "LVM_INSERTCOLUMNW";
5494         case 0x1000 + 28: return "LVM_DELETECOLUMN";
5495         case 0x1000 + 29: return "LVM_GETCOLUMNWIDTH";
5496         case 0x1000 + 30: return "LVM_SETCOLUMNWIDTH";
5497         case 0x1000 + 31: return "LVM_GETHEADER";
5498         case 0x1000 + 33: return "LVM_CREATEDRAGIMAGE";
5499         case 0x1000 + 34: return "LVM_GETVIEWRECT";
5500         case 0x1000 + 35: return "LVM_GETTEXTCOLOR";
5501         case 0x1000 + 36: return "LVM_SETTEXTCOLOR";
5502         case 0x1000 + 37: return "LVM_GETTEXTBKCOLOR";
5503         case 0x1000 + 38: return "LVM_SETTEXTBKCOLOR";
5504         case 0x1000 + 39: return "LVM_GETTOPINDEX";
5505         case 0x1000 + 40: return "LVM_GETCOUNTPERPAGE";
5506         case 0x1000 + 41: return "LVM_GETORIGIN";
5507         case 0x1000 + 42: return "LVM_UPDATE";
5508         case 0x1000 + 43: return "LVM_SETITEMSTATE";
5509         case 0x1000 + 44: return "LVM_GETITEMSTATE";
5510         case 0x1000 + 45: return "LVM_GETITEMTEXTA";
5511         case 0x1000 + 115: return "LVM_GETITEMTEXTW";
5512         case 0x1000 + 46: return "LVM_SETITEMTEXTA";
5513         case 0x1000 + 116: return "LVM_SETITEMTEXTW";
5514         case 0x1000 + 47: return "LVM_SETITEMCOUNT";
5515         case 0x1000 + 48: return "LVM_SORTITEMS";
5516         case 0x1000 + 49: return "LVM_SETITEMPOSITION32";
5517         case 0x1000 + 50: return "LVM_GETSELECTEDCOUNT";
5518         case 0x1000 + 51: return "LVM_GETITEMSPACING";
5519         case 0x1000 + 52: return "LVM_GETISEARCHSTRINGA";
5520         case 0x1000 + 117: return "LVM_GETISEARCHSTRINGW";
5521         case 0x1000 + 53: return "LVM_SETICONSPACING";
5522         case 0x1000 + 54: return "LVM_SETEXTENDEDLISTVIEWSTYLE";
5523         case 0x1000 + 55: return "LVM_GETEXTENDEDLISTVIEWSTYLE";
5524         case 0x1000 + 56: return "LVM_GETSUBITEMRECT";
5525         case 0x1000 + 57: return "LVM_SUBITEMHITTEST";
5526         case 0x1000 + 58: return "LVM_SETCOLUMNORDERARRAY";
5527         case 0x1000 + 59: return "LVM_GETCOLUMNORDERARRAY";
5528         case 0x1000 + 60: return "LVM_SETHOTITEM";
5529         case 0x1000 + 61: return "LVM_GETHOTITEM";
5530         case 0x1000 + 62: return "LVM_SETHOTCURSOR";
5531         case 0x1000 + 63: return "LVM_GETHOTCURSOR";
5532         case 0x1000 + 64: return "LVM_APPROXIMATEVIEWRECT";
5533         case 0x1000 + 65: return "LVM_SETWORKAREA";
5534
5535         // tree view
5536         case 0x1100 + 0: return "TVM_INSERTITEMA";
5537         case 0x1100 + 50: return "TVM_INSERTITEMW";
5538         case 0x1100 + 1: return "TVM_DELETEITEM";
5539         case 0x1100 + 2: return "TVM_EXPAND";
5540         case 0x1100 + 4: return "TVM_GETITEMRECT";
5541         case 0x1100 + 5: return "TVM_GETCOUNT";
5542         case 0x1100 + 6: return "TVM_GETINDENT";
5543         case 0x1100 + 7: return "TVM_SETINDENT";
5544         case 0x1100 + 8: return "TVM_GETIMAGELIST";
5545         case 0x1100 + 9: return "TVM_SETIMAGELIST";
5546         case 0x1100 + 10: return "TVM_GETNEXTITEM";
5547         case 0x1100 + 11: return "TVM_SELECTITEM";
5548         case 0x1100 + 12: return "TVM_GETITEMA";
5549         case 0x1100 + 62: return "TVM_GETITEMW";
5550         case 0x1100 + 13: return "TVM_SETITEMA";
5551         case 0x1100 + 63: return "TVM_SETITEMW";
5552         case 0x1100 + 14: return "TVM_EDITLABELA";
5553         case 0x1100 + 65: return "TVM_EDITLABELW";
5554         case 0x1100 + 15: return "TVM_GETEDITCONTROL";
5555         case 0x1100 + 16: return "TVM_GETVISIBLECOUNT";
5556         case 0x1100 + 17: return "TVM_HITTEST";
5557         case 0x1100 + 18: return "TVM_CREATEDRAGIMAGE";
5558         case 0x1100 + 19: return "TVM_SORTCHILDREN";
5559         case 0x1100 + 20: return "TVM_ENSUREVISIBLE";
5560         case 0x1100 + 21: return "TVM_SORTCHILDRENCB";
5561         case 0x1100 + 22: return "TVM_ENDEDITLABELNOW";
5562         case 0x1100 + 23: return "TVM_GETISEARCHSTRINGA";
5563         case 0x1100 + 64: return "TVM_GETISEARCHSTRINGW";
5564         case 0x1100 + 24: return "TVM_SETTOOLTIPS";
5565         case 0x1100 + 25: return "TVM_GETTOOLTIPS";
5566
5567         // header
5568         case 0x1200 + 0: return "HDM_GETITEMCOUNT";
5569         case 0x1200 + 1: return "HDM_INSERTITEMA";
5570         case 0x1200 + 10: return "HDM_INSERTITEMW";
5571         case 0x1200 + 2: return "HDM_DELETEITEM";
5572         case 0x1200 + 3: return "HDM_GETITEMA";
5573         case 0x1200 + 11: return "HDM_GETITEMW";
5574         case 0x1200 + 4: return "HDM_SETITEMA";
5575         case 0x1200 + 12: return "HDM_SETITEMW";
5576         case 0x1200 + 5: return "HDM_LAYOUT";
5577         case 0x1200 + 6: return "HDM_HITTEST";
5578         case 0x1200 + 7: return "HDM_GETITEMRECT";
5579         case 0x1200 + 8: return "HDM_SETIMAGELIST";
5580         case 0x1200 + 9: return "HDM_GETIMAGELIST";
5581         case 0x1200 + 15: return "HDM_ORDERTOINDEX";
5582         case 0x1200 + 16: return "HDM_CREATEDRAGIMAGE";
5583         case 0x1200 + 17: return "HDM_GETORDERARRAY";
5584         case 0x1200 + 18: return "HDM_SETORDERARRAY";
5585         case 0x1200 + 19: return "HDM_SETHOTDIVIDER";
5586
5587         // tab control
5588         case 0x1300 + 2: return "TCM_GETIMAGELIST";
5589         case 0x1300 + 3: return "TCM_SETIMAGELIST";
5590         case 0x1300 + 4: return "TCM_GETITEMCOUNT";
5591         case 0x1300 + 5: return "TCM_GETITEMA";
5592         case 0x1300 + 60: return "TCM_GETITEMW";
5593         case 0x1300 + 6: return "TCM_SETITEMA";
5594         case 0x1300 + 61: return "TCM_SETITEMW";
5595         case 0x1300 + 7: return "TCM_INSERTITEMA";
5596         case 0x1300 + 62: return "TCM_INSERTITEMW";
5597         case 0x1300 + 8: return "TCM_DELETEITEM";
5598         case 0x1300 + 9: return "TCM_DELETEALLITEMS";
5599         case 0x1300 + 10: return "TCM_GETITEMRECT";
5600         case 0x1300 + 11: return "TCM_GETCURSEL";
5601         case 0x1300 + 12: return "TCM_SETCURSEL";
5602         case 0x1300 + 13: return "TCM_HITTEST";
5603         case 0x1300 + 14: return "TCM_SETITEMEXTRA";
5604         case 0x1300 + 40: return "TCM_ADJUSTRECT";
5605         case 0x1300 + 41: return "TCM_SETITEMSIZE";
5606         case 0x1300 + 42: return "TCM_REMOVEIMAGE";
5607         case 0x1300 + 43: return "TCM_SETPADDING";
5608         case 0x1300 + 44: return "TCM_GETROWCOUNT";
5609         case 0x1300 + 45: return "TCM_GETTOOLTIPS";
5610         case 0x1300 + 46: return "TCM_SETTOOLTIPS";
5611         case 0x1300 + 47: return "TCM_GETCURFOCUS";
5612         case 0x1300 + 48: return "TCM_SETCURFOCUS";
5613         case 0x1300 + 49: return "TCM_SETMINTABWIDTH";
5614         case 0x1300 + 50: return "TCM_DESELECTALL";
5615
5616         // toolbar
5617         case WM_USER+1: return "TB_ENABLEBUTTON";
5618         case WM_USER+2: return "TB_CHECKBUTTON";
5619         case WM_USER+3: return "TB_PRESSBUTTON";
5620         case WM_USER+4: return "TB_HIDEBUTTON";
5621         case WM_USER+5: return "TB_INDETERMINATE";
5622         case WM_USER+9: return "TB_ISBUTTONENABLED";
5623         case WM_USER+10: return "TB_ISBUTTONCHECKED";
5624         case WM_USER+11: return "TB_ISBUTTONPRESSED";
5625         case WM_USER+12: return "TB_ISBUTTONHIDDEN";
5626         case WM_USER+13: return "TB_ISBUTTONINDETERMINATE";
5627         case WM_USER+17: return "TB_SETSTATE";
5628         case WM_USER+18: return "TB_GETSTATE";
5629         case WM_USER+19: return "TB_ADDBITMAP";
5630         case WM_USER+20: return "TB_ADDBUTTONS";
5631         case WM_USER+21: return "TB_INSERTBUTTON";
5632         case WM_USER+22: return "TB_DELETEBUTTON";
5633         case WM_USER+23: return "TB_GETBUTTON";
5634         case WM_USER+24: return "TB_BUTTONCOUNT";
5635         case WM_USER+25: return "TB_COMMANDTOINDEX";
5636         case WM_USER+26: return "TB_SAVERESTOREA";
5637         case WM_USER+76: return "TB_SAVERESTOREW";
5638         case WM_USER+27: return "TB_CUSTOMIZE";
5639         case WM_USER+28: return "TB_ADDSTRINGA";
5640         case WM_USER+77: return "TB_ADDSTRINGW";
5641         case WM_USER+29: return "TB_GETITEMRECT";
5642         case WM_USER+30: return "TB_BUTTONSTRUCTSIZE";
5643         case WM_USER+31: return "TB_SETBUTTONSIZE";
5644         case WM_USER+32: return "TB_SETBITMAPSIZE";
5645         case WM_USER+33: return "TB_AUTOSIZE";
5646         case WM_USER+35: return "TB_GETTOOLTIPS";
5647         case WM_USER+36: return "TB_SETTOOLTIPS";
5648         case WM_USER+37: return "TB_SETPARENT";
5649         case WM_USER+39: return "TB_SETROWS";
5650         case WM_USER+40: return "TB_GETROWS";
5651         case WM_USER+42: return "TB_SETCMDID";
5652         case WM_USER+43: return "TB_CHANGEBITMAP";
5653         case WM_USER+44: return "TB_GETBITMAP";
5654         case WM_USER+45: return "TB_GETBUTTONTEXTA";
5655         case WM_USER+75: return "TB_GETBUTTONTEXTW";
5656         case WM_USER+46: return "TB_REPLACEBITMAP";
5657         case WM_USER+47: return "TB_SETINDENT";
5658         case WM_USER+48: return "TB_SETIMAGELIST";
5659         case WM_USER+49: return "TB_GETIMAGELIST";
5660         case WM_USER+50: return "TB_LOADIMAGES";
5661         case WM_USER+51: return "TB_GETRECT";
5662         case WM_USER+52: return "TB_SETHOTIMAGELIST";
5663         case WM_USER+53: return "TB_GETHOTIMAGELIST";
5664         case WM_USER+54: return "TB_SETDISABLEDIMAGELIST";
5665         case WM_USER+55: return "TB_GETDISABLEDIMAGELIST";
5666         case WM_USER+56: return "TB_SETSTYLE";
5667         case WM_USER+57: return "TB_GETSTYLE";
5668         case WM_USER+58: return "TB_GETBUTTONSIZE";
5669         case WM_USER+59: return "TB_SETBUTTONWIDTH";
5670         case WM_USER+60: return "TB_SETMAXTEXTROWS";
5671         case WM_USER+61: return "TB_GETTEXTROWS";
5672         case WM_USER+41: return "TB_GETBITMAPFLAGS";
5673
5674         default:
5675             static char s_szBuf[128];
5676             sprintf(s_szBuf, "<unknown message = %d>", message);
5677             return s_szBuf;
5678     }
5679 }
5680 #endif //__WXDEBUG__
5681
5682 static void TranslateKbdEventToMouse(wxWindowMSW *win,
5683                                      int *x, int *y, WPARAM *flags)
5684 {
5685     // construct the key mask
5686     WPARAM& fwKeys = *flags;
5687
5688     fwKeys = MK_RBUTTON;
5689     if ( wxIsCtrlDown() )
5690         fwKeys |= MK_CONTROL;
5691     if ( wxIsShiftDown() )
5692         fwKeys |= MK_SHIFT;
5693
5694     // simulate right mouse button click
5695     DWORD dwPos = ::GetMessagePos();
5696     *x = GET_X_LPARAM(dwPos);
5697     *y = GET_Y_LPARAM(dwPos);
5698
5699     win->ScreenToClient(x, y);
5700 }
5701
5702 static TEXTMETRIC wxGetTextMetrics(const wxWindowMSW *win)
5703 {
5704     // prepare the DC
5705     TEXTMETRIC tm;
5706     HWND hwnd = GetHwndOf(win);
5707     HDC hdc = ::GetDC(hwnd);
5708
5709 #if !wxDIALOG_UNIT_COMPATIBILITY
5710     // and select the current font into it
5711     HFONT hfont = GetHfontOf(win->GetFont());
5712     if ( hfont )
5713     {
5714         hfont = (HFONT)::SelectObject(hdc, hfont);
5715     }
5716 #endif
5717
5718     // finally retrieve the text metrics from it
5719     GetTextMetrics(hdc, &tm);
5720
5721 #if !wxDIALOG_UNIT_COMPATIBILITY
5722     // and clean up
5723     if ( hfont )
5724     {
5725         (void)::SelectObject(hdc, hfont);
5726     }
5727 #endif
5728
5729     ::ReleaseDC(hwnd, hdc);
5730
5731     return tm;
5732 }
5733
5734 // Find the wxWindow at the current mouse position, returning the mouse
5735 // position.
5736 wxWindow* wxFindWindowAtPointer(wxPoint& pt)
5737 {
5738     pt = wxGetMousePosition();
5739     return wxFindWindowAtPoint(pt);
5740 }
5741
5742 wxWindow* wxFindWindowAtPoint(const wxPoint& pt)
5743 {
5744     POINT pt2;
5745     pt2.x = pt.x;
5746     pt2.y = pt.y;
5747     HWND hWndHit = ::WindowFromPoint(pt2);
5748
5749     wxWindow* win = wxFindWinFromHandle((WXHWND) hWndHit) ;
5750     HWND hWnd = hWndHit;
5751
5752     // Try to find a window with a wxWindow associated with it
5753     while (!win && (hWnd != 0))
5754     {
5755         hWnd = ::GetParent(hWnd);
5756         win = wxFindWinFromHandle((WXHWND) hWnd) ;
5757     }
5758     return win;
5759 }
5760
5761 // Get the current mouse position.
5762 wxPoint wxGetMousePosition()
5763 {
5764     POINT pt;
5765     GetCursorPos( & pt );
5766
5767     return wxPoint(pt.x, pt.y);
5768 }
5769
5770 #if wxUSE_HOTKEY
5771
5772 bool wxWindowMSW::RegisterHotKey(int hotkeyId, int modifiers, int keycode)
5773 {
5774     UINT win_modifiers=0;
5775     if ( modifiers & wxMOD_ALT )
5776         win_modifiers |= MOD_ALT;
5777     if ( modifiers & wxMOD_SHIFT )
5778         win_modifiers |= MOD_SHIFT;
5779     if ( modifiers & wxMOD_CONTROL )
5780         win_modifiers |= MOD_CONTROL;
5781     if ( modifiers & wxMOD_WIN )
5782         win_modifiers |= MOD_WIN;
5783
5784     if ( !::RegisterHotKey(GetHwnd(), hotkeyId, win_modifiers, keycode) )
5785     {
5786         wxLogLastError(_T("RegisterHotKey"));
5787
5788         return false;
5789     }
5790
5791     return true;
5792 }
5793
5794 bool wxWindowMSW::UnregisterHotKey(int hotkeyId)
5795 {
5796     if ( !::UnregisterHotKey(GetHwnd(), hotkeyId) )
5797     {
5798         wxLogLastError(_T("UnregisterHotKey"));
5799
5800         return false;
5801     }
5802
5803     return true;
5804 }
5805
5806 #if wxUSE_ACCEL
5807
5808 bool wxWindowMSW::HandleHotKey(WXWPARAM wParam, WXLPARAM lParam)
5809 {
5810     int hotkeyId = wParam;
5811     int virtualKey = HIWORD(lParam);
5812     int win_modifiers = LOWORD(lParam);
5813
5814     wxKeyEvent event(CreateKeyEvent(wxEVT_HOTKEY, virtualKey, wParam, lParam));
5815     event.SetId(hotkeyId);
5816     event.m_shiftDown = (win_modifiers & MOD_SHIFT) != 0;
5817     event.m_controlDown = (win_modifiers & MOD_CONTROL) != 0;
5818     event.m_altDown = (win_modifiers & MOD_ALT) != 0;
5819     event.m_metaDown = (win_modifiers & MOD_WIN) != 0;
5820
5821     return GetEventHandler()->ProcessEvent(event);
5822 }
5823
5824 #endif // wxUSE_ACCEL
5825
5826 #endif // wxUSE_HOTKEY
5827
5828 // Not tested under WinCE
5829 #ifndef __WXWINCE__
5830
5831 // this class installs a message hook which really wakes up our idle processing
5832 // each time a WM_NULL is received (wxWakeUpIdle does this), even if we're
5833 // sitting inside a local modal loop (e.g. a menu is opened or scrollbar is
5834 // being dragged or even inside ::MessageBox()) and so don't control message
5835 // dispatching otherwise
5836 class wxIdleWakeUpModule : public wxModule
5837 {
5838 public:
5839     virtual bool OnInit()
5840     {
5841         ms_hMsgHookProc = ::SetWindowsHookEx
5842                             (
5843                              WH_GETMESSAGE,
5844                              &wxIdleWakeUpModule::MsgHookProc,
5845                              NULL,
5846                              GetCurrentThreadId()
5847                             );
5848
5849         if ( !ms_hMsgHookProc )
5850         {
5851             wxLogLastError(_T("SetWindowsHookEx(WH_GETMESSAGE)"));
5852
5853             return false;
5854         }
5855
5856         return true;
5857     }
5858
5859     virtual void OnExit()
5860     {
5861         ::UnhookWindowsHookEx(wxIdleWakeUpModule::ms_hMsgHookProc);
5862     }
5863
5864     static LRESULT CALLBACK MsgHookProc(int nCode, WPARAM wParam, LPARAM lParam)
5865     {
5866         MSG *msg = (MSG*)lParam;
5867         if ( msg->message == WM_NULL )
5868         {
5869             wxTheApp->ProcessPendingEvents();
5870         }
5871
5872         return CallNextHookEx(ms_hMsgHookProc, nCode, wParam, lParam);
5873     };
5874
5875 private:
5876     static HHOOK ms_hMsgHookProc;
5877
5878     DECLARE_DYNAMIC_CLASS(wxIdleWakeUpModule)
5879 };
5880
5881 HHOOK wxIdleWakeUpModule::ms_hMsgHookProc = 0;
5882
5883 IMPLEMENT_DYNAMIC_CLASS(wxIdleWakeUpModule, wxModule)
5884
5885 #endif // __WXWINCE__
5886