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