src/msw/window.cpp

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