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