src/msw/window.cpp

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