src/msw/window.cpp

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