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_SYS_COLOUR_CHANGED(wxWindowMSW::OnSysColourChanged)
 336     EVT_ERASE_BACKGROUND(wxWindowMSW::OnEraseBackground)
 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
2503                 processed = win->HandleMouseEvent(message, x, y, wParam);
2504
2505                 // if the app didn't eat the event, handle it in the default
2506                 // way, that is by giving this window the focus
2507                 if ( !processed )
2508                 {
2509                     // for the standard classes their WndProc sets the focus to
2510                     // them anyhow and doing it from here results in some weird
2511                     // problems, so don't do it for them (unnecessary anyhow)
2512                     if ( !win->IsOfStandardClass() )
2513                     {
2514                         if ( message == WM_LBUTTONDOWN && win->AcceptsFocus() )
2515                             win->SetFocus();
2516                     }
2517                 }
2518             }
2519             break;
2520
2521 #ifdef MM_JOY1MOVE
2522         case MM_JOY1MOVE:
2523         case MM_JOY2MOVE:
2524         case MM_JOY1ZMOVE:
2525         case MM_JOY2ZMOVE:
2526         case MM_JOY1BUTTONDOWN:
2527         case MM_JOY2BUTTONDOWN:
2528         case MM_JOY1BUTTONUP:
2529         case MM_JOY2BUTTONUP:
2530             processed = HandleJoystickEvent(message,
2531                                             GET_X_LPARAM(lParam),
2532                                             GET_Y_LPARAM(lParam),
2533                                             wParam);
2534             break;
2535 #endif // __WXMICROWIN__
2536
2537         case WM_COMMAND:
2538             {
2539                 WORD id, cmd;
2540                 WXHWND hwnd;
2541                 UnpackCommand(wParam, lParam, &id, &hwnd, &cmd);
2542
2543                 processed = HandleCommand(id, cmd, hwnd);
2544             }
2545             break;
2546
2547         case WM_NOTIFY:
2548             processed = HandleNotify((int)wParam, lParam, &rc.result);
2549             break;
2550
2551         // we only need to reply to WM_NOTIFYFORMAT manually when using MSLU,
2552         // otherwise DefWindowProc() does it perfectly fine for us, but MSLU
2553         // apparently doesn't always behave properly and needs some help
2554 #if wxUSE_UNICODE_MSLU && defined(NF_QUERY)
2555         case WM_NOTIFYFORMAT:
2556             if ( lParam == NF_QUERY )
2557             {
2558                 processed = true;
2559                 rc.result = NFR_UNICODE;
2560             }
2561             break;
2562 #endif // wxUSE_UNICODE_MSLU
2563
2564             // for these messages we must return true if process the message
2565 #ifdef WM_DRAWITEM
2566         case WM_DRAWITEM:
2567         case WM_MEASUREITEM:
2568             {
2569                 int idCtrl = (UINT)wParam;
2570                 if ( message == WM_DRAWITEM )
2571                 {
2572                     processed = MSWOnDrawItem(idCtrl,
2573                                               (WXDRAWITEMSTRUCT *)lParam);
2574                 }
2575                 else
2576                 {
2577                     processed = MSWOnMeasureItem(idCtrl,
2578                                                  (WXMEASUREITEMSTRUCT *)lParam);
2579                 }
2580
2581                 if ( processed )
2582                     rc.result = TRUE;
2583             }
2584             break;
2585 #endif // defined(WM_DRAWITEM)
2586
2587         case WM_GETDLGCODE:
2588             if ( !IsOfStandardClass() )
2589             {
2590                 // we always want to get the char events
2591                 rc.result = DLGC_WANTCHARS;
2592
2593                 if ( GetWindowStyleFlag() & wxWANTS_CHARS )
2594                 {
2595                     // in fact, we want everything
2596                     rc.result |= DLGC_WANTARROWS |
2597                                  DLGC_WANTTAB |
2598                                  DLGC_WANTALLKEYS;
2599                 }
2600
2601                 processed = true;
2602             }
2603             //else: get the dlg code from the DefWindowProc()
2604             break;
2605
2606         case WM_SYSKEYDOWN:
2607         case WM_KEYDOWN:
2608             // If this has been processed by an event handler, return 0 now
2609             // (we've handled it).
2610             m_lastKeydownProcessed = HandleKeyDown((WORD) wParam, lParam);
2611             if ( m_lastKeydownProcessed )
2612             {
2613                 processed = true;
2614             }
2615
2616             if ( !processed )
2617             {
2618                 switch ( wParam )
2619                 {
2620                     // we consider these message "not interesting" to OnChar, so
2621                     // just don't do anything more with them
2622                     case VK_SHIFT:
2623                     case VK_CONTROL:
2624                     case VK_MENU:
2625                     case VK_CAPITAL:
2626                     case VK_NUMLOCK:
2627                     case VK_SCROLL:
2628                         processed = true;
2629                         break;
2630
2631                     // avoid duplicate messages to OnChar for these ASCII keys:
2632                     // they will be translated by TranslateMessage() and received
2633                     // in WM_CHAR
2634                     case VK_ESCAPE:
2635                     case VK_SPACE:
2636                     case VK_RETURN:
2637                     case VK_BACK:
2638                     case VK_TAB:
2639                     case VK_ADD:
2640                     case VK_SUBTRACT:
2641                     case VK_MULTIPLY:
2642                     case VK_DIVIDE:
2643                     case VK_OEM_1:
2644                     case VK_OEM_2:
2645                     case VK_OEM_3:
2646                     case VK_OEM_4:
2647                     case VK_OEM_5:
2648                     case VK_OEM_6:
2649                     case VK_OEM_7:
2650                     case VK_OEM_PLUS:
2651                     case VK_OEM_COMMA:
2652                     case VK_OEM_MINUS:
2653                     case VK_OEM_PERIOD:
2654                         // but set processed to false, not true to still pass them
2655                         // to the control's default window proc - otherwise
2656                         // built-in keyboard handling won't work
2657                         processed = false;
2658                         break;
2659
2660 #ifdef VK_APPS
2661                     // special case of VK_APPS: treat it the same as right mouse
2662                     // click because both usually pop up a context menu
2663                     case VK_APPS:
2664                         processed = HandleMouseEvent(WM_RBUTTONDOWN, -1, -1, 0);
2665                         break;
2666 #endif // VK_APPS
2667
2668                     default:
2669                         // do generate a CHAR event
2670                         processed = HandleChar((WORD)wParam, lParam);
2671                 }
2672             }
2673             if (message == WM_SYSKEYDOWN)  // Let Windows still handle the SYSKEYs
2674                 processed = false;
2675             break;
2676
2677         case WM_SYSKEYUP:
2678         case WM_KEYUP:
2679 #ifdef VK_APPS
2680             // special case of VK_APPS: treat it the same as right mouse button
2681             if ( wParam == VK_APPS )
2682             {
2683                 processed = HandleMouseEvent(WM_RBUTTONUP, -1, -1, 0);
2684             }
2685             else
2686 #endif // VK_APPS
2687             {
2688                 processed = HandleKeyUp((WORD) wParam, lParam);
2689             }
2690             break;
2691
2692         case WM_SYSCHAR:
2693         case WM_CHAR: // Always an ASCII character
2694             if ( m_lastKeydownProcessed )
2695             {
2696                 // The key was handled in the EVT_KEY_DOWN and handling
2697                 // a key in an EVT_KEY_DOWN handler is meant, by
2698                 // design, to prevent EVT_CHARs from happening
2699                 m_lastKeydownProcessed = false;
2700                 processed = true;
2701             }
2702             else
2703             {
2704                 processed = HandleChar((WORD)wParam, lParam, true);
2705             }
2706             break;
2707
2708 #if wxUSE_HOTKEY
2709         case WM_HOTKEY:
2710             processed = HandleHotKey((WORD)wParam, lParam);
2711             break;
2712 #endif // wxUSE_HOTKEY
2713
2714         case WM_HSCROLL:
2715         case WM_VSCROLL:
2716             {
2717                 WXWORD code, pos;
2718                 WXHWND hwnd;
2719                 UnpackScroll(wParam, lParam, &code, &pos, &hwnd);
2720
2721                 processed = MSWOnScroll(message == WM_HSCROLL ? wxHORIZONTAL
2722                                                               : wxVERTICAL,
2723                                         code, pos, hwnd);
2724             }
2725             break;
2726
2727         // CTLCOLOR messages are sent by children to query the parent for their
2728         // colors#ifndef __WXMICROWIN__
2729 #ifndef __WXMICROWIN__
2730         case WM_CTLCOLORMSGBOX:
2731         case WM_CTLCOLOREDIT:
2732         case WM_CTLCOLORLISTBOX:
2733         case WM_CTLCOLORBTN:
2734         case WM_CTLCOLORDLG:
2735         case WM_CTLCOLORSCROLLBAR:
2736         case WM_CTLCOLORSTATIC:
2737             {
2738                 WXWORD nCtlColor;
2739                 WXHDC hdc;
2740                 WXHWND hwnd;
2741                 UnpackCtlColor(wParam, lParam, &nCtlColor, &hdc, &hwnd);
2742
2743                 processed = HandleCtlColor(&rc.hBrush,
2744                                            (WXHDC)hdc,
2745                                            (WXHWND)hwnd,
2746                                            nCtlColor,
2747                                            message,
2748                                            wParam,
2749                                            lParam);
2750             }
2751             break;
2752 #endif // !__WXMICROWIN__
2753
2754         case WM_SYSCOLORCHANGE:
2755             // the return value for this message is ignored
2756             processed = HandleSysColorChange();
2757             break;
2758
2759 #if !defined(__WXWINCE__)
2760         case WM_DISPLAYCHANGE:
2761             processed = HandleDisplayChange();
2762             break;
2763 #endif
2764
2765         case WM_PALETTECHANGED:
2766             processed = HandlePaletteChanged((WXHWND) (HWND) wParam);
2767             break;
2768
2769         case WM_CAPTURECHANGED:
2770             processed = HandleCaptureChanged((WXHWND) (HWND) lParam);
2771             break;
2772
2773         case WM_QUERYNEWPALETTE:
2774             processed = HandleQueryNewPalette();
2775             break;
2776
2777         case WM_ERASEBKGND:
2778             processed = HandleEraseBkgnd((WXHDC)(HDC)wParam);
2779             if ( processed )
2780             {
2781                 // we processed the message, i.e. erased the background
2782                 rc.result = TRUE;
2783             }
2784             break;
2785
2786 #if !defined(__WXWINCE__)
2787         case WM_DROPFILES:
2788             processed = HandleDropFiles(wParam);
2789             break;
2790 #endif
2791
2792         case WM_INITDIALOG:
2793             processed = HandleInitDialog((WXHWND)(HWND)wParam);
2794
2795             if ( processed )
2796             {
2797                 // we never set focus from here
2798                 rc.result = FALSE;
2799             }
2800             break;
2801
2802 #if !defined(__WXWINCE__)
2803         case WM_QUERYENDSESSION:
2804             processed = HandleQueryEndSession(lParam, &rc.allow);
2805             break;
2806
2807         case WM_ENDSESSION:
2808             processed = HandleEndSession(wParam != 0, lParam);
2809             break;
2810
2811         case WM_GETMINMAXINFO:
2812             processed = HandleGetMinMaxInfo((MINMAXINFO*)lParam);
2813             break;
2814 #endif
2815
2816         case WM_SETCURSOR:
2817             processed = HandleSetCursor((WXHWND)(HWND)wParam,
2818                                         LOWORD(lParam),     // hit test
2819                                         HIWORD(lParam));    // mouse msg
2820
2821             if ( processed )
2822             {
2823                 // returning TRUE stops the DefWindowProc() from further
2824                 // processing this message - exactly what we need because we've
2825                 // just set the cursor.
2826                 rc.result = TRUE;
2827             }
2828             break;
2829
2830 #if wxUSE_ACCESSIBILITY
2831         case WM_GETOBJECT:
2832             {
2833                 //WPARAM dwFlags = (WPARAM) (DWORD) wParam;
2834                 LPARAM dwObjId = (LPARAM) (DWORD) lParam;
2835
2836                 if (dwObjId == (LPARAM)OBJID_CLIENT && GetOrCreateAccessible())
2837                 {
2838                     return LresultFromObject(IID_IAccessible, wParam, (IUnknown*) GetAccessible()->GetIAccessible());
2839                 }
2840                 break;
2841             }
2842 #endif
2843
2844 #if defined(WM_HELP)
2845         case WM_HELP:
2846             {
2847                 // HELPINFO doesn't seem to be supported on WinCE.
2848 #ifndef __WXWINCE__
2849                 HELPINFO* info = (HELPINFO*) lParam;
2850                 // Don't yet process menu help events, just windows
2851                 if (info->iContextType == HELPINFO_WINDOW)
2852                 {
2853 #endif
2854                     wxWindowMSW* subjectOfHelp = this;
2855                     bool eventProcessed = false;
2856                     while (subjectOfHelp && !eventProcessed)
2857                     {
2858                         wxHelpEvent helpEvent(wxEVT_HELP,
2859                                               subjectOfHelp->GetId(),
2860 #ifdef __WXWINCE__
2861                                               wxPoint(0, 0)
2862 #else
2863                                               wxPoint(info->MousePos.x, info->MousePos.y)
2864 #endif
2865                                               );
2866
2867                         helpEvent.SetEventObject(this);
2868                         eventProcessed =
2869                             GetEventHandler()->ProcessEvent(helpEvent);
2870
2871                         // Go up the window hierarchy until the event is
2872                         // handled (or not)
2873                         subjectOfHelp = subjectOfHelp->GetParent();
2874                     }
2875
2876                     processed = eventProcessed;
2877 #ifndef __WXWINCE__
2878                 }
2879                 else if (info->iContextType == HELPINFO_MENUITEM)
2880                 {
2881                     wxHelpEvent helpEvent(wxEVT_HELP, info->iCtrlId);
2882                     helpEvent.SetEventObject(this);
2883                     processed = GetEventHandler()->ProcessEvent(helpEvent);
2884
2885                 }
2886                 //else: processed is already false
2887 #endif
2888             }
2889             break;
2890 #endif
2891
2892 #if !defined(__WXWINCE__)
2893         case WM_CONTEXTMENU:
2894             {
2895                 // we don't convert from screen to client coordinates as
2896                 // the event may be handled by a parent window
2897                 wxPoint pt(GET_X_LPARAM(lParam), GET_Y_LPARAM(lParam));
2898
2899                 wxContextMenuEvent evtCtx(wxEVT_CONTEXT_MENU, GetId(), pt);
2900
2901                 // we could have got an event from our child, reflect it back
2902                 // to it if this is the case
2903                 wxWindowMSW *win = NULL;
2904                 if ( (WXHWND)wParam != m_hWnd )
2905                 {
2906                     win = FindItemByHWND((WXHWND)wParam);
2907                 }
2908
2909                 if ( !win )
2910                     win = this;
2911
2912                 evtCtx.SetEventObject(win);
2913                 processed = win->GetEventHandler()->ProcessEvent(evtCtx);
2914             }
2915             break;
2916 #endif
2917
2918         case WM_MENUCHAR:
2919             // we're only interested in our own menus, not MF_SYSMENU
2920             if ( HIWORD(wParam) == MF_POPUP )
2921             {
2922                 // handle menu chars for ownerdrawn menu items
2923                 int i = HandleMenuChar(toupper(LOWORD(wParam)), lParam);
2924                 if ( i != wxNOT_FOUND )
2925                 {
2926                     rc.result = MAKELRESULT(i, MNC_EXECUTE);
2927                     processed = true;
2928                 }
2929             }
2930             break;
2931     }
2932
2933     if ( !processed )
2934     {
2935 #ifdef __WXDEBUG__
2936         wxLogTrace(wxTraceMessages, wxT("Forwarding %s to DefWindowProc."),
2937                    wxGetMessageName(message));
2938 #endif // __WXDEBUG__
2939         rc.result = MSWDefWindowProc(message, wParam, lParam);
2940     }
2941
2942     return rc.result;
2943 }
2944
2945 // ----------------------------------------------------------------------------
2946 // wxWindow <-> HWND map
2947 // ----------------------------------------------------------------------------
2948
2949 wxWinHashTable *wxWinHandleHash = NULL;
2950
2951 wxWindow *wxFindWinFromHandle(WXHWND hWnd)
2952 {
2953     return (wxWindow*)wxWinHandleHash->Get((long)hWnd);
2954 }
2955
2956 void wxAssociateWinWithHandle(HWND hWnd, wxWindowMSW *win)
2957 {
2958     // adding NULL hWnd is (first) surely a result of an error and
2959     // (secondly) breaks menu command processing
2960     wxCHECK_RET( hWnd != (HWND)NULL,
2961                  wxT("attempt to add a NULL hWnd to window list ignored") );
2962
2963     wxWindow *oldWin = wxFindWinFromHandle((WXHWND) hWnd);
2964 #ifdef __WXDEBUG__
2965     if ( oldWin && (oldWin != win) )
2966     {
2967         wxLogDebug(wxT("HWND %X already associated with another window (%s)"),
2968                    (int) hWnd, win->GetClassInfo()->GetClassName());
2969     }
2970     else
2971 #endif // __WXDEBUG__
2972     if (!oldWin)
2973     {
2974         wxWinHandleHash->Put((long)hWnd, (wxWindow *)win);
2975     }
2976 }
2977
2978 void wxRemoveHandleAssociation(wxWindowMSW *win)
2979 {
2980     wxWinHandleHash->Delete((long)win->GetHWND());
2981 }
2982
2983 // ----------------------------------------------------------------------------
2984 // various MSW speciic class dependent functions
2985 // ----------------------------------------------------------------------------
2986
2987 // Default destroyer - override if you destroy it in some other way
2988 // (e.g. with MDI child windows)
2989 void wxWindowMSW::MSWDestroyWindow()
2990 {
2991 }
2992
2993 bool wxWindowMSW::MSWGetCreateWindowCoords(const wxPoint& pos,
2994                                            const wxSize& size,
2995                                            int& x, int& y,
2996                                            int& w, int& h) const
2997 {
2998     // yes, those are just some arbitrary hardcoded numbers
2999     static const int DEFAULT_Y = 200;
3000
3001     bool nonDefault = false;
3002
3003     if ( pos.x == wxDefaultCoord )
3004     {
3005         // if x is set to CW_USEDEFAULT, y parameter is ignored anyhow so we
3006         // can just as well set it to CW_USEDEFAULT as well
3007         x =
3008         y = CW_USEDEFAULT;
3009     }
3010     else
3011     {
3012         // OTOH, if x is not set to CW_USEDEFAULT, y shouldn't be set to it
3013         // neither because it is not handled as a special value by Windows then
3014         // and so we have to choose some default value for it
3015         x = pos.x;
3016         y = pos.y == wxDefaultCoord ? DEFAULT_Y : pos.y;
3017
3018         nonDefault = true;
3019     }
3020
3021     /*
3022       NB: there used to be some code here which set the initial size of the
3023           window to the client size of the parent if no explicit size was
3024           specified. This was wrong because wxWidgets programs often assume
3025           that they get a WM_SIZE (EVT_SIZE) upon creation, however this broke
3026           it. To see why, you should understand that Windows sends WM_SIZE from
3027           inside ::CreateWindow() anyhow. However, ::CreateWindow() is called
3028           from some base class ctor and so this WM_SIZE is not processed in the
3029           real class' OnSize() (because it's not fully constructed yet and the
3030           event goes to some base class OnSize() instead). So the WM_SIZE we
3031           rely on is the one sent when the parent frame resizes its children
3032           but here is the problem: if the child already has just the right
3033           size, nothing will happen as both wxWidgets and Windows check for
3034           this and ignore any attempts to change the window size to the size it
3035           already has - so no WM_SIZE would be sent.
3036      */
3037
3038
3039     // we don't use CW_USEDEFAULT here for several reasons:
3040     //
3041     //  1. it results in huge frames on modern screens (1000*800 is not
3042     //     uncommon on my 1280*1024 screen) which is way too big for a half
3043     //     empty frame of most of wxWidgets samples for example)
3044     //
3045     //  2. it is buggy for frames with wxFRAME_TOOL_WINDOW style for which
3046     //     the default is for whatever reason 8*8 which breaks client <->
3047     //     window size calculations (it would be nice if it didn't, but it
3048     //     does and the simplest way to fix it seemed to change the broken
3049     //     default size anyhow)
3050     //
3051     //  3. there is just no advantage in doing it: with x and y it is
3052     //     possible that [future versions of] Windows position the new top
3053     //     level window in some smart way which we can't do, but we can
3054     //     guess a reasonably good size for a new window just as well
3055     //     ourselves
3056
3057     // However, on PocketPC devices, we must use the default
3058     // size if possible.
3059 #ifdef _WIN32_WCE
3060     if (size.x == wxDefaultCoord)
3061         w = CW_USEDEFAULT;
3062     else
3063         w = size.x;
3064     if (size.y == wxDefaultCoord)
3065         h = CW_USEDEFAULT;
3066     else
3067         h = size.y;
3068 #else
3069     if ( size.x == wxDefaultCoord || size.y == wxDefaultCoord)
3070     {
3071         nonDefault = true;
3072     }
3073     w = WidthDefault(size.x);
3074     h = HeightDefault(size.y);
3075 #endif
3076
3077     AdjustForParentClientOrigin(x, y);
3078
3079     return nonDefault;
3080 }
3081
3082 WXHWND wxWindowMSW::MSWGetParent() const
3083 {
3084     return m_parent ? m_parent->GetHWND() : WXHWND(NULL);
3085 }
3086
3087 bool wxWindowMSW::MSWCreate(const wxChar *wclass,
3088                             const wxChar *title,
3089                             const wxPoint& pos,
3090                             const wxSize& size,
3091                             WXDWORD style,
3092                             WXDWORD extendedStyle)
3093 {
3094     // choose the position/size for the new window
3095     int x, y, w, h;
3096     (void)MSWGetCreateWindowCoords(pos, size, x, y, w, h);
3097
3098     // controlId is menu handle for the top level windows, so set it to 0
3099     // unless we're creating a child window
3100     int controlId = style & WS_CHILD ? GetId() : 0;
3101
3102     // for each class "Foo" we have we also have "FooNR" ("no repaint") class
3103     // which is the same but without CS_[HV]REDRAW class styles so using it
3104     // ensures that the window is not fully repainted on each resize
3105     wxString className(wclass);
3106     if ( !HasFlag(wxFULL_REPAINT_ON_RESIZE) )
3107     {
3108         className += wxT("NR");
3109     }
3110
3111     // do create the window
3112     wxWindowCreationHook hook(this);
3113
3114     // VZ: anyone care to explain why this is done for CE?
3115 #ifdef __WXWINCE__
3116     if (extendedStyle == 0)
3117     {
3118         m_hWnd = (WXHWND)::CreateWindow
3119             (
3120             className,
3121             title ? title : wxEmptyString,
3122             style,
3123             x, y, w, h,
3124             (HWND)MSWGetParent(),
3125             (HMENU)controlId,
3126             wxGetInstance(),
3127             NULL                        // no extra data
3128             );
3129     }
3130     else
3131 #endif // __WXWINCE__
3132     {
3133         m_hWnd = (WXHWND)::CreateWindowEx
3134             (
3135             extendedStyle,
3136             className,
3137             title ? title : wxEmptyString,
3138             style,
3139             x, y, w, h,
3140             (HWND)MSWGetParent(),
3141             (HMENU)controlId,
3142             wxGetInstance(),
3143             NULL                        // no extra data
3144             );
3145     }
3146
3147     if ( !m_hWnd )
3148     {
3149         wxLogSysError(_("Can't create window of class %s"), wclass);
3150
3151         return false;
3152     }
3153
3154     SubclassWin(m_hWnd);
3155
3156     return true;
3157 }
3158
3159 // ===========================================================================
3160 // MSW message handlers
3161 // ===========================================================================
3162
3163 // ---------------------------------------------------------------------------
3164 // WM_NOTIFY
3165 // ---------------------------------------------------------------------------
3166
3167 #ifdef __WIN95__
3168
3169 bool wxWindowMSW::HandleNotify(int idCtrl, WXLPARAM lParam, WXLPARAM *result)
3170 {
3171 #ifndef __WXMICROWIN__
3172     LPNMHDR hdr = (LPNMHDR)lParam;
3173     HWND hWnd = hdr->hwndFrom;
3174     wxWindow *win = wxFindWinFromHandle((WXHWND)hWnd);
3175
3176     // if the control is one of our windows, let it handle the message itself
3177     if ( win )
3178     {
3179         return win->MSWOnNotify(idCtrl, lParam, result);
3180     }
3181
3182     // VZ: why did we do it? normally this is unnecessary and, besides, it
3183     //     breaks the message processing for the toolbars because the tooltip
3184     //     notifications were being forwarded to the toolbar child controls
3185     //     (if it had any) before being passed to the toolbar itself, so in my
3186     //     example the tooltip for the combobox was always shown instead of the
3187     //     correct button tooltips
3188 #if 0
3189     // try all our children
3190     wxWindowList::compatibility_iterator node = GetChildren().GetFirst();
3191     while ( node )
3192     {
3193         wxWindow *child = node->GetData();
3194         if ( child->MSWOnNotify(idCtrl, lParam, result) )
3195         {
3196             return true;
3197         }
3198
3199         node = node->GetNext();
3200     }
3201 #endif // 0
3202
3203     // by default, handle it ourselves
3204     return MSWOnNotify(idCtrl, lParam, result);
3205 #else // __WXMICROWIN__
3206     return false;
3207 #endif
3208 }
3209
3210 #if wxUSE_TOOLTIPS
3211
3212 bool wxWindowMSW::HandleTooltipNotify(WXUINT code,
3213                                       WXLPARAM lParam,
3214                                       const wxString& ttip)
3215 {
3216     // I don't know why it happens, but the versions of comctl32.dll starting
3217     // from 4.70 sometimes send TTN_NEEDTEXTW even to ANSI programs (normally,
3218     // this message is supposed to be sent to Unicode programs only) -- hence
3219     // we need to handle it as well, otherwise no tooltips will be shown in
3220     // this case
3221 #ifndef __WXWINCE__
3222     if ( !(code == (WXUINT) TTN_NEEDTEXTA || code == (WXUINT) TTN_NEEDTEXTW)
3223             || ttip.empty() )
3224     {
3225         // not a tooltip message or no tooltip to show anyhow
3226         return false;
3227     }
3228 #endif
3229
3230     LPTOOLTIPTEXT ttText = (LPTOOLTIPTEXT)lParam;
3231
3232     // We don't want to use the szText buffer because it has a limit of 80
3233     // bytes and this is not enough, especially for Unicode build where it
3234     // limits the tooltip string length to only 40 characters
3235     //
3236     // The best would be, of course, to not impose any length limitations at
3237     // all but then the buffer would have to be dynamic and someone would have
3238     // to free it and we don't have the tooltip owner object here any more, so
3239     // for now use our own static buffer with a higher fixed max length.
3240     //
3241     // Note that using a static buffer should not be a problem as only a single
3242     // tooltip can be shown at the same time anyhow.
3243 #if !wxUSE_UNICODE
3244     if ( code == (WXUINT) TTN_NEEDTEXTW )
3245     {
3246         // We need to convert tooltip from multi byte to Unicode on the fly.
3247         static wchar_t buf[513];
3248
3249         // Truncate tooltip length if needed as otherwise we might not have
3250         // enough space for it in the buffer and MultiByteToWideChar() would
3251         // return an error
3252         size_t tipLength = wxMin(ttip.Len(), WXSIZEOF(buf) - 1);
3253
3254         // Convert to WideChar without adding the NULL character. The NULL
3255         // character is added afterwards (this is more efficient).
3256         int len = ::MultiByteToWideChar
3257                     (
3258                         CP_ACP,
3259                         0,                      // no flags
3260                         ttip,
3261                         tipLength,
3262                         buf,
3263                         WXSIZEOF(buf) - 1
3264                     );
3265
3266         if ( !len )
3267         {
3268             wxLogLastError(_T("MultiByteToWideChar()"));
3269         }
3270
3271         buf[len] = L'\0';
3272         ttText->lpszText = (LPSTR) buf;
3273     }
3274     else // TTN_NEEDTEXTA
3275 #endif // !wxUSE_UNICODE
3276     {
3277         // we get here if we got TTN_NEEDTEXTA (only happens in ANSI build) or
3278         // if we got TTN_NEEDTEXTW in Unicode build: in this case we just have
3279         // to copy the string we have into the buffer
3280         static wxChar buf[513];
3281         wxStrncpy(buf, ttip.c_str(), WXSIZEOF(buf) - 1);
3282         buf[WXSIZEOF(buf) - 1] = _T('\0');
3283         ttText->lpszText = buf;
3284     }
3285
3286     return true;
3287 }
3288
3289 #endif // wxUSE_TOOLTIPS
3290
3291 bool wxWindowMSW::MSWOnNotify(int WXUNUSED(idCtrl),
3292                               WXLPARAM lParam,
3293                               WXLPARAM* WXUNUSED(result))
3294 {
3295 #if wxUSE_TOOLTIPS
3296     if ( m_tooltip )
3297     {
3298         NMHDR* hdr = (NMHDR *)lParam;
3299         if ( HandleTooltipNotify(hdr->code, lParam, m_tooltip->GetTip()))
3300         {
3301             // processed
3302             return true;
3303         }
3304     }
3305 #else
3306     wxUnusedVar(lParam);
3307 #endif // wxUSE_TOOLTIPS
3308
3309     return false;
3310 }
3311
3312 #endif // __WIN95__
3313
3314 // ---------------------------------------------------------------------------
3315 // end session messages
3316 // ---------------------------------------------------------------------------
3317
3318 bool wxWindowMSW::HandleQueryEndSession(long logOff, bool *mayEnd)
3319 {
3320 #ifndef __WXWINCE__
3321     wxCloseEvent event(wxEVT_QUERY_END_SESSION, wxID_ANY);
3322     event.SetEventObject(wxTheApp);
3323     event.SetCanVeto(true);
3324     event.SetLoggingOff(logOff == (long)ENDSESSION_LOGOFF);
3325
3326     bool rc = wxTheApp->ProcessEvent(event);
3327
3328     if ( rc )
3329     {
3330         // we may end only if the app didn't veto session closing (double
3331         // negation...)
3332         *mayEnd = !event.GetVeto();
3333     }
3334
3335     return rc;
3336 #else
3337     return false;
3338 #endif
3339 }
3340
3341 bool wxWindowMSW::HandleEndSession(bool endSession, long logOff)
3342 {
3343 #ifndef __WXWINCE__
3344     // do nothing if the session isn't ending
3345     if ( !endSession )
3346         return false;
3347
3348     // only send once
3349     if ( (this != wxTheApp->GetTopWindow()) )
3350         return false;
3351
3352     wxCloseEvent event(wxEVT_END_SESSION, wxID_ANY);
3353     event.SetEventObject(wxTheApp);
3354     event.SetCanVeto(false);
3355     event.SetLoggingOff( (logOff == (long)ENDSESSION_LOGOFF) );
3356
3357     return wxTheApp->ProcessEvent(event);
3358 #else
3359     return false;
3360 #endif
3361 }
3362
3363 // ---------------------------------------------------------------------------
3364 // window creation/destruction
3365 // ---------------------------------------------------------------------------
3366
3367 bool wxWindowMSW::HandleCreate(WXLPCREATESTRUCT cs, bool *mayCreate)
3368 {
3369     // VZ: why is this commented out for WinCE? If it doesn't support
3370     //     WS_EX_CONTROLPARENT at all it should be somehow handled globally,
3371     //     not with multiple #ifdef's!
3372 #ifndef __WXWINCE__
3373     if ( ((CREATESTRUCT *)cs)->dwExStyle & WS_EX_CONTROLPARENT )
3374         EnsureParentHasControlParentStyle(GetParent());
3375 #else
3376     wxUnusedVar(cs);
3377 #endif // !__WXWINCE__
3378
3379     // TODO: should generate this event from WM_NCCREATE
3380     wxWindowCreateEvent event((wxWindow *)this);
3381     (void)GetEventHandler()->ProcessEvent(event);
3382
3383     *mayCreate = true;
3384
3385     return true;
3386 }
3387
3388 bool wxWindowMSW::HandleDestroy()
3389 {
3390     SendDestroyEvent();
3391
3392     // delete our drop target if we've got one
3393 #if wxUSE_DRAG_AND_DROP
3394     if ( m_dropTarget != NULL )
3395     {
3396         m_dropTarget->Revoke(m_hWnd);
3397
3398         delete m_dropTarget;
3399         m_dropTarget = NULL;
3400     }
3401 #endif // wxUSE_DRAG_AND_DROP
3402
3403     // WM_DESTROY handled
3404     return true;
3405 }
3406
3407 // ---------------------------------------------------------------------------
3408 // activation/focus
3409 // ---------------------------------------------------------------------------
3410
3411 bool wxWindowMSW::HandleActivate(int state,
3412                               bool WXUNUSED(minimized),
3413                               WXHWND WXUNUSED(activate))
3414 {
3415     wxActivateEvent event(wxEVT_ACTIVATE,
3416                           (state == WA_ACTIVE) || (state == WA_CLICKACTIVE),
3417                           m_windowId);
3418     event.SetEventObject(this);
3419
3420     return GetEventHandler()->ProcessEvent(event);
3421 }
3422
3423 bool wxWindowMSW::HandleSetFocus(WXHWND hwnd)
3424 {
3425     // Strangly enough, some controls get set focus events when they are being
3426     // deleted, even if they already had focus before.
3427     if ( m_isBeingDeleted )
3428     {
3429         return false;
3430     }
3431
3432     // notify the parent keeping track of focus for the kbd navigation
3433     // purposes that we got it
3434     wxChildFocusEvent eventFocus((wxWindow *)this);
3435     (void)GetEventHandler()->ProcessEvent(eventFocus);
3436
3437 #if wxUSE_CARET
3438     // Deal with caret
3439     if ( m_caret )
3440     {
3441         m_caret->OnSetFocus();
3442     }
3443 #endif // wxUSE_CARET
3444
3445 #if wxUSE_TEXTCTRL
3446     // If it's a wxTextCtrl don't send the event as it will be done
3447     // after the control gets to process it from EN_FOCUS handler
3448     if ( wxDynamicCastThis(wxTextCtrl) )
3449     {
3450         return false;
3451     }
3452 #endif // wxUSE_TEXTCTRL
3453
3454     wxFocusEvent event(wxEVT_SET_FOCUS, m_windowId);
3455     event.SetEventObject(this);
3456
3457     // wxFindWinFromHandle() may return NULL, it is ok
3458     event.SetWindow(wxFindWinFromHandle(hwnd));
3459
3460     return GetEventHandler()->ProcessEvent(event);
3461 }
3462
3463 bool wxWindowMSW::HandleKillFocus(WXHWND hwnd)
3464 {
3465 #if wxUSE_CARET
3466     // Deal with caret
3467     if ( m_caret )
3468     {
3469         m_caret->OnKillFocus();
3470     }
3471 #endif // wxUSE_CARET
3472
3473 #if wxUSE_TEXTCTRL
3474     // If it's a wxTextCtrl don't send the event as it will be done
3475     // after the control gets to process it.
3476     wxTextCtrl *ctrl = wxDynamicCastThis(wxTextCtrl);
3477     if ( ctrl )
3478     {
3479         return false;
3480     }
3481 #endif
3482
3483     // Don't send the event when in the process of being deleted.  This can
3484     // only cause problems if the event handler tries to access the object.
3485     if ( m_isBeingDeleted )
3486     {
3487         return false;
3488     }
3489
3490     wxFocusEvent event(wxEVT_KILL_FOCUS, m_windowId);
3491     event.SetEventObject(this);
3492
3493     // wxFindWinFromHandle() may return NULL, it is ok
3494     event.SetWindow(wxFindWinFromHandle(hwnd));
3495
3496     return GetEventHandler()->ProcessEvent(event);
3497 }
3498
3499 // ---------------------------------------------------------------------------
3500 // miscellaneous
3501 // ---------------------------------------------------------------------------
3502
3503 bool wxWindowMSW::HandleShow(bool show, int WXUNUSED(status))
3504 {
3505     wxShowEvent event(GetId(), show);
3506     event.m_eventObject = this;
3507
3508     return GetEventHandler()->ProcessEvent(event);
3509 }
3510
3511 bool wxWindowMSW::HandleInitDialog(WXHWND WXUNUSED(hWndFocus))
3512 {
3513     wxInitDialogEvent event(GetId());
3514     event.m_eventObject = this;
3515
3516     return GetEventHandler()->ProcessEvent(event);
3517 }
3518
3519 bool wxWindowMSW::HandleDropFiles(WXWPARAM wParam)
3520 {
3521 #if defined (__WXMICROWIN__) || defined(__WXWINCE__)
3522     wxUnusedVar(wParam);
3523     return false;
3524 #else // __WXMICROWIN__
3525     HDROP hFilesInfo = (HDROP) wParam;
3526
3527     // Get the total number of files dropped
3528     UINT gwFilesDropped = ::DragQueryFile
3529                             (
3530                                 (HDROP)hFilesInfo,
3531                                 (UINT)-1,
3532                                 (LPTSTR)0,
3533                                 (UINT)0
3534                             );
3535
3536     wxString *files = new wxString[gwFilesDropped];
3537     for ( UINT wIndex = 0; wIndex < gwFilesDropped; wIndex++ )
3538     {
3539         // first get the needed buffer length (+1 for terminating NUL)
3540         size_t len = ::DragQueryFile(hFilesInfo, wIndex, NULL, 0) + 1;
3541
3542         // and now get the file name
3543         ::DragQueryFile(hFilesInfo, wIndex,
3544                         wxStringBuffer(files[wIndex], len), len);
3545     }
3546     DragFinish (hFilesInfo);
3547
3548     wxDropFilesEvent event(wxEVT_DROP_FILES, gwFilesDropped, files);
3549     event.m_eventObject = this;
3550
3551     POINT dropPoint;
3552     DragQueryPoint(hFilesInfo, (LPPOINT) &dropPoint);
3553     event.m_pos.x = dropPoint.x;
3554     event.m_pos.y = dropPoint.y;
3555
3556     return GetEventHandler()->ProcessEvent(event);
3557 #endif
3558 }
3559
3560
3561 bool wxWindowMSW::HandleSetCursor(WXHWND WXUNUSED(hWnd),
3562                                   short nHitTest,
3563                                   int WXUNUSED(mouseMsg))
3564 {
3565 #ifndef __WXMICROWIN__
3566     // the logic is as follows:
3567     // -1. don't set cursor for non client area, including but not limited to
3568     //     the title bar, scrollbars, &c
3569     //  0. allow the user to override default behaviour by using EVT_SET_CURSOR
3570     //  1. if we have the cursor set it unless wxIsBusy()
3571     //  2. if we're a top level window, set some cursor anyhow
3572     //  3. if wxIsBusy(), set the busy cursor, otherwise the global one
3573
3574     if ( nHitTest != HTCLIENT )
3575     {
3576         return false;
3577     }
3578
3579     HCURSOR hcursor = 0;
3580
3581     // first ask the user code - it may wish to set the cursor in some very
3582     // specific way (for example, depending on the current position)
3583     POINT pt;
3584     if ( !::GetCursorPos(&pt) )
3585     {
3586         wxLogLastError(wxT("GetCursorPos"));
3587     }
3588
3589     int x = pt.x,
3590         y = pt.y;
3591     ScreenToClient(&x, &y);
3592     wxSetCursorEvent event(x, y);
3593
3594     bool processedEvtSetCursor = GetEventHandler()->ProcessEvent(event);
3595     if ( processedEvtSetCursor && event.HasCursor() )
3596     {
3597         hcursor = GetHcursorOf(event.GetCursor());
3598     }
3599
3600     if ( !hcursor )
3601     {
3602         bool isBusy = wxIsBusy();
3603
3604         // the test for processedEvtSetCursor is here to prevent using m_cursor
3605         // if the user code caught EVT_SET_CURSOR() and returned nothing from
3606         // it - this is a way to say that our cursor shouldn't be used for this
3607         // point
3608         if ( !processedEvtSetCursor && m_cursor.Ok() )
3609         {
3610             hcursor = GetHcursorOf(m_cursor);
3611         }
3612
3613         if ( !GetParent() )
3614         {
3615             if ( isBusy )
3616             {
3617                 hcursor = wxGetCurrentBusyCursor();
3618             }
3619             else if ( !hcursor )
3620             {
3621                 const wxCursor *cursor = wxGetGlobalCursor();
3622                 if ( cursor && cursor->Ok() )
3623                 {
3624                     hcursor = GetHcursorOf(*cursor);
3625                 }
3626             }
3627         }
3628     }
3629
3630     if ( hcursor )
3631     {
3632 //        wxLogDebug("HandleSetCursor: Setting cursor %ld", (long) hcursor);
3633
3634         ::SetCursor(hcursor);
3635
3636         // cursor set, stop here
3637         return true;
3638     }
3639 #endif // __WXMICROWIN__
3640
3641     // pass up the window chain
3642     return false;
3643 }
3644
3645 // ---------------------------------------------------------------------------
3646 // owner drawn stuff
3647 // ---------------------------------------------------------------------------
3648
3649 #if (wxUSE_OWNER_DRAWN && wxUSE_MENUS_NATIVE) || \
3650         (wxUSE_CONTROLS && !defined(__WXUNIVERSAL__))
3651     #define WXUNUSED_UNLESS_ODRAWN(param) param
3652 #else
3653     #define WXUNUSED_UNLESS_ODRAWN(param)
3654 #endif
3655
3656 bool
3657 wxWindowMSW::MSWOnDrawItem(int WXUNUSED_UNLESS_ODRAWN(id),
3658                            WXDRAWITEMSTRUCT * WXUNUSED_UNLESS_ODRAWN(itemStruct))
3659 {
3660 #if wxUSE_OWNER_DRAWN
3661
3662 #if wxUSE_MENUS_NATIVE
3663     // is it a menu item?
3664     DRAWITEMSTRUCT *pDrawStruct = (DRAWITEMSTRUCT *)itemStruct;
3665     if ( id == 0 && pDrawStruct->CtlType == ODT_MENU )
3666     {
3667         wxMenuItem *pMenuItem = (wxMenuItem *)(pDrawStruct->itemData);
3668
3669         wxCHECK_MSG( pMenuItem && pMenuItem->IsKindOf(CLASSINFO(wxMenuItem)),
3670                          false, _T("MSWOnDrawItem: bad wxMenuItem pointer") );
3671
3672         // prepare to call OnDrawItem(): notice using of wxDCTemp to prevent
3673         // the DC from being released
3674         wxDCTemp dc((WXHDC)pDrawStruct->hDC);
3675         wxRect rect(pDrawStruct->rcItem.left, pDrawStruct->rcItem.top,
3676                     pDrawStruct->rcItem.right - pDrawStruct->rcItem.left,
3677                     pDrawStruct->rcItem.bottom - pDrawStruct->rcItem.top);
3678
3679         return pMenuItem->OnDrawItem
3680                (
3681                 dc,
3682                 rect,
3683                 (wxOwnerDrawn::wxODAction)pDrawStruct->itemAction,
3684                 (wxOwnerDrawn::wxODStatus)pDrawStruct->itemState
3685                );
3686     }
3687 #endif // wxUSE_MENUS_NATIVE
3688
3689 #endif // USE_OWNER_DRAWN
3690
3691 #if wxUSE_CONTROLS && !defined(__WXUNIVERSAL__)
3692
3693 #if wxUSE_OWNER_DRAWN
3694     wxControl *item = wxDynamicCast(FindItem(id), wxControl);
3695 #else // !wxUSE_OWNER_DRAWN
3696     // we may still have owner-drawn buttons internally because we have to make
3697     // them owner-drawn to support colour change
3698     wxControl *item =
3699 #                     if wxUSE_BUTTON
3700                          wxDynamicCast(FindItem(id), wxButton)
3701 #                     else
3702                          NULL
3703 #                     endif
3704                     ;
3705 #endif // USE_OWNER_DRAWN
3706
3707     if ( item )
3708     {
3709         return item->MSWOnDraw(itemStruct);
3710     }
3711
3712 #endif // wxUSE_CONTROLS
3713
3714     return false;
3715 }
3716
3717 bool
3718 wxWindowMSW::MSWOnMeasureItem(int id, WXMEASUREITEMSTRUCT *itemStruct)
3719 {
3720 #if wxUSE_OWNER_DRAWN && wxUSE_MENUS_NATIVE
3721     // is it a menu item?
3722     MEASUREITEMSTRUCT *pMeasureStruct = (MEASUREITEMSTRUCT *)itemStruct;
3723     if ( id == 0 && pMeasureStruct->CtlType == ODT_MENU )
3724     {
3725         wxMenuItem *pMenuItem = (wxMenuItem *)(pMeasureStruct->itemData);
3726
3727         wxCHECK_MSG( pMenuItem && pMenuItem->IsKindOf(CLASSINFO(wxMenuItem)),
3728                         false, _T("MSWOnMeasureItem: bad wxMenuItem pointer") );
3729
3730         size_t w, h;
3731         bool rc = pMenuItem->OnMeasureItem(&w, &h);
3732
3733         pMeasureStruct->itemWidth = w;
3734         pMeasureStruct->itemHeight = h;
3735
3736         return rc;
3737     }
3738
3739     wxControl *item = wxDynamicCast(FindItem(id), wxControl);
3740     if ( item )
3741     {
3742         return item->MSWOnMeasure(itemStruct);
3743     }
3744 #else
3745     wxUnusedVar(id);
3746     wxUnusedVar(itemStruct);
3747 #endif // wxUSE_OWNER_DRAWN && wxUSE_MENUS_NATIVE
3748
3749     return false;
3750 }
3751
3752 // ---------------------------------------------------------------------------
3753 // colours and palettes
3754 // ---------------------------------------------------------------------------
3755
3756 bool wxWindowMSW::HandleSysColorChange()
3757 {
3758     wxSysColourChangedEvent event;
3759     event.SetEventObject(this);
3760
3761     (void)GetEventHandler()->ProcessEvent(event);
3762
3763     // always let the system carry on the default processing to allow the
3764     // native controls to react to the colours update
3765     return false;
3766 }
3767
3768 bool wxWindowMSW::HandleDisplayChange()
3769 {
3770     wxDisplayChangedEvent event;
3771     event.SetEventObject(this);
3772
3773     return GetEventHandler()->ProcessEvent(event);
3774 }
3775
3776 bool wxWindowMSW::HandleCtlColor(WXHBRUSH *brush,
3777                               WXHDC pDC,
3778                               WXHWND pWnd,
3779                               WXUINT nCtlColor,
3780                               WXUINT message,
3781                               WXWPARAM wParam,
3782                               WXLPARAM lParam)
3783 {
3784 #ifndef __WXMICROWIN__
3785     WXHBRUSH hBrush = 0;
3786
3787 #ifdef __WXWINCE__
3788     if (false)
3789 #else
3790     if ( nCtlColor == CTLCOLOR_DLG )
3791 #endif
3792     {
3793         hBrush = OnCtlColor(pDC, pWnd, nCtlColor, message, wParam, lParam);
3794     }
3795 #if wxUSE_CONTROLS
3796     else
3797     {
3798         wxControl *item = (wxControl *)FindItemByHWND(pWnd, true);
3799         if ( item )
3800             hBrush = item->OnCtlColor(pDC, pWnd, nCtlColor, message, wParam, lParam);
3801     }
3802 #endif // wxUSE_CONTROLS
3803
3804     if ( hBrush )
3805         *brush = hBrush;
3806
3807     return hBrush != 0;
3808 #else // __WXMICROWIN__
3809     return false;
3810 #endif
3811 }
3812
3813 // Define for each class of dialog and control
3814 WXHBRUSH wxWindowMSW::OnCtlColor(WXHDC WXUNUSED(hDC),
3815                                  WXHWND WXUNUSED(hWnd),
3816                                  WXUINT WXUNUSED(nCtlColor),
3817                                  WXUINT WXUNUSED(message),
3818                                  WXWPARAM WXUNUSED(wParam),
3819                                  WXLPARAM WXUNUSED(lParam))
3820 {
3821     return (WXHBRUSH)0;
3822 }
3823
3824 bool wxWindowMSW::HandlePaletteChanged(WXHWND hWndPalChange)
3825 {
3826 #if wxUSE_PALETTE
3827     // same as below except we don't respond to our own messages
3828     if ( hWndPalChange != GetHWND() )
3829     {
3830         // check to see if we our our parents have a custom palette
3831         wxWindowMSW *win = this;
3832         while ( win && !win->HasCustomPalette() )
3833         {
3834             win = win->GetParent();
3835         }
3836
3837         if ( win && win->HasCustomPalette() )
3838         {
3839             // realize the palette to see whether redrawing is needed
3840             HDC hdc = ::GetDC((HWND) hWndPalChange);
3841             win->m_palette.SetHPALETTE((WXHPALETTE)
3842                     ::SelectPalette(hdc, GetHpaletteOf(win->m_palette), FALSE));
3843
3844             int result = ::RealizePalette(hdc);
3845
3846             // restore the palette (before releasing the DC)
3847             win->m_palette.SetHPALETTE((WXHPALETTE)
3848                     ::SelectPalette(hdc, GetHpaletteOf(win->m_palette), FALSE));
3849             ::RealizePalette(hdc);
3850             ::ReleaseDC((HWND) hWndPalChange, hdc);
3851
3852             // now check for the need to redraw
3853             if (result > 0)
3854                 ::InvalidateRect((HWND) hWndPalChange, NULL, TRUE);
3855         }
3856
3857     }
3858 #endif // wxUSE_PALETTE
3859
3860     wxPaletteChangedEvent event(GetId());
3861     event.SetEventObject(this);
3862     event.SetChangedWindow(wxFindWinFromHandle(hWndPalChange));
3863
3864     return GetEventHandler()->ProcessEvent(event);
3865 }
3866
3867 bool wxWindowMSW::HandleCaptureChanged(WXHWND hWndGainedCapture)
3868 {
3869     wxMouseCaptureChangedEvent event(GetId(), wxFindWinFromHandle(hWndGainedCapture));
3870     event.SetEventObject(this);
3871
3872     return GetEventHandler()->ProcessEvent(event);
3873 }
3874
3875 bool wxWindowMSW::HandleQueryNewPalette()
3876 {
3877
3878 #if wxUSE_PALETTE
3879     // check to see if we our our parents have a custom palette
3880     wxWindowMSW *win = this;
3881     while (!win->HasCustomPalette() && win->GetParent()) win = win->GetParent();
3882     if (win->HasCustomPalette()) {
3883         /* realize the palette to see whether redrawing is needed */
3884         HDC hdc = ::GetDC((HWND) GetHWND());
3885         win->m_palette.SetHPALETTE( (WXHPALETTE)
3886              ::SelectPalette(hdc, (HPALETTE) win->m_palette.GetHPALETTE(), FALSE) );
3887
3888         int result = ::RealizePalette(hdc);
3889         /* restore the palette (before releasing the DC) */
3890         win->m_palette.SetHPALETTE( (WXHPALETTE)
3891              ::SelectPalette(hdc, (HPALETTE) win->m_palette.GetHPALETTE(), TRUE) );
3892         ::RealizePalette(hdc);
3893         ::ReleaseDC((HWND) GetHWND(), hdc);
3894         /* now check for the need to redraw */
3895         if (result > 0)
3896             ::InvalidateRect((HWND) GetHWND(), NULL, TRUE);
3897         }
3898 #endif // wxUSE_PALETTE
3899
3900     wxQueryNewPaletteEvent event(GetId());
3901     event.SetEventObject(this);
3902
3903     return GetEventHandler()->ProcessEvent(event) && event.GetPaletteRealized();
3904 }
3905
3906 // Responds to colour changes: passes event on to children.
3907 void wxWindowMSW::OnSysColourChanged(wxSysColourChangedEvent& WXUNUSED(event))
3908 {
3909     // the top level window also reset the standard colour map as it might have
3910     // changed (there is no need to do it for the non top level windows as we
3911     // only have to do it once)
3912     if ( IsTopLevel() )
3913     {
3914         // FIXME-MT
3915         gs_hasStdCmap = false;
3916     }
3917     wxWindowList::compatibility_iterator node = GetChildren().GetFirst();
3918     while ( node )
3919     {
3920         // Only propagate to non-top-level windows because Windows already
3921         // sends this event to all top-level ones
3922         wxWindow *win = node->GetData();
3923         if ( !win->IsTopLevel() )
3924         {
3925             // we need to send the real WM_SYSCOLORCHANGE and not just trigger
3926             // EVT_SYS_COLOUR_CHANGED call because the latter wouldn't work for
3927             // the standard controls
3928             ::SendMessage(GetHwndOf(win), WM_SYSCOLORCHANGE, 0, 0);
3929         }
3930
3931         node = node->GetNext();
3932     }
3933 }
3934
3935 extern wxCOLORMAP *wxGetStdColourMap()
3936 {
3937     static COLORREF s_stdColours[wxSTD_COL_MAX];
3938     static wxCOLORMAP s_cmap[wxSTD_COL_MAX];
3939
3940     if ( !gs_hasStdCmap )
3941     {
3942         static bool s_coloursInit = false;
3943
3944         if ( !s_coloursInit )
3945         {
3946             // When a bitmap is loaded, the RGB values can change (apparently
3947             // because Windows adjusts them to care for the old programs always
3948             // using 0xc0c0c0 while the transparent colour for the new Windows
3949             // versions is different). But we do this adjustment ourselves so
3950             // we want to avoid Windows' "help" and for this we need to have a
3951             // reference bitmap which can tell us what the RGB values change
3952             // to.
3953             wxBitmap stdColourBitmap(_T("wxBITMAP_STD_COLOURS"));
3954             if ( stdColourBitmap.Ok() )
3955             {
3956                 // the pixels in the bitmap must correspond to wxSTD_COL_XXX!
3957                 wxASSERT_MSG( stdColourBitmap.GetWidth() == wxSTD_COL_MAX,
3958                               _T("forgot to update wxBITMAP_STD_COLOURS!") );
3959
3960                 wxMemoryDC memDC;
3961                 memDC.SelectObject(stdColourBitmap);
3962
3963                 wxColour colour;
3964                 for ( size_t i = 0; i < WXSIZEOF(s_stdColours); i++ )
3965                 {
3966                     memDC.GetPixel(i, 0, &colour);
3967                     s_stdColours[i] = wxColourToRGB(colour);
3968                 }
3969             }
3970             else // wxBITMAP_STD_COLOURS couldn't be loaded
3971             {
3972                 s_stdColours[0] = RGB(000,000,000);     // black
3973                 s_stdColours[1] = RGB(128,128,128);     // dark grey
3974                 s_stdColours[2] = RGB(192,192,192);     // light grey
3975                 s_stdColours[3] = RGB(255,255,255);     // white
3976                 //s_stdColours[4] = RGB(000,000,255);     // blue
3977                 //s_stdColours[5] = RGB(255,000,255);     // magenta
3978             }
3979
3980             s_coloursInit = true;
3981         }
3982
3983         gs_hasStdCmap = true;
3984
3985         // create the colour map
3986 #define INIT_CMAP_ENTRY(col) \
3987             s_cmap[wxSTD_COL_##col].from = s_stdColours[wxSTD_COL_##col]; \
3988             s_cmap[wxSTD_COL_##col].to = ::GetSysColor(COLOR_##col)
3989
3990         INIT_CMAP_ENTRY(BTNTEXT);
3991         INIT_CMAP_ENTRY(BTNSHADOW);
3992         INIT_CMAP_ENTRY(BTNFACE);
3993         INIT_CMAP_ENTRY(BTNHIGHLIGHT);
3994
3995 #undef INIT_CMAP_ENTRY
3996     }
3997
3998     return s_cmap;
3999 }
4000
4001 // ---------------------------------------------------------------------------
4002 // painting
4003 // ---------------------------------------------------------------------------
4004
4005 bool wxWindowMSW::HandlePaint()
4006 {
4007 //    if (GetExtraStyle() & wxWS_EX_THEMED_BACKGROUND)
4008 //        return false;
4009
4010     HRGN hRegion = ::CreateRectRgn(0, 0, 0, 0); // Dummy call to get a handle
4011     if ( !hRegion )
4012         wxLogLastError(wxT("CreateRectRgn"));
4013     if ( ::GetUpdateRgn(GetHwnd(), hRegion, FALSE) == ERROR )
4014         wxLogLastError(wxT("GetUpdateRgn"));
4015
4016     m_updateRegion = wxRegion((WXHRGN) hRegion);
4017
4018     wxPaintEvent event(m_windowId);
4019     event.SetEventObject(this);
4020
4021     bool processed = GetEventHandler()->ProcessEvent(event);
4022
4023     // note that we must generate NC event after the normal one as otherwise
4024     // BeginPaint() will happily overwrite our decorations with the background
4025     // colour
4026     wxNcPaintEvent eventNc(m_windowId);
4027     eventNc.SetEventObject(this);
4028     GetEventHandler()->ProcessEvent(eventNc);
4029
4030     return processed;
4031 }
4032
4033 // Can be called from an application's OnPaint handler
4034 void wxWindowMSW::OnPaint(wxPaintEvent& event)
4035 {
4036 #ifdef __WXUNIVERSAL__
4037     event.Skip();
4038 #else
4039     HDC hDC = (HDC) wxPaintDC::FindDCInCache((wxWindow*) event.GetEventObject());
4040     if (hDC != 0)
4041     {
4042         MSWDefWindowProc(WM_PAINT, (WPARAM) hDC, 0);
4043     }
4044 #endif
4045 }
4046
4047 bool wxWindowMSW::HandleEraseBkgnd(WXHDC hdc)
4048 {
4049     // Prevents flicker when dragging
4050     if ( ::IsIconic(GetHwnd()) )
4051         return true;
4052
4053     wxDCTemp dc(hdc);
4054
4055     dc.SetHDC(hdc);
4056     dc.SetWindow((wxWindow *)this);
4057     dc.BeginDrawing();
4058
4059     wxEraseEvent event(m_windowId, &dc);
4060     event.SetEventObject(this);
4061     bool rc = GetEventHandler()->ProcessEvent(event);
4062
4063     dc.EndDrawing();
4064
4065     // must be called manually as ~wxDC doesn't do anything for wxDCTemp
4066     dc.SelectOldObjects(hdc);
4067
4068     return rc;
4069 }
4070
4071 void wxWindowMSW::OnEraseBackground(wxEraseEvent& event)
4072 {
4073     if ( GetBackgroundStyle() == wxBG_STYLE_CUSTOM )
4074     {
4075         // don't skip the event here, custom background means that the app is
4076         // drawing it itself in its OnPaint()
4077         return;
4078     }
4079
4080     if ( !m_hasBgCol )
4081     {
4082         event.Skip();
4083         return;
4084     }
4085
4086     // we have a fixed solid background colour, do use it
4087     RECT rect;
4088     ::GetClientRect(GetHwnd(), &rect);
4089
4090     wxColour backgroundColour(GetBackgroundColour());
4091     COLORREF ref = PALETTERGB(backgroundColour.Red(),
4092                               backgroundColour.Green(),
4093                               backgroundColour.Blue());
4094     HBRUSH hBrush = ::CreateSolidBrush(ref);
4095     if ( !hBrush )
4096         wxLogLastError(wxT("CreateSolidBrush"));
4097
4098     HDC hdc = (HDC)event.GetDC()->GetHDC();
4099
4100 #ifndef __WXWINCE__
4101     int mode = ::SetMapMode(hdc, MM_TEXT);
4102 #endif
4103
4104     ::FillRect(hdc, &rect, hBrush);
4105     ::DeleteObject(hBrush);
4106
4107 #ifndef __WXWINCE__
4108     ::SetMapMode(hdc, mode);
4109 #endif
4110 }
4111
4112 // ---------------------------------------------------------------------------
4113 // moving and resizing
4114 // ---------------------------------------------------------------------------
4115
4116 bool wxWindowMSW::HandleMinimize()
4117 {
4118     wxIconizeEvent event(m_windowId);
4119     event.SetEventObject(this);
4120
4121     return GetEventHandler()->ProcessEvent(event);
4122 }
4123
4124 bool wxWindowMSW::HandleMaximize()
4125 {
4126     wxMaximizeEvent event(m_windowId);
4127     event.SetEventObject(this);
4128
4129     return GetEventHandler()->ProcessEvent(event);
4130 }
4131
4132 bool wxWindowMSW::HandleMove(int x, int y)
4133 {
4134     wxPoint point(x,y);
4135     wxMoveEvent event(point, m_windowId);
4136     event.SetEventObject(this);
4137
4138     return GetEventHandler()->ProcessEvent(event);
4139 }
4140
4141 bool wxWindowMSW::HandleMoving(wxRect& rect)
4142 {
4143     wxMoveEvent event(rect, m_windowId);
4144     event.SetEventObject(this);
4145
4146     bool rc = GetEventHandler()->ProcessEvent(event);
4147     if (rc)
4148         rect = event.GetRect();
4149     return rc;
4150 }
4151
4152 bool wxWindowMSW::HandleSize(int WXUNUSED(w), int WXUNUSED(h), WXUINT wParam)
4153 {
4154     bool processed = false;
4155
4156     switch ( wParam )
4157     {
4158         default:
4159             wxFAIL_MSG( _T("unexpected WM_SIZE parameter") );
4160             // fall through nevertheless
4161
4162         case SIZE_MAXHIDE:
4163         case SIZE_MAXSHOW:
4164             // we're not interested in these messages at all
4165             break;
4166
4167         case SIZE_MINIMIZED:
4168             processed = HandleMinimize();
4169             break;
4170
4171         case SIZE_MAXIMIZED:
4172             /* processed = */ HandleMaximize();
4173             // fall through to send a normal size event as well
4174
4175         case SIZE_RESTORED:
4176             // don't use w and h parameters as they specify the client size
4177             // while according to the docs EVT_SIZE handler is supposed to
4178             // receive the total size
4179             wxSizeEvent event(GetSize(), m_windowId);
4180             event.SetEventObject(this);
4181
4182             processed = GetEventHandler()->ProcessEvent(event);
4183     }
4184
4185     return processed;
4186 }
4187
4188 bool wxWindowMSW::HandleSizing(wxRect& rect)
4189 {
4190     wxSizeEvent event(rect, m_windowId);
4191     event.SetEventObject(this);
4192
4193     bool rc = GetEventHandler()->ProcessEvent(event);
4194     if (rc)
4195         rect = event.GetRect();
4196     return rc;
4197 }
4198
4199 bool wxWindowMSW::HandleGetMinMaxInfo(void *mmInfo)
4200 {
4201 #ifdef __WXWINCE__
4202     wxUnusedVar(mmInfo);
4203     return false;
4204 #else
4205     MINMAXINFO *info = (MINMAXINFO *)mmInfo;
4206
4207     bool rc = false;
4208
4209     int minWidth = GetMinWidth(),
4210         minHeight = GetMinHeight(),
4211         maxWidth = GetMaxWidth(),
4212         maxHeight = GetMaxHeight();
4213
4214     if ( minWidth != wxDefaultCoord )
4215     {
4216         info->ptMinTrackSize.x = minWidth;
4217         rc = true;
4218     }
4219
4220     if ( minHeight != wxDefaultCoord )
4221     {
4222         info->ptMinTrackSize.y = minHeight;
4223         rc = true;
4224     }
4225
4226     if ( maxWidth != wxDefaultCoord )
4227     {
4228         info->ptMaxTrackSize.x = maxWidth;
4229         rc = true;
4230     }
4231
4232     if ( maxHeight != wxDefaultCoord )
4233     {
4234         info->ptMaxTrackSize.y = maxHeight;
4235         rc = true;
4236     }
4237
4238     return rc;
4239 #endif
4240 }
4241
4242 // ---------------------------------------------------------------------------
4243 // command messages
4244 // ---------------------------------------------------------------------------
4245
4246 bool wxWindowMSW::HandleCommand(WXWORD id, WXWORD cmd, WXHWND control)
4247 {
4248 #if wxUSE_MENUS_NATIVE
4249     if ( !cmd && wxCurrentPopupMenu )
4250     {
4251         wxMenu *popupMenu = wxCurrentPopupMenu;
4252         wxCurrentPopupMenu = NULL;
4253
4254         return popupMenu->MSWCommand(cmd, id);
4255     }
4256 #endif // wxUSE_MENUS_NATIVE
4257
4258     wxWindow *win = NULL;
4259
4260     // first try to find it from HWND - this works even with the broken
4261     // programs using the same ids for different controls
4262     if ( control )
4263     {
4264         win = wxFindWinFromHandle(control);
4265     }
4266
4267     // try the id
4268     if ( !win )
4269     {
4270         // must cast to a signed type before comparing with other ids!
4271         win = FindItem((signed short)id);
4272     }
4273
4274     if ( win )
4275     {
4276         return win->MSWCommand(cmd, id);
4277     }
4278
4279     // the messages sent from the in-place edit control used by the treectrl
4280     // for label editing have id == 0, but they should _not_ be treated as menu
4281     // messages (they are EN_XXX ones, in fact) so don't translate anything
4282     // coming from a control to wxEVT_COMMAND_MENU_SELECTED
4283     if ( !control )
4284     {
4285         // If no child window, it may be an accelerator, e.g. for a popup menu
4286         // command
4287
4288         wxCommandEvent event(wxEVT_COMMAND_MENU_SELECTED);
4289         event.SetEventObject(this);
4290         event.SetId(id);
4291         event.SetInt(id);
4292
4293         return GetEventHandler()->ProcessEvent(event);
4294     }
4295 #if wxUSE_SPINCTRL && !defined(__WXUNIVERSAL__)
4296     else
4297     {
4298         // the text ctrl which is logically part of wxSpinCtrl sends WM_COMMAND
4299         // notifications to its parent which we want to reflect back to
4300         // wxSpinCtrl
4301         wxSpinCtrl *spin = wxSpinCtrl::GetSpinForTextCtrl(control);
4302         if ( spin && spin->ProcessTextCommand(cmd, id) )
4303             return true;
4304     }
4305 #endif // wxUSE_SPINCTRL
4306
4307     return false;
4308 }
4309
4310 // ---------------------------------------------------------------------------
4311 // mouse events
4312 // ---------------------------------------------------------------------------
4313
4314 void wxWindowMSW::InitMouseEvent(wxMouseEvent& event,
4315                                  int x, int y,
4316                                  WXUINT flags)
4317 {
4318     // our client coords are not quite the same as Windows ones
4319     wxPoint pt = GetClientAreaOrigin();
4320     event.m_x = x - pt.x;
4321     event.m_y = y - pt.y;
4322
4323     event.m_shiftDown = (flags & MK_SHIFT) != 0;
4324     event.m_controlDown = (flags & MK_CONTROL) != 0;
4325     event.m_leftDown = (flags & MK_LBUTTON) != 0;
4326     event.m_middleDown = (flags & MK_MBUTTON) != 0;
4327     event.m_rightDown = (flags & MK_RBUTTON) != 0;
4328  //   event.m_altDown = (::GetKeyState(VK_MENU) & 0x80000000) != 0;
4329     // Returns different negative values on WinME and WinNT,
4330     // so simply test for negative value.
4331     event.m_altDown = ::GetKeyState(VK_MENU) < 0;
4332
4333 #ifndef __WXWINCE__
4334     event.SetTimestamp(::GetMessageTime());
4335 #endif
4336
4337     event.m_eventObject = this;
4338     event.SetId(GetId());
4339
4340 #if wxUSE_MOUSEEVENT_HACK
4341     m_lastMouseX = x;
4342     m_lastMouseY = y;
4343     m_lastMouseEvent = event.GetEventType();
4344 #endif // wxUSE_MOUSEEVENT_HACK
4345 }
4346
4347 // Windows doesn't send the mouse events to the static controls (which are
4348 // transparent in the sense that their WM_NCHITTEST handler returns
4349 // HTTRANSPARENT) at all but we want all controls to receive the mouse events
4350 // and so we manually check if we don't have a child window under mouse and if
4351 // we do, send the event to it instead of the window Windows had sent WM_XXX
4352 // to.
4353 //
4354 // Notice that this is not done for the mouse move events because this could
4355 // (would?) be too slow, but only for clicks which means that the static texts
4356 // still don't get move, enter nor leave events.
4357 static wxWindowMSW *FindWindowForMouseEvent(wxWindowMSW *win, int *x, int *y) //TW:REQ:Univ
4358 {
4359     wxCHECK_MSG( x && y, win, _T("NULL pointer in FindWindowForMouseEvent") );
4360
4361     // first try to find a non transparent child: this allows us to send events
4362     // to a static text which is inside a static box, for example
4363     POINT pt = { *x, *y };
4364     HWND hwnd = GetHwndOf(win),
4365          hwndUnderMouse;
4366
4367 #ifdef __WXWINCE__
4368     hwndUnderMouse = ::ChildWindowFromPoint
4369                        (
4370                         hwnd,
4371                         pt
4372                        );
4373 #else
4374     hwndUnderMouse = ::ChildWindowFromPointEx
4375                        (
4376                         hwnd,
4377                         pt,
4378                         CWP_SKIPINVISIBLE   |
4379                         CWP_SKIPDISABLED    |
4380                         CWP_SKIPTRANSPARENT
4381                        );
4382 #endif
4383
4384     if ( !hwndUnderMouse || hwndUnderMouse == hwnd )
4385     {
4386         // now try any child window at all
4387         hwndUnderMouse = ::ChildWindowFromPoint(hwnd, pt);
4388     }
4389
4390     // check that we have a child window which is susceptible to receive mouse
4391     // events: for this it must be shown and enabled
4392     if ( hwndUnderMouse &&
4393             hwndUnderMouse != hwnd &&
4394                 ::IsWindowVisible(hwndUnderMouse) &&
4395                     ::IsWindowEnabled(hwndUnderMouse) )
4396     {
4397         wxWindow *winUnderMouse = wxFindWinFromHandle((WXHWND)hwndUnderMouse);
4398         if ( winUnderMouse )
4399         {
4400             // translate the mouse coords to the other window coords
4401             win->ClientToScreen(x, y);
4402             winUnderMouse->ScreenToClient(x, y);
4403
4404             win = winUnderMouse;
4405         }
4406     }
4407
4408     return win;
4409 }
4410
4411 bool wxWindowMSW::HandleMouseEvent(WXUINT msg, int x, int y, WXUINT flags)
4412 {
4413     // the mouse events take consecutive IDs from WM_MOUSEFIRST to
4414     // WM_MOUSELAST, so it's enough to subtract WM_MOUSEMOVE == WM_MOUSEFIRST
4415     // from the message id and take the value in the table to get wxWin event
4416     // id
4417     static const wxEventType eventsMouse[] =
4418     {
4419         wxEVT_MOTION,
4420         wxEVT_LEFT_DOWN,
4421         wxEVT_LEFT_UP,
4422         wxEVT_LEFT_DCLICK,
4423         wxEVT_RIGHT_DOWN,
4424         wxEVT_RIGHT_UP,
4425         wxEVT_RIGHT_DCLICK,
4426         wxEVT_MIDDLE_DOWN,
4427         wxEVT_MIDDLE_UP,
4428         wxEVT_MIDDLE_DCLICK
4429     };
4430
4431     wxMouseEvent event(eventsMouse[msg - WM_MOUSEMOVE]);
4432     InitMouseEvent(event, x, y, flags);
4433
4434     return GetEventHandler()->ProcessEvent(event);
4435 }
4436
4437 bool wxWindowMSW::HandleMouseMove(int x, int y, WXUINT flags)
4438 {
4439     if ( !m_mouseInWindow )
4440     {
4441         // it would be wrong to assume that just because we get a mouse move
4442         // event that the mouse is inside the window: although this is usually
4443         // true, it is not if we had captured the mouse, so we need to check
4444         // the mouse coordinates here
4445         if ( !HasCapture() || IsMouseInWindow() )
4446         {
4447             // Generate an ENTER event
4448             m_mouseInWindow = true;
4449 #if _WIN32_WINNT >= 0x0400
4450 #ifndef __WXWINCE__
4451             TRACKMOUSEEVENT trackinfo;
4452
4453             trackinfo.cbSize = sizeof(trackinfo);
4454             trackinfo.dwFlags = TME_LEAVE;
4455             trackinfo.hwndTrack = GetHwnd();
4456             //Use the commctrl.h _TrackMouseEvent, which will call the
4457             // appropriate TrackMouseEvent or emulate it ( win95 )
4458             // else we need _WIN32_WINNT >= 0x0400
4459             _TrackMouseEvent(&trackinfo);
4460 #endif
4461 #endif
4462             wxMouseEvent event(wxEVT_ENTER_WINDOW);
4463             InitMouseEvent(event, x, y, flags);
4464
4465             (void)GetEventHandler()->ProcessEvent(event);
4466         }
4467     }
4468
4469 #if wxUSE_MOUSEEVENT_HACK
4470     // Window gets a click down message followed by a mouse move message even
4471     // if position isn't changed!  We want to discard the trailing move event
4472     // if x and y are the same.
4473     if ( (m_lastMouseEvent == wxEVT_RIGHT_DOWN ||
4474           m_lastMouseEvent == wxEVT_LEFT_DOWN ||
4475           m_lastMouseEvent == wxEVT_MIDDLE_DOWN) &&
4476          (m_lastMouseX == x && m_lastMouseY == y) )
4477     {
4478         m_lastMouseEvent = wxEVT_MOTION;
4479
4480         return false;
4481     }
4482 #endif // wxUSE_MOUSEEVENT_HACK
4483
4484     return HandleMouseEvent(WM_MOUSEMOVE, x, y, flags);
4485 }
4486
4487
4488 bool wxWindowMSW::HandleMouseWheel(WXWPARAM wParam, WXLPARAM lParam)
4489 {
4490 #if wxUSE_MOUSEWHEEL
4491     wxMouseEvent event(wxEVT_MOUSEWHEEL);
4492     InitMouseEvent(event,
4493                    GET_X_LPARAM(lParam),
4494                    GET_Y_LPARAM(lParam),
4495                    LOWORD(wParam));
4496     event.m_wheelRotation = (short)HIWORD(wParam);
4497     event.m_wheelDelta = WHEEL_DELTA;
4498
4499     static int s_linesPerRotation = -1;
4500     if ( s_linesPerRotation == -1 )
4501     {
4502         if ( !::SystemParametersInfo(SPI_GETWHEELSCROLLLINES, 0,
4503                                      &s_linesPerRotation, 0))
4504         {
4505             // this is not supposed to happen
4506             wxLogLastError(_T("SystemParametersInfo(GETWHEELSCROLLLINES)"));
4507
4508             // the default is 3, so use it if SystemParametersInfo() failed
4509             s_linesPerRotation = 3;
4510         }
4511     }
4512
4513     event.m_linesPerAction = s_linesPerRotation;
4514     return GetEventHandler()->ProcessEvent(event);
4515
4516 #else
4517     (void) wParam;
4518     (void) lParam;
4519
4520     return false;
4521 #endif
4522 }
4523
4524
4525 // ---------------------------------------------------------------------------
4526 // keyboard handling
4527 // ---------------------------------------------------------------------------
4528
4529 // create the key event of the given type for the given key - used by
4530 // HandleChar and HandleKeyDown/Up
4531 wxKeyEvent wxWindowMSW::CreateKeyEvent(wxEventType evType,
4532                                        int id,
4533                                        WXLPARAM lParam,
4534                                        WXWPARAM wParam) const
4535 {
4536     wxKeyEvent event(evType);
4537     event.SetId(GetId());
4538     event.m_shiftDown = wxIsShiftDown();
4539     event.m_controlDown = wxIsCtrlDown();
4540     event.m_altDown = (HIWORD(lParam) & KF_ALTDOWN) == KF_ALTDOWN;
4541
4542     event.m_eventObject = (wxWindow *)this; // const_cast
4543     event.m_keyCode = id;
4544 #if wxUSE_UNICODE
4545     event.m_uniChar = (wxChar) wParam;
4546 #endif
4547     event.m_rawCode = (wxUint32) wParam;
4548     event.m_rawFlags = (wxUint32) lParam;
4549 #ifndef __WXWINCE__
4550     event.SetTimestamp(::GetMessageTime());
4551 #endif
4552
4553     // translate the position to client coords
4554     POINT pt;
4555     GetCursorPos(&pt);
4556     RECT rect;
4557     GetWindowRect(GetHwnd(),&rect);
4558     pt.x -= rect.left;
4559     pt.y -= rect.top;
4560
4561     event.m_x = pt.x;
4562     event.m_y = pt.y;
4563
4564     return event;
4565 }
4566
4567 // isASCII is true only when we're called from WM_CHAR handler and not from
4568 // WM_KEYDOWN one
4569 bool wxWindowMSW::HandleChar(WXWPARAM wParam, WXLPARAM lParam, bool isASCII)
4570 {
4571     int id;
4572     if ( isASCII )
4573     {
4574         // If 1 -> 26, translate to either special keycode or just set
4575         // ctrlDown.  IOW, Ctrl-C should result in keycode == 3 and
4576         // ControlDown() == true.
4577         id = wParam;
4578         if ( (id > 0) && (id < 27) )
4579         {
4580             switch (id)
4581             {
4582                 case 13:
4583                     id = WXK_RETURN;
4584                     break;
4585
4586                 case 8:
4587                     id = WXK_BACK;
4588                     break;
4589
4590                 case 9:
4591                     id = WXK_TAB;
4592                     break;
4593
4594                 default:
4595                     //ctrlDown = true;
4596                     break;
4597             }
4598         }
4599     }
4600     else // we're called from WM_KEYDOWN
4601     {
4602         id = wxCharCodeMSWToWX(wParam, lParam);
4603         if ( id == 0 )
4604         {
4605             // it's ASCII and will be processed here only when called from
4606             // WM_CHAR (i.e. when isASCII = true), don't process it now
4607             return false;
4608         }
4609     }
4610
4611     wxKeyEvent event(CreateKeyEvent(wxEVT_CHAR, id, lParam, wParam));
4612
4613     // the alphanumeric keys produced by pressing AltGr+something on European
4614     // keyboards have both Ctrl and Alt modifiers which may confuse the user
4615     // code as, normally, keys with Ctrl and/or Alt don't result in anything
4616     // alphanumeric, so pretend that there are no modifiers at all (the
4617     // KEY_DOWN event would still have the correct modifiers if they're really
4618     // needed)
4619     if ( event.m_controlDown && event.m_altDown &&
4620             (id >= 32 && id < 256) )
4621     {
4622         event.m_controlDown =
4623         event.m_altDown = false;
4624     }
4625
4626     return GetEventHandler()->ProcessEvent(event);
4627 }
4628
4629 bool wxWindowMSW::HandleKeyDown(WXWPARAM wParam, WXLPARAM lParam)
4630 {
4631     int id = wxCharCodeMSWToWX(wParam, lParam);
4632
4633     if ( !id )
4634     {
4635         // normal ASCII char
4636         id = wParam;
4637     }
4638
4639     if ( id != -1 ) // VZ: does this ever happen (FIXME)?
4640     {
4641         wxKeyEvent event(CreateKeyEvent(wxEVT_KEY_DOWN, id, lParam, wParam));
4642         if ( GetEventHandler()->ProcessEvent(event) )
4643         {
4644             return true;
4645         }
4646     }
4647
4648     return false;
4649 }
4650
4651 bool wxWindowMSW::HandleKeyUp(WXWPARAM wParam, WXLPARAM lParam)
4652 {
4653     int id = wxCharCodeMSWToWX(wParam, lParam);
4654
4655     if ( !id )
4656     {
4657         // normal ASCII char
4658         id = wParam;
4659     }
4660
4661     if ( id != -1 ) // VZ: does this ever happen (FIXME)?
4662     {
4663         wxKeyEvent event(CreateKeyEvent(wxEVT_KEY_UP, id, lParam, wParam));
4664         if ( GetEventHandler()->ProcessEvent(event) )
4665             return true;
4666     }
4667
4668     return false;
4669 }
4670
4671 int wxWindowMSW::HandleMenuChar(int chAccel, WXLPARAM lParam)
4672 {
4673     // FIXME: implement GetMenuItemCount for WinCE, possibly
4674     // in terms of GetMenuItemInfo
4675 #ifndef __WXWINCE__
4676     const HMENU hmenu = (HMENU)lParam;
4677
4678     MENUITEMINFO mii;
4679     wxZeroMemory(mii);
4680     mii.cbSize = sizeof(MENUITEMINFO);
4681     mii.fMask = MIIM_TYPE | MIIM_DATA;
4682
4683     // find if we have this letter in any owner drawn item
4684     const int count = ::GetMenuItemCount(hmenu);
4685     for ( int i = 0; i < count; i++ )
4686     {
4687         if ( ::GetMenuItemInfo(hmenu, i, TRUE, &mii) )
4688         {
4689             if ( mii.fType == MFT_OWNERDRAW )
4690             {
4691                 //  dwItemData member of the MENUITEMINFO is a
4692                 //  pointer to the associated wxMenuItem -- see the
4693                 //  menu creation code
4694                 wxMenuItem *item = (wxMenuItem*)mii.dwItemData;
4695
4696                 const wxChar *p = wxStrchr(item->GetText(), _T('&'));
4697                 while ( p++ )
4698                 {
4699                     if ( *p == _T('&') )
4700                     {
4701                         // this is not the accel char, find the real one
4702                         p = wxStrchr(p + 1, _T('&'));
4703                     }
4704                     else // got the accel char
4705                     {
4706                         // FIXME-UNICODE: this comparison doesn't risk to work
4707                         // for non ASCII accelerator characters I'm afraid, but
4708                         // what can we do?
4709                         if ( (wchar_t)wxToupper(*p) == (wchar_t)chAccel )
4710                         {
4711                             return i;
4712                         }
4713                         else
4714                         {
4715                             // this one doesn't match
4716                             break;
4717                         }
4718                     }
4719                 }
4720             }
4721         }
4722         else // failed to get the menu text?
4723         {
4724             // it's not fatal, so don't show error, but still log
4725             // it
4726             wxLogLastError(_T("GetMenuItemInfo"));
4727         }
4728     }
4729 #else
4730     wxUnusedVar(chAccel);
4731     wxUnusedVar(lParam);
4732 #endif
4733     return wxNOT_FOUND;
4734 }
4735
4736 // ---------------------------------------------------------------------------
4737 // joystick
4738 // ---------------------------------------------------------------------------
4739
4740 bool wxWindowMSW::HandleJoystickEvent(WXUINT msg, int x, int y, WXUINT flags)
4741 {
4742 #ifdef JOY_BUTTON1
4743     int change = 0;
4744     if ( flags & JOY_BUTTON1CHG )
4745         change = wxJOY_BUTTON1;
4746     if ( flags & JOY_BUTTON2CHG )
4747         change = wxJOY_BUTTON2;
4748     if ( flags & JOY_BUTTON3CHG )
4749         change = wxJOY_BUTTON3;
4750     if ( flags & JOY_BUTTON4CHG )
4751         change = wxJOY_BUTTON4;
4752
4753     int buttons = 0;
4754     if ( flags & JOY_BUTTON1 )
4755         buttons |= wxJOY_BUTTON1;
4756     if ( flags & JOY_BUTTON2 )
4757         buttons |= wxJOY_BUTTON2;
4758     if ( flags & JOY_BUTTON3 )
4759         buttons |= wxJOY_BUTTON3;
4760     if ( flags & JOY_BUTTON4 )
4761         buttons |= wxJOY_BUTTON4;
4762
4763     // the event ids aren't consecutive so we can't use table based lookup
4764     int joystick;
4765     wxEventType eventType;
4766     switch ( msg )
4767     {
4768         case MM_JOY1MOVE:
4769             joystick = 1;
4770             eventType = wxEVT_JOY_MOVE;
4771             break;
4772
4773         case MM_JOY2MOVE:
4774             joystick = 2;
4775             eventType = wxEVT_JOY_MOVE;
4776             break;
4777
4778         case MM_JOY1ZMOVE:
4779             joystick = 1;
4780             eventType = wxEVT_JOY_ZMOVE;
4781             break;
4782
4783         case MM_JOY2ZMOVE:
4784             joystick = 2;
4785             eventType = wxEVT_JOY_ZMOVE;
4786             break;
4787
4788         case MM_JOY1BUTTONDOWN:
4789             joystick = 1;
4790             eventType = wxEVT_JOY_BUTTON_DOWN;
4791             break;
4792
4793         case MM_JOY2BUTTONDOWN:
4794             joystick = 2;
4795             eventType = wxEVT_JOY_BUTTON_DOWN;
4796             break;
4797
4798         case MM_JOY1BUTTONUP:
4799             joystick = 1;
4800             eventType = wxEVT_JOY_BUTTON_UP;
4801             break;
4802
4803         case MM_JOY2BUTTONUP:
4804             joystick = 2;
4805             eventType = wxEVT_JOY_BUTTON_UP;
4806             break;
4807
4808         default:
4809             wxFAIL_MSG(wxT("no such joystick event"));
4810
4811             return false;
4812     }
4813
4814     wxJoystickEvent event(eventType, buttons, joystick, change);
4815     event.SetPosition(wxPoint(x, y));
4816     event.SetEventObject(this);
4817
4818     return GetEventHandler()->ProcessEvent(event);
4819 #else
4820     wxUnusedVar(msg);
4821     wxUnusedVar(x);
4822     wxUnusedVar(y);
4823     wxUnusedVar(flags);
4824     return false;
4825 #endif
4826 }
4827
4828 // ---------------------------------------------------------------------------
4829 // scrolling
4830 // ---------------------------------------------------------------------------
4831
4832 bool wxWindowMSW::MSWOnScroll(int orientation, WXWORD wParam,
4833                               WXWORD pos, WXHWND control)
4834 {
4835     if ( control && control != m_hWnd ) // Prevent infinite recursion
4836     {
4837         wxWindow *child = wxFindWinFromHandle(control);
4838         if ( child )
4839             return child->MSWOnScroll(orientation, wParam, pos, control);
4840     }
4841
4842     wxScrollWinEvent event;
4843     event.SetPosition(pos);
4844     event.SetOrientation(orientation);
4845     event.m_eventObject = this;
4846
4847     switch ( wParam )
4848     {
4849     case SB_TOP:
4850         event.m_eventType = wxEVT_SCROLLWIN_TOP;
4851         break;
4852
4853     case SB_BOTTOM:
4854         event.m_eventType = wxEVT_SCROLLWIN_BOTTOM;
4855         break;
4856
4857     case SB_LINEUP:
4858         event.m_eventType = wxEVT_SCROLLWIN_LINEUP;
4859         break;
4860
4861     case SB_LINEDOWN:
4862         event.m_eventType = wxEVT_SCROLLWIN_LINEDOWN;
4863         break;
4864
4865     case SB_PAGEUP:
4866         event.m_eventType = wxEVT_SCROLLWIN_PAGEUP;
4867         break;
4868
4869     case SB_PAGEDOWN:
4870         event.m_eventType = wxEVT_SCROLLWIN_PAGEDOWN;
4871         break;
4872
4873     case SB_THUMBPOSITION:
4874     case SB_THUMBTRACK:
4875         // under Win32, the scrollbar range and position are 32 bit integers,
4876         // but WM_[HV]SCROLL only carry the low 16 bits of them, so we must
4877         // explicitly query the scrollbar for the correct position (this must
4878         // be done only for these two SB_ events as they are the only one
4879         // carrying the scrollbar position)
4880         {
4881             WinStruct<SCROLLINFO> scrollInfo;
4882             scrollInfo.fMask = SIF_TRACKPOS;
4883
4884             if ( !::GetScrollInfo(GetHwnd(),
4885                                   orientation == wxHORIZONTAL ? SB_HORZ
4886                                                               : SB_VERT,
4887                                   &scrollInfo) )
4888             {
4889                 // Not neccessarily an error, if there are no scrollbars yet.
4890                 // wxLogLastError(_T("GetScrollInfo"));
4891             }
4892
4893             event.SetPosition(scrollInfo.nTrackPos);
4894         }
4895
4896         event.m_eventType = wParam == SB_THUMBPOSITION
4897                                 ? wxEVT_SCROLLWIN_THUMBRELEASE
4898                                 : wxEVT_SCROLLWIN_THUMBTRACK;
4899         break;
4900
4901     default:
4902         return false;
4903     }
4904
4905     return GetEventHandler()->ProcessEvent(event);
4906 }
4907
4908 // ===========================================================================
4909 // global functions
4910 // ===========================================================================
4911
4912 void wxGetCharSize(WXHWND wnd, int *x, int *y, const wxFont& the_font)
4913 {
4914     TEXTMETRIC tm;
4915     HDC dc = ::GetDC((HWND) wnd);
4916     HFONT was = 0;
4917
4918     //    the_font.UseResource();
4919     //    the_font.RealizeResource();
4920     HFONT fnt = (HFONT)the_font.GetResourceHandle(); // const_cast
4921     if ( fnt )
4922         was = (HFONT) SelectObject(dc,fnt);
4923
4924     GetTextMetrics(dc, &tm);
4925     if ( fnt && was )
4926     {
4927         SelectObject(dc,was);
4928     }
4929     ReleaseDC((HWND)wnd, dc);
4930
4931     if ( x )
4932         *x = tm.tmAveCharWidth;
4933     if ( y )
4934         *y = tm.tmHeight + tm.tmExternalLeading;
4935
4936     //   the_font.ReleaseResource();
4937 }
4938
4939 // Returns 0 if was a normal ASCII value, not a special key. This indicates that
4940 // the key should be ignored by WM_KEYDOWN and processed by WM_CHAR instead.
4941 int wxCharCodeMSWToWX(int keySym, WXLPARAM lParam)
4942 {
4943     int id;
4944     switch (keySym)
4945     {
4946         case VK_CANCEL:     id = WXK_CANCEL; break;
4947         case VK_BACK:       id = WXK_BACK; break;
4948         case VK_TAB:        id = WXK_TAB; break;
4949         case VK_CLEAR:      id = WXK_CLEAR; break;
4950         case VK_SHIFT:      id = WXK_SHIFT; break;
4951         case VK_CONTROL:    id = WXK_CONTROL; break;
4952         case VK_MENU :      id = WXK_MENU; break;
4953         case VK_PAUSE:      id = WXK_PAUSE; break;
4954         case VK_CAPITAL:    id = WXK_CAPITAL; break;
4955         case VK_SPACE:      id = WXK_SPACE; break;
4956         case VK_ESCAPE:     id = WXK_ESCAPE; break;
4957         case VK_PRIOR:      id = WXK_PRIOR; break;
4958         case VK_NEXT :      id = WXK_NEXT; break;
4959         case VK_END:        id = WXK_END; break;
4960         case VK_HOME :      id = WXK_HOME; break;
4961         case VK_LEFT :      id = WXK_LEFT; break;
4962         case VK_UP:         id = WXK_UP; break;
4963         case VK_RIGHT:      id = WXK_RIGHT; break;
4964         case VK_DOWN :      id = WXK_DOWN; break;
4965         case VK_SELECT:     id = WXK_SELECT; break;
4966         case VK_PRINT:      id = WXK_PRINT; break;
4967         case VK_EXECUTE:    id = WXK_EXECUTE; break;
4968         case VK_INSERT:     id = WXK_INSERT; break;
4969         case VK_DELETE:     id = WXK_DELETE; break;
4970         case VK_HELP :      id = WXK_HELP; break;
4971         case VK_NUMPAD0:    id = WXK_NUMPAD0; break;
4972         case VK_NUMPAD1:    id = WXK_NUMPAD1; break;
4973         case VK_NUMPAD2:    id = WXK_NUMPAD2; break;
4974         case VK_NUMPAD3:    id = WXK_NUMPAD3; break;
4975         case VK_NUMPAD4:    id = WXK_NUMPAD4; break;
4976         case VK_NUMPAD5:    id = WXK_NUMPAD5; break;
4977         case VK_NUMPAD6:    id = WXK_NUMPAD6; break;
4978         case VK_NUMPAD7:    id = WXK_NUMPAD7; break;
4979         case VK_NUMPAD8:    id = WXK_NUMPAD8; break;
4980         case VK_NUMPAD9:    id = WXK_NUMPAD9; break;
4981         case VK_MULTIPLY:   id = WXK_NUMPAD_MULTIPLY; break;
4982         case VK_ADD:        id = WXK_NUMPAD_ADD; break;
4983         case VK_SUBTRACT:   id = WXK_NUMPAD_SUBTRACT; break;
4984         case VK_DECIMAL:    id = WXK_NUMPAD_DECIMAL; break;
4985         case VK_DIVIDE:     id = WXK_NUMPAD_DIVIDE; break;
4986         case VK_F1:         id = WXK_F1; break;
4987         case VK_F2:         id = WXK_F2; break;
4988         case VK_F3:         id = WXK_F3; break;
4989         case VK_F4:         id = WXK_F4; break;
4990         case VK_F5:         id = WXK_F5; break;
4991         case VK_F6:         id = WXK_F6; break;
4992         case VK_F7:         id = WXK_F7; break;
4993         case VK_F8:         id = WXK_F8; break;
4994         case VK_F9:         id = WXK_F9; break;
4995         case VK_F10:        id = WXK_F10; break;
4996         case VK_F11:        id = WXK_F11; break;
4997         case VK_F12:        id = WXK_F12; break;
4998         case VK_F13:        id = WXK_F13; break;
4999         case VK_F14:        id = WXK_F14; break;
5000         case VK_F15:        id = WXK_F15; break;
5001         case VK_F16:        id = WXK_F16; break;
5002         case VK_F17:        id = WXK_F17; break;
5003         case VK_F18:        id = WXK_F18; break;
5004         case VK_F19:        id = WXK_F19; break;
5005         case VK_F20:        id = WXK_F20; break;
5006         case VK_F21:        id = WXK_F21; break;
5007         case VK_F22:        id = WXK_F22; break;
5008         case VK_F23:        id = WXK_F23; break;
5009         case VK_F24:        id = WXK_F24; break;
5010         case VK_NUMLOCK:    id = WXK_NUMLOCK; break;
5011         case VK_SCROLL:     id = WXK_SCROLL; break;
5012
5013         case VK_OEM_1:      id = ';'; break;
5014         case VK_OEM_PLUS:   id = '+'; break;
5015         case VK_OEM_COMMA:  id = ','; break;
5016         case VK_OEM_MINUS:  id = '-'; break;
5017         case VK_OEM_PERIOD: id = '.'; break;
5018         case VK_OEM_2:      id = '/'; break;
5019         case VK_OEM_3:      id = '~'; break;
5020         case VK_OEM_4:      id = '['; break;
5021         case VK_OEM_5:      id = '\\'; break;
5022         case VK_OEM_6:      id = ']'; break;
5023         case VK_OEM_7:      id = '\''; break;
5024
5025 #ifdef VK_APPS
5026         case VK_LWIN:       id = WXK_WINDOWS_LEFT; break;
5027         case VK_RWIN:       id = WXK_WINDOWS_RIGHT; break;
5028         case VK_APPS:       id = WXK_WINDOWS_MENU; break;
5029 #endif // VK_APPS defined
5030
5031         case VK_RETURN:
5032             // the same key is sent for both the "return" key on the main
5033             // keyboard and the numeric keypad but we want to distinguish
5034             // between them: we do this using the "extended" bit (24) of lParam
5035             id = lParam & (1 << 24) ? WXK_NUMPAD_ENTER : WXK_RETURN;
5036             break;
5037
5038         default:
5039             id = 0;
5040     }
5041
5042     return id;
5043 }
5044
5045 WXWORD wxCharCodeWXToMSW(int id, bool *isVirtual)
5046 {
5047     *isVirtual = true;
5048     WXWORD keySym;
5049     switch (id)
5050     {
5051     case WXK_CANCEL:    keySym = VK_CANCEL; break;
5052     case WXK_CLEAR:     keySym = VK_CLEAR; break;
5053     case WXK_SHIFT:     keySym = VK_SHIFT; break;
5054     case WXK_CONTROL:   keySym = VK_CONTROL; break;
5055     case WXK_ALT:       keySym = VK_MENU; break;
5056     case WXK_MENU :     keySym = VK_MENU; break;
5057     case WXK_PAUSE:     keySym = VK_PAUSE; break;
5058     case WXK_CAPITAL:   keySym = VK_CAPITAL; break;
5059     case WXK_PRIOR:     keySym = VK_PRIOR; break;
5060     case WXK_NEXT :     keySym = VK_NEXT; break;
5061     case WXK_END:       keySym = VK_END; break;
5062     case WXK_HOME :     keySym = VK_HOME; break;
5063     case WXK_LEFT :     keySym = VK_LEFT; break;
5064     case WXK_UP:        keySym = VK_UP; break;
5065     case WXK_RIGHT:     keySym = VK_RIGHT; break;
5066     case WXK_DOWN :     keySym = VK_DOWN; break;
5067     case WXK_SELECT:    keySym = VK_SELECT; break;
5068     case WXK_PRINT:     keySym = VK_PRINT; break;
5069     case WXK_EXECUTE:   keySym = VK_EXECUTE; break;
5070     case WXK_INSERT:    keySym = VK_INSERT; break;
5071     case WXK_DELETE:    keySym = VK_DELETE; break;
5072     case WXK_HELP :     keySym = VK_HELP; break;
5073     case WXK_NUMPAD0:   keySym = VK_NUMPAD0; break;
5074     case WXK_NUMPAD1:   keySym = VK_NUMPAD1; break;
5075     case WXK_NUMPAD2:   keySym = VK_NUMPAD2; break;
5076     case WXK_NUMPAD3:   keySym = VK_NUMPAD3; break;
5077     case WXK_NUMPAD4:   keySym = VK_NUMPAD4; break;
5078     case WXK_NUMPAD5:   keySym = VK_NUMPAD5; break;
5079     case WXK_NUMPAD6:   keySym = VK_NUMPAD6; break;
5080     case WXK_NUMPAD7:   keySym = VK_NUMPAD7; break;
5081     case WXK_NUMPAD8:   keySym = VK_NUMPAD8; break;
5082     case WXK_NUMPAD9:   keySym = VK_NUMPAD9; break;
5083     case WXK_NUMPAD_MULTIPLY:  keySym = VK_MULTIPLY; break;
5084     case WXK_NUMPAD_ADD:       keySym = VK_ADD; break;
5085     case WXK_NUMPAD_SUBTRACT:  keySym = VK_SUBTRACT; break;
5086     case WXK_NUMPAD_DECIMAL:   keySym = VK_DECIMAL; break;
5087     case WXK_NUMPAD_DIVIDE:    keySym = VK_DIVIDE; break;
5088     case WXK_F1:        keySym = VK_F1; break;
5089     case WXK_F2:        keySym = VK_F2; break;
5090     case WXK_F3:        keySym = VK_F3; break;
5091     case WXK_F4:        keySym = VK_F4; break;
5092     case WXK_F5:        keySym = VK_F5; break;
5093     case WXK_F6:        keySym = VK_F6; break;
5094     case WXK_F7:        keySym = VK_F7; break;
5095     case WXK_F8:        keySym = VK_F8; break;
5096     case WXK_F9:        keySym = VK_F9; break;
5097     case WXK_F10:       keySym = VK_F10; break;
5098     case WXK_F11:       keySym = VK_F11; break;
5099     case WXK_F12:       keySym = VK_F12; break;
5100     case WXK_F13:       keySym = VK_F13; break;
5101     case WXK_F14:       keySym = VK_F14; break;
5102     case WXK_F15:       keySym = VK_F15; break;
5103     case WXK_F16:       keySym = VK_F16; break;
5104     case WXK_F17:       keySym = VK_F17; break;
5105     case WXK_F18:       keySym = VK_F18; break;
5106     case WXK_F19:       keySym = VK_F19; break;
5107     case WXK_F20:       keySym = VK_F20; break;
5108     case WXK_F21:       keySym = VK_F21; break;
5109     case WXK_F22:       keySym = VK_F22; break;
5110     case WXK_F23:       keySym = VK_F23; break;
5111     case WXK_F24:       keySym = VK_F24; break;
5112     case WXK_NUMLOCK:   keySym = VK_NUMLOCK; break;
5113     case WXK_SCROLL:    keySym = VK_SCROLL; break;
5114     default:
5115         {
5116             *isVirtual = false;
5117             keySym = (WORD)id;
5118             break;
5119         }
5120     }
5121     return keySym;
5122 }
5123
5124 bool wxGetKeyState(wxKeyCode key)
5125 {
5126     bool bVirtual;
5127
5128 //High order with GetAsyncKeyState only available on WIN32
5129 #ifdef __WIN32__
5130     //If the requested key is a LED key, return
5131     //true if the led is pressed
5132     if (key == WXK_NUMLOCK ||
5133         key == WXK_CAPITAL ||
5134         key == WXK_SCROLL)
5135     {
5136 #endif
5137         //low order bit means LED is highlighted,
5138         //high order means key is down
5139         //Here, for compat with other ports we want both
5140         return GetKeyState( wxCharCodeWXToMSW(key, &bVirtual) ) != 0;
5141
5142 #ifdef __WIN32__
5143     }
5144     else
5145     {
5146         //normal key
5147         //low order bit means key pressed since last call
5148         //high order means key is down
5149         //We want only the high order bit - the key may not be down if only low order
5150         return ( GetAsyncKeyState( wxCharCodeWXToMSW(key, &bVirtual) ) & (1<<15) ) != 0;
5151     }
5152 #endif
5153 }
5154
5155 wxWindow *wxGetActiveWindow()
5156 {
5157     HWND hWnd = GetActiveWindow();
5158     if ( hWnd != 0 )
5159     {
5160         return wxFindWinFromHandle((WXHWND) hWnd);
5161     }
5162     return NULL;
5163 }
5164
5165 extern wxWindow *wxGetWindowFromHWND(WXHWND hWnd)
5166 {
5167     HWND hwnd = (HWND)hWnd;
5168
5169     // For a radiobutton, we get the radiobox from GWL_USERDATA (which is set
5170     // by code in msw/radiobox.cpp), for all the others we just search up the
5171     // window hierarchy
5172     wxWindow *win = (wxWindow *)NULL;
5173     if ( hwnd )
5174     {
5175         win = wxFindWinFromHandle((WXHWND)hwnd);
5176         if ( !win )
5177         {
5178 #if wxUSE_RADIOBOX
5179             // native radiobuttons return DLGC_RADIOBUTTON here and for any
5180             // wxWindow class which overrides WM_GETDLGCODE processing to
5181             // do it as well, win would be already non NULL
5182             if ( ::SendMessage(hwnd, WM_GETDLGCODE, 0, 0) & DLGC_RADIOBUTTON )
5183             {
5184                 win = (wxWindow *)wxGetWindowUserData(hwnd);
5185             }
5186             //else: it's a wxRadioButton, not a radiobutton from wxRadioBox
5187 #endif // wxUSE_RADIOBOX
5188
5189             // spin control text buddy window should be mapped to spin ctrl
5190             // itself so try it too
5191 #if wxUSE_SPINCTRL && !defined(__WXUNIVERSAL__)
5192             if ( !win )
5193             {
5194                 win = wxSpinCtrl::GetSpinForTextCtrl((WXHWND)hwnd);
5195             }
5196 #endif // wxUSE_SPINCTRL
5197         }
5198     }
5199
5200     while ( hwnd && !win )
5201     {
5202         // this is a really ugly hack needed to avoid mistakenly returning the
5203         // parent frame wxWindow for the find/replace modeless dialog HWND -
5204         // this, in turn, is needed to call IsDialogMessage() from
5205         // wxApp::ProcessMessage() as for this we must return NULL from here
5206         //
5207         // FIXME: this is clearly not the best way to do it but I think we'll
5208         //        need to change HWND <-> wxWindow code more heavily than I can
5209         //        do it now to fix it
5210 #ifndef __WXMICROWIN__
5211         if ( ::GetWindow(hwnd, GW_OWNER) )
5212         {
5213             // it's a dialog box, don't go upwards
5214             break;
5215         }
5216 #endif
5217
5218         hwnd = ::GetParent(hwnd);
5219         win = wxFindWinFromHandle((WXHWND)hwnd);
5220     }
5221
5222     return win;
5223 }
5224
5225 #if !defined(__WXMICROWIN__) && !defined(__WXWINCE__)
5226
5227 // Windows keyboard hook. Allows interception of e.g. F1, ESCAPE
5228 // in active frames and dialogs, regardless of where the focus is.
5229 static HHOOK wxTheKeyboardHook = 0;
5230 static FARPROC wxTheKeyboardHookProc = 0;
5231 int APIENTRY _EXPORT
5232 wxKeyboardHook(int nCode, WORD wParam, DWORD lParam);
5233
5234 void wxSetKeyboardHook(bool doIt)
5235 {
5236     if ( doIt )
5237     {
5238         wxTheKeyboardHookProc = MakeProcInstance((FARPROC) wxKeyboardHook, wxGetInstance());
5239         wxTheKeyboardHook = SetWindowsHookEx(WH_KEYBOARD, (HOOKPROC) wxTheKeyboardHookProc, wxGetInstance(),
5240
5241             GetCurrentThreadId()
5242         //      (DWORD)GetCurrentProcess()); // This is another possibility. Which is right?
5243             );
5244     }
5245     else
5246     {
5247         UnhookWindowsHookEx(wxTheKeyboardHook);
5248     }
5249 }
5250
5251 int APIENTRY _EXPORT
5252 wxKeyboardHook(int nCode, WORD wParam, DWORD lParam)
5253 {
5254     DWORD hiWord = HIWORD(lParam);
5255     if ( nCode != HC_NOREMOVE && ((hiWord & KF_UP) == 0) )
5256     {
5257         int id = wxCharCodeMSWToWX(wParam, lParam);
5258         if ( id != 0 )
5259         {
5260             wxKeyEvent event(wxEVT_CHAR_HOOK);
5261             if ( (HIWORD(lParam) & KF_ALTDOWN) == KF_ALTDOWN )
5262                 event.m_altDown = true;
5263
5264             event.m_eventObject = NULL;
5265             event.m_keyCode = id;
5266             event.m_shiftDown = wxIsShiftDown();
5267             event.m_controlDown = wxIsCtrlDown();
5268 #ifndef __WXWINCE__
5269             event.SetTimestamp(::GetMessageTime());
5270 #endif
5271             wxWindow *win = wxGetActiveWindow();
5272             wxEvtHandler *handler;
5273             if ( win )
5274             {
5275                 handler = win->GetEventHandler();
5276                 event.SetId(win->GetId());
5277             }
5278             else
5279             {
5280                 handler = wxTheApp;
5281                 event.SetId(wxID_ANY);
5282             }
5283
5284             if ( handler && handler->ProcessEvent(event) )
5285             {
5286                 // processed
5287                 return 1;
5288             }
5289         }
5290     }
5291
5292     return (int)CallNextHookEx(wxTheKeyboardHook, nCode, wParam, lParam);
5293 }
5294
5295 #endif // !__WXMICROWIN__
5296
5297 #ifdef __WXDEBUG__
5298 const char *wxGetMessageName(int message)
5299 {
5300     switch ( message )
5301     {
5302         case 0x0000: return "WM_NULL";
5303         case 0x0001: return "WM_CREATE";
5304         case 0x0002: return "WM_DESTROY";
5305         case 0x0003: return "WM_MOVE";
5306         case 0x0005: return "WM_SIZE";
5307         case 0x0006: return "WM_ACTIVATE";
5308         case 0x0007: return "WM_SETFOCUS";
5309         case 0x0008: return "WM_KILLFOCUS";
5310         case 0x000A: return "WM_ENABLE";
5311         case 0x000B: return "WM_SETREDRAW";
5312         case 0x000C: return "WM_SETTEXT";
5313         case 0x000D: return "WM_GETTEXT";
5314         case 0x000E: return "WM_GETTEXTLENGTH";
5315         case 0x000F: return "WM_PAINT";
5316         case 0x0010: return "WM_CLOSE";
5317         case 0x0011: return "WM_QUERYENDSESSION";
5318         case 0x0012: return "WM_QUIT";
5319         case 0x0013: return "WM_QUERYOPEN";
5320         case 0x0014: return "WM_ERASEBKGND";
5321         case 0x0015: return "WM_SYSCOLORCHANGE";
5322         case 0x0016: return "WM_ENDSESSION";
5323         case 0x0017: return "WM_SYSTEMERROR";
5324         case 0x0018: return "WM_SHOWWINDOW";
5325         case 0x0019: return "WM_CTLCOLOR";
5326         case 0x001A: return "WM_WININICHANGE";
5327         case 0x001B: return "WM_DEVMODECHANGE";
5328         case 0x001C: return "WM_ACTIVATEAPP";
5329         case 0x001D: return "WM_FONTCHANGE";
5330         case 0x001E: return "WM_TIMECHANGE";
5331         case 0x001F: return "WM_CANCELMODE";
5332         case 0x0020: return "WM_SETCURSOR";
5333         case 0x0021: return "WM_MOUSEACTIVATE";
5334         case 0x0022: return "WM_CHILDACTIVATE";
5335         case 0x0023: return "WM_QUEUESYNC";
5336         case 0x0024: return "WM_GETMINMAXINFO";
5337         case 0x0026: return "WM_PAINTICON";
5338         case 0x0027: return "WM_ICONERASEBKGND";
5339         case 0x0028: return "WM_NEXTDLGCTL";
5340         case 0x002A: return "WM_SPOOLERSTATUS";
5341         case 0x002B: return "WM_DRAWITEM";
5342         case 0x002C: return "WM_MEASUREITEM";
5343         case 0x002D: return "WM_DELETEITEM";
5344         case 0x002E: return "WM_VKEYTOITEM";
5345         case 0x002F: return "WM_CHARTOITEM";
5346         case 0x0030: return "WM_SETFONT";
5347         case 0x0031: return "WM_GETFONT";
5348         case 0x0037: return "WM_QUERYDRAGICON";
5349         case 0x0039: return "WM_COMPAREITEM";
5350         case 0x0041: return "WM_COMPACTING";
5351         case 0x0044: return "WM_COMMNOTIFY";
5352         case 0x0046: return "WM_WINDOWPOSCHANGING";
5353         case 0x0047: return "WM_WINDOWPOSCHANGED";
5354         case 0x0048: return "WM_POWER";
5355
5356         case 0x004A: return "WM_COPYDATA";
5357         case 0x004B: return "WM_CANCELJOURNAL";
5358         case 0x004E: return "WM_NOTIFY";
5359         case 0x0050: return "WM_INPUTLANGCHANGEREQUEST";
5360         case 0x0051: return "WM_INPUTLANGCHANGE";
5361         case 0x0052: return "WM_TCARD";
5362         case 0x0053: return "WM_HELP";
5363         case 0x0054: return "WM_USERCHANGED";
5364         case 0x0055: return "WM_NOTIFYFORMAT";
5365         case 0x007B: return "WM_CONTEXTMENU";
5366         case 0x007C: return "WM_STYLECHANGING";
5367         case 0x007D: return "WM_STYLECHANGED";
5368         case 0x007E: return "WM_DISPLAYCHANGE";
5369         case 0x007F: return "WM_GETICON";
5370         case 0x0080: return "WM_SETICON";
5371
5372         case 0x0081: return "WM_NCCREATE";
5373         case 0x0082: return "WM_NCDESTROY";
5374         case 0x0083: return "WM_NCCALCSIZE";
5375         case 0x0084: return "WM_NCHITTEST";
5376         case 0x0085: return "WM_NCPAINT";
5377         case 0x0086: return "WM_NCACTIVATE";
5378         case 0x0087: return "WM_GETDLGCODE";
5379         case 0x00A0: return "WM_NCMOUSEMOVE";
5380         case 0x00A1: return "WM_NCLBUTTONDOWN";
5381         case 0x00A2: return "WM_NCLBUTTONUP";
5382         case 0x00A3: return "WM_NCLBUTTONDBLCLK";
5383         case 0x00A4: return "WM_NCRBUTTONDOWN";
5384         case 0x00A5: return "WM_NCRBUTTONUP";
5385         case 0x00A6: return "WM_NCRBUTTONDBLCLK";
5386         case 0x00A7: return "WM_NCMBUTTONDOWN";
5387         case 0x00A8: return "WM_NCMBUTTONUP";
5388         case 0x00A9: return "WM_NCMBUTTONDBLCLK";
5389         case 0x0100: return "WM_KEYDOWN";
5390         case 0x0101: return "WM_KEYUP";
5391         case 0x0102: return "WM_CHAR";
5392         case 0x0103: return "WM_DEADCHAR";
5393         case 0x0104: return "WM_SYSKEYDOWN";
5394         case 0x0105: return "WM_SYSKEYUP";
5395         case 0x0106: return "WM_SYSCHAR";
5396         case 0x0107: return "WM_SYSDEADCHAR";
5397         case 0x0108: return "WM_KEYLAST";
5398
5399         case 0x010D: return "WM_IME_STARTCOMPOSITION";
5400         case 0x010E: return "WM_IME_ENDCOMPOSITION";
5401         case 0x010F: return "WM_IME_COMPOSITION";
5402
5403         case 0x0110: return "WM_INITDIALOG";
5404         case 0x0111: return "WM_COMMAND";
5405         case 0x0112: return "WM_SYSCOMMAND";
5406         case 0x0113: return "WM_TIMER";
5407         case 0x0114: return "WM_HSCROLL";
5408         case 0x0115: return "WM_VSCROLL";
5409         case 0x0116: return "WM_INITMENU";
5410         case 0x0117: return "WM_INITMENUPOPUP";
5411         case 0x011F: return "WM_MENUSELECT";
5412         case 0x0120: return "WM_MENUCHAR";
5413         case 0x0121: return "WM_ENTERIDLE";
5414         case 0x0200: return "WM_MOUSEMOVE";
5415         case 0x0201: return "WM_LBUTTONDOWN";
5416         case 0x0202: return "WM_LBUTTONUP";
5417         case 0x0203: return "WM_LBUTTONDBLCLK";
5418         case 0x0204: return "WM_RBUTTONDOWN";
5419         case 0x0205: return "WM_RBUTTONUP";
5420         case 0x0206: return "WM_RBUTTONDBLCLK";
5421         case 0x0207: return "WM_MBUTTONDOWN";
5422         case 0x0208: return "WM_MBUTTONUP";
5423         case 0x0209: return "WM_MBUTTONDBLCLK";
5424         case 0x020A: return "WM_MOUSEWHEEL";
5425         case 0x0210: return "WM_PARENTNOTIFY";
5426         case 0x0211: return "WM_ENTERMENULOOP";
5427         case 0x0212: return "WM_EXITMENULOOP";
5428
5429         case 0x0213: return "WM_NEXTMENU";
5430         case 0x0214: return "WM_SIZING";
5431         case 0x0215: return "WM_CAPTURECHANGED";
5432         case 0x0216: return "WM_MOVING";
5433         case 0x0218: return "WM_POWERBROADCAST";
5434         case 0x0219: return "WM_DEVICECHANGE";
5435
5436         case 0x0220: return "WM_MDICREATE";
5437         case 0x0221: return "WM_MDIDESTROY";
5438         case 0x0222: return "WM_MDIACTIVATE";
5439         case 0x0223: return "WM_MDIRESTORE";
5440         case 0x0224: return "WM_MDINEXT";
5441         case 0x0225: return "WM_MDIMAXIMIZE";
5442         case 0x0226: return "WM_MDITILE";
5443         case 0x0227: return "WM_MDICASCADE";
5444         case 0x0228: return "WM_MDIICONARRANGE";
5445         case 0x0229: return "WM_MDIGETACTIVE";
5446         case 0x0230: return "WM_MDISETMENU";
5447         case 0x0233: return "WM_DROPFILES";
5448
5449         case 0x0281: return "WM_IME_SETCONTEXT";
5450         case 0x0282: return "WM_IME_NOTIFY";
5451         case 0x0283: return "WM_IME_CONTROL";
5452         case 0x0284: return "WM_IME_COMPOSITIONFULL";
5453         case 0x0285: return "WM_IME_SELECT";
5454         case 0x0286: return "WM_IME_CHAR";
5455         case 0x0290: return "WM_IME_KEYDOWN";
5456         case 0x0291: return "WM_IME_KEYUP";
5457
5458         case 0x0300: return "WM_CUT";
5459         case 0x0301: return "WM_COPY";
5460         case 0x0302: return "WM_PASTE";
5461         case 0x0303: return "WM_CLEAR";
5462         case 0x0304: return "WM_UNDO";
5463         case 0x0305: return "WM_RENDERFORMAT";
5464         case 0x0306: return "WM_RENDERALLFORMATS";
5465         case 0x0307: return "WM_DESTROYCLIPBOARD";
5466         case 0x0308: return "WM_DRAWCLIPBOARD";
5467         case 0x0309: return "WM_PAINTCLIPBOARD";
5468         case 0x030A: return "WM_VSCROLLCLIPBOARD";
5469         case 0x030B: return "WM_SIZECLIPBOARD";
5470         case 0x030C: return "WM_ASKCBFORMATNAME";
5471         case 0x030D: return "WM_CHANGECBCHAIN";
5472         case 0x030E: return "WM_HSCROLLCLIPBOARD";
5473         case 0x030F: return "WM_QUERYNEWPALETTE";
5474         case 0x0310: return "WM_PALETTEISCHANGING";
5475         case 0x0311: return "WM_PALETTECHANGED";
5476 #if wxUSE_HOTKEY
5477         case 0x0312: return "WM_HOTKEY";
5478 #endif
5479
5480         // common controls messages - although they're not strictly speaking
5481         // standard, it's nice to decode them nevertheless
5482
5483         // listview
5484         case 0x1000 + 0: return "LVM_GETBKCOLOR";
5485         case 0x1000 + 1: return "LVM_SETBKCOLOR";
5486         case 0x1000 + 2: return "LVM_GETIMAGELIST";
5487         case 0x1000 + 3: return "LVM_SETIMAGELIST";
5488         case 0x1000 + 4: return "LVM_GETITEMCOUNT";
5489         case 0x1000 + 5: return "LVM_GETITEMA";
5490         case 0x1000 + 75: return "LVM_GETITEMW";
5491         case 0x1000 + 6: return "LVM_SETITEMA";
5492         case 0x1000 + 76: return "LVM_SETITEMW";
5493         case 0x1000 + 7: return "LVM_INSERTITEMA";
5494         case 0x1000 + 77: return "LVM_INSERTITEMW";
5495         case 0x1000 + 8: return "LVM_DELETEITEM";
5496         case 0x1000 + 9: return "LVM_DELETEALLITEMS";
5497         case 0x1000 + 10: return "LVM_GETCALLBACKMASK";
5498         case 0x1000 + 11: return "LVM_SETCALLBACKMASK";
5499         case 0x1000 + 12: return "LVM_GETNEXTITEM";
5500         case 0x1000 + 13: return "LVM_FINDITEMA";
5501         case 0x1000 + 83: return "LVM_FINDITEMW";
5502         case 0x1000 + 14: return "LVM_GETITEMRECT";
5503         case 0x1000 + 15: return "LVM_SETITEMPOSITION";
5504         case 0x1000 + 16: return "LVM_GETITEMPOSITION";
5505         case 0x1000 + 17: return "LVM_GETSTRINGWIDTHA";
5506         case 0x1000 + 87: return "LVM_GETSTRINGWIDTHW";
5507         case 0x1000 + 18: return "LVM_HITTEST";
5508         case 0x1000 + 19: return "LVM_ENSUREVISIBLE";
5509         case 0x1000 + 20: return "LVM_SCROLL";
5510         case 0x1000 + 21: return "LVM_REDRAWITEMS";
5511         case 0x1000 + 22: return "LVM_ARRANGE";
5512         case 0x1000 + 23: return "LVM_EDITLABELA";
5513         case 0x1000 + 118: return "LVM_EDITLABELW";
5514         case 0x1000 + 24: return "LVM_GETEDITCONTROL";
5515         case 0x1000 + 25: return "LVM_GETCOLUMNA";
5516         case 0x1000 + 95: return "LVM_GETCOLUMNW";
5517         case 0x1000 + 26: return "LVM_SETCOLUMNA";
5518         case 0x1000 + 96: return "LVM_SETCOLUMNW";
5519         case 0x1000 + 27: return "LVM_INSERTCOLUMNA";
5520         case 0x1000 + 97: return "LVM_INSERTCOLUMNW";
5521         case 0x1000 + 28: return "LVM_DELETECOLUMN";
5522         case 0x1000 + 29: return "LVM_GETCOLUMNWIDTH";
5523         case 0x1000 + 30: return "LVM_SETCOLUMNWIDTH";
5524         case 0x1000 + 31: return "LVM_GETHEADER";
5525         case 0x1000 + 33: return "LVM_CREATEDRAGIMAGE";
5526         case 0x1000 + 34: return "LVM_GETVIEWRECT";
5527         case 0x1000 + 35: return "LVM_GETTEXTCOLOR";
5528         case 0x1000 + 36: return "LVM_SETTEXTCOLOR";
5529         case 0x1000 + 37: return "LVM_GETTEXTBKCOLOR";
5530         case 0x1000 + 38: return "LVM_SETTEXTBKCOLOR";
5531         case 0x1000 + 39: return "LVM_GETTOPINDEX";
5532         case 0x1000 + 40: return "LVM_GETCOUNTPERPAGE";
5533         case 0x1000 + 41: return "LVM_GETORIGIN";
5534         case 0x1000 + 42: return "LVM_UPDATE";
5535         case 0x1000 + 43: return "LVM_SETITEMSTATE";
5536         case 0x1000 + 44: return "LVM_GETITEMSTATE";
5537         case 0x1000 + 45: return "LVM_GETITEMTEXTA";
5538         case 0x1000 + 115: return "LVM_GETITEMTEXTW";
5539         case 0x1000 + 46: return "LVM_SETITEMTEXTA";
5540         case 0x1000 + 116: return "LVM_SETITEMTEXTW";
5541         case 0x1000 + 47: return "LVM_SETITEMCOUNT";
5542         case 0x1000 + 48: return "LVM_SORTITEMS";
5543         case 0x1000 + 49: return "LVM_SETITEMPOSITION32";
5544         case 0x1000 + 50: return "LVM_GETSELECTEDCOUNT";
5545         case 0x1000 + 51: return "LVM_GETITEMSPACING";
5546         case 0x1000 + 52: return "LVM_GETISEARCHSTRINGA";
5547         case 0x1000 + 117: return "LVM_GETISEARCHSTRINGW";
5548         case 0x1000 + 53: return "LVM_SETICONSPACING";
5549         case 0x1000 + 54: return "LVM_SETEXTENDEDLISTVIEWSTYLE";
5550         case 0x1000 + 55: return "LVM_GETEXTENDEDLISTVIEWSTYLE";
5551         case 0x1000 + 56: return "LVM_GETSUBITEMRECT";
5552         case 0x1000 + 57: return "LVM_SUBITEMHITTEST";
5553         case 0x1000 + 58: return "LVM_SETCOLUMNORDERARRAY";
5554         case 0x1000 + 59: return "LVM_GETCOLUMNORDERARRAY";
5555         case 0x1000 + 60: return "LVM_SETHOTITEM";
5556         case 0x1000 + 61: return "LVM_GETHOTITEM";
5557         case 0x1000 + 62: return "LVM_SETHOTCURSOR";
5558         case 0x1000 + 63: return "LVM_GETHOTCURSOR";
5559         case 0x1000 + 64: return "LVM_APPROXIMATEVIEWRECT";
5560         case 0x1000 + 65: return "LVM_SETWORKAREA";
5561
5562         // tree view
5563         case 0x1100 + 0: return "TVM_INSERTITEMA";
5564         case 0x1100 + 50: return "TVM_INSERTITEMW";
5565         case 0x1100 + 1: return "TVM_DELETEITEM";
5566         case 0x1100 + 2: return "TVM_EXPAND";
5567         case 0x1100 + 4: return "TVM_GETITEMRECT";
5568         case 0x1100 + 5: return "TVM_GETCOUNT";
5569         case 0x1100 + 6: return "TVM_GETINDENT";
5570         case 0x1100 + 7: return "TVM_SETINDENT";
5571         case 0x1100 + 8: return "TVM_GETIMAGELIST";
5572         case 0x1100 + 9: return "TVM_SETIMAGELIST";
5573         case 0x1100 + 10: return "TVM_GETNEXTITEM";
5574         case 0x1100 + 11: return "TVM_SELECTITEM";
5575         case 0x1100 + 12: return "TVM_GETITEMA";
5576         case 0x1100 + 62: return "TVM_GETITEMW";
5577         case 0x1100 + 13: return "TVM_SETITEMA";
5578         case 0x1100 + 63: return "TVM_SETITEMW";
5579         case 0x1100 + 14: return "TVM_EDITLABELA";
5580         case 0x1100 + 65: return "TVM_EDITLABELW";
5581         case 0x1100 + 15: return "TVM_GETEDITCONTROL";
5582         case 0x1100 + 16: return "TVM_GETVISIBLECOUNT";
5583         case 0x1100 + 17: return "TVM_HITTEST";
5584         case 0x1100 + 18: return "TVM_CREATEDRAGIMAGE";
5585         case 0x1100 + 19: return "TVM_SORTCHILDREN";
5586         case 0x1100 + 20: return "TVM_ENSUREVISIBLE";
5587         case 0x1100 + 21: return "TVM_SORTCHILDRENCB";
5588         case 0x1100 + 22: return "TVM_ENDEDITLABELNOW";
5589         case 0x1100 + 23: return "TVM_GETISEARCHSTRINGA";
5590         case 0x1100 + 64: return "TVM_GETISEARCHSTRINGW";
5591         case 0x1100 + 24: return "TVM_SETTOOLTIPS";
5592         case 0x1100 + 25: return "TVM_GETTOOLTIPS";
5593
5594         // header
5595         case 0x1200 + 0: return "HDM_GETITEMCOUNT";
5596         case 0x1200 + 1: return "HDM_INSERTITEMA";
5597         case 0x1200 + 10: return "HDM_INSERTITEMW";
5598         case 0x1200 + 2: return "HDM_DELETEITEM";
5599         case 0x1200 + 3: return "HDM_GETITEMA";
5600         case 0x1200 + 11: return "HDM_GETITEMW";
5601         case 0x1200 + 4: return "HDM_SETITEMA";
5602         case 0x1200 + 12: return "HDM_SETITEMW";
5603         case 0x1200 + 5: return "HDM_LAYOUT";
5604         case 0x1200 + 6: return "HDM_HITTEST";
5605         case 0x1200 + 7: return "HDM_GETITEMRECT";
5606         case 0x1200 + 8: return "HDM_SETIMAGELIST";
5607         case 0x1200 + 9: return "HDM_GETIMAGELIST";
5608         case 0x1200 + 15: return "HDM_ORDERTOINDEX";
5609         case 0x1200 + 16: return "HDM_CREATEDRAGIMAGE";
5610         case 0x1200 + 17: return "HDM_GETORDERARRAY";
5611         case 0x1200 + 18: return "HDM_SETORDERARRAY";
5612         case 0x1200 + 19: return "HDM_SETHOTDIVIDER";
5613
5614         // tab control
5615         case 0x1300 + 2: return "TCM_GETIMAGELIST";
5616         case 0x1300 + 3: return "TCM_SETIMAGELIST";
5617         case 0x1300 + 4: return "TCM_GETITEMCOUNT";
5618         case 0x1300 + 5: return "TCM_GETITEMA";
5619         case 0x1300 + 60: return "TCM_GETITEMW";
5620         case 0x1300 + 6: return "TCM_SETITEMA";
5621         case 0x1300 + 61: return "TCM_SETITEMW";
5622         case 0x1300 + 7: return "TCM_INSERTITEMA";
5623         case 0x1300 + 62: return "TCM_INSERTITEMW";
5624         case 0x1300 + 8: return "TCM_DELETEITEM";
5625         case 0x1300 + 9: return "TCM_DELETEALLITEMS";
5626         case 0x1300 + 10: return "TCM_GETITEMRECT";
5627         case 0x1300 + 11: return "TCM_GETCURSEL";
5628         case 0x1300 + 12: return "TCM_SETCURSEL";
5629         case 0x1300 + 13: return "TCM_HITTEST";
5630         case 0x1300 + 14: return "TCM_SETITEMEXTRA";
5631         case 0x1300 + 40: return "TCM_ADJUSTRECT";
5632         case 0x1300 + 41: return "TCM_SETITEMSIZE";
5633         case 0x1300 + 42: return "TCM_REMOVEIMAGE";
5634         case 0x1300 + 43: return "TCM_SETPADDING";
5635         case 0x1300 + 44: return "TCM_GETROWCOUNT";
5636         case 0x1300 + 45: return "TCM_GETTOOLTIPS";
5637         case 0x1300 + 46: return "TCM_SETTOOLTIPS";
5638         case 0x1300 + 47: return "TCM_GETCURFOCUS";
5639         case 0x1300 + 48: return "TCM_SETCURFOCUS";
5640         case 0x1300 + 49: return "TCM_SETMINTABWIDTH";
5641         case 0x1300 + 50: return "TCM_DESELECTALL";
5642
5643         // toolbar
5644         case WM_USER+1: return "TB_ENABLEBUTTON";
5645         case WM_USER+2: return "TB_CHECKBUTTON";
5646         case WM_USER+3: return "TB_PRESSBUTTON";
5647         case WM_USER+4: return "TB_HIDEBUTTON";
5648         case WM_USER+5: return "TB_INDETERMINATE";
5649         case WM_USER+9: return "TB_ISBUTTONENABLED";
5650         case WM_USER+10: return "TB_ISBUTTONCHECKED";
5651         case WM_USER+11: return "TB_ISBUTTONPRESSED";
5652         case WM_USER+12: return "TB_ISBUTTONHIDDEN";
5653         case WM_USER+13: return "TB_ISBUTTONINDETERMINATE";
5654         case WM_USER+17: return "TB_SETSTATE";
5655         case WM_USER+18: return "TB_GETSTATE";
5656         case WM_USER+19: return "TB_ADDBITMAP";
5657         case WM_USER+20: return "TB_ADDBUTTONS";
5658         case WM_USER+21: return "TB_INSERTBUTTON";
5659         case WM_USER+22: return "TB_DELETEBUTTON";
5660         case WM_USER+23: return "TB_GETBUTTON";
5661         case WM_USER+24: return "TB_BUTTONCOUNT";
5662         case WM_USER+25: return "TB_COMMANDTOINDEX";
5663         case WM_USER+26: return "TB_SAVERESTOREA";
5664         case WM_USER+76: return "TB_SAVERESTOREW";
5665         case WM_USER+27: return "TB_CUSTOMIZE";
5666         case WM_USER+28: return "TB_ADDSTRINGA";
5667         case WM_USER+77: return "TB_ADDSTRINGW";
5668         case WM_USER+29: return "TB_GETITEMRECT";
5669         case WM_USER+30: return "TB_BUTTONSTRUCTSIZE";
5670         case WM_USER+31: return "TB_SETBUTTONSIZE";
5671         case WM_USER+32: return "TB_SETBITMAPSIZE";
5672         case WM_USER+33: return "TB_AUTOSIZE";
5673         case WM_USER+35: return "TB_GETTOOLTIPS";
5674         case WM_USER+36: return "TB_SETTOOLTIPS";
5675         case WM_USER+37: return "TB_SETPARENT";
5676         case WM_USER+39: return "TB_SETROWS";
5677         case WM_USER+40: return "TB_GETROWS";
5678         case WM_USER+42: return "TB_SETCMDID";
5679         case WM_USER+43: return "TB_CHANGEBITMAP";
5680         case WM_USER+44: return "TB_GETBITMAP";
5681         case WM_USER+45: return "TB_GETBUTTONTEXTA";
5682         case WM_USER+75: return "TB_GETBUTTONTEXTW";
5683         case WM_USER+46: return "TB_REPLACEBITMAP";
5684         case WM_USER+47: return "TB_SETINDENT";
5685         case WM_USER+48: return "TB_SETIMAGELIST";
5686         case WM_USER+49: return "TB_GETIMAGELIST";
5687         case WM_USER+50: return "TB_LOADIMAGES";
5688         case WM_USER+51: return "TB_GETRECT";
5689         case WM_USER+52: return "TB_SETHOTIMAGELIST";
5690         case WM_USER+53: return "TB_GETHOTIMAGELIST";
5691         case WM_USER+54: return "TB_SETDISABLEDIMAGELIST";
5692         case WM_USER+55: return "TB_GETDISABLEDIMAGELIST";
5693         case WM_USER+56: return "TB_SETSTYLE";
5694         case WM_USER+57: return "TB_GETSTYLE";
5695         case WM_USER+58: return "TB_GETBUTTONSIZE";
5696         case WM_USER+59: return "TB_SETBUTTONWIDTH";
5697         case WM_USER+60: return "TB_SETMAXTEXTROWS";
5698         case WM_USER+61: return "TB_GETTEXTROWS";
5699         case WM_USER+41: return "TB_GETBITMAPFLAGS";
5700
5701         default:
5702             static char s_szBuf[128];
5703             sprintf(s_szBuf, "<unknown message = %d>", message);
5704             return s_szBuf;
5705     }
5706 }
5707 #endif //__WXDEBUG__
5708
5709 static TEXTMETRIC wxGetTextMetrics(const wxWindowMSW *win)
5710 {
5711     // prepare the DC
5712     TEXTMETRIC tm;
5713     HWND hwnd = GetHwndOf(win);
5714     HDC hdc = ::GetDC(hwnd);
5715
5716 #if !wxDIALOG_UNIT_COMPATIBILITY
5717     // and select the current font into it
5718     HFONT hfont = GetHfontOf(win->GetFont());
5719     if ( hfont )
5720     {
5721         hfont = (HFONT)::SelectObject(hdc, hfont);
5722     }
5723 #endif
5724
5725     // finally retrieve the text metrics from it
5726     GetTextMetrics(hdc, &tm);
5727
5728 #if !wxDIALOG_UNIT_COMPATIBILITY
5729     // and clean up
5730     if ( hfont )
5731     {
5732         (void)::SelectObject(hdc, hfont);
5733     }
5734 #endif
5735
5736     ::ReleaseDC(hwnd, hdc);
5737
5738     return tm;
5739 }
5740
5741 // Find the wxWindow at the current mouse position, returning the mouse
5742 // position.
5743 wxWindow* wxFindWindowAtPointer(wxPoint& pt)
5744 {
5745     pt = wxGetMousePosition();
5746     return wxFindWindowAtPoint(pt);
5747 }
5748
5749 wxWindow* wxFindWindowAtPoint(const wxPoint& pt)
5750 {
5751     POINT pt2;
5752     pt2.x = pt.x;
5753     pt2.y = pt.y;
5754     HWND hWndHit = ::WindowFromPoint(pt2);
5755
5756     wxWindow* win = wxFindWinFromHandle((WXHWND) hWndHit) ;
5757     HWND hWnd = hWndHit;
5758
5759     // Try to find a window with a wxWindow associated with it
5760     while (!win && (hWnd != 0))
5761     {
5762         hWnd = ::GetParent(hWnd);
5763         win = wxFindWinFromHandle((WXHWND) hWnd) ;
5764     }
5765     return win;
5766 }
5767
5768 // Get the current mouse position.
5769 wxPoint wxGetMousePosition()
5770 {
5771     POINT pt;
5772     GetCursorPos( & pt );
5773
5774     return wxPoint(pt.x, pt.y);
5775 }
5776
5777 #if wxUSE_HOTKEY
5778
5779 bool wxWindowMSW::RegisterHotKey(int hotkeyId, int modifiers, int keycode)
5780 {
5781     UINT win_modifiers=0;
5782     if ( modifiers & wxMOD_ALT )
5783         win_modifiers |= MOD_ALT;
5784     if ( modifiers & wxMOD_SHIFT )
5785         win_modifiers |= MOD_SHIFT;
5786     if ( modifiers & wxMOD_CONTROL )
5787         win_modifiers |= MOD_CONTROL;
5788     if ( modifiers & wxMOD_WIN )
5789         win_modifiers |= MOD_WIN;
5790
5791     if ( !::RegisterHotKey(GetHwnd(), hotkeyId, win_modifiers, keycode) )
5792     {
5793         wxLogLastError(_T("RegisterHotKey"));
5794
5795         return false;
5796     }
5797
5798     return true;
5799 }
5800
5801 bool wxWindowMSW::UnregisterHotKey(int hotkeyId)
5802 {
5803     if ( !::UnregisterHotKey(GetHwnd(), hotkeyId) )
5804     {
5805         wxLogLastError(_T("UnregisterHotKey"));
5806
5807         return false;
5808     }
5809
5810     return true;
5811 }
5812
5813 #if wxUSE_ACCEL
5814
5815 bool wxWindowMSW::HandleHotKey(WXWPARAM wParam, WXLPARAM lParam)
5816 {
5817     int hotkeyId = wParam;
5818     int virtualKey = HIWORD(lParam);
5819     int win_modifiers = LOWORD(lParam);
5820
5821     wxKeyEvent event(CreateKeyEvent(wxEVT_HOTKEY, virtualKey, wParam, lParam));
5822     event.SetId(hotkeyId);
5823     event.m_shiftDown = (win_modifiers & MOD_SHIFT) != 0;
5824     event.m_controlDown = (win_modifiers & MOD_CONTROL) != 0;
5825     event.m_altDown = (win_modifiers & MOD_ALT) != 0;
5826     event.m_metaDown = (win_modifiers & MOD_WIN) != 0;
5827
5828     return GetEventHandler()->ProcessEvent(event);
5829 }
5830
5831 #endif // wxUSE_ACCEL
5832
5833 #endif // wxUSE_HOTKEY
5834
5835 // Not tested under WinCE
5836 #ifndef __WXWINCE__
5837
5838 // this class installs a message hook which really wakes up our idle processing
5839 // each time a WM_NULL is received (wxWakeUpIdle does this), even if we're
5840 // sitting inside a local modal loop (e.g. a menu is opened or scrollbar is
5841 // being dragged or even inside ::MessageBox()) and so don't control message
5842 // dispatching otherwise
5843 class wxIdleWakeUpModule : public wxModule
5844 {
5845 public:
5846     virtual bool OnInit()
5847     {
5848         ms_hMsgHookProc = ::SetWindowsHookEx
5849                             (
5850                              WH_GETMESSAGE,
5851                              &wxIdleWakeUpModule::MsgHookProc,
5852                              NULL,
5853                              GetCurrentThreadId()
5854                             );
5855
5856         if ( !ms_hMsgHookProc )
5857         {
5858             wxLogLastError(_T("SetWindowsHookEx(WH_GETMESSAGE)"));
5859
5860             return false;
5861         }
5862
5863         return true;
5864     }
5865
5866     virtual void OnExit()
5867     {
5868         ::UnhookWindowsHookEx(wxIdleWakeUpModule::ms_hMsgHookProc);
5869     }
5870
5871     static LRESULT CALLBACK MsgHookProc(int nCode, WPARAM wParam, LPARAM lParam)
5872     {
5873         MSG *msg = (MSG*)lParam;
5874         if ( msg->message == WM_NULL )
5875         {
5876             wxTheApp->ProcessPendingEvents();
5877         }
5878
5879         return CallNextHookEx(ms_hMsgHookProc, nCode, wParam, lParam);
5880     };
5881
5882 private:
5883     static HHOOK ms_hMsgHookProc;
5884
5885     DECLARE_DYNAMIC_CLASS(wxIdleWakeUpModule)
5886 };
5887
5888 HHOOK wxIdleWakeUpModule::ms_hMsgHookProc = 0;
5889
5890 IMPLEMENT_DYNAMIC_CLASS(wxIdleWakeUpModule, wxModule)
5891
5892 #endif // __WXWINCE__
5893
5894 #ifdef __WXWINCE__
5895
5896 #if wxUSE_STATBOX
5897 static void wxAdjustZOrder(wxWindow* parent)
5898 {
5899     if (parent->IsKindOf(CLASSINFO(wxStaticBox)))
5900     {
5901         // Set the z-order correctly
5902         SetWindowPos((HWND) parent->GetHWND(), HWND_BOTTOM, 0, 0, 0, 0, SWP_NOMOVE|SWP_NOSIZE);
5903     }
5904
5905     wxWindowList::compatibility_iterator current = parent->GetChildren().GetFirst();
5906     while (current)
5907     {
5908         wxWindow *childWin = current->GetData();
5909         wxAdjustZOrder(childWin);
5910         current = current->GetNext();
5911     }
5912 }
5913 #endif
5914
5915 // We need to adjust the z-order of static boxes in WinCE, to
5916 // make 'contained' controls visible
5917 void wxWindowMSW::OnInitDialog( wxInitDialogEvent& event )
5918 {
5919 #if wxUSE_STATBOX
5920     wxAdjustZOrder(this);
5921 #endif
5922
5923     event.Skip();
5924 }
5925 #endif
5926