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 ( !m_hasBgCol )
4074     {
4075         event.Skip();
4076         return;
4077     }
4078
4079     // we have a fixed solid background colour, do use it
4080     RECT rect;
4081     ::GetClientRect(GetHwnd(), &rect);
4082
4083     wxColour backgroundColour(GetBackgroundColour());
4084     COLORREF ref = PALETTERGB(backgroundColour.Red(),
4085                               backgroundColour.Green(),
4086                               backgroundColour.Blue());
4087     HBRUSH hBrush = ::CreateSolidBrush(ref);
4088     if ( !hBrush )
4089         wxLogLastError(wxT("CreateSolidBrush"));
4090
4091     HDC hdc = (HDC)event.GetDC()->GetHDC();
4092
4093 #ifndef __WXWINCE__
4094     int mode = ::SetMapMode(hdc, MM_TEXT);
4095 #endif
4096
4097     ::FillRect(hdc, &rect, hBrush);
4098     ::DeleteObject(hBrush);
4099
4100 #ifndef __WXWINCE__
4101     ::SetMapMode(hdc, mode);
4102 #endif
4103 }
4104
4105 // ---------------------------------------------------------------------------
4106 // moving and resizing
4107 // ---------------------------------------------------------------------------
4108
4109 bool wxWindowMSW::HandleMinimize()
4110 {
4111     wxIconizeEvent event(m_windowId);
4112     event.SetEventObject(this);
4113
4114     return GetEventHandler()->ProcessEvent(event);
4115 }
4116
4117 bool wxWindowMSW::HandleMaximize()
4118 {
4119     wxMaximizeEvent event(m_windowId);
4120     event.SetEventObject(this);
4121
4122     return GetEventHandler()->ProcessEvent(event);
4123 }
4124
4125 bool wxWindowMSW::HandleMove(int x, int y)
4126 {
4127     wxPoint point(x,y);
4128     wxMoveEvent event(point, m_windowId);
4129     event.SetEventObject(this);
4130
4131     return GetEventHandler()->ProcessEvent(event);
4132 }
4133
4134 bool wxWindowMSW::HandleMoving(wxRect& rect)
4135 {
4136     wxMoveEvent event(rect, m_windowId);
4137     event.SetEventObject(this);
4138
4139     bool rc = GetEventHandler()->ProcessEvent(event);
4140     if (rc)
4141         rect = event.GetRect();
4142     return rc;
4143 }
4144
4145 bool wxWindowMSW::HandleSize(int WXUNUSED(w), int WXUNUSED(h), WXUINT wParam)
4146 {
4147     bool processed = false;
4148
4149     switch ( wParam )
4150     {
4151         default:
4152             wxFAIL_MSG( _T("unexpected WM_SIZE parameter") );
4153             // fall through nevertheless
4154
4155         case SIZE_MAXHIDE:
4156         case SIZE_MAXSHOW:
4157             // we're not interested in these messages at all
4158             break;
4159
4160         case SIZE_MINIMIZED:
4161             processed = HandleMinimize();
4162             break;
4163
4164         case SIZE_MAXIMIZED:
4165             /* processed = */ HandleMaximize();
4166             // fall through to send a normal size event as well
4167
4168         case SIZE_RESTORED:
4169             // don't use w and h parameters as they specify the client size
4170             // while according to the docs EVT_SIZE handler is supposed to
4171             // receive the total size
4172             wxSizeEvent event(GetSize(), m_windowId);
4173             event.SetEventObject(this);
4174
4175             processed = GetEventHandler()->ProcessEvent(event);
4176     }
4177
4178     return processed;
4179 }
4180
4181 bool wxWindowMSW::HandleSizing(wxRect& rect)
4182 {
4183     wxSizeEvent event(rect, m_windowId);
4184     event.SetEventObject(this);
4185
4186     bool rc = GetEventHandler()->ProcessEvent(event);
4187     if (rc)
4188         rect = event.GetRect();
4189     return rc;
4190 }
4191
4192 bool wxWindowMSW::HandleGetMinMaxInfo(void *mmInfo)
4193 {
4194 #ifdef __WXWINCE__
4195     wxUnusedVar(mmInfo);
4196     return false;
4197 #else
4198     MINMAXINFO *info = (MINMAXINFO *)mmInfo;
4199
4200     bool rc = false;
4201
4202     int minWidth = GetMinWidth(),
4203         minHeight = GetMinHeight(),
4204         maxWidth = GetMaxWidth(),
4205         maxHeight = GetMaxHeight();
4206
4207     if ( minWidth != wxDefaultCoord )
4208     {
4209         info->ptMinTrackSize.x = minWidth;
4210         rc = true;
4211     }
4212
4213     if ( minHeight != wxDefaultCoord )
4214     {
4215         info->ptMinTrackSize.y = minHeight;
4216         rc = true;
4217     }
4218
4219     if ( maxWidth != wxDefaultCoord )
4220     {
4221         info->ptMaxTrackSize.x = maxWidth;
4222         rc = true;
4223     }
4224
4225     if ( maxHeight != wxDefaultCoord )
4226     {
4227         info->ptMaxTrackSize.y = maxHeight;
4228         rc = true;
4229     }
4230
4231     return rc;
4232 #endif
4233 }
4234
4235 // ---------------------------------------------------------------------------
4236 // command messages
4237 // ---------------------------------------------------------------------------
4238
4239 bool wxWindowMSW::HandleCommand(WXWORD id, WXWORD cmd, WXHWND control)
4240 {
4241 #if wxUSE_MENUS_NATIVE
4242     if ( !cmd && wxCurrentPopupMenu )
4243     {
4244         wxMenu *popupMenu = wxCurrentPopupMenu;
4245         wxCurrentPopupMenu = NULL;
4246
4247         return popupMenu->MSWCommand(cmd, id);
4248     }
4249 #endif // wxUSE_MENUS_NATIVE
4250
4251     wxWindow *win = NULL;
4252
4253     // first try to find it from HWND - this works even with the broken
4254     // programs using the same ids for different controls
4255     if ( control )
4256     {
4257         win = wxFindWinFromHandle(control);
4258     }
4259
4260     // try the id
4261     if ( !win )
4262     {
4263         // must cast to a signed type before comparing with other ids!
4264         win = FindItem((signed short)id);
4265     }
4266
4267     if ( win )
4268     {
4269         return win->MSWCommand(cmd, id);
4270     }
4271
4272     // the messages sent from the in-place edit control used by the treectrl
4273     // for label editing have id == 0, but they should _not_ be treated as menu
4274     // messages (they are EN_XXX ones, in fact) so don't translate anything
4275     // coming from a control to wxEVT_COMMAND_MENU_SELECTED
4276     if ( !control )
4277     {
4278         // If no child window, it may be an accelerator, e.g. for a popup menu
4279         // command
4280
4281         wxCommandEvent event(wxEVT_COMMAND_MENU_SELECTED);
4282         event.SetEventObject(this);
4283         event.SetId(id);
4284         event.SetInt(id);
4285
4286         return GetEventHandler()->ProcessEvent(event);
4287     }
4288 #if wxUSE_SPINCTRL && !defined(__WXUNIVERSAL__)
4289     else
4290     {
4291         // the text ctrl which is logically part of wxSpinCtrl sends WM_COMMAND
4292         // notifications to its parent which we want to reflect back to
4293         // wxSpinCtrl
4294         wxSpinCtrl *spin = wxSpinCtrl::GetSpinForTextCtrl(control);
4295         if ( spin && spin->ProcessTextCommand(cmd, id) )
4296             return true;
4297     }
4298 #endif // wxUSE_SPINCTRL
4299
4300     return false;
4301 }
4302
4303 // ---------------------------------------------------------------------------
4304 // mouse events
4305 // ---------------------------------------------------------------------------
4306
4307 void wxWindowMSW::InitMouseEvent(wxMouseEvent& event,
4308                                  int x, int y,
4309                                  WXUINT flags)
4310 {
4311     // our client coords are not quite the same as Windows ones
4312     wxPoint pt = GetClientAreaOrigin();
4313     event.m_x = x - pt.x;
4314     event.m_y = y - pt.y;
4315
4316     event.m_shiftDown = (flags & MK_SHIFT) != 0;
4317     event.m_controlDown = (flags & MK_CONTROL) != 0;
4318     event.m_leftDown = (flags & MK_LBUTTON) != 0;
4319     event.m_middleDown = (flags & MK_MBUTTON) != 0;
4320     event.m_rightDown = (flags & MK_RBUTTON) != 0;
4321  //   event.m_altDown = (::GetKeyState(VK_MENU) & 0x80000000) != 0;
4322     // Returns different negative values on WinME and WinNT,
4323     // so simply test for negative value.
4324     event.m_altDown = ::GetKeyState(VK_MENU) < 0;
4325
4326 #ifndef __WXWINCE__
4327     event.SetTimestamp(::GetMessageTime());
4328 #endif
4329
4330     event.m_eventObject = this;
4331     event.SetId(GetId());
4332
4333 #if wxUSE_MOUSEEVENT_HACK
4334     m_lastMouseX = x;
4335     m_lastMouseY = y;
4336     m_lastMouseEvent = event.GetEventType();
4337 #endif // wxUSE_MOUSEEVENT_HACK
4338 }
4339
4340 // Windows doesn't send the mouse events to the static controls (which are
4341 // transparent in the sense that their WM_NCHITTEST handler returns
4342 // HTTRANSPARENT) at all but we want all controls to receive the mouse events
4343 // and so we manually check if we don't have a child window under mouse and if
4344 // we do, send the event to it instead of the window Windows had sent WM_XXX
4345 // to.
4346 //
4347 // Notice that this is not done for the mouse move events because this could
4348 // (would?) be too slow, but only for clicks which means that the static texts
4349 // still don't get move, enter nor leave events.
4350 static wxWindowMSW *FindWindowForMouseEvent(wxWindowMSW *win, int *x, int *y) //TW:REQ:Univ
4351 {
4352     wxCHECK_MSG( x && y, win, _T("NULL pointer in FindWindowForMouseEvent") );
4353
4354     // first try to find a non transparent child: this allows us to send events
4355     // to a static text which is inside a static box, for example
4356     POINT pt = { *x, *y };
4357     HWND hwnd = GetHwndOf(win),
4358          hwndUnderMouse;
4359
4360 #ifdef __WXWINCE__
4361     hwndUnderMouse = ::ChildWindowFromPoint
4362                        (
4363                         hwnd,
4364                         pt
4365                        );
4366 #else
4367     hwndUnderMouse = ::ChildWindowFromPointEx
4368                        (
4369                         hwnd,
4370                         pt,
4371                         CWP_SKIPINVISIBLE   |
4372                         CWP_SKIPDISABLED    |
4373                         CWP_SKIPTRANSPARENT
4374                        );
4375 #endif
4376
4377     if ( !hwndUnderMouse || hwndUnderMouse == hwnd )
4378     {
4379         // now try any child window at all
4380         hwndUnderMouse = ::ChildWindowFromPoint(hwnd, pt);
4381     }
4382
4383     // check that we have a child window which is susceptible to receive mouse
4384     // events: for this it must be shown and enabled
4385     if ( hwndUnderMouse &&
4386             hwndUnderMouse != hwnd &&
4387                 ::IsWindowVisible(hwndUnderMouse) &&
4388                     ::IsWindowEnabled(hwndUnderMouse) )
4389     {
4390         wxWindow *winUnderMouse = wxFindWinFromHandle((WXHWND)hwndUnderMouse);
4391         if ( winUnderMouse )
4392         {
4393             // translate the mouse coords to the other window coords
4394             win->ClientToScreen(x, y);
4395             winUnderMouse->ScreenToClient(x, y);
4396
4397             win = winUnderMouse;
4398         }
4399     }
4400
4401     return win;
4402 }
4403
4404 bool wxWindowMSW::HandleMouseEvent(WXUINT msg, int x, int y, WXUINT flags)
4405 {
4406     // the mouse events take consecutive IDs from WM_MOUSEFIRST to
4407     // WM_MOUSELAST, so it's enough to subtract WM_MOUSEMOVE == WM_MOUSEFIRST
4408     // from the message id and take the value in the table to get wxWin event
4409     // id
4410     static const wxEventType eventsMouse[] =
4411     {
4412         wxEVT_MOTION,
4413         wxEVT_LEFT_DOWN,
4414         wxEVT_LEFT_UP,
4415         wxEVT_LEFT_DCLICK,
4416         wxEVT_RIGHT_DOWN,
4417         wxEVT_RIGHT_UP,
4418         wxEVT_RIGHT_DCLICK,
4419         wxEVT_MIDDLE_DOWN,
4420         wxEVT_MIDDLE_UP,
4421         wxEVT_MIDDLE_DCLICK
4422     };
4423
4424     wxMouseEvent event(eventsMouse[msg - WM_MOUSEMOVE]);
4425     InitMouseEvent(event, x, y, flags);
4426
4427     return GetEventHandler()->ProcessEvent(event);
4428 }
4429
4430 bool wxWindowMSW::HandleMouseMove(int x, int y, WXUINT flags)
4431 {
4432     if ( !m_mouseInWindow )
4433     {
4434         // it would be wrong to assume that just because we get a mouse move
4435         // event that the mouse is inside the window: although this is usually
4436         // true, it is not if we had captured the mouse, so we need to check
4437         // the mouse coordinates here
4438         if ( !HasCapture() || IsMouseInWindow() )
4439         {
4440             // Generate an ENTER event
4441             m_mouseInWindow = true;
4442 #if _WIN32_WINNT >= 0x0400
4443 #ifndef __WXWINCE__
4444             TRACKMOUSEEVENT trackinfo;
4445
4446             trackinfo.cbSize = sizeof(trackinfo);
4447             trackinfo.dwFlags = TME_LEAVE;
4448             trackinfo.hwndTrack = GetHwnd();
4449             //Use the commctrl.h _TrackMouseEvent, which will call the
4450             // appropriate TrackMouseEvent or emulate it ( win95 )
4451             // else we need _WIN32_WINNT >= 0x0400
4452             _TrackMouseEvent(&trackinfo);
4453 #endif
4454 #endif
4455             wxMouseEvent event(wxEVT_ENTER_WINDOW);
4456             InitMouseEvent(event, x, y, flags);
4457
4458             (void)GetEventHandler()->ProcessEvent(event);
4459         }
4460     }
4461
4462 #if wxUSE_MOUSEEVENT_HACK
4463     // Window gets a click down message followed by a mouse move message even
4464     // if position isn't changed!  We want to discard the trailing move event
4465     // if x and y are the same.
4466     if ( (m_lastMouseEvent == wxEVT_RIGHT_DOWN ||
4467           m_lastMouseEvent == wxEVT_LEFT_DOWN ||
4468           m_lastMouseEvent == wxEVT_MIDDLE_DOWN) &&
4469          (m_lastMouseX == x && m_lastMouseY == y) )
4470     {
4471         m_lastMouseEvent = wxEVT_MOTION;
4472
4473         return false;
4474     }
4475 #endif // wxUSE_MOUSEEVENT_HACK
4476
4477     return HandleMouseEvent(WM_MOUSEMOVE, x, y, flags);
4478 }
4479
4480
4481 bool wxWindowMSW::HandleMouseWheel(WXWPARAM wParam, WXLPARAM lParam)
4482 {
4483 #if wxUSE_MOUSEWHEEL
4484     wxMouseEvent event(wxEVT_MOUSEWHEEL);
4485     InitMouseEvent(event,
4486                    GET_X_LPARAM(lParam),
4487                    GET_Y_LPARAM(lParam),
4488                    LOWORD(wParam));
4489     event.m_wheelRotation = (short)HIWORD(wParam);
4490     event.m_wheelDelta = WHEEL_DELTA;
4491
4492     static int s_linesPerRotation = -1;
4493     if ( s_linesPerRotation == -1 )
4494     {
4495         if ( !::SystemParametersInfo(SPI_GETWHEELSCROLLLINES, 0,
4496                                      &s_linesPerRotation, 0))
4497         {
4498             // this is not supposed to happen
4499             wxLogLastError(_T("SystemParametersInfo(GETWHEELSCROLLLINES)"));
4500
4501             // the default is 3, so use it if SystemParametersInfo() failed
4502             s_linesPerRotation = 3;
4503         }
4504     }
4505
4506     event.m_linesPerAction = s_linesPerRotation;
4507     return GetEventHandler()->ProcessEvent(event);
4508
4509 #else
4510     (void) wParam;
4511     (void) lParam;
4512
4513     return false;
4514 #endif
4515 }
4516
4517
4518 // ---------------------------------------------------------------------------
4519 // keyboard handling
4520 // ---------------------------------------------------------------------------
4521
4522 // create the key event of the given type for the given key - used by
4523 // HandleChar and HandleKeyDown/Up
4524 wxKeyEvent wxWindowMSW::CreateKeyEvent(wxEventType evType,
4525                                        int id,
4526                                        WXLPARAM lParam,
4527                                        WXWPARAM wParam) const
4528 {
4529     wxKeyEvent event(evType);
4530     event.SetId(GetId());
4531     event.m_shiftDown = wxIsShiftDown();
4532     event.m_controlDown = wxIsCtrlDown();
4533     event.m_altDown = (HIWORD(lParam) & KF_ALTDOWN) == KF_ALTDOWN;
4534
4535     event.m_eventObject = (wxWindow *)this; // const_cast
4536     event.m_keyCode = id;
4537 #if wxUSE_UNICODE
4538     event.m_uniChar = (wxChar) wParam;
4539 #endif
4540     event.m_rawCode = (wxUint32) wParam;
4541     event.m_rawFlags = (wxUint32) lParam;
4542 #ifndef __WXWINCE__
4543     event.SetTimestamp(::GetMessageTime());
4544 #endif
4545
4546     // translate the position to client coords
4547     POINT pt;
4548     GetCursorPos(&pt);
4549     RECT rect;
4550     GetWindowRect(GetHwnd(),&rect);
4551     pt.x -= rect.left;
4552     pt.y -= rect.top;
4553
4554     event.m_x = pt.x;
4555     event.m_y = pt.y;
4556
4557     return event;
4558 }
4559
4560 // isASCII is true only when we're called from WM_CHAR handler and not from
4561 // WM_KEYDOWN one
4562 bool wxWindowMSW::HandleChar(WXWPARAM wParam, WXLPARAM lParam, bool isASCII)
4563 {
4564     int id;
4565     if ( isASCII )
4566     {
4567         // If 1 -> 26, translate to either special keycode or just set
4568         // ctrlDown.  IOW, Ctrl-C should result in keycode == 3 and
4569         // ControlDown() == true.
4570         id = wParam;
4571         if ( (id > 0) && (id < 27) )
4572         {
4573             switch (id)
4574             {
4575                 case 13:
4576                     id = WXK_RETURN;
4577                     break;
4578
4579                 case 8:
4580                     id = WXK_BACK;
4581                     break;
4582
4583                 case 9:
4584                     id = WXK_TAB;
4585                     break;
4586
4587                 default:
4588                     //ctrlDown = true;
4589                     break;
4590             }
4591         }
4592     }
4593     else // we're called from WM_KEYDOWN
4594     {
4595         id = wxCharCodeMSWToWX(wParam, lParam);
4596         if ( id == 0 )
4597         {
4598             // it's ASCII and will be processed here only when called from
4599             // WM_CHAR (i.e. when isASCII = true), don't process it now
4600             return false;
4601         }
4602     }
4603
4604     wxKeyEvent event(CreateKeyEvent(wxEVT_CHAR, id, lParam, wParam));
4605
4606     // the alphanumeric keys produced by pressing AltGr+something on European
4607     // keyboards have both Ctrl and Alt modifiers which may confuse the user
4608     // code as, normally, keys with Ctrl and/or Alt don't result in anything
4609     // alphanumeric, so pretend that there are no modifiers at all (the
4610     // KEY_DOWN event would still have the correct modifiers if they're really
4611     // needed)
4612     if ( event.m_controlDown && event.m_altDown &&
4613             (id >= 32 && id < 256) )
4614     {
4615         event.m_controlDown =
4616         event.m_altDown = false;
4617     }
4618
4619     return GetEventHandler()->ProcessEvent(event);
4620 }
4621
4622 bool wxWindowMSW::HandleKeyDown(WXWPARAM wParam, WXLPARAM lParam)
4623 {
4624     int id = wxCharCodeMSWToWX(wParam, lParam);
4625
4626     if ( !id )
4627     {
4628         // normal ASCII char
4629         id = wParam;
4630     }
4631
4632     if ( id != -1 ) // VZ: does this ever happen (FIXME)?
4633     {
4634         wxKeyEvent event(CreateKeyEvent(wxEVT_KEY_DOWN, id, lParam, wParam));
4635         if ( GetEventHandler()->ProcessEvent(event) )
4636         {
4637             return true;
4638         }
4639     }
4640
4641     return false;
4642 }
4643
4644 bool wxWindowMSW::HandleKeyUp(WXWPARAM wParam, WXLPARAM lParam)
4645 {
4646     int id = wxCharCodeMSWToWX(wParam, lParam);
4647
4648     if ( !id )
4649     {
4650         // normal ASCII char
4651         id = wParam;
4652     }
4653
4654     if ( id != -1 ) // VZ: does this ever happen (FIXME)?
4655     {
4656         wxKeyEvent event(CreateKeyEvent(wxEVT_KEY_UP, id, lParam, wParam));
4657         if ( GetEventHandler()->ProcessEvent(event) )
4658             return true;
4659     }
4660
4661     return false;
4662 }
4663
4664 int wxWindowMSW::HandleMenuChar(int chAccel, WXLPARAM lParam)
4665 {
4666     // FIXME: implement GetMenuItemCount for WinCE, possibly
4667     // in terms of GetMenuItemInfo
4668 #ifndef __WXWINCE__
4669     const HMENU hmenu = (HMENU)lParam;
4670
4671     MENUITEMINFO mii;
4672     wxZeroMemory(mii);
4673     mii.cbSize = sizeof(MENUITEMINFO);
4674     mii.fMask = MIIM_TYPE | MIIM_DATA;
4675
4676     // find if we have this letter in any owner drawn item
4677     const int count = ::GetMenuItemCount(hmenu);
4678     for ( int i = 0; i < count; i++ )
4679     {
4680         if ( ::GetMenuItemInfo(hmenu, i, TRUE, &mii) )
4681         {
4682             if ( mii.fType == MFT_OWNERDRAW )
4683             {
4684                 //  dwItemData member of the MENUITEMINFO is a
4685                 //  pointer to the associated wxMenuItem -- see the
4686                 //  menu creation code
4687                 wxMenuItem *item = (wxMenuItem*)mii.dwItemData;
4688
4689                 const wxChar *p = wxStrchr(item->GetText(), _T('&'));
4690                 while ( p++ )
4691                 {
4692                     if ( *p == _T('&') )
4693                     {
4694                         // this is not the accel char, find the real one
4695                         p = wxStrchr(p + 1, _T('&'));
4696                     }
4697                     else // got the accel char
4698                     {
4699                         // FIXME-UNICODE: this comparison doesn't risk to work
4700                         // for non ASCII accelerator characters I'm afraid, but
4701                         // what can we do?
4702                         if ( (wchar_t)wxToupper(*p) == (wchar_t)chAccel )
4703                         {
4704                             return i;
4705                         }
4706                         else
4707                         {
4708                             // this one doesn't match
4709                             break;
4710                         }
4711                     }
4712                 }
4713             }
4714         }
4715         else // failed to get the menu text?
4716         {
4717             // it's not fatal, so don't show error, but still log
4718             // it
4719             wxLogLastError(_T("GetMenuItemInfo"));
4720         }
4721     }
4722 #else
4723     wxUnusedVar(chAccel);
4724     wxUnusedVar(lParam);
4725 #endif
4726     return wxNOT_FOUND;
4727 }
4728
4729 // ---------------------------------------------------------------------------
4730 // joystick
4731 // ---------------------------------------------------------------------------
4732
4733 bool wxWindowMSW::HandleJoystickEvent(WXUINT msg, int x, int y, WXUINT flags)
4734 {
4735 #ifdef JOY_BUTTON1
4736     int change = 0;
4737     if ( flags & JOY_BUTTON1CHG )
4738         change = wxJOY_BUTTON1;
4739     if ( flags & JOY_BUTTON2CHG )
4740         change = wxJOY_BUTTON2;
4741     if ( flags & JOY_BUTTON3CHG )
4742         change = wxJOY_BUTTON3;
4743     if ( flags & JOY_BUTTON4CHG )
4744         change = wxJOY_BUTTON4;
4745
4746     int buttons = 0;
4747     if ( flags & JOY_BUTTON1 )
4748         buttons |= wxJOY_BUTTON1;
4749     if ( flags & JOY_BUTTON2 )
4750         buttons |= wxJOY_BUTTON2;
4751     if ( flags & JOY_BUTTON3 )
4752         buttons |= wxJOY_BUTTON3;
4753     if ( flags & JOY_BUTTON4 )
4754         buttons |= wxJOY_BUTTON4;
4755
4756     // the event ids aren't consecutive so we can't use table based lookup
4757     int joystick;
4758     wxEventType eventType;
4759     switch ( msg )
4760     {
4761         case MM_JOY1MOVE:
4762             joystick = 1;
4763             eventType = wxEVT_JOY_MOVE;
4764             break;
4765
4766         case MM_JOY2MOVE:
4767             joystick = 2;
4768             eventType = wxEVT_JOY_MOVE;
4769             break;
4770
4771         case MM_JOY1ZMOVE:
4772             joystick = 1;
4773             eventType = wxEVT_JOY_ZMOVE;
4774             break;
4775
4776         case MM_JOY2ZMOVE:
4777             joystick = 2;
4778             eventType = wxEVT_JOY_ZMOVE;
4779             break;
4780
4781         case MM_JOY1BUTTONDOWN:
4782             joystick = 1;
4783             eventType = wxEVT_JOY_BUTTON_DOWN;
4784             break;
4785
4786         case MM_JOY2BUTTONDOWN:
4787             joystick = 2;
4788             eventType = wxEVT_JOY_BUTTON_DOWN;
4789             break;
4790
4791         case MM_JOY1BUTTONUP:
4792             joystick = 1;
4793             eventType = wxEVT_JOY_BUTTON_UP;
4794             break;
4795
4796         case MM_JOY2BUTTONUP:
4797             joystick = 2;
4798             eventType = wxEVT_JOY_BUTTON_UP;
4799             break;
4800
4801         default:
4802             wxFAIL_MSG(wxT("no such joystick event"));
4803
4804             return false;
4805     }
4806
4807     wxJoystickEvent event(eventType, buttons, joystick, change);
4808     event.SetPosition(wxPoint(x, y));
4809     event.SetEventObject(this);
4810
4811     return GetEventHandler()->ProcessEvent(event);
4812 #else
4813     wxUnusedVar(msg);
4814     wxUnusedVar(x);
4815     wxUnusedVar(y);
4816     wxUnusedVar(flags);
4817     return false;
4818 #endif
4819 }
4820
4821 // ---------------------------------------------------------------------------
4822 // scrolling
4823 // ---------------------------------------------------------------------------
4824
4825 bool wxWindowMSW::MSWOnScroll(int orientation, WXWORD wParam,
4826                               WXWORD pos, WXHWND control)
4827 {
4828     if ( control && control != m_hWnd ) // Prevent infinite recursion
4829     {
4830         wxWindow *child = wxFindWinFromHandle(control);
4831         if ( child )
4832             return child->MSWOnScroll(orientation, wParam, pos, control);
4833     }
4834
4835     wxScrollWinEvent event;
4836     event.SetPosition(pos);
4837     event.SetOrientation(orientation);
4838     event.m_eventObject = this;
4839
4840     switch ( wParam )
4841     {
4842     case SB_TOP:
4843         event.m_eventType = wxEVT_SCROLLWIN_TOP;
4844         break;
4845
4846     case SB_BOTTOM:
4847         event.m_eventType = wxEVT_SCROLLWIN_BOTTOM;
4848         break;
4849
4850     case SB_LINEUP:
4851         event.m_eventType = wxEVT_SCROLLWIN_LINEUP;
4852         break;
4853
4854     case SB_LINEDOWN:
4855         event.m_eventType = wxEVT_SCROLLWIN_LINEDOWN;
4856         break;
4857
4858     case SB_PAGEUP:
4859         event.m_eventType = wxEVT_SCROLLWIN_PAGEUP;
4860         break;
4861
4862     case SB_PAGEDOWN:
4863         event.m_eventType = wxEVT_SCROLLWIN_PAGEDOWN;
4864         break;
4865
4866     case SB_THUMBPOSITION:
4867     case SB_THUMBTRACK:
4868         // under Win32, the scrollbar range and position are 32 bit integers,
4869         // but WM_[HV]SCROLL only carry the low 16 bits of them, so we must
4870         // explicitly query the scrollbar for the correct position (this must
4871         // be done only for these two SB_ events as they are the only one
4872         // carrying the scrollbar position)
4873         {
4874             WinStruct<SCROLLINFO> scrollInfo;
4875             scrollInfo.fMask = SIF_TRACKPOS;
4876
4877             if ( !::GetScrollInfo(GetHwnd(),
4878                                   orientation == wxHORIZONTAL ? SB_HORZ
4879                                                               : SB_VERT,
4880                                   &scrollInfo) )
4881             {
4882                 // Not neccessarily an error, if there are no scrollbars yet.
4883                 // wxLogLastError(_T("GetScrollInfo"));
4884             }
4885
4886             event.SetPosition(scrollInfo.nTrackPos);
4887         }
4888
4889         event.m_eventType = wParam == SB_THUMBPOSITION
4890                                 ? wxEVT_SCROLLWIN_THUMBRELEASE
4891                                 : wxEVT_SCROLLWIN_THUMBTRACK;
4892         break;
4893
4894     default:
4895         return false;
4896     }
4897
4898     return GetEventHandler()->ProcessEvent(event);
4899 }
4900
4901 // ===========================================================================
4902 // global functions
4903 // ===========================================================================
4904
4905 void wxGetCharSize(WXHWND wnd, int *x, int *y, const wxFont& the_font)
4906 {
4907     TEXTMETRIC tm;
4908     HDC dc = ::GetDC((HWND) wnd);
4909     HFONT was = 0;
4910
4911     //    the_font.UseResource();
4912     //    the_font.RealizeResource();
4913     HFONT fnt = (HFONT)the_font.GetResourceHandle(); // const_cast
4914     if ( fnt )
4915         was = (HFONT) SelectObject(dc,fnt);
4916
4917     GetTextMetrics(dc, &tm);
4918     if ( fnt && was )
4919     {
4920         SelectObject(dc,was);
4921     }
4922     ReleaseDC((HWND)wnd, dc);
4923
4924     if ( x )
4925         *x = tm.tmAveCharWidth;
4926     if ( y )
4927         *y = tm.tmHeight + tm.tmExternalLeading;
4928
4929     //   the_font.ReleaseResource();
4930 }
4931
4932 // Returns 0 if was a normal ASCII value, not a special key. This indicates that
4933 // the key should be ignored by WM_KEYDOWN and processed by WM_CHAR instead.
4934 int wxCharCodeMSWToWX(int keySym, WXLPARAM lParam)
4935 {
4936     int id;
4937     switch (keySym)
4938     {
4939         case VK_CANCEL:     id = WXK_CANCEL; break;
4940         case VK_BACK:       id = WXK_BACK; break;
4941         case VK_TAB:        id = WXK_TAB; break;
4942         case VK_CLEAR:      id = WXK_CLEAR; break;
4943         case VK_SHIFT:      id = WXK_SHIFT; break;
4944         case VK_CONTROL:    id = WXK_CONTROL; break;
4945         case VK_MENU :      id = WXK_MENU; break;
4946         case VK_PAUSE:      id = WXK_PAUSE; break;
4947         case VK_CAPITAL:    id = WXK_CAPITAL; break;
4948         case VK_SPACE:      id = WXK_SPACE; break;
4949         case VK_ESCAPE:     id = WXK_ESCAPE; break;
4950         case VK_PRIOR:      id = WXK_PRIOR; break;
4951         case VK_NEXT :      id = WXK_NEXT; break;
4952         case VK_END:        id = WXK_END; break;
4953         case VK_HOME :      id = WXK_HOME; break;
4954         case VK_LEFT :      id = WXK_LEFT; break;
4955         case VK_UP:         id = WXK_UP; break;
4956         case VK_RIGHT:      id = WXK_RIGHT; break;
4957         case VK_DOWN :      id = WXK_DOWN; break;
4958         case VK_SELECT:     id = WXK_SELECT; break;
4959         case VK_PRINT:      id = WXK_PRINT; break;
4960         case VK_EXECUTE:    id = WXK_EXECUTE; break;
4961         case VK_INSERT:     id = WXK_INSERT; break;
4962         case VK_DELETE:     id = WXK_DELETE; break;
4963         case VK_HELP :      id = WXK_HELP; break;
4964         case VK_NUMPAD0:    id = WXK_NUMPAD0; break;
4965         case VK_NUMPAD1:    id = WXK_NUMPAD1; break;
4966         case VK_NUMPAD2:    id = WXK_NUMPAD2; break;
4967         case VK_NUMPAD3:    id = WXK_NUMPAD3; break;
4968         case VK_NUMPAD4:    id = WXK_NUMPAD4; break;
4969         case VK_NUMPAD5:    id = WXK_NUMPAD5; break;
4970         case VK_NUMPAD6:    id = WXK_NUMPAD6; break;
4971         case VK_NUMPAD7:    id = WXK_NUMPAD7; break;
4972         case VK_NUMPAD8:    id = WXK_NUMPAD8; break;
4973         case VK_NUMPAD9:    id = WXK_NUMPAD9; break;
4974         case VK_MULTIPLY:   id = WXK_NUMPAD_MULTIPLY; break;
4975         case VK_ADD:        id = WXK_NUMPAD_ADD; break;
4976         case VK_SUBTRACT:   id = WXK_NUMPAD_SUBTRACT; break;
4977         case VK_DECIMAL:    id = WXK_NUMPAD_DECIMAL; break;
4978         case VK_DIVIDE:     id = WXK_NUMPAD_DIVIDE; break;
4979         case VK_F1:         id = WXK_F1; break;
4980         case VK_F2:         id = WXK_F2; break;
4981         case VK_F3:         id = WXK_F3; break;
4982         case VK_F4:         id = WXK_F4; break;
4983         case VK_F5:         id = WXK_F5; break;
4984         case VK_F6:         id = WXK_F6; break;
4985         case VK_F7:         id = WXK_F7; break;
4986         case VK_F8:         id = WXK_F8; break;
4987         case VK_F9:         id = WXK_F9; break;
4988         case VK_F10:        id = WXK_F10; break;
4989         case VK_F11:        id = WXK_F11; break;
4990         case VK_F12:        id = WXK_F12; break;
4991         case VK_F13:        id = WXK_F13; break;
4992         case VK_F14:        id = WXK_F14; break;
4993         case VK_F15:        id = WXK_F15; break;
4994         case VK_F16:        id = WXK_F16; break;
4995         case VK_F17:        id = WXK_F17; break;
4996         case VK_F18:        id = WXK_F18; break;
4997         case VK_F19:        id = WXK_F19; break;
4998         case VK_F20:        id = WXK_F20; break;
4999         case VK_F21:        id = WXK_F21; break;
5000         case VK_F22:        id = WXK_F22; break;
5001         case VK_F23:        id = WXK_F23; break;
5002         case VK_F24:        id = WXK_F24; break;
5003         case VK_NUMLOCK:    id = WXK_NUMLOCK; break;
5004         case VK_SCROLL:     id = WXK_SCROLL; break;
5005
5006         case VK_OEM_1:      id = ';'; break;
5007         case VK_OEM_PLUS:   id = '+'; break;
5008         case VK_OEM_COMMA:  id = ','; break;
5009         case VK_OEM_MINUS:  id = '-'; break;
5010         case VK_OEM_PERIOD: id = '.'; break;
5011         case VK_OEM_2:      id = '/'; break;
5012         case VK_OEM_3:      id = '~'; break;
5013         case VK_OEM_4:      id = '['; break;
5014         case VK_OEM_5:      id = '\\'; break;
5015         case VK_OEM_6:      id = ']'; break;
5016         case VK_OEM_7:      id = '\''; break;
5017
5018 #ifdef VK_APPS
5019         case VK_LWIN:       id = WXK_WINDOWS_LEFT; break;
5020         case VK_RWIN:       id = WXK_WINDOWS_RIGHT; break;
5021         case VK_APPS:       id = WXK_WINDOWS_MENU; break;
5022 #endif // VK_APPS defined
5023
5024         case VK_RETURN:
5025             // the same key is sent for both the "return" key on the main
5026             // keyboard and the numeric keypad but we want to distinguish
5027             // between them: we do this using the "extended" bit (24) of lParam
5028             id = lParam & (1 << 24) ? WXK_NUMPAD_ENTER : WXK_RETURN;
5029             break;
5030
5031         default:
5032             id = 0;
5033     }
5034
5035     return id;
5036 }
5037
5038 WXWORD wxCharCodeWXToMSW(int id, bool *isVirtual)
5039 {
5040     *isVirtual = true;
5041     WXWORD keySym;
5042     switch (id)
5043     {
5044     case WXK_CANCEL:    keySym = VK_CANCEL; break;
5045     case WXK_CLEAR:     keySym = VK_CLEAR; break;
5046     case WXK_SHIFT:     keySym = VK_SHIFT; break;
5047     case WXK_CONTROL:   keySym = VK_CONTROL; break;
5048     case WXK_ALT:       keySym = VK_MENU; break;
5049     case WXK_MENU :     keySym = VK_MENU; break;
5050     case WXK_PAUSE:     keySym = VK_PAUSE; break;
5051     case WXK_CAPITAL:   keySym = VK_CAPITAL; break;
5052     case WXK_PRIOR:     keySym = VK_PRIOR; break;
5053     case WXK_NEXT :     keySym = VK_NEXT; break;
5054     case WXK_END:       keySym = VK_END; break;
5055     case WXK_HOME :     keySym = VK_HOME; break;
5056     case WXK_LEFT :     keySym = VK_LEFT; break;
5057     case WXK_UP:        keySym = VK_UP; break;
5058     case WXK_RIGHT:     keySym = VK_RIGHT; break;
5059     case WXK_DOWN :     keySym = VK_DOWN; break;
5060     case WXK_SELECT:    keySym = VK_SELECT; break;
5061     case WXK_PRINT:     keySym = VK_PRINT; break;
5062     case WXK_EXECUTE:   keySym = VK_EXECUTE; break;
5063     case WXK_INSERT:    keySym = VK_INSERT; break;
5064     case WXK_DELETE:    keySym = VK_DELETE; break;
5065     case WXK_HELP :     keySym = VK_HELP; break;
5066     case WXK_NUMPAD0:   keySym = VK_NUMPAD0; break;
5067     case WXK_NUMPAD1:   keySym = VK_NUMPAD1; break;
5068     case WXK_NUMPAD2:   keySym = VK_NUMPAD2; break;
5069     case WXK_NUMPAD3:   keySym = VK_NUMPAD3; break;
5070     case WXK_NUMPAD4:   keySym = VK_NUMPAD4; break;
5071     case WXK_NUMPAD5:   keySym = VK_NUMPAD5; break;
5072     case WXK_NUMPAD6:   keySym = VK_NUMPAD6; break;
5073     case WXK_NUMPAD7:   keySym = VK_NUMPAD7; break;
5074     case WXK_NUMPAD8:   keySym = VK_NUMPAD8; break;
5075     case WXK_NUMPAD9:   keySym = VK_NUMPAD9; break;
5076     case WXK_NUMPAD_MULTIPLY:  keySym = VK_MULTIPLY; break;
5077     case WXK_NUMPAD_ADD:       keySym = VK_ADD; break;
5078     case WXK_NUMPAD_SUBTRACT:  keySym = VK_SUBTRACT; break;
5079     case WXK_NUMPAD_DECIMAL:   keySym = VK_DECIMAL; break;
5080     case WXK_NUMPAD_DIVIDE:    keySym = VK_DIVIDE; break;
5081     case WXK_F1:        keySym = VK_F1; break;
5082     case WXK_F2:        keySym = VK_F2; break;
5083     case WXK_F3:        keySym = VK_F3; break;
5084     case WXK_F4:        keySym = VK_F4; break;
5085     case WXK_F5:        keySym = VK_F5; break;
5086     case WXK_F6:        keySym = VK_F6; break;
5087     case WXK_F7:        keySym = VK_F7; break;
5088     case WXK_F8:        keySym = VK_F8; break;
5089     case WXK_F9:        keySym = VK_F9; break;
5090     case WXK_F10:       keySym = VK_F10; break;
5091     case WXK_F11:       keySym = VK_F11; break;
5092     case WXK_F12:       keySym = VK_F12; break;
5093     case WXK_F13:       keySym = VK_F13; break;
5094     case WXK_F14:       keySym = VK_F14; break;
5095     case WXK_F15:       keySym = VK_F15; break;
5096     case WXK_F16:       keySym = VK_F16; break;
5097     case WXK_F17:       keySym = VK_F17; break;
5098     case WXK_F18:       keySym = VK_F18; break;
5099     case WXK_F19:       keySym = VK_F19; break;
5100     case WXK_F20:       keySym = VK_F20; break;
5101     case WXK_F21:       keySym = VK_F21; break;
5102     case WXK_F22:       keySym = VK_F22; break;
5103     case WXK_F23:       keySym = VK_F23; break;
5104     case WXK_F24:       keySym = VK_F24; break;
5105     case WXK_NUMLOCK:   keySym = VK_NUMLOCK; break;
5106     case WXK_SCROLL:    keySym = VK_SCROLL; break;
5107     default:
5108         {
5109             *isVirtual = false;
5110             keySym = (WORD)id;
5111             break;
5112         }
5113     }
5114     return keySym;
5115 }
5116
5117 bool wxGetKeyState(wxKeyCode key)
5118 {
5119     bool bVirtual;
5120
5121 //High order with GetAsyncKeyState only available on WIN32
5122 #ifdef __WIN32__
5123     //If the requested key is a LED key, return
5124     //true if the led is pressed
5125     if (key == WXK_NUMLOCK ||
5126         key == WXK_CAPITAL ||
5127         key == WXK_SCROLL)
5128     {
5129 #endif
5130         //low order bit means LED is highlighted,
5131         //high order means key is down
5132         //Here, for compat with other ports we want both
5133         return GetKeyState( wxCharCodeWXToMSW(key, &bVirtual) ) != 0;
5134
5135 #ifdef __WIN32__
5136     }
5137     else
5138     {
5139         //normal key
5140         //low order bit means key pressed since last call
5141         //high order means key is down
5142         //We want only the high order bit - the key may not be down if only low order
5143         return ( GetAsyncKeyState( wxCharCodeWXToMSW(key, &bVirtual) ) & (1<<15) ) != 0;
5144     }
5145 #endif
5146 }
5147
5148 wxWindow *wxGetActiveWindow()
5149 {
5150     HWND hWnd = GetActiveWindow();
5151     if ( hWnd != 0 )
5152     {
5153         return wxFindWinFromHandle((WXHWND) hWnd);
5154     }
5155     return NULL;
5156 }
5157
5158 extern wxWindow *wxGetWindowFromHWND(WXHWND hWnd)
5159 {
5160     HWND hwnd = (HWND)hWnd;
5161
5162     // For a radiobutton, we get the radiobox from GWL_USERDATA (which is set
5163     // by code in msw/radiobox.cpp), for all the others we just search up the
5164     // window hierarchy
5165     wxWindow *win = (wxWindow *)NULL;
5166     if ( hwnd )
5167     {
5168         win = wxFindWinFromHandle((WXHWND)hwnd);
5169         if ( !win )
5170         {
5171 #if wxUSE_RADIOBOX
5172             // native radiobuttons return DLGC_RADIOBUTTON here and for any
5173             // wxWindow class which overrides WM_GETDLGCODE processing to
5174             // do it as well, win would be already non NULL
5175             if ( ::SendMessage(hwnd, WM_GETDLGCODE, 0, 0) & DLGC_RADIOBUTTON )
5176             {
5177                 win = (wxWindow *)wxGetWindowUserData(hwnd);
5178             }
5179             //else: it's a wxRadioButton, not a radiobutton from wxRadioBox
5180 #endif // wxUSE_RADIOBOX
5181
5182             // spin control text buddy window should be mapped to spin ctrl
5183             // itself so try it too
5184 #if wxUSE_SPINCTRL && !defined(__WXUNIVERSAL__)
5185             if ( !win )
5186             {
5187                 win = wxSpinCtrl::GetSpinForTextCtrl((WXHWND)hwnd);
5188             }
5189 #endif // wxUSE_SPINCTRL
5190         }
5191     }
5192
5193     while ( hwnd && !win )
5194     {
5195         // this is a really ugly hack needed to avoid mistakenly returning the
5196         // parent frame wxWindow for the find/replace modeless dialog HWND -
5197         // this, in turn, is needed to call IsDialogMessage() from
5198         // wxApp::ProcessMessage() as for this we must return NULL from here
5199         //
5200         // FIXME: this is clearly not the best way to do it but I think we'll
5201         //        need to change HWND <-> wxWindow code more heavily than I can
5202         //        do it now to fix it
5203 #ifndef __WXMICROWIN__
5204         if ( ::GetWindow(hwnd, GW_OWNER) )
5205         {
5206             // it's a dialog box, don't go upwards
5207             break;
5208         }
5209 #endif
5210
5211         hwnd = ::GetParent(hwnd);
5212         win = wxFindWinFromHandle((WXHWND)hwnd);
5213     }
5214
5215     return win;
5216 }
5217
5218 #if !defined(__WXMICROWIN__) && !defined(__WXWINCE__)
5219
5220 // Windows keyboard hook. Allows interception of e.g. F1, ESCAPE
5221 // in active frames and dialogs, regardless of where the focus is.
5222 static HHOOK wxTheKeyboardHook = 0;
5223 static FARPROC wxTheKeyboardHookProc = 0;
5224 int APIENTRY _EXPORT
5225 wxKeyboardHook(int nCode, WORD wParam, DWORD lParam);
5226
5227 void wxSetKeyboardHook(bool doIt)
5228 {
5229     if ( doIt )
5230     {
5231         wxTheKeyboardHookProc = MakeProcInstance((FARPROC) wxKeyboardHook, wxGetInstance());
5232         wxTheKeyboardHook = SetWindowsHookEx(WH_KEYBOARD, (HOOKPROC) wxTheKeyboardHookProc, wxGetInstance(),
5233
5234             GetCurrentThreadId()
5235         //      (DWORD)GetCurrentProcess()); // This is another possibility. Which is right?
5236             );
5237     }
5238     else
5239     {
5240         UnhookWindowsHookEx(wxTheKeyboardHook);
5241     }
5242 }
5243
5244 int APIENTRY _EXPORT
5245 wxKeyboardHook(int nCode, WORD wParam, DWORD lParam)
5246 {
5247     DWORD hiWord = HIWORD(lParam);
5248     if ( nCode != HC_NOREMOVE && ((hiWord & KF_UP) == 0) )
5249     {
5250         int id = wxCharCodeMSWToWX(wParam, lParam);
5251         if ( id != 0 )
5252         {
5253             wxKeyEvent event(wxEVT_CHAR_HOOK);
5254             if ( (HIWORD(lParam) & KF_ALTDOWN) == KF_ALTDOWN )
5255                 event.m_altDown = true;
5256
5257             event.m_eventObject = NULL;
5258             event.m_keyCode = id;
5259             event.m_shiftDown = wxIsShiftDown();
5260             event.m_controlDown = wxIsCtrlDown();
5261 #ifndef __WXWINCE__
5262             event.SetTimestamp(::GetMessageTime());
5263 #endif
5264             wxWindow *win = wxGetActiveWindow();
5265             wxEvtHandler *handler;
5266             if ( win )
5267             {
5268                 handler = win->GetEventHandler();
5269                 event.SetId(win->GetId());
5270             }
5271             else
5272             {
5273                 handler = wxTheApp;
5274                 event.SetId(wxID_ANY);
5275             }
5276
5277             if ( handler && handler->ProcessEvent(event) )
5278             {
5279                 // processed
5280                 return 1;
5281             }
5282         }
5283     }
5284
5285     return (int)CallNextHookEx(wxTheKeyboardHook, nCode, wParam, lParam);
5286 }
5287
5288 #endif // !__WXMICROWIN__
5289
5290 #ifdef __WXDEBUG__
5291 const char *wxGetMessageName(int message)
5292 {
5293     switch ( message )
5294     {
5295         case 0x0000: return "WM_NULL";
5296         case 0x0001: return "WM_CREATE";
5297         case 0x0002: return "WM_DESTROY";
5298         case 0x0003: return "WM_MOVE";
5299         case 0x0005: return "WM_SIZE";
5300         case 0x0006: return "WM_ACTIVATE";
5301         case 0x0007: return "WM_SETFOCUS";
5302         case 0x0008: return "WM_KILLFOCUS";
5303         case 0x000A: return "WM_ENABLE";
5304         case 0x000B: return "WM_SETREDRAW";
5305         case 0x000C: return "WM_SETTEXT";
5306         case 0x000D: return "WM_GETTEXT";
5307         case 0x000E: return "WM_GETTEXTLENGTH";
5308         case 0x000F: return "WM_PAINT";
5309         case 0x0010: return "WM_CLOSE";
5310         case 0x0011: return "WM_QUERYENDSESSION";
5311         case 0x0012: return "WM_QUIT";
5312         case 0x0013: return "WM_QUERYOPEN";
5313         case 0x0014: return "WM_ERASEBKGND";
5314         case 0x0015: return "WM_SYSCOLORCHANGE";
5315         case 0x0016: return "WM_ENDSESSION";
5316         case 0x0017: return "WM_SYSTEMERROR";
5317         case 0x0018: return "WM_SHOWWINDOW";
5318         case 0x0019: return "WM_CTLCOLOR";
5319         case 0x001A: return "WM_WININICHANGE";
5320         case 0x001B: return "WM_DEVMODECHANGE";
5321         case 0x001C: return "WM_ACTIVATEAPP";
5322         case 0x001D: return "WM_FONTCHANGE";
5323         case 0x001E: return "WM_TIMECHANGE";
5324         case 0x001F: return "WM_CANCELMODE";
5325         case 0x0020: return "WM_SETCURSOR";
5326         case 0x0021: return "WM_MOUSEACTIVATE";
5327         case 0x0022: return "WM_CHILDACTIVATE";
5328         case 0x0023: return "WM_QUEUESYNC";
5329         case 0x0024: return "WM_GETMINMAXINFO";
5330         case 0x0026: return "WM_PAINTICON";
5331         case 0x0027: return "WM_ICONERASEBKGND";
5332         case 0x0028: return "WM_NEXTDLGCTL";
5333         case 0x002A: return "WM_SPOOLERSTATUS";
5334         case 0x002B: return "WM_DRAWITEM";
5335         case 0x002C: return "WM_MEASUREITEM";
5336         case 0x002D: return "WM_DELETEITEM";
5337         case 0x002E: return "WM_VKEYTOITEM";
5338         case 0x002F: return "WM_CHARTOITEM";
5339         case 0x0030: return "WM_SETFONT";
5340         case 0x0031: return "WM_GETFONT";
5341         case 0x0037: return "WM_QUERYDRAGICON";
5342         case 0x0039: return "WM_COMPAREITEM";
5343         case 0x0041: return "WM_COMPACTING";
5344         case 0x0044: return "WM_COMMNOTIFY";
5345         case 0x0046: return "WM_WINDOWPOSCHANGING";
5346         case 0x0047: return "WM_WINDOWPOSCHANGED";
5347         case 0x0048: return "WM_POWER";
5348
5349         case 0x004A: return "WM_COPYDATA";
5350         case 0x004B: return "WM_CANCELJOURNAL";
5351         case 0x004E: return "WM_NOTIFY";
5352         case 0x0050: return "WM_INPUTLANGCHANGEREQUEST";
5353         case 0x0051: return "WM_INPUTLANGCHANGE";
5354         case 0x0052: return "WM_TCARD";
5355         case 0x0053: return "WM_HELP";
5356         case 0x0054: return "WM_USERCHANGED";
5357         case 0x0055: return "WM_NOTIFYFORMAT";
5358         case 0x007B: return "WM_CONTEXTMENU";
5359         case 0x007C: return "WM_STYLECHANGING";
5360         case 0x007D: return "WM_STYLECHANGED";
5361         case 0x007E: return "WM_DISPLAYCHANGE";
5362         case 0x007F: return "WM_GETICON";
5363         case 0x0080: return "WM_SETICON";
5364
5365         case 0x0081: return "WM_NCCREATE";
5366         case 0x0082: return "WM_NCDESTROY";
5367         case 0x0083: return "WM_NCCALCSIZE";
5368         case 0x0084: return "WM_NCHITTEST";
5369         case 0x0085: return "WM_NCPAINT";
5370         case 0x0086: return "WM_NCACTIVATE";
5371         case 0x0087: return "WM_GETDLGCODE";
5372         case 0x00A0: return "WM_NCMOUSEMOVE";
5373         case 0x00A1: return "WM_NCLBUTTONDOWN";
5374         case 0x00A2: return "WM_NCLBUTTONUP";
5375         case 0x00A3: return "WM_NCLBUTTONDBLCLK";
5376         case 0x00A4: return "WM_NCRBUTTONDOWN";
5377         case 0x00A5: return "WM_NCRBUTTONUP";
5378         case 0x00A6: return "WM_NCRBUTTONDBLCLK";
5379         case 0x00A7: return "WM_NCMBUTTONDOWN";
5380         case 0x00A8: return "WM_NCMBUTTONUP";
5381         case 0x00A9: return "WM_NCMBUTTONDBLCLK";
5382         case 0x0100: return "WM_KEYDOWN";
5383         case 0x0101: return "WM_KEYUP";
5384         case 0x0102: return "WM_CHAR";
5385         case 0x0103: return "WM_DEADCHAR";
5386         case 0x0104: return "WM_SYSKEYDOWN";
5387         case 0x0105: return "WM_SYSKEYUP";
5388         case 0x0106: return "WM_SYSCHAR";
5389         case 0x0107: return "WM_SYSDEADCHAR";
5390         case 0x0108: return "WM_KEYLAST";
5391
5392         case 0x010D: return "WM_IME_STARTCOMPOSITION";
5393         case 0x010E: return "WM_IME_ENDCOMPOSITION";
5394         case 0x010F: return "WM_IME_COMPOSITION";
5395
5396         case 0x0110: return "WM_INITDIALOG";
5397         case 0x0111: return "WM_COMMAND";
5398         case 0x0112: return "WM_SYSCOMMAND";
5399         case 0x0113: return "WM_TIMER";
5400         case 0x0114: return "WM_HSCROLL";
5401         case 0x0115: return "WM_VSCROLL";
5402         case 0x0116: return "WM_INITMENU";
5403         case 0x0117: return "WM_INITMENUPOPUP";
5404         case 0x011F: return "WM_MENUSELECT";
5405         case 0x0120: return "WM_MENUCHAR";
5406         case 0x0121: return "WM_ENTERIDLE";
5407         case 0x0200: return "WM_MOUSEMOVE";
5408         case 0x0201: return "WM_LBUTTONDOWN";
5409         case 0x0202: return "WM_LBUTTONUP";
5410         case 0x0203: return "WM_LBUTTONDBLCLK";
5411         case 0x0204: return "WM_RBUTTONDOWN";
5412         case 0x0205: return "WM_RBUTTONUP";
5413         case 0x0206: return "WM_RBUTTONDBLCLK";
5414         case 0x0207: return "WM_MBUTTONDOWN";
5415         case 0x0208: return "WM_MBUTTONUP";
5416         case 0x0209: return "WM_MBUTTONDBLCLK";
5417         case 0x020A: return "WM_MOUSEWHEEL";
5418         case 0x0210: return "WM_PARENTNOTIFY";
5419         case 0x0211: return "WM_ENTERMENULOOP";
5420         case 0x0212: return "WM_EXITMENULOOP";
5421
5422         case 0x0213: return "WM_NEXTMENU";
5423         case 0x0214: return "WM_SIZING";
5424         case 0x0215: return "WM_CAPTURECHANGED";
5425         case 0x0216: return "WM_MOVING";
5426         case 0x0218: return "WM_POWERBROADCAST";
5427         case 0x0219: return "WM_DEVICECHANGE";
5428
5429         case 0x0220: return "WM_MDICREATE";
5430         case 0x0221: return "WM_MDIDESTROY";
5431         case 0x0222: return "WM_MDIACTIVATE";
5432         case 0x0223: return "WM_MDIRESTORE";
5433         case 0x0224: return "WM_MDINEXT";
5434         case 0x0225: return "WM_MDIMAXIMIZE";
5435         case 0x0226: return "WM_MDITILE";
5436         case 0x0227: return "WM_MDICASCADE";
5437         case 0x0228: return "WM_MDIICONARRANGE";
5438         case 0x0229: return "WM_MDIGETACTIVE";
5439         case 0x0230: return "WM_MDISETMENU";
5440         case 0x0233: return "WM_DROPFILES";
5441
5442         case 0x0281: return "WM_IME_SETCONTEXT";
5443         case 0x0282: return "WM_IME_NOTIFY";
5444         case 0x0283: return "WM_IME_CONTROL";
5445         case 0x0284: return "WM_IME_COMPOSITIONFULL";
5446         case 0x0285: return "WM_IME_SELECT";
5447         case 0x0286: return "WM_IME_CHAR";
5448         case 0x0290: return "WM_IME_KEYDOWN";
5449         case 0x0291: return "WM_IME_KEYUP";
5450
5451         case 0x0300: return "WM_CUT";
5452         case 0x0301: return "WM_COPY";
5453         case 0x0302: return "WM_PASTE";
5454         case 0x0303: return "WM_CLEAR";
5455         case 0x0304: return "WM_UNDO";
5456         case 0x0305: return "WM_RENDERFORMAT";
5457         case 0x0306: return "WM_RENDERALLFORMATS";
5458         case 0x0307: return "WM_DESTROYCLIPBOARD";
5459         case 0x0308: return "WM_DRAWCLIPBOARD";
5460         case 0x0309: return "WM_PAINTCLIPBOARD";
5461         case 0x030A: return "WM_VSCROLLCLIPBOARD";
5462         case 0x030B: return "WM_SIZECLIPBOARD";
5463         case 0x030C: return "WM_ASKCBFORMATNAME";
5464         case 0x030D: return "WM_CHANGECBCHAIN";
5465         case 0x030E: return "WM_HSCROLLCLIPBOARD";
5466         case 0x030F: return "WM_QUERYNEWPALETTE";
5467         case 0x0310: return "WM_PALETTEISCHANGING";
5468         case 0x0311: return "WM_PALETTECHANGED";
5469 #if wxUSE_HOTKEY
5470         case 0x0312: return "WM_HOTKEY";
5471 #endif
5472
5473         // common controls messages - although they're not strictly speaking
5474         // standard, it's nice to decode them nevertheless
5475
5476         // listview
5477         case 0x1000 + 0: return "LVM_GETBKCOLOR";
5478         case 0x1000 + 1: return "LVM_SETBKCOLOR";
5479         case 0x1000 + 2: return "LVM_GETIMAGELIST";
5480         case 0x1000 + 3: return "LVM_SETIMAGELIST";
5481         case 0x1000 + 4: return "LVM_GETITEMCOUNT";
5482         case 0x1000 + 5: return "LVM_GETITEMA";
5483         case 0x1000 + 75: return "LVM_GETITEMW";
5484         case 0x1000 + 6: return "LVM_SETITEMA";
5485         case 0x1000 + 76: return "LVM_SETITEMW";
5486         case 0x1000 + 7: return "LVM_INSERTITEMA";
5487         case 0x1000 + 77: return "LVM_INSERTITEMW";
5488         case 0x1000 + 8: return "LVM_DELETEITEM";
5489         case 0x1000 + 9: return "LVM_DELETEALLITEMS";
5490         case 0x1000 + 10: return "LVM_GETCALLBACKMASK";
5491         case 0x1000 + 11: return "LVM_SETCALLBACKMASK";
5492         case 0x1000 + 12: return "LVM_GETNEXTITEM";
5493         case 0x1000 + 13: return "LVM_FINDITEMA";
5494         case 0x1000 + 83: return "LVM_FINDITEMW";
5495         case 0x1000 + 14: return "LVM_GETITEMRECT";
5496         case 0x1000 + 15: return "LVM_SETITEMPOSITION";
5497         case 0x1000 + 16: return "LVM_GETITEMPOSITION";
5498         case 0x1000 + 17: return "LVM_GETSTRINGWIDTHA";
5499         case 0x1000 + 87: return "LVM_GETSTRINGWIDTHW";
5500         case 0x1000 + 18: return "LVM_HITTEST";
5501         case 0x1000 + 19: return "LVM_ENSUREVISIBLE";
5502         case 0x1000 + 20: return "LVM_SCROLL";
5503         case 0x1000 + 21: return "LVM_REDRAWITEMS";
5504         case 0x1000 + 22: return "LVM_ARRANGE";
5505         case 0x1000 + 23: return "LVM_EDITLABELA";
5506         case 0x1000 + 118: return "LVM_EDITLABELW";
5507         case 0x1000 + 24: return "LVM_GETEDITCONTROL";
5508         case 0x1000 + 25: return "LVM_GETCOLUMNA";
5509         case 0x1000 + 95: return "LVM_GETCOLUMNW";
5510         case 0x1000 + 26: return "LVM_SETCOLUMNA";
5511         case 0x1000 + 96: return "LVM_SETCOLUMNW";
5512         case 0x1000 + 27: return "LVM_INSERTCOLUMNA";
5513         case 0x1000 + 97: return "LVM_INSERTCOLUMNW";
5514         case 0x1000 + 28: return "LVM_DELETECOLUMN";
5515         case 0x1000 + 29: return "LVM_GETCOLUMNWIDTH";
5516         case 0x1000 + 30: return "LVM_SETCOLUMNWIDTH";
5517         case 0x1000 + 31: return "LVM_GETHEADER";
5518         case 0x1000 + 33: return "LVM_CREATEDRAGIMAGE";
5519         case 0x1000 + 34: return "LVM_GETVIEWRECT";
5520         case 0x1000 + 35: return "LVM_GETTEXTCOLOR";
5521         case 0x1000 + 36: return "LVM_SETTEXTCOLOR";
5522         case 0x1000 + 37: return "LVM_GETTEXTBKCOLOR";
5523         case 0x1000 + 38: return "LVM_SETTEXTBKCOLOR";
5524         case 0x1000 + 39: return "LVM_GETTOPINDEX";
5525         case 0x1000 + 40: return "LVM_GETCOUNTPERPAGE";
5526         case 0x1000 + 41: return "LVM_GETORIGIN";
5527         case 0x1000 + 42: return "LVM_UPDATE";
5528         case 0x1000 + 43: return "LVM_SETITEMSTATE";
5529         case 0x1000 + 44: return "LVM_GETITEMSTATE";
5530         case 0x1000 + 45: return "LVM_GETITEMTEXTA";
5531         case 0x1000 + 115: return "LVM_GETITEMTEXTW";
5532         case 0x1000 + 46: return "LVM_SETITEMTEXTA";
5533         case 0x1000 + 116: return "LVM_SETITEMTEXTW";
5534         case 0x1000 + 47: return "LVM_SETITEMCOUNT";
5535         case 0x1000 + 48: return "LVM_SORTITEMS";
5536         case 0x1000 + 49: return "LVM_SETITEMPOSITION32";
5537         case 0x1000 + 50: return "LVM_GETSELECTEDCOUNT";
5538         case 0x1000 + 51: return "LVM_GETITEMSPACING";
5539         case 0x1000 + 52: return "LVM_GETISEARCHSTRINGA";
5540         case 0x1000 + 117: return "LVM_GETISEARCHSTRINGW";
5541         case 0x1000 + 53: return "LVM_SETICONSPACING";
5542         case 0x1000 + 54: return "LVM_SETEXTENDEDLISTVIEWSTYLE";
5543         case 0x1000 + 55: return "LVM_GETEXTENDEDLISTVIEWSTYLE";
5544         case 0x1000 + 56: return "LVM_GETSUBITEMRECT";
5545         case 0x1000 + 57: return "LVM_SUBITEMHITTEST";
5546         case 0x1000 + 58: return "LVM_SETCOLUMNORDERARRAY";
5547         case 0x1000 + 59: return "LVM_GETCOLUMNORDERARRAY";
5548         case 0x1000 + 60: return "LVM_SETHOTITEM";
5549         case 0x1000 + 61: return "LVM_GETHOTITEM";
5550         case 0x1000 + 62: return "LVM_SETHOTCURSOR";
5551         case 0x1000 + 63: return "LVM_GETHOTCURSOR";
5552         case 0x1000 + 64: return "LVM_APPROXIMATEVIEWRECT";
5553         case 0x1000 + 65: return "LVM_SETWORKAREA";
5554
5555         // tree view
5556         case 0x1100 + 0: return "TVM_INSERTITEMA";
5557         case 0x1100 + 50: return "TVM_INSERTITEMW";
5558         case 0x1100 + 1: return "TVM_DELETEITEM";
5559         case 0x1100 + 2: return "TVM_EXPAND";
5560         case 0x1100 + 4: return "TVM_GETITEMRECT";
5561         case 0x1100 + 5: return "TVM_GETCOUNT";
5562         case 0x1100 + 6: return "TVM_GETINDENT";
5563         case 0x1100 + 7: return "TVM_SETINDENT";
5564         case 0x1100 + 8: return "TVM_GETIMAGELIST";
5565         case 0x1100 + 9: return "TVM_SETIMAGELIST";
5566         case 0x1100 + 10: return "TVM_GETNEXTITEM";
5567         case 0x1100 + 11: return "TVM_SELECTITEM";
5568         case 0x1100 + 12: return "TVM_GETITEMA";
5569         case 0x1100 + 62: return "TVM_GETITEMW";
5570         case 0x1100 + 13: return "TVM_SETITEMA";
5571         case 0x1100 + 63: return "TVM_SETITEMW";
5572         case 0x1100 + 14: return "TVM_EDITLABELA";
5573         case 0x1100 + 65: return "TVM_EDITLABELW";
5574         case 0x1100 + 15: return "TVM_GETEDITCONTROL";
5575         case 0x1100 + 16: return "TVM_GETVISIBLECOUNT";
5576         case 0x1100 + 17: return "TVM_HITTEST";
5577         case 0x1100 + 18: return "TVM_CREATEDRAGIMAGE";
5578         case 0x1100 + 19: return "TVM_SORTCHILDREN";
5579         case 0x1100 + 20: return "TVM_ENSUREVISIBLE";
5580         case 0x1100 + 21: return "TVM_SORTCHILDRENCB";
5581         case 0x1100 + 22: return "TVM_ENDEDITLABELNOW";
5582         case 0x1100 + 23: return "TVM_GETISEARCHSTRINGA";
5583         case 0x1100 + 64: return "TVM_GETISEARCHSTRINGW";
5584         case 0x1100 + 24: return "TVM_SETTOOLTIPS";
5585         case 0x1100 + 25: return "TVM_GETTOOLTIPS";
5586
5587         // header
5588         case 0x1200 + 0: return "HDM_GETITEMCOUNT";
5589         case 0x1200 + 1: return "HDM_INSERTITEMA";
5590         case 0x1200 + 10: return "HDM_INSERTITEMW";
5591         case 0x1200 + 2: return "HDM_DELETEITEM";
5592         case 0x1200 + 3: return "HDM_GETITEMA";
5593         case 0x1200 + 11: return "HDM_GETITEMW";
5594         case 0x1200 + 4: return "HDM_SETITEMA";
5595         case 0x1200 + 12: return "HDM_SETITEMW";
5596         case 0x1200 + 5: return "HDM_LAYOUT";
5597         case 0x1200 + 6: return "HDM_HITTEST";
5598         case 0x1200 + 7: return "HDM_GETITEMRECT";
5599         case 0x1200 + 8: return "HDM_SETIMAGELIST";
5600         case 0x1200 + 9: return "HDM_GETIMAGELIST";
5601         case 0x1200 + 15: return "HDM_ORDERTOINDEX";
5602         case 0x1200 + 16: return "HDM_CREATEDRAGIMAGE";
5603         case 0x1200 + 17: return "HDM_GETORDERARRAY";
5604         case 0x1200 + 18: return "HDM_SETORDERARRAY";
5605         case 0x1200 + 19: return "HDM_SETHOTDIVIDER";
5606
5607         // tab control
5608         case 0x1300 + 2: return "TCM_GETIMAGELIST";
5609         case 0x1300 + 3: return "TCM_SETIMAGELIST";
5610         case 0x1300 + 4: return "TCM_GETITEMCOUNT";
5611         case 0x1300 + 5: return "TCM_GETITEMA";
5612         case 0x1300 + 60: return "TCM_GETITEMW";
5613         case 0x1300 + 6: return "TCM_SETITEMA";
5614         case 0x1300 + 61: return "TCM_SETITEMW";
5615         case 0x1300 + 7: return "TCM_INSERTITEMA";
5616         case 0x1300 + 62: return "TCM_INSERTITEMW";
5617         case 0x1300 + 8: return "TCM_DELETEITEM";
5618         case 0x1300 + 9: return "TCM_DELETEALLITEMS";
5619         case 0x1300 + 10: return "TCM_GETITEMRECT";
5620         case 0x1300 + 11: return "TCM_GETCURSEL";
5621         case 0x1300 + 12: return "TCM_SETCURSEL";
5622         case 0x1300 + 13: return "TCM_HITTEST";
5623         case 0x1300 + 14: return "TCM_SETITEMEXTRA";
5624         case 0x1300 + 40: return "TCM_ADJUSTRECT";
5625         case 0x1300 + 41: return "TCM_SETITEMSIZE";
5626         case 0x1300 + 42: return "TCM_REMOVEIMAGE";
5627         case 0x1300 + 43: return "TCM_SETPADDING";
5628         case 0x1300 + 44: return "TCM_GETROWCOUNT";
5629         case 0x1300 + 45: return "TCM_GETTOOLTIPS";
5630         case 0x1300 + 46: return "TCM_SETTOOLTIPS";
5631         case 0x1300 + 47: return "TCM_GETCURFOCUS";
5632         case 0x1300 + 48: return "TCM_SETCURFOCUS";
5633         case 0x1300 + 49: return "TCM_SETMINTABWIDTH";
5634         case 0x1300 + 50: return "TCM_DESELECTALL";
5635
5636         // toolbar
5637         case WM_USER+1: return "TB_ENABLEBUTTON";
5638         case WM_USER+2: return "TB_CHECKBUTTON";
5639         case WM_USER+3: return "TB_PRESSBUTTON";
5640         case WM_USER+4: return "TB_HIDEBUTTON";
5641         case WM_USER+5: return "TB_INDETERMINATE";
5642         case WM_USER+9: return "TB_ISBUTTONENABLED";
5643         case WM_USER+10: return "TB_ISBUTTONCHECKED";
5644         case WM_USER+11: return "TB_ISBUTTONPRESSED";
5645         case WM_USER+12: return "TB_ISBUTTONHIDDEN";
5646         case WM_USER+13: return "TB_ISBUTTONINDETERMINATE";
5647         case WM_USER+17: return "TB_SETSTATE";
5648         case WM_USER+18: return "TB_GETSTATE";
5649         case WM_USER+19: return "TB_ADDBITMAP";
5650         case WM_USER+20: return "TB_ADDBUTTONS";
5651         case WM_USER+21: return "TB_INSERTBUTTON";
5652         case WM_USER+22: return "TB_DELETEBUTTON";
5653         case WM_USER+23: return "TB_GETBUTTON";
5654         case WM_USER+24: return "TB_BUTTONCOUNT";
5655         case WM_USER+25: return "TB_COMMANDTOINDEX";
5656         case WM_USER+26: return "TB_SAVERESTOREA";
5657         case WM_USER+76: return "TB_SAVERESTOREW";
5658         case WM_USER+27: return "TB_CUSTOMIZE";
5659         case WM_USER+28: return "TB_ADDSTRINGA";
5660         case WM_USER+77: return "TB_ADDSTRINGW";
5661         case WM_USER+29: return "TB_GETITEMRECT";
5662         case WM_USER+30: return "TB_BUTTONSTRUCTSIZE";
5663         case WM_USER+31: return "TB_SETBUTTONSIZE";
5664         case WM_USER+32: return "TB_SETBITMAPSIZE";
5665         case WM_USER+33: return "TB_AUTOSIZE";
5666         case WM_USER+35: return "TB_GETTOOLTIPS";
5667         case WM_USER+36: return "TB_SETTOOLTIPS";
5668         case WM_USER+37: return "TB_SETPARENT";
5669         case WM_USER+39: return "TB_SETROWS";
5670         case WM_USER+40: return "TB_GETROWS";
5671         case WM_USER+42: return "TB_SETCMDID";
5672         case WM_USER+43: return "TB_CHANGEBITMAP";
5673         case WM_USER+44: return "TB_GETBITMAP";
5674         case WM_USER+45: return "TB_GETBUTTONTEXTA";
5675         case WM_USER+75: return "TB_GETBUTTONTEXTW";
5676         case WM_USER+46: return "TB_REPLACEBITMAP";
5677         case WM_USER+47: return "TB_SETINDENT";
5678         case WM_USER+48: return "TB_SETIMAGELIST";
5679         case WM_USER+49: return "TB_GETIMAGELIST";
5680         case WM_USER+50: return "TB_LOADIMAGES";
5681         case WM_USER+51: return "TB_GETRECT";
5682         case WM_USER+52: return "TB_SETHOTIMAGELIST";
5683         case WM_USER+53: return "TB_GETHOTIMAGELIST";
5684         case WM_USER+54: return "TB_SETDISABLEDIMAGELIST";
5685         case WM_USER+55: return "TB_GETDISABLEDIMAGELIST";
5686         case WM_USER+56: return "TB_SETSTYLE";
5687         case WM_USER+57: return "TB_GETSTYLE";
5688         case WM_USER+58: return "TB_GETBUTTONSIZE";
5689         case WM_USER+59: return "TB_SETBUTTONWIDTH";
5690         case WM_USER+60: return "TB_SETMAXTEXTROWS";
5691         case WM_USER+61: return "TB_GETTEXTROWS";
5692         case WM_USER+41: return "TB_GETBITMAPFLAGS";
5693
5694         default:
5695             static char s_szBuf[128];
5696             sprintf(s_szBuf, "<unknown message = %d>", message);
5697             return s_szBuf;
5698     }
5699 }
5700 #endif //__WXDEBUG__
5701
5702 static TEXTMETRIC wxGetTextMetrics(const wxWindowMSW *win)
5703 {
5704     // prepare the DC
5705     TEXTMETRIC tm;
5706     HWND hwnd = GetHwndOf(win);
5707     HDC hdc = ::GetDC(hwnd);
5708
5709 #if !wxDIALOG_UNIT_COMPATIBILITY
5710     // and select the current font into it
5711     HFONT hfont = GetHfontOf(win->GetFont());
5712     if ( hfont )
5713     {
5714         hfont = (HFONT)::SelectObject(hdc, hfont);
5715     }
5716 #endif
5717
5718     // finally retrieve the text metrics from it
5719     GetTextMetrics(hdc, &tm);
5720
5721 #if !wxDIALOG_UNIT_COMPATIBILITY
5722     // and clean up
5723     if ( hfont )
5724     {
5725         (void)::SelectObject(hdc, hfont);
5726     }
5727 #endif
5728
5729     ::ReleaseDC(hwnd, hdc);
5730
5731     return tm;
5732 }
5733
5734 // Find the wxWindow at the current mouse position, returning the mouse
5735 // position.
5736 wxWindow* wxFindWindowAtPointer(wxPoint& pt)
5737 {
5738     pt = wxGetMousePosition();
5739     return wxFindWindowAtPoint(pt);
5740 }
5741
5742 wxWindow* wxFindWindowAtPoint(const wxPoint& pt)
5743 {
5744     POINT pt2;
5745     pt2.x = pt.x;
5746     pt2.y = pt.y;
5747     HWND hWndHit = ::WindowFromPoint(pt2);
5748
5749     wxWindow* win = wxFindWinFromHandle((WXHWND) hWndHit) ;
5750     HWND hWnd = hWndHit;
5751
5752     // Try to find a window with a wxWindow associated with it
5753     while (!win && (hWnd != 0))
5754     {
5755         hWnd = ::GetParent(hWnd);
5756         win = wxFindWinFromHandle((WXHWND) hWnd) ;
5757     }
5758     return win;
5759 }
5760
5761 // Get the current mouse position.
5762 wxPoint wxGetMousePosition()
5763 {
5764     POINT pt;
5765     GetCursorPos( & pt );
5766
5767     return wxPoint(pt.x, pt.y);
5768 }
5769
5770 #if wxUSE_HOTKEY
5771
5772 bool wxWindowMSW::RegisterHotKey(int hotkeyId, int modifiers, int keycode)
5773 {
5774     UINT win_modifiers=0;
5775     if ( modifiers & wxMOD_ALT )
5776         win_modifiers |= MOD_ALT;
5777     if ( modifiers & wxMOD_SHIFT )
5778         win_modifiers |= MOD_SHIFT;
5779     if ( modifiers & wxMOD_CONTROL )
5780         win_modifiers |= MOD_CONTROL;
5781     if ( modifiers & wxMOD_WIN )
5782         win_modifiers |= MOD_WIN;
5783
5784     if ( !::RegisterHotKey(GetHwnd(), hotkeyId, win_modifiers, keycode) )
5785     {
5786         wxLogLastError(_T("RegisterHotKey"));
5787
5788         return false;
5789     }
5790
5791     return true;
5792 }
5793
5794 bool wxWindowMSW::UnregisterHotKey(int hotkeyId)
5795 {
5796     if ( !::UnregisterHotKey(GetHwnd(), hotkeyId) )
5797     {
5798         wxLogLastError(_T("UnregisterHotKey"));
5799
5800         return false;
5801     }
5802
5803     return true;
5804 }
5805
5806 #if wxUSE_ACCEL
5807
5808 bool wxWindowMSW::HandleHotKey(WXWPARAM wParam, WXLPARAM lParam)
5809 {
5810     int hotkeyId = wParam;
5811     int virtualKey = HIWORD(lParam);
5812     int win_modifiers = LOWORD(lParam);
5813
5814     wxKeyEvent event(CreateKeyEvent(wxEVT_HOTKEY, virtualKey, wParam, lParam));
5815     event.SetId(hotkeyId);
5816     event.m_shiftDown = (win_modifiers & MOD_SHIFT) != 0;
5817     event.m_controlDown = (win_modifiers & MOD_CONTROL) != 0;
5818     event.m_altDown = (win_modifiers & MOD_ALT) != 0;
5819     event.m_metaDown = (win_modifiers & MOD_WIN) != 0;
5820
5821     return GetEventHandler()->ProcessEvent(event);
5822 }
5823
5824 #endif // wxUSE_ACCEL
5825
5826 #endif // wxUSE_HOTKEY
5827
5828 // Not tested under WinCE
5829 #ifndef __WXWINCE__
5830
5831 // this class installs a message hook which really wakes up our idle processing
5832 // each time a WM_NULL is received (wxWakeUpIdle does this), even if we're
5833 // sitting inside a local modal loop (e.g. a menu is opened or scrollbar is
5834 // being dragged or even inside ::MessageBox()) and so don't control message
5835 // dispatching otherwise
5836 class wxIdleWakeUpModule : public wxModule
5837 {
5838 public:
5839     virtual bool OnInit()
5840     {
5841         ms_hMsgHookProc = ::SetWindowsHookEx
5842                             (
5843                              WH_GETMESSAGE,
5844                              &wxIdleWakeUpModule::MsgHookProc,
5845                              NULL,
5846                              GetCurrentThreadId()
5847                             );
5848
5849         if ( !ms_hMsgHookProc )
5850         {
5851             wxLogLastError(_T("SetWindowsHookEx(WH_GETMESSAGE)"));
5852
5853             return false;
5854         }
5855
5856         return true;
5857     }
5858
5859     virtual void OnExit()
5860     {
5861         ::UnhookWindowsHookEx(wxIdleWakeUpModule::ms_hMsgHookProc);
5862     }
5863
5864     static LRESULT CALLBACK MsgHookProc(int nCode, WPARAM wParam, LPARAM lParam)
5865     {
5866         MSG *msg = (MSG*)lParam;
5867         if ( msg->message == WM_NULL )
5868         {
5869             wxTheApp->ProcessPendingEvents();
5870         }
5871
5872         return CallNextHookEx(ms_hMsgHookProc, nCode, wParam, lParam);
5873     };
5874
5875 private:
5876     static HHOOK ms_hMsgHookProc;
5877
5878     DECLARE_DYNAMIC_CLASS(wxIdleWakeUpModule)
5879 };
5880
5881 HHOOK wxIdleWakeUpModule::ms_hMsgHookProc = 0;
5882
5883 IMPLEMENT_DYNAMIC_CLASS(wxIdleWakeUpModule, wxModule)
5884
5885 #endif // __WXWINCE__
5886
5887 #ifdef __WXWINCE__
5888
5889 #if wxUSE_STATBOX
5890 static void wxAdjustZOrder(wxWindow* parent)
5891 {
5892     if (parent->IsKindOf(CLASSINFO(wxStaticBox)))
5893     {
5894         // Set the z-order correctly
5895         SetWindowPos((HWND) parent->GetHWND(), HWND_BOTTOM, 0, 0, 0, 0, SWP_NOMOVE|SWP_NOSIZE);
5896     }
5897
5898     wxWindowList::compatibility_iterator current = parent->GetChildren().GetFirst();
5899     while (current)
5900     {
5901         wxWindow *childWin = current->GetData();
5902         wxAdjustZOrder(childWin);
5903         current = current->GetNext();
5904     }
5905 }
5906 #endif
5907
5908 // We need to adjust the z-order of static boxes in WinCE, to
5909 // make 'contained' controls visible
5910 void wxWindowMSW::OnInitDialog( wxInitDialogEvent& event )
5911 {
5912 #if wxUSE_STATBOX
5913     wxAdjustZOrder(this);
5914 #endif
5915
5916     event.Skip();
5917 }
5918 #endif
5919