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