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