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