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