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