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 and Markus Holzem
   9 // Licence:     wxWindows license
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // ===========================================================================
  13 // declarations
  14 // ===========================================================================
  15
  16 // ---------------------------------------------------------------------------
  17 // headers
  18 // ---------------------------------------------------------------------------
  19
  20 #ifdef __GNUG__
  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 <windows.h>
  33     #include "wx/msw/winundef.h"
  34     #include "wx/window.h"
  35     #include "wx/accel.h"
  36     #include "wx/setup.h"
  37     #include "wx/menu.h"
  38     #include "wx/dc.h"
  39     #include "wx/dcclient.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
  53     #include "wx/ownerdrw.h"
  54 #endif
  55
  56 #if wxUSE_DRAG_AND_DROP
  57     #include "wx/dnd.h"
  58 #endif
  59
  60 #include "wx/menuitem.h"
  61 #include "wx/log.h"
  62
  63 #include "wx/msw/private.h"
  64
  65 #if wxUSE_TOOLTIPS
  66     #include "wx/tooltip.h"
  67 #endif
  68
  69 #if wxUSE_CARET
  70     #include "wx/caret.h"
  71 #endif // wxUSE_CARET
  72
  73 #if wxUSE_SPINCTRL
  74     #include "wx/spinctrl.h"
  75 #endif // wxUSE_SPINCTRL
  76
  77 #include "wx/intl.h"
  78 #include "wx/log.h"
  79
  80 #include "wx/textctrl.h"
  81 #include "wx/notebook.h"
  82
  83 #include <string.h>
  84
  85 #if (!defined(__GNUWIN32_OLD__) && !defined(__WXMICROWIN__)) || defined(__CYGWIN10__)
  86     #include <shellapi.h>
  87     #include <mmsystem.h>
  88 #endif
  89
  90 #ifdef __WIN32__
  91     #include <windowsx.h>
  92 #endif
  93
  94 #if (!defined(__GNUWIN32_OLD__) && !defined(__TWIN32__) && !defined(__WXMICROWIN__)) || defined(__CYGWIN10__)
  95     #ifdef __WIN95__
  96         #include <commctrl.h>
  97     #endif
  98 #elif !defined(__WXMICROWIN__) // broken compiler
  99     #ifndef __TWIN32__
 100         #include "wx/msw/gnuwin32/extra.h"
 101     #endif
 102 #endif
 103
 104 // This didn't appear in mingw until 2.95.2
 105 #ifndef SIF_TRACKPOS
 106 #define SIF_TRACKPOS 16
 107 #endif
 108
 109 #if wxUSE_MOUSEWHEEL
 110     #ifndef WM_MOUSEWHEEL
 111         #define WM_MOUSEWHEEL           0x020A
 112     #endif
 113     #ifndef WHEEL_DELTA
 114         #define WHEEL_DELTA             120
 115     #endif
 116     #ifndef SPI_GETWHEELSCROLLLINES
 117         #define SPI_GETWHEELSCROLLLINES 104
 118     #endif
 119 #endif
 120
 121
 122 // ---------------------------------------------------------------------------
 123 // global variables
 124 // ---------------------------------------------------------------------------
 125
 126 // the last Windows message we got (MT-UNSAFE)
 127 extern MSG s_currentMsg;
 128
 129 #if wxUSE_MENUS_NATIVE
 130 wxMenu *wxCurrentPopupMenu = NULL;
 131 #endif // wxUSE_MENUS_NATIVE
 132
 133 extern const wxChar *wxCanvasClassName;
 134
 135 // ---------------------------------------------------------------------------
 136 // private functions
 137 // ---------------------------------------------------------------------------
 138
 139 // the window proc for all our windows
 140 LRESULT WXDLLEXPORT APIENTRY _EXPORT wxWndProc(HWND hWnd, UINT message,
 141                                    WPARAM wParam, LPARAM lParam);
 142
 143 #ifdef  __WXDEBUG__
 144     const char *wxGetMessageName(int message);
 145 #endif  //__WXDEBUG__
 146
 147 void wxRemoveHandleAssociation(wxWindowMSW *win);
 148 void wxAssociateWinWithHandle(HWND hWnd, wxWindowMSW *win);
 149 wxWindow *wxFindWinFromHandle(WXHWND hWnd);
 150
 151 // this magical function is used to translate VK_APPS key presses to right
 152 // mouse clicks
 153 static void TranslateKbdEventToMouse(wxWindowMSW *win,
 154                                      int *x, int *y, WPARAM *flags);
 155
 156 // get the text metrics for the current font
 157 static TEXTMETRIC wxGetTextMetrics(const wxWindowMSW *win);
 158
 159 // check if the mouse is in the window or its child
 160 static bool IsMouseInWindow(HWND hwnd);
 161
 162 // wrapper around BringWindowToTop() API
 163 static inline wxBringWindowToTop(HWND hwnd)
 164 {
 165 #ifdef __WXMICROWIN__
 166     // It seems that MicroWindows brings the _parent_ of the window to the top,
 167     // which can be the wrong one.
 168
 169     // activate (set focus to) specified window
 170     ::SetFocus(hwnd);
 171
 172     // raise top level parent to top of z order
 173     ::SetWindowPos(hwnd, HWND_TOP, 0, 0, 0, 0, SWP_NOMOVE | SWP_NOSIZE);
 174 #else // !__WXMICROWIN__
 175     if ( !::BringWindowToTop(hwnd) )
 176     {
 177         wxLogLastError(_T("BringWindowToTop"));
 178     }
 179 #endif // __WXMICROWIN__/!__WXMICROWIN__
 180 }
 181
 182 // ---------------------------------------------------------------------------
 183 // event tables
 184 // ---------------------------------------------------------------------------
 185
 186 // in wxUniv/MSW this class is abstract because it doesn't have DoPopupMenu()
 187 // method
 188 #ifdef __WXUNIVERSAL__
 189     IMPLEMENT_ABSTRACT_CLASS(wxWindowMSW, wxWindowBase)
 190 #else // __WXMSW__
 191     IMPLEMENT_DYNAMIC_CLASS(wxWindow, wxWindowBase)
 192 #endif // __WXUNIVERSAL__/__WXMSW__
 193
 194 BEGIN_EVENT_TABLE(wxWindowMSW, wxWindowBase)
 195     EVT_ERASE_BACKGROUND(wxWindowMSW::OnEraseBackground)
 196     EVT_SYS_COLOUR_CHANGED(wxWindowMSW::OnSysColourChanged)
 197     EVT_INIT_DIALOG(wxWindowMSW::OnInitDialog)
 198     EVT_IDLE(wxWindowMSW::OnIdle)
 199 END_EVENT_TABLE()
 200
 201 // ===========================================================================
 202 // implementation
 203 // ===========================================================================
 204
 205 // ---------------------------------------------------------------------------
 206 // wxWindow utility functions
 207 // ---------------------------------------------------------------------------
 208
 209 // Find an item given the MS Windows id
 210 wxWindow *wxWindowMSW::FindItem(long id) const
 211 {
 212 #if wxUSE_CONTROLS
 213     wxControl *item = wxDynamicCastThis(wxControl);
 214     if ( item )
 215     {
 216         // is it we or one of our "internal" children?
 217         if ( item->GetId() == id
 218 #ifndef __WXUNIVERSAL__
 219                 || (item->GetSubcontrols().Index(id) != wxNOT_FOUND)
 220 #endif // __WXUNIVERSAL__
 221            )
 222         {
 223             return item;
 224         }
 225     }
 226 #endif // wxUSE_CONTROLS
 227
 228     wxWindowList::Node *current = GetChildren().GetFirst();
 229     while (current)
 230     {
 231         wxWindow *childWin = current->GetData();
 232
 233         wxWindow *wnd = childWin->FindItem(id);
 234         if ( wnd )
 235             return wnd;
 236
 237         current = current->GetNext();
 238     }
 239
 240     return NULL;
 241 }
 242
 243 // Find an item given the MS Windows handle
 244 wxWindow *wxWindowMSW::FindItemByHWND(WXHWND hWnd, bool controlOnly) const
 245 {
 246     wxWindowList::Node *current = GetChildren().GetFirst();
 247     while (current)
 248     {
 249         wxWindow *parent = current->GetData();
 250
 251         // Do a recursive search.
 252         wxWindow *wnd = parent->FindItemByHWND(hWnd);
 253         if ( wnd )
 254             return wnd;
 255
 256         if ( !controlOnly
 257 #if wxUSE_CONTROLS
 258                 || parent->IsKindOf(CLASSINFO(wxControl))
 259 #endif // wxUSE_CONTROLS
 260            )
 261         {
 262             wxWindow *item = current->GetData();
 263             if ( item->GetHWND() == hWnd )
 264                 return item;
 265             else
 266             {
 267                 if ( item->ContainsHWND(hWnd) )
 268                     return item;
 269             }
 270         }
 271
 272         current = current->GetNext();
 273     }
 274     return NULL;
 275 }
 276
 277 // Default command handler
 278 bool wxWindowMSW::MSWCommand(WXUINT WXUNUSED(param), WXWORD WXUNUSED(id))
 279 {
 280     return FALSE;
 281 }
 282
 283 // ----------------------------------------------------------------------------
 284 // constructors and such
 285 // ----------------------------------------------------------------------------
 286
 287 void wxWindowMSW::Init()
 288 {
 289     // generic
 290     InitBase();
 291
 292     // MSW specific
 293     m_doubleClickAllowed = 0;
 294
 295     m_isBeingDeleted = FALSE;
 296     m_oldWndProc = 0;
 297     m_useCtl3D = FALSE;
 298     m_mouseInWindow = FALSE;
 299
 300     // wxWnd
 301     m_hMenu = 0;
 302
 303     m_hWnd = 0;
 304
 305     // pass WM_GETDLGCODE to DefWindowProc()
 306     m_lDlgCode = 0;
 307
 308     m_xThumbSize = 0;
 309     m_yThumbSize = 0;
 310     m_backgroundTransparent = FALSE;
 311
 312     // as all windows are created with WS_VISIBLE style...
 313     m_isShown = TRUE;
 314
 315 #if wxUSE_MOUSEEVENT_HACK
 316     m_lastMouseX =
 317     m_lastMouseY = -1;
 318     m_lastMouseEvent = -1;
 319 #endif // wxUSE_MOUSEEVENT_HACK
 320 }
 321
 322 // Destructor
 323 wxWindowMSW::~wxWindowMSW()
 324 {
 325     m_isBeingDeleted = TRUE;
 326
 327     MSWDetachWindowMenu();
 328
 329     // VS: make sure there's no wxFrame with last focus set to us:
 330     for (wxWindow *win = GetParent(); win; win = win->GetParent())
 331     {
 332         wxFrame *frame = wxDynamicCast(win, wxFrame);
 333         if ( frame )
 334         {
 335             if ( frame->GetLastFocus() == this )
 336                 frame->SetLastFocus((wxWindow*)NULL);
 337             break;
 338         }
 339     }
 340
 341     // VS: destroy children first and _then_ detach *this from its parent.
 342     //     If we'd do it the other way around, children wouldn't be able
 343     //     find their parent frame (see above).
 344     DestroyChildren();
 345
 346     if ( m_parent )
 347         m_parent->RemoveChild(this);
 348
 349     if ( m_hWnd )
 350     {
 351         // VZ: test temp removed to understand what really happens here
 352         //if (::IsWindow(GetHwnd()))
 353         {
 354             if ( !::DestroyWindow(GetHwnd()) )
 355                 wxLogLastError(wxT("DestroyWindow"));
 356         }
 357
 358         // remove hWnd <-> wxWindow association
 359         wxRemoveHandleAssociation(this);
 360     }
 361 }
 362
 363 // real construction (Init() must have been called before!)
 364 bool wxWindowMSW::Create(wxWindow *parent,
 365                          wxWindowID id,
 366                          const wxPoint& pos,
 367                          const wxSize& size,
 368                          long style,
 369                          const wxString& name)
 370 {
 371     wxCHECK_MSG( parent, FALSE, wxT("can't create wxWindow without parent") );
 372
 373 #if wxUSE_STATBOX
 374     // wxGTK doesn't allow to create controls with static box as the parent so
 375     // this will result in a crash when the program is ported to wxGTK - warn
 376     // about it
 377     //
 378     // the correct solution is to create the controls as siblings of the
 379     // static box
 380     wxASSERT_MSG( !wxDynamicCastThis(wxStaticBox),
 381                   _T("wxStaticBox can't be used as a window parent!") );
 382 #endif // wxUSE_STATBOX
 383
 384     if ( !CreateBase(parent, id, pos, size, style, wxDefaultValidator, name) )
 385         return FALSE;
 386
 387     parent->AddChild(this);
 388
 389     // all windows are created visible
 390     DWORD msflags = WS_CHILD | WS_VISIBLE;
 391
 392 #ifdef __WXUNIVERSAL__
 393     // no 3d effects, we draw them ourselves
 394     WXDWORD exStyle = 0;
 395 #else // !wxUniversal
 396     if ( style & wxCLIP_CHILDREN )
 397         msflags |= WS_CLIPCHILDREN;
 398     if ( style & wxCLIP_SIBLINGS )
 399         msflags |= WS_CLIPSIBLINGS;
 400
 401     bool want3D;
 402     WXDWORD exStyle = Determine3DEffects(WS_EX_CLIENTEDGE, &want3D);
 403
 404     // Even with extended styles, need to combine with WS_BORDER
 405     // for them to look right.
 406     if ( want3D ||
 407         (m_windowStyle & (wxBORDER |
 408                           wxSIMPLE_BORDER |
 409                           wxRAISED_BORDER |
 410                           wxSUNKEN_BORDER |
 411                           wxDOUBLE_BORDER)) )
 412     {
 413         msflags |= WS_BORDER;
 414     }
 415
 416     // calculate the value to return from WM_GETDLGCODE handler
 417     if ( GetWindowStyleFlag() & wxWANTS_CHARS )
 418     {
 419         // want everything: i.e. all keys and WM_CHAR message
 420         m_lDlgCode = DLGC_WANTARROWS | DLGC_WANTCHARS |
 421                      DLGC_WANTTAB | DLGC_WANTMESSAGE;
 422     }
 423 #endif // wxUniversal/!wxUniversal
 424
 425     if ( style & wxPOPUP_WINDOW )
 426     {
 427         // a popup window floats on top of everything
 428         exStyle |= WS_EX_TOPMOST | WS_EX_TOOLWINDOW;
 429
 430         // it is also created hidden as other top level windows
 431         msflags &= ~WS_VISIBLE;
 432         m_isShown = FALSE;
 433     }
 434
 435     return MSWCreate(m_windowId, parent, wxCanvasClassName,
 436                      (wxWindow *)this, NULL,
 437                      pos.x, pos.y,
 438                      WidthDefault(size.x), HeightDefault(size.y),
 439                      msflags, NULL, exStyle);
 440 }
 441
 442 // ---------------------------------------------------------------------------
 443 // basic operations
 444 // ---------------------------------------------------------------------------
 445
 446 void wxWindowMSW::SetFocus()
 447 {
 448     HWND hWnd = GetHwnd();
 449     wxCHECK_RET( hWnd, _T("can't set focus to invalid window") );
 450
 451 #ifndef __WXMICROWIN__
 452     ::SetLastError(0);
 453 #endif
 454
 455     if ( !::SetFocus(hWnd) )
 456     {
 457         // was there really an error?
 458 #ifndef __WXMICROWIN__
 459         DWORD dwRes = ::GetLastError();
 460 #else
 461
 462         DWORD dwRes = 0;
 463 #endif
 464         if ( dwRes )
 465         {
 466             wxLogApiError(_T("SetFocus"), dwRes);
 467         }
 468
 469         // VZ: just why does this happen sometimes?? any idea?
 470 #if 0
 471         HWND hwndFocus = ::GetFocus();
 472         wxASSERT_MSG( hwndFocus == hWnd, _T("SetFocus() didn't work?") );
 473 #endif // 0
 474     }
 475 }
 476
 477 // Get the window with the focus
 478 wxWindow *wxWindowBase::FindFocus()
 479 {
 480     HWND hWnd = ::GetFocus();
 481     if ( hWnd )
 482     {
 483         return wxGetWindowFromHWND((WXHWND)hWnd);
 484     }
 485
 486     return NULL;
 487 }
 488
 489 bool wxWindowMSW::Enable(bool enable)
 490 {
 491     if ( !wxWindowBase::Enable(enable) )
 492         return FALSE;
 493
 494     HWND hWnd = GetHwnd();
 495     if ( hWnd )
 496         ::EnableWindow(hWnd, (BOOL)enable);
 497
 498     // VZ: no, this is a bad idea: imagine that you have a dialog with some
 499     //     disabled controls and disable it - you really wouldn't like the
 500     //     disabled controls be reenabled too when you reenable the dialog!
 501 #if 0
 502     wxWindowList::Node *node = GetChildren().GetFirst();
 503     while ( node )
 504     {
 505         wxWindow *child = node->GetData();
 506         child->Enable(enable);
 507
 508         node = node->GetNext();
 509     }
 510 #endif // 0
 511
 512     return TRUE;
 513 }
 514
 515 bool wxWindowMSW::Show(bool show)
 516 {
 517     if ( !wxWindowBase::Show(show) )
 518         return FALSE;
 519
 520     HWND hWnd = GetHwnd();
 521     int cshow = show ? SW_SHOW : SW_HIDE;
 522     ::ShowWindow(hWnd, cshow);
 523
 524     if ( show )
 525     {
 526         wxBringWindowToTop(hWnd);
 527     }
 528
 529     return TRUE;
 530 }
 531
 532 // Raise the window to the top of the Z order
 533 void wxWindowMSW::Raise()
 534 {
 535     wxBringWindowToTop(GetHwnd());
 536 }
 537
 538 // Lower the window to the bottom of the Z order
 539 void wxWindowMSW::Lower()
 540 {
 541     ::SetWindowPos(GetHwnd(), HWND_BOTTOM, 0, 0, 0, 0,
 542                    SWP_NOMOVE | SWP_NOSIZE | SWP_NOACTIVATE);
 543 }
 544
 545 void wxWindowMSW::SetTitle( const wxString& title)
 546 {
 547     SetWindowText(GetHwnd(), title.c_str());
 548 }
 549
 550 wxString wxWindowMSW::GetTitle() const
 551 {
 552     return wxGetWindowText(GetHWND());
 553 }
 554
 555 void wxWindowMSW::CaptureMouse()
 556 {
 557     HWND hWnd = GetHwnd();
 558     if ( hWnd )
 559     {
 560         ::SetCapture(hWnd);
 561     }
 562 }
 563
 564 void wxWindowMSW::ReleaseMouse()
 565 {
 566     if ( !::ReleaseCapture() )
 567     {
 568         wxLogLastError(_T("ReleaseCapture"));
 569     }
 570 }
 571
 572 /* static */ wxWindow *wxWindowBase::GetCapture()
 573 {
 574     HWND hwnd = ::GetCapture();
 575     return hwnd ? wxFindWinFromHandle((WXHWND)hwnd) : (wxWindow *)NULL;
 576 }
 577
 578 bool wxWindowMSW::SetFont(const wxFont& font)
 579 {
 580     if ( !wxWindowBase::SetFont(font) )
 581     {
 582         // nothing to do
 583         return FALSE;
 584     }
 585
 586     HWND hWnd = GetHwnd();
 587     if ( hWnd != 0 )
 588     {
 589         WXHANDLE hFont = m_font.GetResourceHandle();
 590
 591         wxASSERT_MSG( hFont, wxT("should have valid font") );
 592
 593         ::SendMessage(hWnd, WM_SETFONT, (WPARAM)hFont, MAKELPARAM(TRUE, 0));
 594     }
 595
 596     return TRUE;
 597 }
 598 bool wxWindowMSW::SetCursor(const wxCursor& cursor)
 599 {
 600     if ( !wxWindowBase::SetCursor(cursor) )
 601     {
 602         // no change
 603         return FALSE;
 604     }
 605
 606     if ( m_cursor.Ok() )
 607     {
 608         HWND hWnd = GetHwnd();
 609
 610         // Change the cursor NOW if we're within the correct window
 611         POINT point;
 612         ::GetCursorPos(&point);
 613
 614         RECT rect;
 615         ::GetWindowRect(hWnd, &rect);
 616
 617         if ( ::PtInRect(&rect, point) && !wxIsBusy() )
 618             ::SetCursor(GetHcursorOf(m_cursor));
 619     }
 620
 621     return TRUE;
 622 }
 623
 624 void wxWindowMSW::WarpPointer (int x, int y)
 625 {
 626     ClientToScreen(&x, &y);
 627
 628     if ( !::SetCursorPos(x, y) )
 629     {
 630         wxLogLastError(_T("SetCursorPos"));
 631     }
 632 }
 633
 634 #if WXWIN_COMPATIBILITY
 635 void wxWindowMSW::MSWDeviceToLogical (float *x, float *y) const
 636 {
 637 }
 638 #endif // WXWIN_COMPATIBILITY
 639
 640 // ---------------------------------------------------------------------------
 641 // scrolling stuff
 642 // ---------------------------------------------------------------------------
 643
 644 #if WXWIN_COMPATIBILITY
 645 void wxWindowMSW::SetScrollRange(int orient, int range, bool refresh)
 646 {
 647 #if defined(__WIN95__)
 648
 649     int range1 = range;
 650
 651     // Try to adjust the range to cope with page size > 1
 652     // - a Windows API quirk
 653     int pageSize = GetScrollPage(orient);
 654     if ( pageSize > 1 && range > 0)
 655     {
 656         range1 += (pageSize - 1);
 657     }
 658
 659     SCROLLINFO info;
 660     int dir;
 661
 662     if ( orient == wxHORIZONTAL ) {
 663         dir = SB_HORZ;
 664     } else {
 665         dir = SB_VERT;
 666     }
 667
 668     info.cbSize = sizeof(SCROLLINFO);
 669     info.nPage = pageSize; // Have to set this, or scrollbar goes awry
 670     info.nMin = 0;
 671     info.nMax = range1;
 672     info.nPos = 0;
 673     info.fMask = SIF_RANGE | SIF_PAGE;
 674
 675     HWND hWnd = GetHwnd();
 676     if ( hWnd )
 677         ::SetScrollInfo(hWnd, dir, &info, refresh);
 678 #else
 679     int wOrient;
 680     if ( orient == wxHORIZONTAL )
 681         wOrient = SB_HORZ;
 682     else
 683         wOrient = SB_VERT;
 684
 685     HWND hWnd = GetHwnd();
 686     if ( hWnd )
 687         ::SetScrollRange(hWnd, wOrient, 0, range, refresh);
 688 #endif
 689 }
 690
 691 void wxWindowMSW::SetScrollPage(int orient, int page, bool refresh)
 692 {
 693 #if defined(__WIN95__)
 694     SCROLLINFO info;
 695     int dir;
 696
 697     if ( orient == wxHORIZONTAL ) {
 698         dir = SB_HORZ;
 699         m_xThumbSize = page;
 700     } else {
 701         dir = SB_VERT;
 702         m_yThumbSize = page;
 703     }
 704
 705     info.cbSize = sizeof(SCROLLINFO);
 706     info.nPage = page;
 707     info.nMin = 0;
 708     info.fMask = SIF_PAGE;
 709
 710     HWND hWnd = GetHwnd();
 711     if ( hWnd )
 712         ::SetScrollInfo(hWnd, dir, &info, refresh);
 713 #else
 714     if ( orient == wxHORIZONTAL )
 715         m_xThumbSize = page;
 716     else
 717         m_yThumbSize = page;
 718 #endif
 719 }
 720
 721 int wxWindowMSW::OldGetScrollRange(int orient) const
 722 {
 723     int wOrient;
 724     if ( orient == wxHORIZONTAL )
 725         wOrient = SB_HORZ;
 726     else
 727         wOrient = SB_VERT;
 728
 729 #if __WATCOMC__ && defined(__WINDOWS_386__)
 730     short minPos, maxPos;
 731 #else
 732     int minPos, maxPos;
 733 #endif
 734     HWND hWnd = GetHwnd();
 735     if ( hWnd )
 736     {
 737         ::GetScrollRange(hWnd, wOrient, &minPos, &maxPos);
 738 #if defined(__WIN95__)
 739         // Try to adjust the range to cope with page size > 1
 740         // - a Windows API quirk
 741         int pageSize = GetScrollPage(orient);
 742         if ( pageSize > 1 )
 743         {
 744             maxPos -= (pageSize - 1);
 745         }
 746 #endif
 747         return maxPos;
 748     }
 749     else
 750         return 0;
 751 }
 752
 753 int wxWindowMSW::GetScrollPage(int orient) const
 754 {
 755     if ( orient == wxHORIZONTAL )
 756         return m_xThumbSize;
 757     else
 758         return m_yThumbSize;
 759 }
 760
 761 #endif // WXWIN_COMPATIBILITY
 762
 763 inline int GetScrollPosition(HWND hWnd, int wOrient)
 764 {
 765 #ifdef __WXMICROWIN__
 766     return ::GetScrollPosWX(hWnd, wOrient);
 767 #else
 768     return ::GetScrollPos(hWnd, wOrient);
 769 #endif
 770 }
 771
 772 int wxWindowMSW::GetScrollPos(int orient) const
 773 {
 774     int wOrient;
 775     if ( orient == wxHORIZONTAL )
 776         wOrient = SB_HORZ;
 777     else
 778         wOrient = SB_VERT;
 779
 780     HWND hWnd = GetHwnd();
 781     wxCHECK_MSG( hWnd, 0, _T("no HWND in GetScrollPos") );
 782
 783     return GetScrollPosition(hWnd, wOrient);
 784 }
 785
 786 // This now returns the whole range, not just the number
 787 // of positions that we can scroll.
 788 int wxWindowMSW::GetScrollRange(int orient) const
 789 {
 790     int wOrient;
 791     if ( orient == wxHORIZONTAL )
 792         wOrient = SB_HORZ;
 793     else
 794         wOrient = SB_VERT;
 795
 796 #if __WATCOMC__ && defined(__WINDOWS_386__)
 797     short minPos, maxPos;
 798 #else
 799     int minPos, maxPos;
 800 #endif
 801     HWND hWnd = GetHwnd();
 802     if ( hWnd )
 803     {
 804         ::GetScrollRange(hWnd, wOrient, &minPos, &maxPos);
 805 #if defined(__WIN95__)
 806         // Try to adjust the range to cope with page size > 1
 807         // - a Windows API quirk
 808         int pageSize = GetScrollThumb(orient);
 809         if ( pageSize > 1 )
 810         {
 811             maxPos -= (pageSize - 1);
 812         }
 813         // October 10th: new range concept.
 814         maxPos += pageSize;
 815 #endif
 816
 817         return maxPos;
 818     }
 819     else
 820         return 0;
 821 }
 822
 823 int wxWindowMSW::GetScrollThumb(int orient) const
 824 {
 825     if ( orient == wxHORIZONTAL )
 826         return m_xThumbSize;
 827     else
 828         return m_yThumbSize;
 829 }
 830
 831 void wxWindowMSW::SetScrollPos(int orient, int pos, bool refresh)
 832 {
 833 #if defined(__WIN95__)
 834     SCROLLINFO info;
 835     int dir;
 836
 837     if ( orient == wxHORIZONTAL ) {
 838         dir = SB_HORZ;
 839     } else {
 840         dir = SB_VERT;
 841     }
 842
 843     info.cbSize = sizeof(SCROLLINFO);
 844     info.nPage = 0;
 845     info.nMin = 0;
 846     info.nPos = pos;
 847     info.fMask = SIF_POS;
 848
 849     HWND hWnd = GetHwnd();
 850     if ( hWnd )
 851         ::SetScrollInfo(hWnd, dir, &info, refresh);
 852 #else
 853     int wOrient;
 854     if ( orient == wxHORIZONTAL )
 855         wOrient = SB_HORZ;
 856     else
 857         wOrient = SB_VERT;
 858
 859     HWND hWnd = GetHwnd();
 860     if ( hWnd )
 861         ::SetScrollPos(hWnd, wOrient, pos, refresh);
 862 #endif
 863 }
 864
 865 // New function that will replace some of the above.
 866 void wxWindowMSW::SetScrollbar(int orient, int pos, int thumbVisible,
 867                             int range, bool refresh)
 868 {
 869 #if defined(__WIN95__)
 870     int oldRange = range - thumbVisible;
 871
 872     int range1 = oldRange;
 873
 874     // Try to adjust the range to cope with page size > 1
 875     // - a Windows API quirk
 876     int pageSize = thumbVisible;
 877     if ( pageSize > 1 && range > 0)
 878     {
 879         range1 += (pageSize - 1);
 880     }
 881
 882     SCROLLINFO info;
 883     int dir;
 884
 885     if ( orient == wxHORIZONTAL ) {
 886         dir = SB_HORZ;
 887     } else {
 888         dir = SB_VERT;
 889     }
 890
 891     info.cbSize = sizeof(SCROLLINFO);
 892     info.nPage = pageSize; // Have to set this, or scrollbar goes awry
 893     info.nMin = 0;
 894     info.nMax = range1;
 895     info.nPos = pos;
 896     info.fMask = SIF_RANGE | SIF_PAGE | SIF_POS;
 897
 898     HWND hWnd = GetHwnd();
 899     if ( hWnd )
 900         ::SetScrollInfo(hWnd, dir, &info, refresh);
 901 #else
 902     int wOrient;
 903     if ( orient == wxHORIZONTAL )
 904         wOrient = SB_HORZ;
 905     else
 906         wOrient = SB_VERT;
 907
 908     HWND hWnd = GetHwnd();
 909     if ( hWnd )
 910     {
 911         ::SetScrollRange(hWnd, wOrient, 0, range, FALSE);
 912         ::SetScrollPos(hWnd, wOrient, pos, refresh);
 913     }
 914 #endif
 915     if ( orient == wxHORIZONTAL ) {
 916         m_xThumbSize = thumbVisible;
 917     } else {
 918         m_yThumbSize = thumbVisible;
 919     }
 920 }
 921
 922 void wxWindowMSW::ScrollWindow(int dx, int dy, const wxRect *prect)
 923 {
 924     RECT rect;
 925     if ( prect )
 926     {
 927         rect.left = prect->x;
 928         rect.top = prect->y;
 929         rect.right = prect->x + prect->width;
 930         rect.bottom = prect->y + prect->height;
 931     }
 932
 933     ::ScrollWindow(GetHwnd(), dx, dy, prect ? &rect : NULL, NULL);
 934 }
 935
 936 static bool ScrollVertically(HWND hwnd, int kind, int count)
 937 {
 938     int posStart = GetScrollPosition(hwnd, SB_VERT);
 939
 940     int pos = posStart;
 941     for ( int n = 0; n < count; n++ )
 942     {
 943         ::SendMessage(hwnd, WM_VSCROLL, kind, 0);
 944
 945         int posNew = GetScrollPosition(hwnd, SB_VERT);
 946         if ( posNew == pos )
 947         {
 948             // don't bother to continue, we're already at top/bottom
 949             break;
 950         }
 951
 952         pos = posNew;
 953     }
 954
 955     return pos != posStart;
 956 }
 957
 958 bool wxWindowMSW::ScrollLines(int lines)
 959 {
 960     bool down = lines > 0;
 961
 962     return ScrollVertically(GetHwnd(),
 963                             down ? SB_LINEDOWN : SB_LINEUP,
 964                             down ? lines : -lines);
 965 }
 966
 967 bool wxWindowMSW::ScrollPages(int pages)
 968 {
 969     bool down = pages > 0;
 970
 971     return ScrollVertically(GetHwnd(),
 972                             down ? SB_PAGEDOWN : SB_PAGEUP,
 973                             down ? pages : -pages);
 974 }
 975
 976 // ---------------------------------------------------------------------------
 977 // subclassing
 978 // ---------------------------------------------------------------------------
 979
 980 void wxWindowMSW::SubclassWin(WXHWND hWnd)
 981 {
 982     wxASSERT_MSG( !m_oldWndProc, wxT("subclassing window twice?") );
 983
 984     HWND hwnd = (HWND)hWnd;
 985     wxCHECK_RET( ::IsWindow(hwnd), wxT("invalid HWND in SubclassWin") );
 986
 987     wxAssociateWinWithHandle(hwnd, this);
 988
 989     m_oldWndProc = (WXFARPROC) GetWindowLong(hwnd, GWL_WNDPROC);
 990
 991     wxASSERT( (WXFARPROC) m_oldWndProc != (WXFARPROC) wxWndProc );
 992
 993     SetWindowLong(hwnd, GWL_WNDPROC, (LONG) wxWndProc);
 994 }
 995
 996 void wxWindowMSW::UnsubclassWin()
 997 {
 998     wxRemoveHandleAssociation(this);
 999
1000     // Restore old Window proc
1001     HWND hwnd = GetHwnd();
1002     if ( hwnd )
1003     {
1004         m_hWnd = 0;
1005
1006         wxCHECK_RET( ::IsWindow(hwnd), wxT("invalid HWND in UnsubclassWin") );
1007
1008         FARPROC farProc = (FARPROC) GetWindowLong(hwnd, GWL_WNDPROC);
1009         if ( (m_oldWndProc != 0) && (farProc != (FARPROC) m_oldWndProc) )
1010         {
1011             SetWindowLong(hwnd, GWL_WNDPROC, (LONG) m_oldWndProc);
1012             m_oldWndProc = 0;
1013         }
1014     }
1015 }
1016
1017 // Make a Windows extended style from the given wxWindows window style
1018 WXDWORD wxWindowMSW::MakeExtendedStyle(long style, bool eliminateBorders)
1019 {
1020     WXDWORD exStyle = 0;
1021     if ( style & wxTRANSPARENT_WINDOW )
1022         exStyle |= WS_EX_TRANSPARENT;
1023
1024     if ( !eliminateBorders )
1025     {
1026         if ( style & wxSUNKEN_BORDER )
1027             exStyle |= WS_EX_CLIENTEDGE;
1028         if ( style & wxDOUBLE_BORDER )
1029             exStyle |= WS_EX_DLGMODALFRAME;
1030 #if defined(__WIN95__)
1031         if ( style & wxRAISED_BORDER )
1032             // It seems that WS_EX_WINDOWEDGE doesn't work, but WS_EX_DLGMODALFRAME does
1033             exStyle |= WS_EX_DLGMODALFRAME; /* WS_EX_WINDOWEDGE */;
1034         if ( style & wxSTATIC_BORDER )
1035             exStyle |= WS_EX_STATICEDGE;
1036 #endif
1037     }
1038     return exStyle;
1039 }
1040
1041 // Determines whether native 3D effects or CTL3D should be used,
1042 // applying a default border style if required, and returning an extended
1043 // style to pass to CreateWindowEx.
1044 WXDWORD wxWindowMSW::Determine3DEffects(WXDWORD defaultBorderStyle,
1045                                      bool *want3D) const
1046 {
1047     // If matches certain criteria, then assume no 3D effects
1048     // unless specifically requested (dealt with in MakeExtendedStyle)
1049     if ( !GetParent()
1050 #if wxUSE_CONTROLS
1051             || !IsKindOf(CLASSINFO(wxControl))
1052 #endif // wxUSE_CONTROLS
1053             || (m_windowStyle & wxNO_BORDER) )
1054     {
1055         *want3D = FALSE;
1056         return MakeExtendedStyle(m_windowStyle, FALSE);
1057     }
1058
1059     // Determine whether we should be using 3D effects or not.
1060     bool nativeBorder = FALSE; // by default, we don't want a Win95 effect
1061
1062     // 1) App can specify global 3D effects
1063     *want3D = wxTheApp->GetAuto3D();
1064
1065     // 2) If the parent is being drawn with user colours, or simple border specified,
1066     // switch effects off. TODO: replace wxUSER_COLOURS with wxNO_3D
1067     if ( GetParent() && (GetParent()->GetWindowStyleFlag() & wxUSER_COLOURS) || (m_windowStyle & wxSIMPLE_BORDER) )
1068         *want3D = FALSE;
1069
1070     // 3) Control can override this global setting by defining
1071     // a border style, e.g. wxSUNKEN_BORDER
1072     if ( m_windowStyle & wxSUNKEN_BORDER  )
1073         *want3D = TRUE;
1074
1075     // 4) If it's a special border, CTL3D can't cope so we want a native border
1076     if ( (m_windowStyle & wxDOUBLE_BORDER) || (m_windowStyle & wxRAISED_BORDER) ||
1077         (m_windowStyle & wxSTATIC_BORDER) )
1078     {
1079         *want3D = TRUE;
1080         nativeBorder = TRUE;
1081     }
1082
1083     // 5) If this isn't a Win95 app, and we are using CTL3D, remove border
1084     // effects from extended style
1085 #if wxUSE_CTL3D
1086     if ( *want3D )
1087         nativeBorder = FALSE;
1088 #endif
1089
1090     DWORD exStyle = MakeExtendedStyle(m_windowStyle, !nativeBorder);
1091
1092     // If we want 3D, but haven't specified a border here,
1093     // apply the default border style specified.
1094     // TODO what about non-Win95 WIN32? Does it have borders?
1095 #if defined(__WIN95__) && !wxUSE_CTL3D
1096     if ( defaultBorderStyle && (*want3D) && ! ((m_windowStyle & wxDOUBLE_BORDER) || (m_windowStyle & wxRAISED_BORDER ) ||
1097         (m_windowStyle & wxSTATIC_BORDER) || (m_windowStyle & wxSIMPLE_BORDER) ))
1098         exStyle |= defaultBorderStyle; // WS_EX_CLIENTEDGE;
1099 #endif
1100
1101     return exStyle;
1102 }
1103
1104 #if WXWIN_COMPATIBILITY
1105 // If nothing defined for this, try the parent.
1106 // E.g. we may be a button loaded from a resource, with no callback function
1107 // defined.
1108 void wxWindowMSW::OnCommand(wxWindow& win, wxCommandEvent& event)
1109 {
1110     if ( GetEventHandler()->ProcessEvent(event)  )
1111         return;
1112     if ( m_parent )
1113         m_parent->GetEventHandler()->OnCommand(win, event);
1114 }
1115 #endif // WXWIN_COMPATIBILITY_2
1116
1117 #if WXWIN_COMPATIBILITY
1118 wxObject* wxWindowMSW::GetChild(int number) const
1119 {
1120     // Return a pointer to the Nth object in the Panel
1121     wxNode *node = GetChildren().First();
1122     int n = number;
1123     while (node && n--)
1124         node = node->Next();
1125     if ( node )
1126     {
1127         wxObject *obj = (wxObject *)node->Data();
1128         return(obj);
1129     }
1130     else
1131         return NULL;
1132 }
1133 #endif // WXWIN_COMPATIBILITY
1134
1135 // Setup background and foreground colours correctly
1136 void wxWindowMSW::SetupColours()
1137 {
1138     if ( GetParent() )
1139         SetBackgroundColour(GetParent()->GetBackgroundColour());
1140 }
1141
1142 bool wxWindowMSW::IsMouseInWindow() const
1143 {
1144     // get the mouse position
1145     POINT pt;
1146     ::GetCursorPos(&pt);
1147
1148     // find the window which currently has the cursor and go up the window
1149     // chain until we find this window - or exhaust it
1150     HWND hwnd = ::WindowFromPoint(pt);
1151     while ( hwnd && (hwnd != GetHwnd()) )
1152         hwnd = ::GetParent(hwnd);
1153
1154     return hwnd != NULL;
1155 }
1156
1157 void wxWindowMSW::OnIdle(wxIdleEvent& WXUNUSED(event))
1158 {
1159     // Check if we need to send a LEAVE event
1160     if ( m_mouseInWindow )
1161     {
1162         if ( !IsMouseInWindow() )
1163         {
1164             // Generate a LEAVE event
1165             m_mouseInWindow = FALSE;
1166
1167             // Unfortunately the mouse button and keyboard state may have
1168             // changed by the time the OnIdle function is called, so 'state'
1169             // may be meaningless.
1170             int state = 0;
1171             if ( wxIsShiftDown() )
1172                 state |= MK_SHIFT;
1173             if ( wxIsCtrlDown() )
1174                 state |= MK_CONTROL;
1175             if ( GetKeyState( VK_LBUTTON ) )
1176                 state |= MK_LBUTTON;
1177             if ( GetKeyState( VK_MBUTTON ) )
1178                 state |= MK_MBUTTON;
1179             if ( GetKeyState( VK_RBUTTON ) )
1180                 state |= MK_RBUTTON;
1181
1182             POINT pt;
1183             if ( !::GetCursorPos(&pt) )
1184             {
1185                 wxLogLastError(_T("GetCursorPos"));
1186             }
1187
1188             // we need to have client coordinates here for symmetry with
1189             // wxEVT_ENTER_WINDOW
1190             RECT rect;
1191             if ( !::GetWindowRect(GetHwnd(), &rect) )
1192             {
1193                 wxLogLastError(_T("GetWindowRect"));
1194             }
1195             pt.x -= rect.left;
1196             pt.y -= rect.top;
1197
1198             wxMouseEvent event2(wxEVT_LEAVE_WINDOW);
1199             InitMouseEvent(event2, pt.x, pt.y, state);
1200
1201             (void)GetEventHandler()->ProcessEvent(event2);
1202         }
1203     }
1204
1205     UpdateWindowUI();
1206 }
1207
1208 // Set this window to be the child of 'parent'.
1209 bool wxWindowMSW::Reparent(wxWindowBase *parent)
1210 {
1211     if ( !wxWindowBase::Reparent(parent) )
1212         return FALSE;
1213
1214     HWND hWndChild = GetHwnd();
1215     HWND hWndParent = GetParent() ? GetWinHwnd(GetParent()) : (HWND)0;
1216
1217     ::SetParent(hWndChild, hWndParent);
1218
1219     return TRUE;
1220 }
1221
1222 void wxWindowMSW::Clear()
1223 {
1224     wxClientDC dc((wxWindow *)this);
1225     wxBrush brush(GetBackgroundColour(), wxSOLID);
1226     dc.SetBackground(brush);
1227     dc.Clear();
1228 }
1229
1230 static inline void SendSetRedraw(HWND hwnd, bool on)
1231 {
1232     ::SendMessage(hwnd, WM_SETREDRAW, (WPARAM)on, 0);
1233 }
1234
1235 void wxWindowMSW::Freeze()
1236 {
1237     SendSetRedraw(GetHwnd(), FALSE);
1238 }
1239
1240 void wxWindowMSW::Thaw()
1241 {
1242     SendSetRedraw(GetHwnd(), TRUE);
1243
1244     // we need to refresh everything or otherwise he invalidated area is not
1245     // repainted
1246     Refresh();
1247 }
1248
1249 void wxWindowMSW::Refresh(bool eraseBack, const wxRect *rect)
1250 {
1251     HWND hWnd = GetHwnd();
1252     if ( hWnd )
1253     {
1254         if ( rect )
1255         {
1256             RECT mswRect;
1257             mswRect.left = rect->x;
1258             mswRect.top = rect->y;
1259             mswRect.right = rect->x + rect->width;
1260             mswRect.bottom = rect->y + rect->height;
1261
1262             ::InvalidateRect(hWnd, &mswRect, eraseBack);
1263         }
1264         else
1265             ::InvalidateRect(hWnd, NULL, eraseBack);
1266     }
1267 }
1268
1269 void wxWindowMSW::Update()
1270 {
1271     if ( !::UpdateWindow(GetHwnd()) )
1272     {
1273         wxLogLastError(_T("UpdateWindow"));
1274     }
1275
1276 #if defined(__WIN32__) && !defined(__WXMICROWIN__)
1277     // just calling UpdateWindow() is not enough, what we did in our WM_PAINT
1278     // handler needs to be really drawn right now
1279     (void)::GdiFlush();
1280 #endif // __WIN32__
1281 }
1282
1283 // ---------------------------------------------------------------------------
1284 // drag and drop
1285 // ---------------------------------------------------------------------------
1286
1287 #if wxUSE_DRAG_AND_DROP
1288
1289 void wxWindowMSW::SetDropTarget(wxDropTarget *pDropTarget)
1290 {
1291     if ( m_dropTarget != 0 ) {
1292         m_dropTarget->Revoke(m_hWnd);
1293         delete m_dropTarget;
1294     }
1295
1296     m_dropTarget = pDropTarget;
1297     if ( m_dropTarget != 0 )
1298         m_dropTarget->Register(m_hWnd);
1299 }
1300
1301 #endif // wxUSE_DRAG_AND_DROP
1302
1303 // old style file-manager drag&drop support: we retain the old-style
1304 // DragAcceptFiles in parallel with SetDropTarget.
1305 void wxWindowMSW::DragAcceptFiles(bool accept)
1306 {
1307     HWND hWnd = GetHwnd();
1308     if ( hWnd )
1309         ::DragAcceptFiles(hWnd, (BOOL)accept);
1310 }
1311
1312 // ----------------------------------------------------------------------------
1313 // tooltips
1314 // ----------------------------------------------------------------------------
1315
1316 #if wxUSE_TOOLTIPS
1317
1318 void wxWindowMSW::DoSetToolTip(wxToolTip *tooltip)
1319 {
1320     wxWindowBase::DoSetToolTip(tooltip);
1321
1322     if ( m_tooltip )
1323         m_tooltip->SetWindow(this);
1324 }
1325
1326 #endif // wxUSE_TOOLTIPS
1327
1328 // ---------------------------------------------------------------------------
1329 // moving and resizing
1330 // ---------------------------------------------------------------------------
1331
1332 // Get total size
1333 void wxWindowMSW::DoGetSize(int *x, int *y) const
1334 {
1335     HWND hWnd = GetHwnd();
1336     RECT rect;
1337 #ifdef __WIN16__
1338     ::GetWindowRect(hWnd, &rect);
1339 #else
1340     if ( !::GetWindowRect(hWnd, &rect) )
1341     {
1342         wxLogLastError(_T("GetWindowRect"));
1343     }
1344 #endif
1345     if ( x )
1346         *x = rect.right - rect.left;
1347     if ( y )
1348         *y = rect.bottom - rect.top;
1349 }
1350
1351 void wxWindowMSW::DoGetPosition(int *x, int *y) const
1352 {
1353     HWND hWnd = GetHwnd();
1354
1355     RECT rect;
1356     GetWindowRect(hWnd, &rect);
1357
1358     POINT point;
1359     point.x = rect.left;
1360     point.y = rect.top;
1361
1362     // we do the adjustments with respect to the parent only for the "real"
1363     // children, not for the dialogs/frames
1364     if ( !IsTopLevel() )
1365     {
1366         HWND hParentWnd = 0;
1367         wxWindow *parent = GetParent();
1368         if ( parent )
1369             hParentWnd = GetWinHwnd(parent);
1370
1371         // Since we now have the absolute screen coords, if there's a parent we
1372         // must subtract its top left corner
1373         if ( hParentWnd )
1374         {
1375             ::ScreenToClient(hParentWnd, &point);
1376         }
1377
1378         if ( parent )
1379         {
1380             // We may be faking the client origin. So a window that's really at (0,
1381             // 30) may appear (to wxWin apps) to be at (0, 0).
1382             wxPoint pt(parent->GetClientAreaOrigin());
1383             point.x -= pt.x;
1384             point.y -= pt.y;
1385         }
1386     }
1387
1388     if ( x )
1389         *x = point.x;
1390     if ( y )
1391         *y = point.y;
1392 }
1393
1394 void wxWindowMSW::DoScreenToClient(int *x, int *y) const
1395 {
1396     POINT pt;
1397     if ( x )
1398         pt.x = *x;
1399     if ( y )
1400         pt.y = *y;
1401
1402     HWND hWnd = GetHwnd();
1403     ::ScreenToClient(hWnd, &pt);
1404
1405     if ( x )
1406         *x = pt.x;
1407     if ( y )
1408         *y = pt.y;
1409 }
1410
1411 void wxWindowMSW::DoClientToScreen(int *x, int *y) const
1412 {
1413     POINT pt;
1414     if ( x )
1415         pt.x = *x;
1416     if ( y )
1417         pt.y = *y;
1418
1419     HWND hWnd = GetHwnd();
1420     ::ClientToScreen(hWnd, &pt);
1421
1422     if ( x )
1423         *x = pt.x;
1424     if ( y )
1425         *y = pt.y;
1426 }
1427
1428 // Get size *available for subwindows* i.e. excluding menu bar etc.
1429 void wxWindowMSW::DoGetClientSize(int *x, int *y) const
1430 {
1431     HWND hWnd = GetHwnd();
1432     RECT rect;
1433     ::GetClientRect(hWnd, &rect);
1434     if ( x )
1435         *x = rect.right;
1436     if ( y )
1437         *y = rect.bottom;
1438 }
1439
1440 void wxWindowMSW::DoMoveWindow(int x, int y, int width, int height)
1441 {
1442     if ( !::MoveWindow(GetHwnd(), x, y, width, height, TRUE) )
1443     {
1444         wxLogLastError(wxT("MoveWindow"));
1445     }
1446 }
1447
1448 // set the size of the window: if the dimensions are positive, just use them,
1449 // but if any of them is equal to -1, it means that we must find the value for
1450 // it ourselves (unless sizeFlags contains wxSIZE_ALLOW_MINUS_ONE flag, in
1451 // which case -1 is a valid value for x and y)
1452 //
1453 // If sizeFlags contains wxSIZE_AUTO_WIDTH/HEIGHT flags (default), we calculate
1454 // the width/height to best suit our contents, otherwise we reuse the current
1455 // width/height
1456 void wxWindowMSW::DoSetSize(int x, int y, int width, int height, int sizeFlags)
1457 {
1458     // get the current size and position...
1459     int currentX, currentY;
1460     GetPosition(&currentX, &currentY);
1461     int currentW,currentH;
1462     GetSize(&currentW, &currentH);
1463
1464     // ... and don't do anything (avoiding flicker) if it's already ok
1465     if ( x == currentX && y == currentY &&
1466          width == currentW && height == currentH )
1467     {
1468         return;
1469     }
1470
1471     if ( x == -1 && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE) )
1472         x = currentX;
1473     if ( y == -1 && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE) )
1474         y = currentY;
1475
1476     AdjustForParentClientOrigin(x, y, sizeFlags);
1477
1478     wxSize size(-1, -1);
1479     if ( width == -1 )
1480     {
1481         if ( sizeFlags & wxSIZE_AUTO_WIDTH )
1482         {
1483             size = DoGetBestSize();
1484             width = size.x;
1485         }
1486         else
1487         {
1488             // just take the current one
1489             width = currentW;
1490         }
1491     }
1492
1493     if ( height == -1 )
1494     {
1495         if ( sizeFlags & wxSIZE_AUTO_HEIGHT )
1496         {
1497             if ( size.x == -1 )
1498             {
1499                 size = DoGetBestSize();
1500             }
1501             //else: already called DoGetBestSize() above
1502
1503             height = size.y;
1504         }
1505         else
1506         {
1507             // just take the current one
1508             height = currentH;
1509         }
1510     }
1511
1512     DoMoveWindow(x, y, width, height);
1513 }
1514
1515 void wxWindowMSW::DoSetClientSize(int width, int height)
1516 {
1517     wxWindow *parent = GetParent();
1518     HWND hWnd = GetHwnd();
1519     HWND hParentWnd = (HWND) 0;
1520     if ( parent )
1521         hParentWnd = (HWND) parent->GetHWND();
1522
1523     RECT rect;
1524     ::GetClientRect(hWnd, &rect);
1525
1526     RECT rect2;
1527     GetWindowRect(hWnd, &rect2);
1528
1529     // Find the difference between the entire window (title bar and all)
1530     // and the client area; add this to the new client size to move the
1531     // window
1532     int actual_width = rect2.right - rect2.left - rect.right + width;
1533     int actual_height = rect2.bottom - rect2.top - rect.bottom + height;
1534
1535     // If there's a parent, must subtract the parent's top left corner
1536     // since MoveWindow moves relative to the parent
1537
1538     POINT point;
1539     point.x = rect2.left;
1540     point.y = rect2.top;
1541     if ( parent )
1542     {
1543         ::ScreenToClient(hParentWnd, &point);
1544     }
1545
1546     DoMoveWindow(point.x, point.y, actual_width, actual_height);
1547
1548     wxSizeEvent event(wxSize(width, height), m_windowId);
1549     event.SetEventObject(this);
1550     GetEventHandler()->ProcessEvent(event);
1551 }
1552
1553 // For implementation purposes - sometimes decorations make the client area
1554 // smaller
1555 wxPoint wxWindowMSW::GetClientAreaOrigin() const
1556 {
1557     return wxPoint(0, 0);
1558 }
1559
1560 // Makes an adjustment to the window position (for example, a frame that has
1561 // a toolbar that it manages itself).
1562 void wxWindowMSW::AdjustForParentClientOrigin(int& x, int& y, int sizeFlags)
1563 {
1564     // don't do it for the dialogs/frames - they float independently of their
1565     // parent
1566     if ( !IsTopLevel() )
1567     {
1568         wxWindow *parent = GetParent();
1569         if ( !(sizeFlags & wxSIZE_NO_ADJUSTMENTS) && parent )
1570         {
1571             wxPoint pt(parent->GetClientAreaOrigin());
1572             x += pt.x;
1573             y += pt.y;
1574         }
1575     }
1576 }
1577
1578 // ---------------------------------------------------------------------------
1579 // text metrics
1580 // ---------------------------------------------------------------------------
1581
1582 int wxWindowMSW::GetCharHeight() const
1583 {
1584     return wxGetTextMetrics(this).tmHeight;
1585 }
1586
1587 int wxWindowMSW::GetCharWidth() const
1588 {
1589     // +1 is needed because Windows apparently adds it when calculating the
1590     // dialog units size in pixels
1591 #if wxDIALOG_UNIT_COMPATIBILITY
1592     return wxGetTextMetrics(this).tmAveCharWidth;
1593 #else
1594     return wxGetTextMetrics(this).tmAveCharWidth + 1;
1595 #endif
1596 }
1597
1598 void wxWindowMSW::GetTextExtent(const wxString& string,
1599                              int *x, int *y,
1600                              int *descent, int *externalLeading,
1601                              const wxFont *theFont) const
1602 {
1603     const wxFont *fontToUse = theFont;
1604     if ( !fontToUse )
1605         fontToUse = &m_font;
1606
1607     HWND hWnd = GetHwnd();
1608     HDC dc = ::GetDC(hWnd);
1609
1610     HFONT fnt = 0;
1611     HFONT hfontOld = 0;
1612     if ( fontToUse && fontToUse->Ok() )
1613     {
1614         fnt = (HFONT)((wxFont *)fontToUse)->GetResourceHandle(); // const_cast
1615         if ( fnt )
1616             hfontOld = (HFONT)SelectObject(dc,fnt);
1617     }
1618
1619     SIZE sizeRect;
1620     TEXTMETRIC tm;
1621     GetTextExtentPoint(dc, string, (int)string.Length(), &sizeRect);
1622     GetTextMetrics(dc, &tm);
1623
1624     if ( fontToUse && fnt && hfontOld )
1625         SelectObject(dc, hfontOld);
1626
1627     ReleaseDC(hWnd, dc);
1628
1629     if ( x )
1630         *x = sizeRect.cx;
1631     if ( y )
1632         *y = sizeRect.cy;
1633     if ( descent )
1634         *descent = tm.tmDescent;
1635     if ( externalLeading )
1636         *externalLeading = tm.tmExternalLeading;
1637 }
1638
1639 #if wxUSE_CARET && WXWIN_COMPATIBILITY
1640 // ---------------------------------------------------------------------------
1641 // Caret manipulation
1642 // ---------------------------------------------------------------------------
1643
1644 void wxWindowMSW::CreateCaret(int w, int h)
1645 {
1646     SetCaret(new wxCaret(this, w, h));
1647 }
1648
1649 void wxWindowMSW::CreateCaret(const wxBitmap *WXUNUSED(bitmap))
1650 {
1651     wxFAIL_MSG("not implemented");
1652 }
1653
1654 void wxWindowMSW::ShowCaret(bool show)
1655 {
1656     wxCHECK_RET( m_caret, "no caret to show" );
1657
1658     m_caret->Show(show);
1659 }
1660
1661 void wxWindowMSW::DestroyCaret()
1662 {
1663     SetCaret(NULL);
1664 }
1665
1666 void wxWindowMSW::SetCaretPos(int x, int y)
1667 {
1668     wxCHECK_RET( m_caret, "no caret to move" );
1669
1670     m_caret->Move(x, y);
1671 }
1672
1673 void wxWindowMSW::GetCaretPos(int *x, int *y) const
1674 {
1675     wxCHECK_RET( m_caret, "no caret to get position of" );
1676
1677     m_caret->GetPosition(x, y);
1678 }
1679 #endif // wxUSE_CARET
1680
1681 // ---------------------------------------------------------------------------
1682 // popup menu
1683 // ---------------------------------------------------------------------------
1684
1685 // yield for WM_COMMAND events only, i.e. process all WM_COMMANDs in the queue
1686 // immediately, without waiting for the next event loop iteration
1687 //
1688 // NB: this function should probably be made public later as it can almost
1689 //     surely replace wxYield() elsewhere as well
1690 static void wxYieldForCommandsOnly()
1691 {
1692     // peek all WM_COMMANDs (it will always return WM_QUIT too but we don't
1693     // want to process it here)
1694     MSG msg;
1695     while ( ::PeekMessage(&msg, (HWND)0, WM_COMMAND, WM_COMMAND, PM_REMOVE)
1696                 && msg.message != WM_QUIT )
1697     {
1698         wxTheApp->DoMessage((WXMSG *)&msg);
1699     }
1700 }
1701
1702 #if wxUSE_MENUS_NATIVE
1703
1704 bool wxWindowMSW::DoPopupMenu(wxMenu *menu, int x, int y)
1705 {
1706     menu->SetInvokingWindow(this);
1707     menu->UpdateUI();
1708
1709     HWND hWnd = GetHwnd();
1710     HMENU hMenu = GetHmenuOf(menu);
1711     POINT point;
1712     point.x = x;
1713     point.y = y;
1714     ::ClientToScreen(hWnd, &point);
1715     wxCurrentPopupMenu = menu;
1716     ::TrackPopupMenu(hMenu, TPM_RIGHTBUTTON, point.x, point.y, 0, hWnd, NULL);
1717
1718     // we need to do it righ now as otherwise the events are never going to be
1719     // sent to wxCurrentPopupMenu from HandleCommand()
1720     //
1721     // note that even eliminating (ugly) wxCurrentPopupMenu global wouldn't
1722     // help and we'd still need wxYieldForCommandsOnly() as the menu may be
1723     // destroyed as soon as we return (it can be a local variable in the caller
1724     // for example) and so we do need to process the event immediately
1725     wxYieldForCommandsOnly();
1726
1727     wxCurrentPopupMenu = NULL;
1728
1729     menu->SetInvokingWindow(NULL);
1730
1731     return TRUE;
1732 }
1733
1734 #endif // wxUSE_MENUS_NATIVE
1735
1736 // ===========================================================================
1737 // pre/post message processing
1738 // ===========================================================================
1739
1740 long wxWindowMSW::MSWDefWindowProc(WXUINT nMsg, WXWPARAM wParam, WXLPARAM lParam)
1741 {
1742     if ( m_oldWndProc )
1743         return ::CallWindowProc(CASTWNDPROC m_oldWndProc, GetHwnd(), (UINT) nMsg, (WPARAM) wParam, (LPARAM) lParam);
1744     else
1745         return ::DefWindowProc(GetHwnd(), nMsg, wParam, lParam);
1746 }
1747
1748 bool wxWindowMSW::MSWProcessMessage(WXMSG* pMsg)
1749 {
1750     // wxUniversal implements tab traversal itself
1751 #ifndef __WXUNIVERSAL__
1752     if ( m_hWnd != 0 && (GetWindowStyleFlag() & wxTAB_TRAVERSAL) )
1753     {
1754         // intercept dialog navigation keys
1755         MSG *msg = (MSG *)pMsg;
1756
1757         // here we try to do all the job which ::IsDialogMessage() usually does
1758         // internally
1759 #if 1
1760         bool bProcess = TRUE;
1761         if ( msg->message != WM_KEYDOWN )
1762             bProcess = FALSE;
1763
1764         if ( bProcess && (HIWORD(msg->lParam) & KF_ALTDOWN) == KF_ALTDOWN )
1765             bProcess = FALSE;
1766
1767         if ( bProcess )
1768         {
1769             bool bCtrlDown = wxIsCtrlDown();
1770             bool bShiftDown = wxIsShiftDown();
1771
1772             // WM_GETDLGCODE: ask the control if it wants the key for itself,
1773             // don't process it if it's the case (except for Ctrl-Tab/Enter
1774             // combinations which are always processed)
1775             LONG lDlgCode = 0;
1776             if ( !bCtrlDown )
1777             {
1778                 lDlgCode = ::SendMessage(msg->hwnd, WM_GETDLGCODE, 0, 0);
1779             }
1780
1781             bool bForward = TRUE,
1782                  bWindowChange = FALSE;
1783
1784             switch ( msg->wParam )
1785             {
1786                 case VK_TAB:
1787                     // assume that nobody wants Shift-TAB for himself - if we
1788                     // don't do it there is no easy way for a control to grab
1789                     // TABs but still let Shift-TAB work as navugation key
1790                     if ( (lDlgCode & DLGC_WANTTAB) && !bShiftDown ) {
1791                         bProcess = FALSE;
1792                     }
1793                     else {
1794                         // Ctrl-Tab cycles thru notebook pages
1795                         bWindowChange = bCtrlDown;
1796                         bForward = !bShiftDown;
1797                     }
1798                     break;
1799
1800                 case VK_UP:
1801                 case VK_LEFT:
1802                     if ( (lDlgCode & DLGC_WANTARROWS) || bCtrlDown )
1803                         bProcess = FALSE;
1804                     else
1805                         bForward = FALSE;
1806                     break;
1807
1808                 case VK_DOWN:
1809                 case VK_RIGHT:
1810                     if ( (lDlgCode & DLGC_WANTARROWS) || bCtrlDown )
1811                         bProcess = FALSE;
1812                     break;
1813
1814                 case VK_RETURN:
1815                     {
1816                         if ( (lDlgCode & DLGC_WANTMESSAGE) && !bCtrlDown )
1817                         {
1818                             // control wants to process Enter itself, don't
1819                             // call IsDialogMessage() which would interpret
1820                             // it
1821                             return FALSE;
1822                         }
1823                         else if ( lDlgCode & DLGC_BUTTON )
1824                         {
1825                             // let IsDialogMessage() handle this for all
1826                             // buttons except the owner-drawn ones which it
1827                             // just seems to ignore
1828                             long style = ::GetWindowLong(msg->hwnd, GWL_STYLE);
1829                             if ( (style & BS_OWNERDRAW) == BS_OWNERDRAW )
1830                             {
1831                                 // emulate the button click
1832                                 wxWindow *btn = wxFindWinFromHandle((WXHWND)msg->hwnd);
1833                                 if ( btn )
1834                                     btn->MSWCommand(BN_CLICKED, 0 /* unused */);
1835                             }
1836
1837                             bProcess = FALSE;
1838                         }
1839                         // FIXME: this should be handled by
1840                         //        wxNavigationKeyEvent handler and not here!!
1841                         else
1842                         {
1843 #if wxUSE_BUTTON
1844                             wxButton *btn = wxDynamicCast(GetDefaultItem(),
1845                                                           wxButton);
1846                             if ( btn && btn->IsEnabled() )
1847                             {
1848                                 // if we do have a default button, do press it
1849                                 btn->MSWCommand(BN_CLICKED, 0 /* unused */);
1850
1851                                 return TRUE;
1852                             }
1853                             else // no default button
1854 #endif // wxUSE_BUTTON
1855                             {
1856                                 // no special function for enter and don't even
1857                                 // let IsDialogMessage() have it: it seems to
1858                                 // do something really strange with it
1859                                 return FALSE;
1860                             }
1861                         }
1862                     }
1863                     break;
1864
1865                 default:
1866                     bProcess = FALSE;
1867             }
1868
1869             if ( bProcess )
1870             {
1871                 wxNavigationKeyEvent event;
1872                 event.SetDirection(bForward);
1873                 event.SetWindowChange(bWindowChange);
1874                 event.SetEventObject(this);
1875
1876                 if ( GetEventHandler()->ProcessEvent(event) )
1877                 {
1878                     return TRUE;
1879                 }
1880             }
1881         }
1882 #else // 0
1883         // let ::IsDialogMessage() do almost everything and handle just the
1884         // things it doesn't here: Ctrl-TAB for switching notebook pages
1885         if ( msg->message == WM_KEYDOWN )
1886         {
1887             // don't process system keys here
1888             if ( !(HIWORD(msg->lParam) & KF_ALTDOWN) )
1889             {
1890                 if ( (msg->wParam == VK_TAB) && wxIsCtrlDown() )
1891                 {
1892                     // find the first notebook parent and change its page
1893                     wxWindow *win = this;
1894                     wxNotebook *nbook = NULL;
1895                     while ( win && !nbook )
1896                     {
1897                         nbook = wxDynamicCast(win, wxNotebook);
1898                         win = win->GetParent();
1899                     }
1900
1901                     if ( nbook )
1902                     {
1903                         bool forward = !wxIsShiftDown();
1904
1905                         nbook->AdvanceSelection(forward);
1906                     }
1907                 }
1908             }
1909         }
1910 #endif // 1/0
1911
1912         if ( ::IsDialogMessage(GetHwnd(), msg) )
1913         {
1914             // IsDialogMessage() did something...
1915             return TRUE;
1916         }
1917     }
1918 #endif // __WXUNIVERSAL__
1919
1920 #if wxUSE_TOOLTIPS
1921     if ( m_tooltip )
1922     {
1923         // relay mouse move events to the tooltip control
1924         MSG *msg = (MSG *)pMsg;
1925         if ( msg->message == WM_MOUSEMOVE )
1926             m_tooltip->RelayEvent(pMsg);
1927     }
1928 #endif // wxUSE_TOOLTIPS
1929
1930     return FALSE;
1931 }
1932
1933 bool wxWindowMSW::MSWTranslateMessage(WXMSG* pMsg)
1934 {
1935 #if wxUSE_ACCEL && !defined(__WXUNIVERSAL__)
1936     return m_acceleratorTable.Translate(this, pMsg);
1937 #else
1938     return FALSE;
1939 #endif // wxUSE_ACCEL
1940 }
1941
1942 bool wxWindowMSW::MSWShouldPreProcessMessage(WXMSG* pMsg)
1943 {
1944     // preprocess all messages by default
1945     return TRUE;
1946 }
1947
1948 // ---------------------------------------------------------------------------
1949 // message params unpackers (different for Win16 and Win32)
1950 // ---------------------------------------------------------------------------
1951
1952 #ifdef __WIN32__
1953
1954 void wxWindowMSW::UnpackCommand(WXWPARAM wParam, WXLPARAM lParam,
1955                              WORD *id, WXHWND *hwnd, WORD *cmd)
1956 {
1957     *id = LOWORD(wParam);
1958     *hwnd = (WXHWND)lParam;
1959     *cmd = HIWORD(wParam);
1960 }
1961
1962 void wxWindowMSW::UnpackActivate(WXWPARAM wParam, WXLPARAM lParam,
1963                               WXWORD *state, WXWORD *minimized, WXHWND *hwnd)
1964 {
1965     *state = LOWORD(wParam);
1966     *minimized = HIWORD(wParam);
1967     *hwnd = (WXHWND)lParam;
1968 }
1969
1970 void wxWindowMSW::UnpackScroll(WXWPARAM wParam, WXLPARAM lParam,
1971                             WXWORD *code, WXWORD *pos, WXHWND *hwnd)
1972 {
1973     *code = LOWORD(wParam);
1974     *pos = HIWORD(wParam);
1975     *hwnd = (WXHWND)lParam;
1976 }
1977
1978 void wxWindowMSW::UnpackCtlColor(WXWPARAM wParam, WXLPARAM lParam,
1979                               WXWORD *nCtlColor, WXHDC *hdc, WXHWND *hwnd)
1980 {
1981 #ifndef __WXMICROWIN__
1982     *nCtlColor = CTLCOLOR_BTN;
1983     *hwnd = (WXHWND)lParam;
1984     *hdc = (WXHDC)wParam;
1985 #endif
1986 }
1987
1988 void wxWindowMSW::UnpackMenuSelect(WXWPARAM wParam, WXLPARAM lParam,
1989                                 WXWORD *item, WXWORD *flags, WXHMENU *hmenu)
1990 {
1991     *item = (WXWORD)wParam;
1992     *flags = HIWORD(wParam);
1993     *hmenu = (WXHMENU)lParam;
1994 }
1995
1996 #else // Win16
1997
1998 void wxWindowMSW::UnpackCommand(WXWPARAM wParam, WXLPARAM lParam,
1999                              WXWORD *id, WXHWND *hwnd, WXWORD *cmd)
2000 {
2001     *id = (WXWORD)wParam;
2002     *hwnd = (WXHWND)LOWORD(lParam);
2003     *cmd = HIWORD(lParam);
2004 }
2005
2006 void wxWindowMSW::UnpackActivate(WXWPARAM wParam, WXLPARAM lParam,
2007                               WXWORD *state, WXWORD *minimized, WXHWND *hwnd)
2008 {
2009     *state = (WXWORD)wParam;
2010     *minimized = LOWORD(lParam);
2011     *hwnd = (WXHWND)HIWORD(lParam);
2012 }
2013
2014 void wxWindowMSW::UnpackScroll(WXWPARAM wParam, WXLPARAM lParam,
2015                             WXWORD *code, WXWORD *pos, WXHWND *hwnd)
2016 {
2017     *code = (WXWORD)wParam;
2018     *pos = LOWORD(lParam);
2019     *hwnd = (WXHWND)HIWORD(lParam);
2020 }
2021
2022 void wxWindowMSW::UnpackCtlColor(WXWPARAM wParam, WXLPARAM lParam,
2023                               WXWORD *nCtlColor, WXHDC *hdc, WXHWND *hwnd)
2024 {
2025     *hwnd = (WXHWND)LOWORD(lParam);
2026     *nCtlColor = (int)HIWORD(lParam);
2027     *hdc = (WXHDC)wParam;
2028 }
2029
2030 void wxWindowMSW::UnpackMenuSelect(WXWPARAM wParam, WXLPARAM lParam,
2031                                 WXWORD *item, WXWORD *flags, WXHMENU *hmenu)
2032 {
2033     *item = (WXWORD)wParam;
2034     *flags = LOWORD(lParam);
2035     *hmenu = (WXHMENU)HIWORD(lParam);
2036 }
2037
2038 #endif // Win32/16
2039
2040 // ---------------------------------------------------------------------------
2041 // Main wxWindows window proc and the window proc for wxWindow
2042 // ---------------------------------------------------------------------------
2043
2044 // Hook for new window just as it's being created, when the window isn't yet
2045 // associated with the handle
2046 wxWindowMSW *wxWndHook = NULL;
2047
2048 // Main window proc
2049 LRESULT WXDLLEXPORT APIENTRY _EXPORT wxWndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
2050 {
2051     // trace all messages - useful for the debugging
2052 #ifdef __WXDEBUG__
2053     wxLogTrace(wxTraceMessages, wxT("Processing %s(wParam=%8lx, lParam=%8lx)"),
2054                wxGetMessageName(message), wParam, lParam);
2055 #endif // __WXDEBUG__
2056
2057     wxWindowMSW *wnd = wxFindWinFromHandle((WXHWND) hWnd);
2058
2059     // when we get the first message for the HWND we just created, we associate
2060     // it with wxWindow stored in wxWndHook
2061     if ( !wnd && wxWndHook )
2062     {
2063 #if 0 // def __WXDEBUG__
2064         char buf[512];
2065         ::GetClassNameA((HWND) hWnd, buf, 512);
2066         wxString className(buf);
2067 #endif
2068
2069         wxAssociateWinWithHandle(hWnd, wxWndHook);
2070         wnd = wxWndHook;
2071         wxWndHook = NULL;
2072         wnd->SetHWND((WXHWND)hWnd);
2073     }
2074
2075     LRESULT rc;
2076
2077     // Stop right here if we don't have a valid handle in our wxWindow object.
2078     if ( wnd && !wnd->GetHWND() )
2079     {
2080         // FIXME: why do we do this?
2081         wnd->SetHWND((WXHWND) hWnd);
2082         rc = wnd->MSWDefWindowProc(message, wParam, lParam );
2083         wnd->SetHWND(0);
2084     }
2085     else
2086     {
2087         if ( wnd )
2088             rc = wnd->MSWWindowProc(message, wParam, lParam);
2089         else
2090             rc = DefWindowProc( hWnd, message, wParam, lParam );
2091     }
2092
2093     return rc;
2094 }
2095
2096 long wxWindowMSW::MSWWindowProc(WXUINT message, WXWPARAM wParam, WXLPARAM lParam)
2097 {
2098     // did we process the message?
2099     bool processed = FALSE;
2100
2101     // the return value
2102     union
2103     {
2104         bool        allow;
2105         long        result;
2106         WXHICON     hIcon;
2107         WXHBRUSH    hBrush;
2108     } rc;
2109
2110     // for most messages we should return 0 when we do process the message
2111     rc.result = 0;
2112
2113     switch ( message )
2114     {
2115         case WM_CREATE:
2116             {
2117                 bool mayCreate;
2118                 processed = HandleCreate((WXLPCREATESTRUCT)lParam, &mayCreate);
2119                 if ( processed )
2120                 {
2121                     // return 0 to allow window creation
2122                     rc.result = mayCreate ? 0 : -1;
2123                 }
2124             }
2125             break;
2126
2127         case WM_DESTROY:
2128             // never set processed to TRUE and *always* pass WM_DESTROY to
2129             // DefWindowProc() as Windows may do some internal cleanup when
2130             // processing it and failing to pass the message along may cause
2131             // memory and resource leaks!
2132             (void)HandleDestroy();
2133             break;
2134
2135         case WM_MOVE:
2136             processed = HandleMove(GET_X_LPARAM(lParam), GET_Y_LPARAM(lParam));
2137             break;
2138
2139         case WM_SIZE:
2140             switch ( wParam )
2141             {
2142                 case SIZE_MAXHIDE:
2143                 case SIZE_MAXSHOW:
2144                     // we're not interested in these messages at all
2145                     break;
2146
2147                 case SIZE_MINIMIZED:
2148                     // we shouldn't send sizev events for these messages as the
2149                     // client size may be negative which breaks existing code
2150                     //
2151                     // OTOH we might send another (wxMinimizedEvent?) one or
2152                     // add an additional parameter to wxSizeEvent if this is
2153                     // useful to anybody
2154                     break;
2155
2156                 default:
2157                     wxFAIL_MSG( _T("unexpected WM_SIZE parameter") );
2158                     // fall through nevertheless
2159
2160                 case SIZE_MAXIMIZED:
2161                 case SIZE_RESTORED:
2162                     processed = HandleSize(LOWORD(lParam), HIWORD(lParam),
2163                                            wParam);
2164             }
2165             break;
2166
2167 #ifndef __WXMICROWIN__
2168         case WM_ACTIVATEAPP:
2169             wxTheApp->SetActive(wParam != 0, FindFocus());
2170             break;
2171 #endif
2172
2173         case WM_ACTIVATE:
2174             {
2175                 WXWORD state, minimized;
2176                 WXHWND hwnd;
2177                 UnpackActivate(wParam, lParam, &state, &minimized, &hwnd);
2178
2179                 processed = HandleActivate(state, minimized != 0, (WXHWND)hwnd);
2180             }
2181             break;
2182
2183         case WM_SETFOCUS:
2184             processed = HandleSetFocus((WXHWND)(HWND)wParam);
2185             break;
2186
2187         case WM_KILLFOCUS:
2188             processed = HandleKillFocus((WXHWND)(HWND)wParam);
2189             break;
2190
2191         case WM_PAINT:
2192             processed = HandlePaint();
2193             break;
2194
2195         case WM_CLOSE:
2196             // don't let the DefWindowProc() destroy our window - we'll do it
2197             // ourselves in ~wxWindow
2198             processed = TRUE;
2199             rc.result = TRUE;
2200             break;
2201
2202         case WM_SHOWWINDOW:
2203             processed = HandleShow(wParam != 0, (int)lParam);
2204             break;
2205
2206         case WM_MOUSEMOVE:
2207             processed = HandleMouseMove(GET_X_LPARAM(lParam),
2208                                         GET_Y_LPARAM(lParam),
2209                                         wParam);
2210             break;
2211
2212 #if wxUSE_MOUSEWHEEL
2213         case WM_MOUSEWHEEL:
2214             processed = HandleMouseWheel(wParam, lParam);
2215             break;
2216 #endif
2217
2218         case WM_LBUTTONDOWN:
2219         case WM_LBUTTONUP:
2220         case WM_LBUTTONDBLCLK:
2221         case WM_RBUTTONDOWN:
2222         case WM_RBUTTONUP:
2223         case WM_RBUTTONDBLCLK:
2224         case WM_MBUTTONDOWN:
2225         case WM_MBUTTONUP:
2226         case WM_MBUTTONDBLCLK:
2227          {
2228                 processed = FALSE;
2229 #ifdef __WXMICROWIN__
2230                 // MicroWindows seems to ignore the fact that a window is
2231                 // disabled. So catch mouse events and throw them away if
2232                 // necessary.
2233                 wxWindowMSW* win = this;
2234                 while (win)
2235                 {
2236                     if (!win->IsEnabled())
2237                     {
2238                         processed = TRUE;
2239                         break;
2240                     }
2241                     win = win->GetParent();
2242                     if (win && win->IsTopLevel())
2243                         break;
2244                 }
2245 #endif // __WXMICROWIN__
2246                 if (!processed)
2247                 {
2248                     if (message == WM_LBUTTONDOWN && AcceptsFocus())
2249                         SetFocus();
2250                      processed = HandleMouseEvent(message,
2251                                          GET_X_LPARAM(lParam),
2252                                          GET_Y_LPARAM(lParam),
2253                                                   wParam);
2254                 }
2255                 break;
2256          }
2257
2258 #ifdef __WXMICROWIN__
2259         case WM_NCLBUTTONDOWN:
2260         case WM_NCLBUTTONUP:
2261         case WM_NCLBUTTONDBLCLK:
2262         case WM_NCRBUTTONDOWN:
2263         case WM_NCRBUTTONUP:
2264         case WM_NCRBUTTONDBLCLK:
2265 #if 0
2266         case WM_NCMBUTTONDOWN:
2267         case WM_NCMBUTTONUP:
2268         case WM_NCMBUTTONDBLCLK:
2269 #endif
2270             {
2271                 // MicroWindows seems to ignore the fact that a window
2272                 // is disabled. So catch mouse events and throw them away if necessary.
2273                 processed = FALSE;
2274                 wxWindowMSW* win = this;
2275                 while (win)
2276                 {
2277                     if (!win->IsEnabled())
2278                     {
2279                         processed = TRUE;
2280                         break;
2281                     }
2282                     win = win->GetParent();
2283                     if (win && win->IsTopLevel())
2284                         break;
2285                 }
2286                 break;
2287             }
2288 #endif // __WXMICROWIN__
2289
2290 #ifdef MM_JOY1MOVE
2291         case MM_JOY1MOVE:
2292         case MM_JOY2MOVE:
2293         case MM_JOY1ZMOVE:
2294         case MM_JOY2ZMOVE:
2295         case MM_JOY1BUTTONDOWN:
2296         case MM_JOY2BUTTONDOWN:
2297         case MM_JOY1BUTTONUP:
2298         case MM_JOY2BUTTONUP:
2299             processed = HandleJoystickEvent(message,
2300                                             GET_X_LPARAM(lParam),
2301                                             GET_Y_LPARAM(lParam),
2302                                             wParam);
2303             break;
2304 #endif // __WXMICROWIN__
2305
2306         case WM_SYSCOMMAND:
2307             processed = HandleSysCommand(wParam, lParam);
2308             break;
2309
2310         case WM_COMMAND:
2311             {
2312                 WORD id, cmd;
2313                 WXHWND hwnd;
2314                 UnpackCommand(wParam, lParam, &id, &hwnd, &cmd);
2315
2316                 processed = HandleCommand(id, cmd, hwnd);
2317             }
2318             break;
2319
2320 #ifdef __WIN95__
2321         case WM_NOTIFY:
2322             processed = HandleNotify((int)wParam, lParam, &rc.result);
2323             break;
2324 #endif  // Win95
2325
2326             // for these messages we must return TRUE if process the message
2327 #ifdef WM_DRAWITEM
2328         case WM_DRAWITEM:
2329         case WM_MEASUREITEM:
2330             {
2331                 int idCtrl = (UINT)wParam;
2332                 if ( message == WM_DRAWITEM )
2333                 {
2334                     processed = MSWOnDrawItem(idCtrl,
2335                                               (WXDRAWITEMSTRUCT *)lParam);
2336                 }
2337                 else
2338                 {
2339                     processed = MSWOnMeasureItem(idCtrl,
2340                                                  (WXMEASUREITEMSTRUCT *)lParam);
2341                 }
2342
2343                 if ( processed )
2344                     rc.result = TRUE;
2345             }
2346             break;
2347 #endif // defined(WM_DRAWITEM)
2348
2349         case WM_GETDLGCODE:
2350             if ( m_lDlgCode )
2351             {
2352                 rc.result = m_lDlgCode;
2353                 processed = TRUE;
2354             }
2355             //else: get the dlg code from the DefWindowProc()
2356             break;
2357
2358         case WM_SYSKEYDOWN:
2359         case WM_KEYDOWN:
2360             // If this has been processed by an event handler,
2361             // return 0 now (we've handled it).
2362             if ( HandleKeyDown((WORD) wParam, lParam) )
2363             {
2364                 processed = TRUE;
2365
2366                 break;
2367             }
2368
2369             // we consider these message "not interesting" to OnChar
2370             if ( wParam == VK_SHIFT || wParam == VK_CONTROL )
2371             {
2372                 processed = TRUE;
2373
2374                 break;
2375             }
2376
2377             switch ( wParam )
2378             {
2379                 // avoid duplicate messages to OnChar for these ASCII keys: they
2380                 // will be translated by TranslateMessage() and received in WM_CHAR
2381                 case VK_ESCAPE:
2382                 case VK_SPACE:
2383                 case VK_RETURN:
2384                 case VK_BACK:
2385                 case VK_TAB:
2386                 case VK_ADD:
2387                 case VK_SUBTRACT:
2388                     // but set processed to FALSE, not TRUE to still pass them to
2389                     // the control's default window proc - otherwise built-in
2390                     // keyboard handling won't work
2391                     processed = FALSE;
2392
2393                     break;
2394
2395 #ifdef VK_APPS
2396                 // special case of VK_APPS: treat it the same as right mouse
2397                 // click because both usually pop up a context menu
2398                 case VK_APPS:
2399                     {
2400                         WPARAM flags;
2401                         int x, y;
2402
2403                         TranslateKbdEventToMouse(this, &x, &y, &flags);
2404                         processed = HandleMouseEvent(WM_RBUTTONDOWN, x, y, flags);
2405                     }
2406                     break;
2407 #endif // VK_APPS
2408
2409                 case VK_LEFT:
2410                 case VK_RIGHT:
2411                 case VK_DOWN:
2412                 case VK_UP:
2413                 default:
2414                     processed = HandleChar((WORD)wParam, lParam);
2415             }
2416             break;
2417
2418         case WM_SYSKEYUP:
2419         case WM_KEYUP:
2420 #ifdef VK_APPS
2421             // special case of VK_APPS: treat it the same as right mouse button
2422             if ( wParam == VK_APPS )
2423             {
2424                 WPARAM flags;
2425                 int x, y;
2426
2427                 TranslateKbdEventToMouse(this, &x, &y, &flags);
2428                 processed = HandleMouseEvent(WM_RBUTTONUP, x, y, flags);
2429             }
2430             else
2431 #endif // VK_APPS
2432             {
2433                 processed = HandleKeyUp((WORD) wParam, lParam);
2434             }
2435             break;
2436
2437         case WM_SYSCHAR:
2438         case WM_CHAR: // Always an ASCII character
2439             processed = HandleChar((WORD)wParam, lParam, TRUE);
2440             break;
2441
2442         case WM_HSCROLL:
2443         case WM_VSCROLL:
2444             {
2445                 WXWORD code, pos;
2446                 WXHWND hwnd;
2447                 UnpackScroll(wParam, lParam, &code, &pos, &hwnd);
2448
2449                 processed = MSWOnScroll(message == WM_HSCROLL ? wxHORIZONTAL
2450                                                               : wxVERTICAL,
2451                                         code, pos, hwnd);
2452             }
2453             break;
2454
2455         // CTLCOLOR messages are sent by children to query the parent for their
2456         // colors#ifndef __WXMICROWIN__
2457 #ifndef __WXMICROWIN__
2458 #ifdef __WIN32__
2459         case WM_CTLCOLORMSGBOX:
2460         case WM_CTLCOLOREDIT:
2461         case WM_CTLCOLORLISTBOX:
2462         case WM_CTLCOLORBTN:
2463         case WM_CTLCOLORDLG:
2464         case WM_CTLCOLORSCROLLBAR:
2465         case WM_CTLCOLORSTATIC:
2466 #else // Win16
2467         case WM_CTLCOLOR:
2468 #endif // Win32/16
2469             {
2470                 WXWORD nCtlColor;
2471                 WXHDC hdc;
2472                 WXHWND hwnd;
2473                 UnpackCtlColor(wParam, lParam, &nCtlColor, &hdc, &hwnd);
2474
2475                 processed = HandleCtlColor(&rc.hBrush,
2476                                            (WXHDC)hdc,
2477                                            (WXHWND)hwnd,
2478                                            nCtlColor,
2479                                            message,
2480                                            wParam,
2481                                            lParam);
2482             }
2483             break;
2484 #endif // !__WXMICROWIN__
2485
2486             // the return value for this message is ignored
2487         case WM_SYSCOLORCHANGE:
2488             processed = HandleSysColorChange();
2489             break;
2490
2491         case WM_PALETTECHANGED:
2492             processed = HandlePaletteChanged((WXHWND) (HWND) wParam);
2493             break;
2494
2495         case WM_QUERYNEWPALETTE:
2496             processed = HandleQueryNewPalette();
2497             break;
2498
2499         case WM_ERASEBKGND:
2500             processed = HandleEraseBkgnd((WXHDC)(HDC)wParam);
2501             if ( processed )
2502             {
2503                 // we processed the message, i.e. erased the background
2504                 rc.result = TRUE;
2505             }
2506             break;
2507
2508         case WM_DROPFILES:
2509             processed = HandleDropFiles(wParam);
2510             break;
2511
2512         case WM_INITDIALOG:
2513             processed = HandleInitDialog((WXHWND)(HWND)wParam);
2514
2515             if ( processed )
2516             {
2517                 // we never set focus from here
2518                 rc.result = FALSE;
2519             }
2520             break;
2521
2522         case WM_QUERYENDSESSION:
2523             processed = HandleQueryEndSession(lParam, &rc.allow);
2524             break;
2525
2526         case WM_ENDSESSION:
2527             processed = HandleEndSession(wParam != 0, lParam);
2528             break;
2529
2530         case WM_GETMINMAXINFO:
2531             processed = HandleGetMinMaxInfo((MINMAXINFO*)lParam);
2532             break;
2533
2534         case WM_SETCURSOR:
2535             processed = HandleSetCursor((WXHWND)(HWND)wParam,
2536                                         LOWORD(lParam),     // hit test
2537                                         HIWORD(lParam));    // mouse msg
2538
2539             if ( processed )
2540             {
2541                 // returning TRUE stops the DefWindowProc() from further
2542                 // processing this message - exactly what we need because we've
2543                 // just set the cursor.
2544                 rc.result = TRUE;
2545             }
2546             break;
2547
2548 #if defined(__WIN32__) && defined(WM_HELP)
2549         case WM_HELP:
2550             {
2551                 HELPINFO* info = (HELPINFO*) lParam;
2552                 // Don't yet process menu help events, just windows
2553                 if (info->iContextType == HELPINFO_WINDOW)
2554                 {
2555                     wxWindowMSW* subjectOfHelp = this;
2556                     bool eventProcessed = FALSE;
2557                     while (subjectOfHelp && !eventProcessed)
2558                     {
2559                         wxHelpEvent helpEvent(wxEVT_HELP,
2560                                               subjectOfHelp->GetId(),
2561                                               wxPoint(info->MousePos.x,
2562                                               info->MousePos.y) );
2563                         helpEvent.SetEventObject(this);
2564                         eventProcessed =
2565                             GetEventHandler()->ProcessEvent(helpEvent);
2566
2567                         // Go up the window hierarchy until the event is
2568                         // handled (or not)
2569                         subjectOfHelp = subjectOfHelp->GetParent();
2570                     }
2571
2572                     processed = eventProcessed;
2573                 }
2574                 else if (info->iContextType == HELPINFO_MENUITEM)
2575                 {
2576                     wxHelpEvent helpEvent(wxEVT_HELP, info->iCtrlId);
2577                     helpEvent.SetEventObject(this);
2578                     processed = GetEventHandler()->ProcessEvent(helpEvent);
2579
2580                 }
2581                 //else: processed is already FALSE
2582             }
2583             break;
2584
2585         case WM_CONTEXTMENU:
2586             {
2587                 // we don't convert from screen to client coordinates as
2588                 // the event may be handled by a parent window
2589                 wxPoint pt(GET_X_LPARAM(lParam), GET_Y_LPARAM(lParam));
2590
2591                 wxContextMenuEvent evtCtx(wxEVT_CONTEXT_MENU, GetId(), pt);
2592                 processed = GetEventHandler()->ProcessEvent(evtCtx);
2593             }
2594             break;
2595 #endif // __WIN32__
2596
2597 #ifdef __WXUNIVERSAL__
2598         case WM_NCHITTEST:
2599             // we shouldn't allow the windows which don't want to get focus to
2600             // get it
2601             if ( !AcceptsFocus() )
2602             {
2603                 rc.result = HTTRANSPARENT;
2604                 processed = TRUE;
2605             }
2606             break;
2607 #endif // __WXUNIVERSAL__
2608     }
2609
2610     if ( !processed )
2611     {
2612 #ifdef __WXDEBUG__
2613         wxLogTrace(wxTraceMessages, wxT("Forwarding %s to DefWindowProc."),
2614                    wxGetMessageName(message));
2615 #endif // __WXDEBUG__
2616         rc.result = MSWDefWindowProc(message, wParam, lParam);
2617     }
2618
2619     return rc.result;
2620 }
2621
2622 // Dialog window proc
2623 LONG APIENTRY _EXPORT
2624 wxDlgProc(HWND WXUNUSED(hWnd), UINT message, WPARAM WXUNUSED(wParam), LPARAM WXUNUSED(lParam))
2625 {
2626     if ( message == WM_INITDIALOG )
2627     {
2628         // for this message, returning TRUE tells system to set focus to the
2629         // first control in the dialog box
2630         return TRUE;
2631     }
2632     else
2633     {
2634         // for all the other ones, FALSE means that we didn't process the
2635         // message
2636         return 0;
2637     }
2638 }
2639
2640 wxList *wxWinHandleList = NULL;
2641 wxWindow *wxFindWinFromHandle(WXHWND hWnd)
2642 {
2643     wxNode *node = wxWinHandleList->Find((long)hWnd);
2644     if ( !node )
2645         return NULL;
2646     return (wxWindow *)node->Data();
2647 }
2648
2649 #if 0 // def __WXDEBUG__
2650 static int gs_AssociationCount = 0;
2651 #endif
2652
2653 void wxAssociateWinWithHandle(HWND hWnd, wxWindowMSW *win)
2654 {
2655     // adding NULL hWnd is (first) surely a result of an error and
2656     // (secondly) breaks menu command processing
2657     wxCHECK_RET( hWnd != (HWND)NULL,
2658                  wxT("attempt to add a NULL hWnd to window list ignored") );
2659
2660
2661     wxWindow *oldWin = wxFindWinFromHandle((WXHWND) hWnd);
2662     if ( oldWin && (oldWin != win) )
2663     {
2664         wxString str(win->GetClassInfo()->GetClassName());
2665         wxLogError(wxT("Bug! Found existing HWND %X for new window of class %s"), (int) hWnd, (const wxChar*) str);
2666     }
2667     else if (!oldWin)
2668     {
2669 #if 0 // def __WXDEBUG__
2670         gs_AssociationCount ++;
2671         wxLogDebug("+ Association %d", gs_AssociationCount);
2672 #endif
2673
2674         wxWinHandleList->Append((long)hWnd, win);
2675     }
2676 }
2677
2678 void wxRemoveHandleAssociation(wxWindowMSW *win)
2679 {
2680 #if 0 // def __WXDEBUG__
2681     if (wxWinHandleList->Member(win))
2682     {
2683         wxLogDebug("- Association %d", gs_AssociationCount);
2684         gs_AssociationCount --;
2685     }
2686 #endif
2687     wxWinHandleList->DeleteObject(win);
2688 }
2689
2690 // Default destroyer - override if you destroy it in some other way
2691 // (e.g. with MDI child windows)
2692 void wxWindowMSW::MSWDestroyWindow()
2693 {
2694 }
2695
2696 void wxWindowMSW::MSWDetachWindowMenu()
2697 {
2698 #ifndef __WXUNIVERSAL__
2699     if ( m_hMenu )
2700     {
2701         wxChar buf[1024];
2702         HMENU hMenu = (HMENU)m_hMenu;
2703
2704         int N = ::GetMenuItemCount(hMenu);
2705         for ( int i = 0; i < N; i++ )
2706         {
2707             if ( !::GetMenuString(hMenu, i, buf, WXSIZEOF(buf), MF_BYPOSITION) )
2708             {
2709                 wxLogLastError(wxT("GetMenuString"));
2710
2711                 continue;
2712             }
2713
2714             if ( wxStrcmp(buf, _("&Window")) == 0 )
2715             {
2716                 if ( !::RemoveMenu(hMenu, i, MF_BYPOSITION) )
2717                 {
2718                     wxLogLastError(wxT("RemoveMenu"));
2719                 }
2720
2721                 break;
2722             }
2723         }
2724     }
2725 #endif
2726 }
2727
2728 bool wxWindowMSW::MSWCreate(int id,
2729                             wxWindow *parent,
2730                             const wxChar *wclass,
2731                             wxWindow * WXUNUSED(wx_win),
2732                             const wxChar *title,
2733                             int x,
2734                             int y,
2735                             int width,
2736                             int height,
2737                             WXDWORD style,
2738                             const wxChar *dialog_template,
2739                             WXDWORD extendedStyle)
2740 {
2741     int x1 = CW_USEDEFAULT;
2742     int y1 = 0;
2743     int width1 = CW_USEDEFAULT;
2744     int height1 = 100;
2745
2746     // Find parent's size, if it exists, to set up a possible default
2747     // panel size the size of the parent window
2748     RECT rectParent;
2749     if ( parent )
2750     {
2751         ::GetClientRect(GetHwndOf(parent), &rectParent);
2752
2753         width1 = rectParent.right - rectParent.left;
2754         height1 = rectParent.bottom - rectParent.top;
2755     }
2756
2757     if ( x != -1 )
2758         x1 = x;
2759     if ( y != -1 )
2760         y1 = y;
2761     if ( width != -1 )
2762         width1 = width;
2763     if ( height != -1 )
2764         height1 = height;
2765
2766     // unfortunately, setting WS_EX_CONTROLPARENT only for some windows in the
2767     // hierarchy with several embedded panels (and not all of them) causes the
2768     // program to hang during the next call to IsDialogMessage() due to the bug
2769     // in this function (at least in Windows NT 4.0, it seems to work ok in
2770     // Win2K)
2771 #if 0
2772     // if we have wxTAB_TRAVERSAL style, we want WS_EX_CONTROLPARENT or
2773     // IsDialogMessage() won't work for us
2774     if ( GetWindowStyleFlag() & wxTAB_TRAVERSAL )
2775     {
2776         extendedStyle |= WS_EX_CONTROLPARENT;
2777     }
2778 #endif // 0
2779
2780     HWND hParent;
2781     if ( GetWindowStyleFlag() & wxPOPUP_WINDOW )
2782     {
2783         // popup windows should have desktop as parent because they shouldn't
2784         // be limited to the parents client area as child windows usually are
2785         hParent = ::GetDesktopWindow();
2786     }
2787     else if ( parent )
2788     {
2789         hParent = GetHwndOf(parent);
2790     }
2791     else
2792     {
2793         // top level window
2794         hParent = NULL;
2795     }
2796
2797     wxWndHook = this;
2798
2799 #ifndef __WXMICROWIN__
2800     if ( dialog_template )
2801     {
2802         // for the dialogs without wxDIALOG_NO_PARENT style, use the top level
2803         // app window as parent - this avoids creating modal dialogs without
2804         // parent
2805         if ( !hParent && !(GetWindowStyleFlag() & wxDIALOG_NO_PARENT) )
2806         {
2807             wxWindow *winTop = wxTheApp->GetTopWindow();
2808             if ( winTop )
2809                 hParent = GetHwndOf(winTop);
2810         }
2811
2812         m_hWnd = (WXHWND)::CreateDialog(wxGetInstance(),
2813                                         dialog_template,
2814                                         hParent,
2815                                         (DLGPROC)wxDlgProc);
2816
2817         if ( m_hWnd == 0 )
2818         {
2819             wxLogError(_("Can't find dialog template '%s'!\nCheck resource include path for finding wx.rc."),
2820                        dialog_template);
2821
2822             return FALSE;
2823         }
2824
2825         if ( extendedStyle != 0 )
2826         {
2827             ::SetWindowLong(GetHwnd(), GWL_EXSTYLE, extendedStyle);
2828             ::SetWindowPos(GetHwnd(), NULL, 0, 0, 0, 0,
2829                            SWP_NOSIZE |
2830                            SWP_NOMOVE |
2831                            SWP_NOZORDER |
2832                            SWP_NOACTIVATE);
2833         }
2834
2835 #if defined(__WIN95__)
2836         // For some reason, the system menu is activated when we use the
2837         // WS_EX_CONTEXTHELP style, so let's set a reasonable icon
2838         if (extendedStyle & WS_EX_CONTEXTHELP)
2839         {
2840             wxFrame *winTop = wxDynamicCast(wxTheApp->GetTopWindow(), wxFrame);
2841             if ( winTop )
2842             {
2843                 wxIcon icon = winTop->GetIcon();
2844                 if ( icon.Ok() )
2845                 {
2846                     ::SendMessage(GetHwnd(), WM_SETICON,
2847                                   (WPARAM)TRUE,
2848                                   (LPARAM)GetHiconOf(icon));
2849                 }
2850             }
2851         }
2852 #endif // __WIN95__
2853
2854
2855         // JACS: is the following still necessary? The above seems to work.
2856
2857         // ::SetWindowLong(GWL_EXSTYLE) doesn't work for the dialogs, so try
2858         // to take care of (at least some) extended style flags ourselves
2859         if ( extendedStyle & WS_EX_TOPMOST )
2860         {
2861             if ( !::SetWindowPos(GetHwnd(), HWND_TOPMOST, 0, 0, 0, 0,
2862                                  SWP_NOSIZE | SWP_NOMOVE) )
2863             {
2864                 wxLogLastError(wxT("SetWindowPos"));
2865             }
2866         }
2867
2868         // move the dialog to its initial position without forcing repainting
2869         if ( !::MoveWindow(GetHwnd(), x1, y1, width1, height1, FALSE) )
2870         {
2871             wxLogLastError(wxT("MoveWindow"));
2872         }
2873
2874     }
2875     else // creating a normal window, not a dialog
2876 #endif // !__WXMICROWIN__
2877     {
2878         int controlId = 0;
2879         if ( style & WS_CHILD )
2880         {
2881             controlId = id;
2882
2883             if ( GetWindowStyleFlag() & wxCLIP_SIBLINGS )
2884             {
2885                 style |= WS_CLIPSIBLINGS;
2886             }
2887         }
2888
2889         wxString className(wclass);
2890         if ( GetWindowStyleFlag() & wxNO_FULL_REPAINT_ON_RESIZE )
2891         {
2892             className += wxT("NR");
2893         }
2894
2895         m_hWnd = (WXHWND)CreateWindowEx(extendedStyle,
2896                                         className,
2897                                         title ? title : wxT(""),
2898                                         style,
2899                                         x1, y1,
2900                                         width1, height1,
2901                                         hParent, (HMENU)controlId,
2902                                         wxGetInstance(),
2903                                         NULL);
2904
2905         if ( !m_hWnd )
2906         {
2907             wxLogError(_("Can't create window of class %s!\nPossible Windows 3.x compatibility problem?"),
2908                        wclass);
2909
2910             return FALSE;
2911         }
2912     }
2913
2914     wxWndHook = NULL;
2915
2916 #ifdef __WXDEBUG__
2917     wxNode* node = wxWinHandleList->Member(this);
2918     if (node)
2919     {
2920         HWND hWnd = (HWND) node->GetKeyInteger();
2921         if (hWnd != (HWND) m_hWnd)
2922         {
2923             wxLogError(wxT("A second HWND association is being added for the same window!"));
2924         }
2925     }
2926 #endif // Debug
2927
2928     wxAssociateWinWithHandle((HWND) m_hWnd, this);
2929
2930     SetFont(wxSystemSettings::GetSystemFont(wxSYS_DEFAULT_GUI_FONT));
2931
2932     return TRUE;
2933 }
2934
2935 // ===========================================================================
2936 // MSW message handlers
2937 // ===========================================================================
2938
2939 // ---------------------------------------------------------------------------
2940 // WM_NOTIFY
2941 // ---------------------------------------------------------------------------
2942
2943 #ifdef __WIN95__
2944 // FIXME: VZ: I'm not sure at all that the order of processing is correct
2945 bool wxWindowMSW::HandleNotify(int idCtrl, WXLPARAM lParam, WXLPARAM *result)
2946 {
2947 #ifndef __WXMICROWIN__
2948     LPNMHDR hdr = (LPNMHDR)lParam;
2949     HWND hWnd = hdr->hwndFrom;
2950     wxWindow *win = wxFindWinFromHandle((WXHWND)hWnd);
2951
2952     // is this one of our windows?
2953     if ( win )
2954     {
2955         return win->MSWOnNotify(idCtrl, lParam, result);
2956     }
2957
2958     // try all our children
2959     wxWindowList::Node *node = GetChildren().GetFirst();
2960     while ( node )
2961     {
2962         wxWindow *child = node->GetData();
2963         if ( child->MSWOnNotify(idCtrl, lParam, result) )
2964         {
2965             return TRUE;
2966         }
2967
2968         node = node->GetNext();
2969     }
2970
2971     // finally try this window too (catches toolbar case)
2972     return MSWOnNotify(idCtrl, lParam, result);
2973 #else // __WXMICROWIN__
2974     return FALSE;
2975 #endif
2976 }
2977
2978 bool wxWindowMSW::MSWOnNotify(int WXUNUSED(idCtrl),
2979                            WXLPARAM lParam,
2980                            WXLPARAM* WXUNUSED(result))
2981 {
2982 #if wxUSE_TOOLTIPS
2983     NMHDR* hdr = (NMHDR *)lParam;
2984     if ( (int)hdr->code == TTN_NEEDTEXT && m_tooltip )
2985     {
2986         TOOLTIPTEXT *ttt = (TOOLTIPTEXT *)lParam;
2987         ttt->lpszText = (wxChar *)m_tooltip->GetTip().c_str();
2988
2989         // processed
2990         return TRUE;
2991     }
2992 #endif // wxUSE_TOOLTIPS
2993
2994     return FALSE;
2995 }
2996 #endif // __WIN95__
2997
2998 // ---------------------------------------------------------------------------
2999 // end session messages
3000 // ---------------------------------------------------------------------------
3001
3002 bool wxWindowMSW::HandleQueryEndSession(long logOff, bool *mayEnd)
3003 {
3004     wxCloseEvent event(wxEVT_QUERY_END_SESSION, -1);
3005     event.SetEventObject(wxTheApp);
3006     event.SetCanVeto(TRUE);
3007     event.SetLoggingOff(logOff == (long)ENDSESSION_LOGOFF);
3008
3009     bool rc = wxTheApp->ProcessEvent(event);
3010
3011     if ( rc )
3012     {
3013         // we may end only if the app didn't veto session closing (double
3014         // negation...)
3015         *mayEnd = !event.GetVeto();
3016     }
3017
3018     return rc;
3019 }
3020
3021 bool wxWindowMSW::HandleEndSession(bool endSession, long logOff)
3022 {
3023     // do nothing if the session isn't ending
3024     if ( !endSession )
3025         return FALSE;
3026
3027     wxCloseEvent event(wxEVT_END_SESSION, -1);
3028     event.SetEventObject(wxTheApp);
3029     event.SetCanVeto(FALSE);
3030     event.SetLoggingOff( (logOff == (long)ENDSESSION_LOGOFF) );
3031     if ( (this == wxTheApp->GetTopWindow()) && // Only send once
3032         wxTheApp->ProcessEvent(event))
3033     {
3034     }
3035     return TRUE;
3036 }
3037
3038 // ---------------------------------------------------------------------------
3039 // window creation/destruction
3040 // ---------------------------------------------------------------------------
3041
3042 bool wxWindowMSW::HandleCreate(WXLPCREATESTRUCT WXUNUSED(cs), bool *mayCreate)
3043 {
3044     // TODO: should generate this event from WM_NCCREATE
3045     wxWindowCreateEvent event((wxWindow *)this);
3046     (void)GetEventHandler()->ProcessEvent(event);
3047
3048     *mayCreate = TRUE;
3049
3050     return TRUE;
3051 }
3052
3053 bool wxWindowMSW::HandleDestroy()
3054 {
3055     wxWindowDestroyEvent event((wxWindow *)this);
3056     (void)GetEventHandler()->ProcessEvent(event);
3057
3058     // delete our drop target if we've got one
3059 #if wxUSE_DRAG_AND_DROP
3060     if ( m_dropTarget != NULL )
3061     {
3062         m_dropTarget->Revoke(m_hWnd);
3063
3064         delete m_dropTarget;
3065         m_dropTarget = NULL;
3066     }
3067 #endif // wxUSE_DRAG_AND_DROP
3068
3069     // WM_DESTROY handled
3070     return TRUE;
3071 }
3072
3073 // ---------------------------------------------------------------------------
3074 // activation/focus
3075 // ---------------------------------------------------------------------------
3076
3077 bool wxWindowMSW::HandleActivate(int state,
3078                               bool WXUNUSED(minimized),
3079                               WXHWND WXUNUSED(activate))
3080 {
3081     wxActivateEvent event(wxEVT_ACTIVATE,
3082                           (state == WA_ACTIVE) || (state == WA_CLICKACTIVE),
3083                           m_windowId);
3084     event.SetEventObject(this);
3085
3086     return GetEventHandler()->ProcessEvent(event);
3087 }
3088
3089 bool wxWindowMSW::HandleSetFocus(WXHWND hwnd)
3090 {
3091     // notify the parent keeping track of focus for the kbd navigation
3092     // purposes that we got it
3093     wxChildFocusEvent eventFocus(this);
3094     (void)GetEventHandler()->ProcessEvent(eventFocus);
3095
3096 #if wxUSE_CARET
3097     // Deal with caret
3098     if ( m_caret )
3099     {
3100         m_caret->OnSetFocus();
3101     }
3102 #endif // wxUSE_CARET
3103
3104 #if wxUSE_TEXTCTRL
3105     // If it's a wxTextCtrl don't send the event as it will be done
3106     // after the control gets to process it from EN_FOCUS handler
3107     if ( wxDynamicCastThis(wxTextCtrl) )
3108     {
3109         return FALSE;
3110     }
3111 #endif // wxUSE_TEXTCTRL
3112
3113     wxFocusEvent event(wxEVT_SET_FOCUS, m_windowId);
3114     event.SetEventObject(this);
3115
3116     // wxFindWinFromHandle() may return NULL, it is ok
3117     event.SetWindow(wxFindWinFromHandle(hwnd));
3118
3119     return GetEventHandler()->ProcessEvent(event);
3120 }
3121
3122 bool wxWindowMSW::HandleKillFocus(WXHWND hwnd)
3123 {
3124 #if wxUSE_CARET
3125     // Deal with caret
3126     if ( m_caret )
3127     {
3128         m_caret->OnKillFocus();
3129     }
3130 #endif // wxUSE_CARET
3131
3132 #if wxUSE_TEXTCTRL
3133     // If it's a wxTextCtrl don't send the event as it will be done
3134     // after the control gets to process it.
3135     wxTextCtrl *ctrl = wxDynamicCastThis(wxTextCtrl);
3136     if ( ctrl )
3137     {
3138         return FALSE;
3139     }
3140 #endif
3141
3142     wxFocusEvent event(wxEVT_KILL_FOCUS, m_windowId);
3143     event.SetEventObject(this);
3144
3145     // wxFindWinFromHandle() may return NULL, it is ok
3146     event.SetWindow(wxFindWinFromHandle(hwnd));
3147
3148     return GetEventHandler()->ProcessEvent(event);
3149 }
3150
3151 // ---------------------------------------------------------------------------
3152 // miscellaneous
3153 // ---------------------------------------------------------------------------
3154
3155 bool wxWindowMSW::HandleShow(bool show, int WXUNUSED(status))
3156 {
3157     wxShowEvent event(GetId(), show);
3158     event.m_eventObject = this;
3159
3160     return GetEventHandler()->ProcessEvent(event);
3161 }
3162
3163 bool wxWindowMSW::HandleInitDialog(WXHWND WXUNUSED(hWndFocus))
3164 {
3165     wxInitDialogEvent event(GetId());
3166     event.m_eventObject = this;
3167
3168     return GetEventHandler()->ProcessEvent(event);
3169 }
3170
3171 bool wxWindowMSW::HandleDropFiles(WXWPARAM wParam)
3172 {
3173 #ifndef __WXMICROWIN__
3174     HDROP hFilesInfo = (HDROP) wParam;
3175     POINT dropPoint;
3176     DragQueryPoint(hFilesInfo, (LPPOINT) &dropPoint);
3177
3178     // Get the total number of files dropped
3179     WORD gwFilesDropped = (WORD)::DragQueryFile
3180                             (
3181                                 (HDROP)hFilesInfo,
3182                                 (UINT)-1,
3183                                 (LPTSTR)0,
3184                                 (UINT)0
3185                             );
3186
3187     wxString *files = new wxString[gwFilesDropped];
3188     int wIndex;
3189     for (wIndex=0; wIndex < (int)gwFilesDropped; wIndex++)
3190     {
3191         DragQueryFile (hFilesInfo, wIndex, (LPTSTR) wxBuffer, 1000);
3192         files[wIndex] = wxBuffer;
3193     }
3194     DragFinish (hFilesInfo);
3195
3196     wxDropFilesEvent event(wxEVT_DROP_FILES, gwFilesDropped, files);
3197     event.m_eventObject = this;
3198     event.m_pos.x = dropPoint.x; event.m_pos.x = dropPoint.y;
3199
3200     bool rc = GetEventHandler()->ProcessEvent(event);
3201
3202     delete[] files;
3203
3204     return rc;
3205 #else // __WXMICROWIN__
3206     return FALSE;
3207 #endif
3208 }
3209
3210 bool wxWindowMSW::HandleSetCursor(WXHWND WXUNUSED(hWnd),
3211                                   short nHitTest,
3212                                   int WXUNUSED(mouseMsg))
3213 {
3214 #ifndef __WXMICROWIN__
3215     // the logic is as follows:
3216     // -1. don't set cursor for non client area, including but not limited to
3217     //     the title bar, scrollbars, &c
3218     //  0. allow the user to override default behaviour by using EVT_SET_CURSOR
3219     //  1. if we have the cursor set it unless wxIsBusy()
3220     //  2. if we're a top level window, set some cursor anyhow
3221     //  3. if wxIsBusy(), set the busy cursor, otherwise the global one
3222
3223     if ( nHitTest != HTCLIENT )
3224     {
3225         return FALSE;
3226     }
3227
3228     HCURSOR hcursor = 0;
3229
3230     // first ask the user code - it may wish to set the cursor in some very
3231     // specific way (for example, depending on the current position)
3232     POINT pt;
3233 #ifdef __WIN32__
3234     if ( !::GetCursorPos(&pt) )
3235     {
3236         wxLogLastError(wxT("GetCursorPos"));
3237     }
3238 #else
3239     // In WIN16 it doesn't return a value.
3240     ::GetCursorPos(&pt);
3241 #endif
3242
3243     int x = pt.x,
3244         y = pt.y;
3245     ScreenToClient(&x, &y);
3246     wxSetCursorEvent event(x, y);
3247
3248     bool processedEvtSetCursor = GetEventHandler()->ProcessEvent(event);
3249     if ( processedEvtSetCursor && event.HasCursor() )
3250     {
3251         hcursor = GetHcursorOf(event.GetCursor());
3252     }
3253
3254     if ( !hcursor )
3255     {
3256         bool isBusy = wxIsBusy();
3257
3258         // the test for processedEvtSetCursor is here to prevent using m_cursor
3259         // if the user code caught EVT_SET_CURSOR() and returned nothing from
3260         // it - this is a way to say that our cursor shouldn't be used for this
3261         // point
3262         if ( !processedEvtSetCursor && m_cursor.Ok() )
3263         {
3264             hcursor = GetHcursorOf(m_cursor);
3265         }
3266
3267         if ( !GetParent() )
3268         {
3269             if ( isBusy )
3270             {
3271                 hcursor = wxGetCurrentBusyCursor();
3272             }
3273             else if ( !hcursor )
3274             {
3275                 const wxCursor *cursor = wxGetGlobalCursor();
3276                 if ( cursor && cursor->Ok() )
3277                 {
3278                     hcursor = GetHcursorOf(*cursor);
3279                 }
3280             }
3281         }
3282     }
3283
3284     if ( hcursor )
3285     {
3286         ::SetCursor(hcursor);
3287
3288         // cursor set, stop here
3289         return TRUE;
3290     }
3291 #endif // __WXMICROWIN__
3292
3293     // pass up the window chain
3294     return FALSE;
3295 }
3296
3297 // ---------------------------------------------------------------------------
3298 // owner drawn stuff
3299 // ---------------------------------------------------------------------------
3300
3301 bool wxWindowMSW::MSWOnDrawItem(int id, WXDRAWITEMSTRUCT *itemStruct)
3302 {
3303 #if wxUSE_OWNER_DRAWN
3304
3305 #if wxUSE_MENUS_NATIVE
3306     // is it a menu item?
3307     if ( id == 0 )
3308     {
3309         DRAWITEMSTRUCT *pDrawStruct = (DRAWITEMSTRUCT *)itemStruct;
3310         wxMenuItem *pMenuItem = (wxMenuItem *)(pDrawStruct->itemData);
3311
3312         wxCHECK( pMenuItem->IsKindOf(CLASSINFO(wxMenuItem)), FALSE );
3313
3314         // prepare to call OnDrawItem(): notice using of wxDCTemp to prevent
3315         // the DC from being released
3316         wxDCTemp dc((WXHDC)pDrawStruct->hDC);
3317         wxRect rect(pDrawStruct->rcItem.left, pDrawStruct->rcItem.top,
3318                     pDrawStruct->rcItem.right - pDrawStruct->rcItem.left,
3319                     pDrawStruct->rcItem.bottom - pDrawStruct->rcItem.top);
3320
3321         return pMenuItem->OnDrawItem
3322                (
3323                 dc,
3324                 rect,
3325                 (wxOwnerDrawn::wxODAction)pDrawStruct->itemAction,
3326                 (wxOwnerDrawn::wxODStatus)pDrawStruct->itemState
3327                );
3328     }
3329 #endif // wxUSE_MENUS_NATIVE
3330
3331 #if wxUSE_CONTROLS
3332     wxWindow *item = FindItem(id);
3333     if ( item && item->IsKindOf(CLASSINFO(wxControl)) )
3334     {
3335         return ((wxControl *)item)->MSWOnDraw(itemStruct);
3336     }
3337 #endif // wxUSE_CONTROLS
3338
3339 #endif // USE_OWNER_DRAWN
3340
3341     return FALSE;
3342 }
3343
3344 bool wxWindowMSW::MSWOnMeasureItem(int id, WXMEASUREITEMSTRUCT *itemStruct)
3345 {
3346 #if wxUSE_OWNER_DRAWN
3347     // is it a menu item?
3348     if ( id == 0 )
3349     {
3350         MEASUREITEMSTRUCT *pMeasureStruct = (MEASUREITEMSTRUCT *)itemStruct;
3351         wxMenuItem *pMenuItem = (wxMenuItem *)(pMeasureStruct->itemData);
3352
3353         wxCHECK( pMenuItem->IsKindOf(CLASSINFO(wxMenuItem)), FALSE );
3354
3355         return pMenuItem->OnMeasureItem(&pMeasureStruct->itemWidth,
3356                                         &pMeasureStruct->itemHeight);
3357     }
3358
3359     wxWindow *item = FindItem(id);
3360     if ( item && item->IsKindOf(CLASSINFO(wxControl)) )
3361     {
3362         return ((wxControl *)item)->MSWOnMeasure(itemStruct);
3363     }
3364 #endif  // owner-drawn menus
3365     return FALSE;
3366 }
3367
3368 // ---------------------------------------------------------------------------
3369 // colours and palettes
3370 // ---------------------------------------------------------------------------
3371
3372 bool wxWindowMSW::HandleSysColorChange()
3373 {
3374     wxSysColourChangedEvent event;
3375     event.SetEventObject(this);
3376
3377     return GetEventHandler()->ProcessEvent(event);
3378 }
3379
3380 bool wxWindowMSW::HandleCtlColor(WXHBRUSH *brush,
3381                               WXHDC pDC,
3382                               WXHWND pWnd,
3383                               WXUINT nCtlColor,
3384                               WXUINT message,
3385                               WXWPARAM wParam,
3386                               WXLPARAM lParam)
3387 {
3388 #ifndef __WXMICROWIN__
3389     WXHBRUSH hBrush = 0;
3390
3391     if ( nCtlColor == CTLCOLOR_DLG )
3392     {
3393         hBrush = OnCtlColor(pDC, pWnd, nCtlColor, message, wParam, lParam);
3394     }
3395 #if wxUSE_CONTROLS
3396     else
3397     {
3398         wxControl *item = (wxControl *)FindItemByHWND(pWnd, TRUE);
3399         if ( item )
3400             hBrush = item->OnCtlColor(pDC, pWnd, nCtlColor, message, wParam, lParam);
3401     }
3402 #endif // wxUSE_CONTROLS
3403
3404     if ( hBrush )
3405         *brush = hBrush;
3406
3407     return hBrush != 0;
3408 #else // __WXMICROWIN__
3409     return FALSE;
3410 #endif
3411 }
3412
3413 // Define for each class of dialog and control
3414 WXHBRUSH wxWindowMSW::OnCtlColor(WXHDC WXUNUSED(hDC),
3415                                  WXHWND WXUNUSED(hWnd),
3416                                  WXUINT WXUNUSED(nCtlColor),
3417                                  WXUINT WXUNUSED(message),
3418                                  WXWPARAM WXUNUSED(wParam),
3419                                  WXLPARAM WXUNUSED(lParam))
3420 {
3421     return (WXHBRUSH)0;
3422 }
3423
3424 bool wxWindowMSW::HandlePaletteChanged(WXHWND hWndPalChange)
3425 {
3426     wxPaletteChangedEvent event(GetId());
3427     event.SetEventObject(this);
3428     event.SetChangedWindow(wxFindWinFromHandle(hWndPalChange));
3429
3430     return GetEventHandler()->ProcessEvent(event);
3431 }
3432
3433 bool wxWindowMSW::HandleQueryNewPalette()
3434 {
3435     wxQueryNewPaletteEvent event(GetId());
3436     event.SetEventObject(this);
3437
3438     return GetEventHandler()->ProcessEvent(event) && event.GetPaletteRealized();
3439 }
3440
3441 // Responds to colour changes: passes event on to children.
3442 void wxWindowMSW::OnSysColourChanged(wxSysColourChangedEvent& event)
3443 {
3444     wxNode *node = GetChildren().First();
3445     while ( node )
3446     {
3447         // Only propagate to non-top-level windows
3448         wxWindow *win = (wxWindow *)node->Data();
3449         if ( win->GetParent() )
3450         {
3451             wxSysColourChangedEvent event2;
3452             event.m_eventObject = win;
3453             win->GetEventHandler()->ProcessEvent(event2);
3454         }
3455
3456         node = node->Next();
3457     }
3458 }
3459
3460 // ---------------------------------------------------------------------------
3461 // painting
3462 // ---------------------------------------------------------------------------
3463
3464 bool wxWindowMSW::HandlePaint()
3465 {
3466 #ifdef __WIN32__
3467     HRGN hRegion = ::CreateRectRgn(0, 0, 0, 0); // Dummy call to get a handle
3468     if ( !hRegion )
3469         wxLogLastError(wxT("CreateRectRgn"));
3470     if ( ::GetUpdateRgn(GetHwnd(), hRegion, FALSE) == ERROR )
3471         wxLogLastError(wxT("GetUpdateRgn"));
3472
3473     m_updateRegion = wxRegion((WXHRGN) hRegion);
3474 #else // Win16
3475     RECT updateRect;
3476     ::GetUpdateRect(GetHwnd(), &updateRect, FALSE);
3477
3478     m_updateRegion = wxRegion(updateRect.left, updateRect.top,
3479                               updateRect.right - updateRect.left,
3480                               updateRect.bottom - updateRect.top);
3481 #endif // Win32/16
3482
3483     wxPaintEvent event(m_windowId);
3484     event.SetEventObject(this);
3485
3486     bool processed = GetEventHandler()->ProcessEvent(event);
3487
3488     // note that we must generate NC event after the normal one as otherwise
3489     // BeginPaint() will happily overwrite our decorations with the background
3490     // colour
3491     wxNcPaintEvent eventNc(m_windowId);
3492     eventNc.SetEventObject(this);
3493     GetEventHandler()->ProcessEvent(eventNc);
3494
3495     return processed;
3496 }
3497
3498 // Can be called from an application's OnPaint handler
3499 void wxWindowMSW::OnPaint(wxPaintEvent& event)
3500 {
3501 #ifdef __WXUNIVERSAL__
3502     event.Skip();
3503 #else
3504     HDC hDC = (HDC) wxPaintDC::FindDCInCache((wxWindow*) event.GetEventObject());
3505     if (hDC != 0)
3506     {
3507         MSWDefWindowProc(WM_PAINT, (WPARAM) hDC, 0);
3508     }
3509 #endif
3510 }
3511
3512 bool wxWindowMSW::HandleEraseBkgnd(WXHDC hdc)
3513 {
3514     // Prevents flicker when dragging
3515     if ( ::IsIconic(GetHwnd()) )
3516         return TRUE;
3517
3518     wxDCTemp dc(hdc);
3519
3520     dc.SetHDC(hdc);
3521     dc.SetWindow((wxWindow *)this);
3522     dc.BeginDrawing();
3523
3524     wxEraseEvent event(m_windowId, &dc);
3525     event.SetEventObject(this);
3526     bool rc = GetEventHandler()->ProcessEvent(event);
3527
3528     dc.EndDrawing();
3529
3530     // must be called manually as ~wxDC doesn't do anything for wxDCTemp
3531     dc.SelectOldObjects(hdc);
3532
3533     return rc;
3534 }
3535
3536 void wxWindowMSW::OnEraseBackground(wxEraseEvent& event)
3537 {
3538     RECT rect;
3539     ::GetClientRect(GetHwnd(), &rect);
3540
3541     COLORREF ref = PALETTERGB(m_backgroundColour.Red(),
3542                               m_backgroundColour.Green(),
3543                               m_backgroundColour.Blue());
3544     HBRUSH hBrush = ::CreateSolidBrush(ref);
3545     if ( !hBrush )
3546         wxLogLastError(wxT("CreateSolidBrush"));
3547
3548     HDC hdc = (HDC)event.GetDC()->GetHDC();
3549
3550     int mode = ::SetMapMode(hdc, MM_TEXT);
3551
3552     ::FillRect(hdc, &rect, hBrush);
3553     ::DeleteObject(hBrush);
3554     ::SetMapMode(hdc, mode);
3555 }
3556
3557 // ---------------------------------------------------------------------------
3558 // moving and resizing
3559 // ---------------------------------------------------------------------------
3560
3561 bool wxWindowMSW::HandleMinimize()
3562 {
3563     wxIconizeEvent event(m_windowId);
3564     event.SetEventObject(this);
3565
3566     return GetEventHandler()->ProcessEvent(event);
3567 }
3568
3569 bool wxWindowMSW::HandleMaximize()
3570 {
3571     wxMaximizeEvent event(m_windowId);
3572     event.SetEventObject(this);
3573
3574     return GetEventHandler()->ProcessEvent(event);
3575 }
3576
3577 bool wxWindowMSW::HandleMove(int x, int y)
3578 {
3579     wxMoveEvent event(wxPoint(x, y), m_windowId);
3580     event.SetEventObject(this);
3581
3582     return GetEventHandler()->ProcessEvent(event);
3583 }
3584
3585 bool wxWindowMSW::HandleSize(int w, int h, WXUINT WXUNUSED(flag))
3586 {
3587     wxSizeEvent event(wxSize(w, h), m_windowId);
3588     event.SetEventObject(this);
3589
3590     return GetEventHandler()->ProcessEvent(event);
3591 }
3592
3593 bool wxWindowMSW::HandleGetMinMaxInfo(void *mmInfo)
3594 {
3595     MINMAXINFO *info = (MINMAXINFO *)mmInfo;
3596
3597     bool rc = FALSE;
3598
3599     if ( m_minWidth != -1 )
3600     {
3601         info->ptMinTrackSize.x = m_minWidth;
3602         rc = TRUE;
3603     }
3604
3605     if ( m_minHeight != -1 )
3606     {
3607         info->ptMinTrackSize.y = m_minHeight;
3608         rc = TRUE;
3609     }
3610
3611     if ( m_maxWidth != -1 )
3612     {
3613         info->ptMaxTrackSize.x = m_maxWidth;
3614         rc = TRUE;
3615     }
3616
3617     if ( m_maxHeight != -1 )
3618     {
3619         info->ptMaxTrackSize.y = m_maxHeight;
3620         rc = TRUE;
3621     }
3622
3623     return rc;
3624 }
3625
3626 // ---------------------------------------------------------------------------
3627 // command messages
3628 // ---------------------------------------------------------------------------
3629
3630 bool wxWindowMSW::HandleCommand(WXWORD id, WXWORD cmd, WXHWND control)
3631 {
3632 #if wxUSE_MENUS_NATIVE
3633     if ( wxCurrentPopupMenu )
3634     {
3635         wxMenu *popupMenu = wxCurrentPopupMenu;
3636         wxCurrentPopupMenu = NULL;
3637
3638         return popupMenu->MSWCommand(cmd, id);
3639     }
3640 #endif // wxUSE_MENUS_NATIVE
3641
3642     wxWindow *win = (wxWindow*) NULL;
3643     if ( cmd == 0 || cmd == 1 ) // menu or accel - use id
3644     {
3645         // must cast to a signed type before comparing with other ids!
3646         win = FindItem((signed short)id);
3647     }
3648
3649     if (!win && control)
3650     {
3651         // find it from HWND - this works even with the broken programs using
3652         // the same ids for different controls
3653         win = wxFindWinFromHandle(control);
3654     }
3655
3656     if ( win )
3657     {
3658         return win->MSWCommand(cmd, id);
3659     }
3660
3661     // the messages sent from the in-place edit control used by the treectrl
3662     // for label editing have id == 0, but they should _not_ be treated as menu
3663     // messages (they are EN_XXX ones, in fact) so don't translate anything
3664     // coming from a control to wxEVT_COMMAND_MENU_SELECTED
3665     if ( !control )
3666     {
3667         // If no child window, it may be an accelerator, e.g. for a popup menu
3668         // command
3669
3670         wxCommandEvent event(wxEVT_COMMAND_MENU_SELECTED);
3671         event.SetEventObject(this);
3672         event.SetId(id);
3673         event.SetInt(id);
3674
3675         return GetEventHandler()->ProcessEvent(event);
3676     }
3677 #if wxUSE_SPINCTRL && !defined(__WXUNIVERSAL__)
3678     else
3679     {
3680         // the text ctrl which is logically part of wxSpinCtrl sends WM_COMMAND
3681         // notifications to its parent which we want to reflect back to
3682         // wxSpinCtrl
3683         wxSpinCtrl *spin = wxSpinCtrl::GetSpinForTextCtrl(control);
3684         if ( spin && spin->ProcessTextCommand(cmd, id) )
3685             return TRUE;
3686     }
3687 #endif // wxUSE_SPINCTRL
3688
3689     return FALSE;
3690 }
3691
3692 bool wxWindowMSW::HandleSysCommand(WXWPARAM wParam, WXLPARAM WXUNUSED(lParam))
3693 {
3694     // 4 bits are reserved
3695     switch ( wParam & 0xFFFFFFF0 )
3696     {
3697         case SC_MAXIMIZE:
3698             return HandleMaximize();
3699
3700         case SC_MINIMIZE:
3701             return HandleMinimize();
3702     }
3703
3704     return FALSE;
3705 }
3706
3707 // ---------------------------------------------------------------------------
3708 // mouse events
3709 // ---------------------------------------------------------------------------
3710
3711 void wxWindowMSW::InitMouseEvent(wxMouseEvent& event,
3712                                  int x, int y,
3713                                  WXUINT flags)
3714 {
3715     // our client coords are not quite the same as Windows ones
3716     wxPoint pt = GetClientAreaOrigin();
3717     event.m_x = x - pt.x;
3718     event.m_y = y - pt.y;
3719
3720     event.m_shiftDown = (flags & MK_SHIFT) != 0;
3721     event.m_controlDown = (flags & MK_CONTROL) != 0;
3722     event.m_leftDown = (flags & MK_LBUTTON) != 0;
3723     event.m_middleDown = (flags & MK_MBUTTON) != 0;
3724     event.m_rightDown = (flags & MK_RBUTTON) != 0;
3725     event.m_altDown = (::GetKeyState(VK_MENU) & 0x80000000) != 0;
3726
3727     event.SetTimestamp(s_currentMsg.time);
3728     event.m_eventObject = this;
3729
3730 #if wxUSE_MOUSEEVENT_HACK
3731     m_lastMouseX = x;
3732     m_lastMouseY = y;
3733     m_lastMouseEvent = event.GetEventType();
3734 #endif // wxUSE_MOUSEEVENT_HACK
3735 }
3736
3737 bool wxWindowMSW::HandleMouseEvent(WXUINT msg, int x, int y, WXUINT flags)
3738 {
3739     // the mouse events take consecutive IDs from WM_MOUSEFIRST to
3740     // WM_MOUSELAST, so it's enough to substract WM_MOUSEMOVE == WM_MOUSEFIRST
3741     // from the message id and take the value in the table to get wxWin event
3742     // id
3743     static const wxEventType eventsMouse[] =
3744     {
3745         wxEVT_MOTION,
3746         wxEVT_LEFT_DOWN,
3747         wxEVT_LEFT_UP,
3748         wxEVT_LEFT_DCLICK,
3749         wxEVT_RIGHT_DOWN,
3750         wxEVT_RIGHT_UP,
3751         wxEVT_RIGHT_DCLICK,
3752         wxEVT_MIDDLE_DOWN,
3753         wxEVT_MIDDLE_UP,
3754         wxEVT_MIDDLE_DCLICK
3755     };
3756
3757     wxMouseEvent event(eventsMouse[msg - WM_MOUSEMOVE]);
3758     InitMouseEvent(event, x, y, flags);
3759
3760     return GetEventHandler()->ProcessEvent(event);
3761 }
3762
3763 bool wxWindowMSW::HandleMouseMove(int x, int y, WXUINT flags)
3764 {
3765     if ( !m_mouseInWindow )
3766     {
3767         // it would be wrong to assume that just because we get a mouse move
3768         // event that the mouse is inside the window: although this is usually
3769         // true, it is not if we had captured the mouse, so we need to check
3770         // the mouse coordinates here
3771         if ( !HasCapture() || IsMouseInWindow() )
3772         {
3773             // Generate an ENTER event
3774             m_mouseInWindow = TRUE;
3775
3776             wxMouseEvent event(wxEVT_ENTER_WINDOW);
3777             InitMouseEvent(event, x, y, flags);
3778
3779             (void)GetEventHandler()->ProcessEvent(event);
3780         }
3781     }
3782
3783 #if wxUSE_MOUSEEVENT_HACK
3784     // Window gets a click down message followed by a mouse move message even
3785     // if position isn't changed!  We want to discard the trailing move event
3786     // if x and y are the same.
3787     if ( (m_lastMouseEvent == wxEVT_RIGHT_DOWN ||
3788           m_lastMouseEvent == wxEVT_LEFT_DOWN ||
3789           m_lastMouseEvent == wxEVT_MIDDLE_DOWN) &&
3790          (m_lastMouseX == x && m_lastMouseY == y) )
3791     {
3792         m_lastMouseEvent = wxEVT_MOTION;
3793
3794         return FALSE;
3795     }
3796 #endif // wxUSE_MOUSEEVENT_HACK
3797
3798     return HandleMouseEvent(WM_MOUSEMOVE, x, y, flags);
3799 }
3800
3801
3802 bool wxWindowMSW::HandleMouseWheel(WXWPARAM wParam, WXLPARAM lParam)
3803 {
3804 #if wxUSE_MOUSEWHEEL
3805     wxMouseEvent event(wxEVT_MOUSEWHEEL);
3806     InitMouseEvent(event,
3807                    GET_X_LPARAM(lParam),
3808                    GET_Y_LPARAM(lParam),
3809                    LOWORD(wParam));
3810     event.m_wheelRotation = (short)HIWORD(wParam);
3811     event.m_wheelDelta = WHEEL_DELTA;
3812
3813 #ifdef __WIN32__
3814     static int s_linesPerRotation = -1;
3815     if ( s_linesPerRotation == -1 )
3816     {
3817         if ( !::SystemParametersInfo(SPI_GETWHEELSCROLLLINES, 0,
3818                                      &s_linesPerRotation, 0))
3819         {
3820             // this is not supposed to happen
3821             wxLogLastError(_T("SystemParametersInfo(GETWHEELSCROLLLINES)"));
3822
3823             // the default is 3, so use it if SystemParametersInfo() failed
3824             s_linesPerRotation = 3;
3825         }
3826     }
3827 #else // Win16
3828     // no SystemParametersInfo() under Win16
3829     static const int s_linesPerRotation = 3;
3830 #endif
3831
3832     event.m_linesPerAction = s_linesPerRotation;
3833     return GetEventHandler()->ProcessEvent(event);
3834
3835 #else
3836     (void) wParam;
3837     (void) lParam;
3838
3839     return FALSE;
3840 #endif
3841 }
3842
3843
3844 // ---------------------------------------------------------------------------
3845 // keyboard handling
3846 // ---------------------------------------------------------------------------
3847
3848 // create the key event of the given type for the given key - used by
3849 // HandleChar and HandleKeyDown/Up
3850 wxKeyEvent wxWindowMSW::CreateKeyEvent(wxEventType evType,
3851                                     int id,
3852                                     WXLPARAM lParam) const
3853 {
3854     wxKeyEvent event(evType);
3855     event.SetId(GetId());
3856     event.m_shiftDown = wxIsShiftDown();
3857     event.m_controlDown = wxIsCtrlDown();
3858     event.m_altDown = (HIWORD(lParam) & KF_ALTDOWN) == KF_ALTDOWN;
3859
3860     event.m_eventObject = (wxWindow *)this; // const_cast
3861     event.m_keyCode = id;
3862     event.SetTimestamp(s_currentMsg.time);
3863
3864     // translate the position to client coords
3865     POINT pt;
3866     GetCursorPos(&pt);
3867     RECT rect;
3868     GetWindowRect(GetHwnd(),&rect);
3869     pt.x -= rect.left;
3870     pt.y -= rect.top;
3871
3872     event.m_x = pt.x;
3873     event.m_y = pt.y;
3874
3875     return event;
3876 }
3877
3878 // isASCII is TRUE only when we're called from WM_CHAR handler and not from
3879 // WM_KEYDOWN one
3880 bool wxWindowMSW::HandleChar(WXWPARAM wParam, WXLPARAM lParam, bool isASCII)
3881 {
3882     bool ctrlDown = FALSE;
3883
3884     int id;
3885     if ( isASCII )
3886     {
3887         // If 1 -> 26, translate to CTRL plus a letter.
3888         id = wParam;
3889         if ( (id > 0) && (id < 27) )
3890         {
3891             switch (id)
3892             {
3893                 case 13:
3894                     id = WXK_RETURN;
3895                     break;
3896
3897                 case 8:
3898                     id = WXK_BACK;
3899                     break;
3900
3901                 case 9:
3902                     id = WXK_TAB;
3903                     break;
3904
3905                 default:
3906                     ctrlDown = TRUE;
3907                     id = id + 96;
3908             }
3909         }
3910     }
3911     else if ( (id = wxCharCodeMSWToWX(wParam)) == 0 )
3912     {
3913         // it's ASCII and will be processed here only when called from
3914         // WM_CHAR (i.e. when isASCII = TRUE), don't process it now
3915         id = -1;
3916     }
3917
3918     if ( id != -1 )
3919     {
3920         wxKeyEvent event(CreateKeyEvent(wxEVT_CHAR, id, lParam));
3921         if ( ctrlDown )
3922         {
3923             event.m_controlDown = TRUE;
3924         }
3925
3926         if ( GetEventHandler()->ProcessEvent(event) )
3927             return TRUE;
3928     }
3929
3930     return FALSE;
3931 }
3932
3933 bool wxWindowMSW::HandleKeyDown(WXWPARAM wParam, WXLPARAM lParam)
3934 {
3935     int id = wxCharCodeMSWToWX(wParam);
3936
3937     if ( !id )
3938     {
3939         // normal ASCII char
3940         id = wParam;
3941     }
3942
3943     if ( id != -1 ) // VZ: does this ever happen (FIXME)?
3944     {
3945         wxKeyEvent event(CreateKeyEvent(wxEVT_KEY_DOWN, id, lParam));
3946         if ( GetEventHandler()->ProcessEvent(event) )
3947         {
3948             return TRUE;
3949         }
3950     }
3951
3952     return FALSE;
3953 }
3954
3955 bool wxWindowMSW::HandleKeyUp(WXWPARAM wParam, WXLPARAM lParam)
3956 {
3957     int id = wxCharCodeMSWToWX(wParam);
3958
3959     if ( !id )
3960     {
3961         // normal ASCII char
3962         id = wParam;
3963     }
3964
3965     if ( id != -1 ) // VZ: does this ever happen (FIXME)?
3966     {
3967         wxKeyEvent event(CreateKeyEvent(wxEVT_KEY_UP, id, lParam));
3968         if ( GetEventHandler()->ProcessEvent(event) )
3969             return TRUE;
3970     }
3971
3972     return FALSE;
3973 }
3974
3975 // ---------------------------------------------------------------------------
3976 // joystick
3977 // ---------------------------------------------------------------------------
3978
3979 bool wxWindowMSW::HandleJoystickEvent(WXUINT msg, int x, int y, WXUINT flags)
3980 {
3981 #ifdef JOY_BUTTON1
3982     int change = 0;
3983     if ( flags & JOY_BUTTON1CHG )
3984         change = wxJOY_BUTTON1;
3985     if ( flags & JOY_BUTTON2CHG )
3986         change = wxJOY_BUTTON2;
3987     if ( flags & JOY_BUTTON3CHG )
3988         change = wxJOY_BUTTON3;
3989     if ( flags & JOY_BUTTON4CHG )
3990         change = wxJOY_BUTTON4;
3991
3992     int buttons = 0;
3993     if ( flags & JOY_BUTTON1 )
3994         buttons |= wxJOY_BUTTON1;
3995     if ( flags & JOY_BUTTON2 )
3996         buttons |= wxJOY_BUTTON2;
3997     if ( flags & JOY_BUTTON3 )
3998         buttons |= wxJOY_BUTTON3;
3999     if ( flags & JOY_BUTTON4 )
4000         buttons |= wxJOY_BUTTON4;
4001
4002     // the event ids aren't consecutive so we can't use table based lookup
4003     int joystick;
4004     wxEventType eventType;
4005     switch ( msg )
4006     {
4007         case MM_JOY1MOVE:
4008             joystick = 1;
4009             eventType = wxEVT_JOY_MOVE;
4010             break;
4011
4012         case MM_JOY2MOVE:
4013             joystick = 2;
4014             eventType = wxEVT_JOY_MOVE;
4015             break;
4016
4017         case MM_JOY1ZMOVE:
4018             joystick = 1;
4019             eventType = wxEVT_JOY_ZMOVE;
4020             break;
4021
4022         case MM_JOY2ZMOVE:
4023             joystick = 2;
4024             eventType = wxEVT_JOY_ZMOVE;
4025             break;
4026
4027         case MM_JOY1BUTTONDOWN:
4028             joystick = 1;
4029             eventType = wxEVT_JOY_BUTTON_DOWN;
4030             break;
4031
4032         case MM_JOY2BUTTONDOWN:
4033             joystick = 2;
4034             eventType = wxEVT_JOY_BUTTON_DOWN;
4035             break;
4036
4037         case MM_JOY1BUTTONUP:
4038             joystick = 1;
4039             eventType = wxEVT_JOY_BUTTON_UP;
4040             break;
4041
4042         case MM_JOY2BUTTONUP:
4043             joystick = 2;
4044             eventType = wxEVT_JOY_BUTTON_UP;
4045             break;
4046
4047         default:
4048             wxFAIL_MSG(wxT("no such joystick event"));
4049
4050             return FALSE;
4051     }
4052
4053     wxJoystickEvent event(eventType, buttons, joystick, change);
4054     event.SetPosition(wxPoint(x, y));
4055     event.SetEventObject(this);
4056
4057     return GetEventHandler()->ProcessEvent(event);
4058 #else
4059     return FALSE;
4060 #endif
4061 }
4062
4063 // ---------------------------------------------------------------------------
4064 // scrolling
4065 // ---------------------------------------------------------------------------
4066
4067 bool wxWindowMSW::MSWOnScroll(int orientation, WXWORD wParam,
4068                            WXWORD pos, WXHWND control)
4069 {
4070     if ( control )
4071     {
4072         wxWindow *child = wxFindWinFromHandle(control);
4073         if ( child )
4074             return child->MSWOnScroll(orientation, wParam, pos, control);
4075     }
4076
4077     wxScrollWinEvent event;
4078     event.SetPosition(pos);
4079     event.SetOrientation(orientation);
4080     event.m_eventObject = this;
4081
4082     switch ( wParam )
4083     {
4084     case SB_TOP:
4085         event.m_eventType = wxEVT_SCROLLWIN_TOP;
4086         break;
4087
4088     case SB_BOTTOM:
4089         event.m_eventType = wxEVT_SCROLLWIN_BOTTOM;
4090         break;
4091
4092     case SB_LINEUP:
4093         event.m_eventType = wxEVT_SCROLLWIN_LINEUP;
4094         break;
4095
4096     case SB_LINEDOWN:
4097         event.m_eventType = wxEVT_SCROLLWIN_LINEDOWN;
4098         break;
4099
4100     case SB_PAGEUP:
4101         event.m_eventType = wxEVT_SCROLLWIN_PAGEUP;
4102         break;
4103
4104     case SB_PAGEDOWN:
4105         event.m_eventType = wxEVT_SCROLLWIN_PAGEDOWN;
4106         break;
4107
4108     case SB_THUMBPOSITION:
4109     case SB_THUMBTRACK:
4110 #ifdef __WIN32__
4111         // under Win32, the scrollbar range and position are 32 bit integers,
4112         // but WM_[HV]SCROLL only carry the low 16 bits of them, so we must
4113         // explicitly query the scrollbar for the correct position (this must
4114         // be done only for these two SB_ events as they are the only one
4115         // carrying the scrollbar position)
4116         {
4117             SCROLLINFO scrollInfo;
4118             wxZeroMemory(scrollInfo);
4119             scrollInfo.cbSize = sizeof(SCROLLINFO);
4120             scrollInfo.fMask = SIF_TRACKPOS;
4121
4122             if ( !::GetScrollInfo(GetHwnd(),
4123                                   orientation == wxHORIZONTAL ? SB_HORZ
4124                                                               : SB_VERT,
4125                                   &scrollInfo) )
4126             {
4127                 wxLogLastError(_T("GetScrollInfo"));
4128             }
4129
4130             event.SetPosition(scrollInfo.nTrackPos);
4131         }
4132 #endif // Win32
4133
4134         event.m_eventType = wParam == SB_THUMBPOSITION
4135                                 ? wxEVT_SCROLLWIN_THUMBRELEASE
4136                                 : wxEVT_SCROLLWIN_THUMBTRACK;
4137         break;
4138
4139     default:
4140         return FALSE;
4141     }
4142
4143     return GetEventHandler()->ProcessEvent(event);
4144 }
4145
4146 // ===========================================================================
4147 // global functions
4148 // ===========================================================================
4149
4150 void wxGetCharSize(WXHWND wnd, int *x, int *y, const wxFont *the_font)
4151 {
4152     TEXTMETRIC tm;
4153     HDC dc = ::GetDC((HWND) wnd);
4154     HFONT fnt =0;
4155     HFONT was = 0;
4156     if ( the_font )
4157     {
4158         //    the_font->UseResource();
4159         //    the_font->RealizeResource();
4160         fnt = (HFONT)((wxFont *)the_font)->GetResourceHandle(); // const_cast
4161         if ( fnt )
4162             was = (HFONT) SelectObject(dc,fnt);
4163     }
4164     GetTextMetrics(dc, &tm);
4165     if ( the_font && fnt && was )
4166     {
4167         SelectObject(dc,was);
4168     }
4169     ReleaseDC((HWND)wnd, dc);
4170
4171     if ( x )
4172         *x = tm.tmAveCharWidth;
4173     if ( y )
4174         *y = tm.tmHeight + tm.tmExternalLeading;
4175
4176     //  if ( the_font )
4177     //    the_font->ReleaseResource();
4178 }
4179
4180 // Returns 0 if was a normal ASCII value, not a special key. This indicates that
4181 // the key should be ignored by WM_KEYDOWN and processed by WM_CHAR instead.
4182 int wxCharCodeMSWToWX(int keySym)
4183 {
4184     int id;
4185     switch (keySym)
4186     {
4187         case VK_CANCEL:     id = WXK_CANCEL; break;
4188         case VK_BACK:       id = WXK_BACK; break;
4189         case VK_TAB:        id = WXK_TAB; break;
4190         case VK_CLEAR:      id = WXK_CLEAR; break;
4191         case VK_RETURN:     id = WXK_RETURN; break;
4192         case VK_SHIFT:      id = WXK_SHIFT; break;
4193         case VK_CONTROL:    id = WXK_CONTROL; break;
4194         case VK_MENU :      id = WXK_MENU; break;
4195         case VK_PAUSE:      id = WXK_PAUSE; break;
4196         case VK_SPACE:      id = WXK_SPACE; break;
4197         case VK_ESCAPE:     id = WXK_ESCAPE; break;
4198         case VK_PRIOR:      id = WXK_PRIOR; break;
4199         case VK_NEXT :      id = WXK_NEXT; break;
4200         case VK_END:        id = WXK_END; break;
4201         case VK_HOME :      id = WXK_HOME; break;
4202         case VK_LEFT :      id = WXK_LEFT; break;
4203         case VK_UP:         id = WXK_UP; break;
4204         case VK_RIGHT:      id = WXK_RIGHT; break;
4205         case VK_DOWN :      id = WXK_DOWN; break;
4206         case VK_SELECT:     id = WXK_SELECT; break;
4207         case VK_PRINT:      id = WXK_PRINT; break;
4208         case VK_EXECUTE:    id = WXK_EXECUTE; break;
4209         case VK_INSERT:     id = WXK_INSERT; break;
4210         case VK_DELETE:     id = WXK_DELETE; break;
4211         case VK_HELP :      id = WXK_HELP; break;
4212         case VK_NUMPAD0:    id = WXK_NUMPAD0; break;
4213         case VK_NUMPAD1:    id = WXK_NUMPAD1; break;
4214         case VK_NUMPAD2:    id = WXK_NUMPAD2; break;
4215         case VK_NUMPAD3:    id = WXK_NUMPAD3; break;
4216         case VK_NUMPAD4:    id = WXK_NUMPAD4; break;
4217         case VK_NUMPAD5:    id = WXK_NUMPAD5; break;
4218         case VK_NUMPAD6:    id = WXK_NUMPAD6; break;
4219         case VK_NUMPAD7:    id = WXK_NUMPAD7; break;
4220         case VK_NUMPAD8:    id = WXK_NUMPAD8; break;
4221         case VK_NUMPAD9:    id = WXK_NUMPAD9; break;
4222         case VK_MULTIPLY:   id = WXK_NUMPAD_MULTIPLY; break;
4223         case VK_ADD:        id = WXK_NUMPAD_ADD; break;
4224         case VK_SUBTRACT:   id = WXK_NUMPAD_SUBTRACT; break;
4225         case VK_DECIMAL:    id = WXK_NUMPAD_DECIMAL; break;
4226         case VK_DIVIDE:     id = WXK_NUMPAD_DIVIDE; break;
4227         case VK_F1:         id = WXK_F1; break;
4228         case VK_F2:         id = WXK_F2; break;
4229         case VK_F3:         id = WXK_F3; break;
4230         case VK_F4:         id = WXK_F4; break;
4231         case VK_F5:         id = WXK_F5; break;
4232         case VK_F6:         id = WXK_F6; break;
4233         case VK_F7:         id = WXK_F7; break;
4234         case VK_F8:         id = WXK_F8; break;
4235         case VK_F9:         id = WXK_F9; break;
4236         case VK_F10:        id = WXK_F10; break;
4237         case VK_F11:        id = WXK_F11; break;
4238         case VK_F12:        id = WXK_F12; break;
4239         case VK_F13:        id = WXK_F13; break;
4240         case VK_F14:        id = WXK_F14; break;
4241         case VK_F15:        id = WXK_F15; break;
4242         case VK_F16:        id = WXK_F16; break;
4243         case VK_F17:        id = WXK_F17; break;
4244         case VK_F18:        id = WXK_F18; break;
4245         case VK_F19:        id = WXK_F19; break;
4246         case VK_F20:        id = WXK_F20; break;
4247         case VK_F21:        id = WXK_F21; break;
4248         case VK_F22:        id = WXK_F22; break;
4249         case VK_F23:        id = WXK_F23; break;
4250         case VK_F24:        id = WXK_F24; break;
4251         case VK_NUMLOCK:    id = WXK_NUMLOCK; break;
4252         case VK_SCROLL:     id = WXK_SCROLL; break;
4253         default:
4254             id = 0;
4255     }
4256
4257     return id;
4258 }
4259
4260 int wxCharCodeWXToMSW(int id, bool *isVirtual)
4261 {
4262     *isVirtual = TRUE;
4263     int keySym = 0;
4264     switch (id)
4265     {
4266     case WXK_CANCEL:    keySym = VK_CANCEL; break;
4267     case WXK_CLEAR:     keySym = VK_CLEAR; break;
4268     case WXK_SHIFT:     keySym = VK_SHIFT; break;
4269     case WXK_CONTROL:   keySym = VK_CONTROL; break;
4270     case WXK_MENU :     keySym = VK_MENU; break;
4271     case WXK_PAUSE:     keySym = VK_PAUSE; break;
4272     case WXK_PRIOR:     keySym = VK_PRIOR; break;
4273     case WXK_NEXT :     keySym = VK_NEXT; break;
4274     case WXK_END:       keySym = VK_END; break;
4275     case WXK_HOME :     keySym = VK_HOME; break;
4276     case WXK_LEFT :     keySym = VK_LEFT; break;
4277     case WXK_UP:        keySym = VK_UP; break;
4278     case WXK_RIGHT:     keySym = VK_RIGHT; break;
4279     case WXK_DOWN :     keySym = VK_DOWN; break;
4280     case WXK_SELECT:    keySym = VK_SELECT; break;
4281     case WXK_PRINT:     keySym = VK_PRINT; break;
4282     case WXK_EXECUTE:   keySym = VK_EXECUTE; break;
4283     case WXK_INSERT:    keySym = VK_INSERT; break;
4284     case WXK_DELETE:    keySym = VK_DELETE; break;
4285     case WXK_HELP :     keySym = VK_HELP; break;
4286     case WXK_NUMPAD0:   keySym = VK_NUMPAD0; break;
4287     case WXK_NUMPAD1:   keySym = VK_NUMPAD1; break;
4288     case WXK_NUMPAD2:   keySym = VK_NUMPAD2; break;
4289     case WXK_NUMPAD3:   keySym = VK_NUMPAD3; break;
4290     case WXK_NUMPAD4:   keySym = VK_NUMPAD4; break;
4291     case WXK_NUMPAD5:   keySym = VK_NUMPAD5; break;
4292     case WXK_NUMPAD6:   keySym = VK_NUMPAD6; break;
4293     case WXK_NUMPAD7:   keySym = VK_NUMPAD7; break;
4294     case WXK_NUMPAD8:   keySym = VK_NUMPAD8; break;
4295     case WXK_NUMPAD9:   keySym = VK_NUMPAD9; break;
4296     case WXK_NUMPAD_MULTIPLY:  keySym = VK_MULTIPLY; break;
4297     case WXK_NUMPAD_ADD:       keySym = VK_ADD; break;
4298     case WXK_NUMPAD_SUBTRACT:  keySym = VK_SUBTRACT; break;
4299     case WXK_NUMPAD_DECIMAL:   keySym = VK_DECIMAL; break;
4300     case WXK_NUMPAD_DIVIDE:    keySym = VK_DIVIDE; break;
4301     case WXK_F1:        keySym = VK_F1; break;
4302     case WXK_F2:        keySym = VK_F2; break;
4303     case WXK_F3:        keySym = VK_F3; break;
4304     case WXK_F4:        keySym = VK_F4; break;
4305     case WXK_F5:        keySym = VK_F5; break;
4306     case WXK_F6:        keySym = VK_F6; break;
4307     case WXK_F7:        keySym = VK_F7; break;
4308     case WXK_F8:        keySym = VK_F8; break;
4309     case WXK_F9:        keySym = VK_F9; break;
4310     case WXK_F10:       keySym = VK_F10; break;
4311     case WXK_F11:       keySym = VK_F11; break;
4312     case WXK_F12:       keySym = VK_F12; break;
4313     case WXK_F13:       keySym = VK_F13; break;
4314     case WXK_F14:       keySym = VK_F14; break;
4315     case WXK_F15:       keySym = VK_F15; break;
4316     case WXK_F16:       keySym = VK_F16; break;
4317     case WXK_F17:       keySym = VK_F17; break;
4318     case WXK_F18:       keySym = VK_F18; break;
4319     case WXK_F19:       keySym = VK_F19; break;
4320     case WXK_F20:       keySym = VK_F20; break;
4321     case WXK_F21:       keySym = VK_F21; break;
4322     case WXK_F22:       keySym = VK_F22; break;
4323     case WXK_F23:       keySym = VK_F23; break;
4324     case WXK_F24:       keySym = VK_F24; break;
4325     case WXK_NUMLOCK:   keySym = VK_NUMLOCK; break;
4326     case WXK_SCROLL:    keySym = VK_SCROLL; break;
4327     default:
4328         {
4329             *isVirtual = FALSE;
4330             keySym = id;
4331             break;
4332         }
4333     }
4334     return keySym;
4335 }
4336
4337 wxWindow *wxGetActiveWindow()
4338 {
4339     HWND hWnd = GetActiveWindow();
4340     if ( hWnd != 0 )
4341     {
4342         return wxFindWinFromHandle((WXHWND) hWnd);
4343     }
4344     return NULL;
4345 }
4346
4347 extern wxWindow *wxGetWindowFromHWND(WXHWND hWnd)
4348 {
4349     HWND hwnd = (HWND)hWnd;
4350
4351     // For a radiobutton, we get the radiobox from GWL_USERDATA (which is set
4352     // by code in msw/radiobox.cpp), for all the others we just search up the
4353     // window hierarchy
4354     wxWindow *win = (wxWindow *)NULL;
4355     if ( hwnd )
4356     {
4357         win = wxFindWinFromHandle((WXHWND)hwnd);
4358         if ( !win )
4359         {
4360             // all these hacks only work under Win32 anyhow
4361 #ifdef __WIN32__
4362
4363 #if wxUSE_RADIOBOX
4364             // native radiobuttons return DLGC_RADIOBUTTON here and for any
4365             // wxWindow class which overrides WM_GETDLGCODE processing to
4366             // do it as well, win would be already non NULL
4367             if ( ::SendMessage(hwnd, WM_GETDLGCODE, 0, 0) & DLGC_RADIOBUTTON )
4368             {
4369                 win = (wxWindow *)::GetWindowLong(hwnd, GWL_USERDATA);
4370             }
4371             //else: it's a wxRadioButton, not a radiobutton from wxRadioBox
4372 #endif // wxUSE_RADIOBOX
4373
4374             // spin control text buddy window should be mapped to spin ctrl
4375             // itself so try it too
4376 #if wxUSE_SPINCTRL && !defined(__WXUNIVERSAL__)
4377             if ( !win )
4378             {
4379                 win = wxSpinCtrl::GetSpinForTextCtrl((WXHWND)hwnd);
4380             }
4381 #endif // wxUSE_SPINCTRL
4382
4383 #endif // Win32
4384         }
4385     }
4386
4387     while ( hwnd && !win )
4388     {
4389         // this is a really ugly hack needed to avoid mistakenly returning the
4390         // parent frame wxWindow for the find/replace modeless dialog HWND -
4391         // this, in turn, is needed to call IsDialogMessage() from
4392         // wxApp::ProcessMessage() as for this we must return NULL from here
4393         //
4394         // FIXME: this is clearly not the best way to do it but I think we'll
4395         //        need to change HWND <-> wxWindow code more heavily than I can
4396         //        do it now to fix it
4397         if ( ::GetWindow(hwnd, GW_OWNER) )
4398         {
4399             // it's a dialog box, don't go upwards
4400             break;
4401         }
4402
4403         hwnd = ::GetParent(hwnd);
4404         win = wxFindWinFromHandle((WXHWND)hwnd);
4405     }
4406
4407     return win;
4408 }
4409
4410 #ifndef __WXMICROWIN__
4411
4412 // Windows keyboard hook. Allows interception of e.g. F1, ESCAPE
4413 // in active frames and dialogs, regardless of where the focus is.
4414 static HHOOK wxTheKeyboardHook = 0;
4415 static FARPROC wxTheKeyboardHookProc = 0;
4416 int APIENTRY _EXPORT
4417 wxKeyboardHook(int nCode, WORD wParam, DWORD lParam);
4418
4419 void wxSetKeyboardHook(bool doIt)
4420 {
4421     if ( doIt )
4422     {
4423         wxTheKeyboardHookProc = MakeProcInstance((FARPROC) wxKeyboardHook, wxGetInstance());
4424         wxTheKeyboardHook = SetWindowsHookEx(WH_KEYBOARD, (HOOKPROC) wxTheKeyboardHookProc, wxGetInstance(),
4425
4426 #if defined(__WIN32__) && !defined(__TWIN32__)
4427             GetCurrentThreadId()
4428         //      (DWORD)GetCurrentProcess()); // This is another possibility. Which is right?
4429 #else
4430             GetCurrentTask()
4431 #endif
4432             );
4433     }
4434     else
4435     {
4436         UnhookWindowsHookEx(wxTheKeyboardHook);
4437
4438         // avoids warning about statement with no effect (FreeProcInstance
4439         // doesn't do anything under Win32)
4440 #if !defined(WIN32) && !defined(_WIN32) && !defined(__WIN32__) && !defined(__NT__) && !defined(__GNUWIN32__)
4441         FreeProcInstance(wxTheKeyboardHookProc);
4442 #endif
4443     }
4444 }
4445
4446 int APIENTRY _EXPORT
4447 wxKeyboardHook(int nCode, WORD wParam, DWORD lParam)
4448 {
4449     DWORD hiWord = HIWORD(lParam);
4450     if ( nCode != HC_NOREMOVE && ((hiWord & KF_UP) == 0) )
4451     {
4452         int id = wxCharCodeMSWToWX(wParam);
4453         if ( id != 0 )
4454         {
4455             wxKeyEvent event(wxEVT_CHAR_HOOK);
4456             if ( (HIWORD(lParam) & KF_ALTDOWN) == KF_ALTDOWN )
4457                 event.m_altDown = TRUE;
4458
4459             event.m_eventObject = NULL;
4460             event.m_keyCode = id;
4461             event.m_shiftDown = wxIsShiftDown();
4462             event.m_controlDown = wxIsCtrlDown();
4463             event.SetTimestamp(s_currentMsg.time);
4464
4465             wxWindow *win = wxGetActiveWindow();
4466             wxEvtHandler *handler;
4467             if ( win )
4468             {
4469                 handler = win->GetEventHandler();
4470                 event.SetId(win->GetId());
4471             }
4472             else
4473             {
4474                 handler = wxTheApp;
4475                 event.SetId(-1);
4476             }
4477
4478             if ( handler && handler->ProcessEvent(event) )
4479             {
4480                 // processed
4481                 return 1;
4482             }
4483         }
4484     }
4485
4486     return (int)CallNextHookEx(wxTheKeyboardHook, nCode, wParam, lParam);
4487 }
4488
4489 #endif // !__WXMICROWIN__
4490
4491 #ifdef __WXDEBUG__
4492 const char *wxGetMessageName(int message)
4493 {
4494     switch ( message )
4495     {
4496         case 0x0000: return "WM_NULL";
4497         case 0x0001: return "WM_CREATE";
4498         case 0x0002: return "WM_DESTROY";
4499         case 0x0003: return "WM_MOVE";
4500         case 0x0005: return "WM_SIZE";
4501         case 0x0006: return "WM_ACTIVATE";
4502         case 0x0007: return "WM_SETFOCUS";
4503         case 0x0008: return "WM_KILLFOCUS";
4504         case 0x000A: return "WM_ENABLE";
4505         case 0x000B: return "WM_SETREDRAW";
4506         case 0x000C: return "WM_SETTEXT";
4507         case 0x000D: return "WM_GETTEXT";
4508         case 0x000E: return "WM_GETTEXTLENGTH";
4509         case 0x000F: return "WM_PAINT";
4510         case 0x0010: return "WM_CLOSE";
4511         case 0x0011: return "WM_QUERYENDSESSION";
4512         case 0x0012: return "WM_QUIT";
4513         case 0x0013: return "WM_QUERYOPEN";
4514         case 0x0014: return "WM_ERASEBKGND";
4515         case 0x0015: return "WM_SYSCOLORCHANGE";
4516         case 0x0016: return "WM_ENDSESSION";
4517         case 0x0017: return "WM_SYSTEMERROR";
4518         case 0x0018: return "WM_SHOWWINDOW";
4519         case 0x0019: return "WM_CTLCOLOR";
4520         case 0x001A: return "WM_WININICHANGE";
4521         case 0x001B: return "WM_DEVMODECHANGE";
4522         case 0x001C: return "WM_ACTIVATEAPP";
4523         case 0x001D: return "WM_FONTCHANGE";
4524         case 0x001E: return "WM_TIMECHANGE";
4525         case 0x001F: return "WM_CANCELMODE";
4526         case 0x0020: return "WM_SETCURSOR";
4527         case 0x0021: return "WM_MOUSEACTIVATE";
4528         case 0x0022: return "WM_CHILDACTIVATE";
4529         case 0x0023: return "WM_QUEUESYNC";
4530         case 0x0024: return "WM_GETMINMAXINFO";
4531         case 0x0026: return "WM_PAINTICON";
4532         case 0x0027: return "WM_ICONERASEBKGND";
4533         case 0x0028: return "WM_NEXTDLGCTL";
4534         case 0x002A: return "WM_SPOOLERSTATUS";
4535         case 0x002B: return "WM_DRAWITEM";
4536         case 0x002C: return "WM_MEASUREITEM";
4537         case 0x002D: return "WM_DELETEITEM";
4538         case 0x002E: return "WM_VKEYTOITEM";
4539         case 0x002F: return "WM_CHARTOITEM";
4540         case 0x0030: return "WM_SETFONT";
4541         case 0x0031: return "WM_GETFONT";
4542         case 0x0037: return "WM_QUERYDRAGICON";
4543         case 0x0039: return "WM_COMPAREITEM";
4544         case 0x0041: return "WM_COMPACTING";
4545         case 0x0044: return "WM_COMMNOTIFY";
4546         case 0x0046: return "WM_WINDOWPOSCHANGING";
4547         case 0x0047: return "WM_WINDOWPOSCHANGED";
4548         case 0x0048: return "WM_POWER";
4549
4550 #ifdef  __WIN32__
4551         case 0x004A: return "WM_COPYDATA";
4552         case 0x004B: return "WM_CANCELJOURNAL";
4553         case 0x004E: return "WM_NOTIFY";
4554         case 0x0050: return "WM_INPUTLANGCHANGEREQUEST";
4555         case 0x0051: return "WM_INPUTLANGCHANGE";
4556         case 0x0052: return "WM_TCARD";
4557         case 0x0053: return "WM_HELP";
4558         case 0x0054: return "WM_USERCHANGED";
4559         case 0x0055: return "WM_NOTIFYFORMAT";
4560         case 0x007B: return "WM_CONTEXTMENU";
4561         case 0x007C: return "WM_STYLECHANGING";
4562         case 0x007D: return "WM_STYLECHANGED";
4563         case 0x007E: return "WM_DISPLAYCHANGE";
4564         case 0x007F: return "WM_GETICON";
4565         case 0x0080: return "WM_SETICON";
4566 #endif  //WIN32
4567
4568         case 0x0081: return "WM_NCCREATE";
4569         case 0x0082: return "WM_NCDESTROY";
4570         case 0x0083: return "WM_NCCALCSIZE";
4571         case 0x0084: return "WM_NCHITTEST";
4572         case 0x0085: return "WM_NCPAINT";
4573         case 0x0086: return "WM_NCACTIVATE";
4574         case 0x0087: return "WM_GETDLGCODE";
4575         case 0x00A0: return "WM_NCMOUSEMOVE";
4576         case 0x00A1: return "WM_NCLBUTTONDOWN";
4577         case 0x00A2: return "WM_NCLBUTTONUP";
4578         case 0x00A3: return "WM_NCLBUTTONDBLCLK";
4579         case 0x00A4: return "WM_NCRBUTTONDOWN";
4580         case 0x00A5: return "WM_NCRBUTTONUP";
4581         case 0x00A6: return "WM_NCRBUTTONDBLCLK";
4582         case 0x00A7: return "WM_NCMBUTTONDOWN";
4583         case 0x00A8: return "WM_NCMBUTTONUP";
4584         case 0x00A9: return "WM_NCMBUTTONDBLCLK";
4585         case 0x0100: return "WM_KEYDOWN";
4586         case 0x0101: return "WM_KEYUP";
4587         case 0x0102: return "WM_CHAR";
4588         case 0x0103: return "WM_DEADCHAR";
4589         case 0x0104: return "WM_SYSKEYDOWN";
4590         case 0x0105: return "WM_SYSKEYUP";
4591         case 0x0106: return "WM_SYSCHAR";
4592         case 0x0107: return "WM_SYSDEADCHAR";
4593         case 0x0108: return "WM_KEYLAST";
4594
4595 #ifdef  __WIN32__
4596         case 0x010D: return "WM_IME_STARTCOMPOSITION";
4597         case 0x010E: return "WM_IME_ENDCOMPOSITION";
4598         case 0x010F: return "WM_IME_COMPOSITION";
4599 #endif  //WIN32
4600
4601         case 0x0110: return "WM_INITDIALOG";
4602         case 0x0111: return "WM_COMMAND";
4603         case 0x0112: return "WM_SYSCOMMAND";
4604         case 0x0113: return "WM_TIMER";
4605         case 0x0114: return "WM_HSCROLL";
4606         case 0x0115: return "WM_VSCROLL";
4607         case 0x0116: return "WM_INITMENU";
4608         case 0x0117: return "WM_INITMENUPOPUP";
4609         case 0x011F: return "WM_MENUSELECT";
4610         case 0x0120: return "WM_MENUCHAR";
4611         case 0x0121: return "WM_ENTERIDLE";
4612         case 0x0200: return "WM_MOUSEMOVE";
4613         case 0x0201: return "WM_LBUTTONDOWN";
4614         case 0x0202: return "WM_LBUTTONUP";
4615         case 0x0203: return "WM_LBUTTONDBLCLK";
4616         case 0x0204: return "WM_RBUTTONDOWN";
4617         case 0x0205: return "WM_RBUTTONUP";
4618         case 0x0206: return "WM_RBUTTONDBLCLK";
4619         case 0x0207: return "WM_MBUTTONDOWN";
4620         case 0x0208: return "WM_MBUTTONUP";
4621         case 0x0209: return "WM_MBUTTONDBLCLK";
4622         case 0x020A: return "WM_MOUSEWHEEL";
4623         case 0x0210: return "WM_PARENTNOTIFY";
4624         case 0x0211: return "WM_ENTERMENULOOP";
4625         case 0x0212: return "WM_EXITMENULOOP";
4626
4627 #ifdef  __WIN32__
4628         case 0x0213: return "WM_NEXTMENU";
4629         case 0x0214: return "WM_SIZING";
4630         case 0x0215: return "WM_CAPTURECHANGED";
4631         case 0x0216: return "WM_MOVING";
4632         case 0x0218: return "WM_POWERBROADCAST";
4633         case 0x0219: return "WM_DEVICECHANGE";
4634 #endif  //WIN32
4635
4636         case 0x0220: return "WM_MDICREATE";
4637         case 0x0221: return "WM_MDIDESTROY";
4638         case 0x0222: return "WM_MDIACTIVATE";
4639         case 0x0223: return "WM_MDIRESTORE";
4640         case 0x0224: return "WM_MDINEXT";
4641         case 0x0225: return "WM_MDIMAXIMIZE";
4642         case 0x0226: return "WM_MDITILE";
4643         case 0x0227: return "WM_MDICASCADE";
4644         case 0x0228: return "WM_MDIICONARRANGE";
4645         case 0x0229: return "WM_MDIGETACTIVE";
4646         case 0x0230: return "WM_MDISETMENU";
4647         case 0x0233: return "WM_DROPFILES";
4648
4649 #ifdef  __WIN32__
4650         case 0x0281: return "WM_IME_SETCONTEXT";
4651         case 0x0282: return "WM_IME_NOTIFY";
4652         case 0x0283: return "WM_IME_CONTROL";
4653         case 0x0284: return "WM_IME_COMPOSITIONFULL";
4654         case 0x0285: return "WM_IME_SELECT";
4655         case 0x0286: return "WM_IME_CHAR";
4656         case 0x0290: return "WM_IME_KEYDOWN";
4657         case 0x0291: return "WM_IME_KEYUP";
4658 #endif  //WIN32
4659
4660         case 0x0300: return "WM_CUT";
4661         case 0x0301: return "WM_COPY";
4662         case 0x0302: return "WM_PASTE";
4663         case 0x0303: return "WM_CLEAR";
4664         case 0x0304: return "WM_UNDO";
4665         case 0x0305: return "WM_RENDERFORMAT";
4666         case 0x0306: return "WM_RENDERALLFORMATS";
4667         case 0x0307: return "WM_DESTROYCLIPBOARD";
4668         case 0x0308: return "WM_DRAWCLIPBOARD";
4669         case 0x0309: return "WM_PAINTCLIPBOARD";
4670         case 0x030A: return "WM_VSCROLLCLIPBOARD";
4671         case 0x030B: return "WM_SIZECLIPBOARD";
4672         case 0x030C: return "WM_ASKCBFORMATNAME";
4673         case 0x030D: return "WM_CHANGECBCHAIN";
4674         case 0x030E: return "WM_HSCROLLCLIPBOARD";
4675         case 0x030F: return "WM_QUERYNEWPALETTE";
4676         case 0x0310: return "WM_PALETTEISCHANGING";
4677         case 0x0311: return "WM_PALETTECHANGED";
4678
4679 #ifdef __WIN32__
4680         // common controls messages - although they're not strictly speaking
4681         // standard, it's nice to decode them nevertheless
4682
4683         // listview
4684         case 0x1000 + 0: return "LVM_GETBKCOLOR";
4685         case 0x1000 + 1: return "LVM_SETBKCOLOR";
4686         case 0x1000 + 2: return "LVM_GETIMAGELIST";
4687         case 0x1000 + 3: return "LVM_SETIMAGELIST";
4688         case 0x1000 + 4: return "LVM_GETITEMCOUNT";
4689         case 0x1000 + 5: return "LVM_GETITEMA";
4690         case 0x1000 + 75: return "LVM_GETITEMW";
4691         case 0x1000 + 6: return "LVM_SETITEMA";
4692         case 0x1000 + 76: return "LVM_SETITEMW";
4693         case 0x1000 + 7: return "LVM_INSERTITEMA";
4694         case 0x1000 + 77: return "LVM_INSERTITEMW";
4695         case 0x1000 + 8: return "LVM_DELETEITEM";
4696         case 0x1000 + 9: return "LVM_DELETEALLITEMS";
4697         case 0x1000 + 10: return "LVM_GETCALLBACKMASK";
4698         case 0x1000 + 11: return "LVM_SETCALLBACKMASK";
4699         case 0x1000 + 12: return "LVM_GETNEXTITEM";
4700         case 0x1000 + 13: return "LVM_FINDITEMA";
4701         case 0x1000 + 83: return "LVM_FINDITEMW";
4702         case 0x1000 + 14: return "LVM_GETITEMRECT";
4703         case 0x1000 + 15: return "LVM_SETITEMPOSITION";
4704         case 0x1000 + 16: return "LVM_GETITEMPOSITION";
4705         case 0x1000 + 17: return "LVM_GETSTRINGWIDTHA";
4706         case 0x1000 + 87: return "LVM_GETSTRINGWIDTHW";
4707         case 0x1000 + 18: return "LVM_HITTEST";
4708         case 0x1000 + 19: return "LVM_ENSUREVISIBLE";
4709         case 0x1000 + 20: return "LVM_SCROLL";
4710         case 0x1000 + 21: return "LVM_REDRAWITEMS";
4711         case 0x1000 + 22: return "LVM_ARRANGE";
4712         case 0x1000 + 23: return "LVM_EDITLABELA";
4713         case 0x1000 + 118: return "LVM_EDITLABELW";
4714         case 0x1000 + 24: return "LVM_GETEDITCONTROL";
4715         case 0x1000 + 25: return "LVM_GETCOLUMNA";
4716         case 0x1000 + 95: return "LVM_GETCOLUMNW";
4717         case 0x1000 + 26: return "LVM_SETCOLUMNA";
4718         case 0x1000 + 96: return "LVM_SETCOLUMNW";
4719         case 0x1000 + 27: return "LVM_INSERTCOLUMNA";
4720         case 0x1000 + 97: return "LVM_INSERTCOLUMNW";
4721         case 0x1000 + 28: return "LVM_DELETECOLUMN";
4722         case 0x1000 + 29: return "LVM_GETCOLUMNWIDTH";
4723         case 0x1000 + 30: return "LVM_SETCOLUMNWIDTH";
4724         case 0x1000 + 31: return "LVM_GETHEADER";
4725         case 0x1000 + 33: return "LVM_CREATEDRAGIMAGE";
4726         case 0x1000 + 34: return "LVM_GETVIEWRECT";
4727         case 0x1000 + 35: return "LVM_GETTEXTCOLOR";
4728         case 0x1000 + 36: return "LVM_SETTEXTCOLOR";
4729         case 0x1000 + 37: return "LVM_GETTEXTBKCOLOR";
4730         case 0x1000 + 38: return "LVM_SETTEXTBKCOLOR";
4731         case 0x1000 + 39: return "LVM_GETTOPINDEX";
4732         case 0x1000 + 40: return "LVM_GETCOUNTPERPAGE";
4733         case 0x1000 + 41: return "LVM_GETORIGIN";
4734         case 0x1000 + 42: return "LVM_UPDATE";
4735         case 0x1000 + 43: return "LVM_SETITEMSTATE";
4736         case 0x1000 + 44: return "LVM_GETITEMSTATE";
4737         case 0x1000 + 45: return "LVM_GETITEMTEXTA";
4738         case 0x1000 + 115: return "LVM_GETITEMTEXTW";
4739         case 0x1000 + 46: return "LVM_SETITEMTEXTA";
4740         case 0x1000 + 116: return "LVM_SETITEMTEXTW";
4741         case 0x1000 + 47: return "LVM_SETITEMCOUNT";
4742         case 0x1000 + 48: return "LVM_SORTITEMS";
4743         case 0x1000 + 49: return "LVM_SETITEMPOSITION32";
4744         case 0x1000 + 50: return "LVM_GETSELECTEDCOUNT";
4745         case 0x1000 + 51: return "LVM_GETITEMSPACING";
4746         case 0x1000 + 52: return "LVM_GETISEARCHSTRINGA";
4747         case 0x1000 + 117: return "LVM_GETISEARCHSTRINGW";
4748         case 0x1000 + 53: return "LVM_SETICONSPACING";
4749         case 0x1000 + 54: return "LVM_SETEXTENDEDLISTVIEWSTYLE";
4750         case 0x1000 + 55: return "LVM_GETEXTENDEDLISTVIEWSTYLE";
4751         case 0x1000 + 56: return "LVM_GETSUBITEMRECT";
4752         case 0x1000 + 57: return "LVM_SUBITEMHITTEST";
4753         case 0x1000 + 58: return "LVM_SETCOLUMNORDERARRAY";
4754         case 0x1000 + 59: return "LVM_GETCOLUMNORDERARRAY";
4755         case 0x1000 + 60: return "LVM_SETHOTITEM";
4756         case 0x1000 + 61: return "LVM_GETHOTITEM";
4757         case 0x1000 + 62: return "LVM_SETHOTCURSOR";
4758         case 0x1000 + 63: return "LVM_GETHOTCURSOR";
4759         case 0x1000 + 64: return "LVM_APPROXIMATEVIEWRECT";
4760         case 0x1000 + 65: return "LVM_SETWORKAREA";
4761
4762         // tree view
4763         case 0x1100 + 0: return "TVM_INSERTITEMA";
4764         case 0x1100 + 50: return "TVM_INSERTITEMW";
4765         case 0x1100 + 1: return "TVM_DELETEITEM";
4766         case 0x1100 + 2: return "TVM_EXPAND";
4767         case 0x1100 + 4: return "TVM_GETITEMRECT";
4768         case 0x1100 + 5: return "TVM_GETCOUNT";
4769         case 0x1100 + 6: return "TVM_GETINDENT";
4770         case 0x1100 + 7: return "TVM_SETINDENT";
4771         case 0x1100 + 8: return "TVM_GETIMAGELIST";
4772         case 0x1100 + 9: return "TVM_SETIMAGELIST";
4773         case 0x1100 + 10: return "TVM_GETNEXTITEM";
4774         case 0x1100 + 11: return "TVM_SELECTITEM";
4775         case 0x1100 + 12: return "TVM_GETITEMA";
4776         case 0x1100 + 62: return "TVM_GETITEMW";
4777         case 0x1100 + 13: return "TVM_SETITEMA";
4778         case 0x1100 + 63: return "TVM_SETITEMW";
4779         case 0x1100 + 14: return "TVM_EDITLABELA";
4780         case 0x1100 + 65: return "TVM_EDITLABELW";
4781         case 0x1100 + 15: return "TVM_GETEDITCONTROL";
4782         case 0x1100 + 16: return "TVM_GETVISIBLECOUNT";
4783         case 0x1100 + 17: return "TVM_HITTEST";
4784         case 0x1100 + 18: return "TVM_CREATEDRAGIMAGE";
4785         case 0x1100 + 19: return "TVM_SORTCHILDREN";
4786         case 0x1100 + 20: return "TVM_ENSUREVISIBLE";
4787         case 0x1100 + 21: return "TVM_SORTCHILDRENCB";
4788         case 0x1100 + 22: return "TVM_ENDEDITLABELNOW";
4789         case 0x1100 + 23: return "TVM_GETISEARCHSTRINGA";
4790         case 0x1100 + 64: return "TVM_GETISEARCHSTRINGW";
4791         case 0x1100 + 24: return "TVM_SETTOOLTIPS";
4792         case 0x1100 + 25: return "TVM_GETTOOLTIPS";
4793
4794         // header
4795         case 0x1200 + 0: return "HDM_GETITEMCOUNT";
4796         case 0x1200 + 1: return "HDM_INSERTITEMA";
4797         case 0x1200 + 10: return "HDM_INSERTITEMW";
4798         case 0x1200 + 2: return "HDM_DELETEITEM";
4799         case 0x1200 + 3: return "HDM_GETITEMA";
4800         case 0x1200 + 11: return "HDM_GETITEMW";
4801         case 0x1200 + 4: return "HDM_SETITEMA";
4802         case 0x1200 + 12: return "HDM_SETITEMW";
4803         case 0x1200 + 5: return "HDM_LAYOUT";
4804         case 0x1200 + 6: return "HDM_HITTEST";
4805         case 0x1200 + 7: return "HDM_GETITEMRECT";
4806         case 0x1200 + 8: return "HDM_SETIMAGELIST";
4807         case 0x1200 + 9: return "HDM_GETIMAGELIST";
4808         case 0x1200 + 15: return "HDM_ORDERTOINDEX";
4809         case 0x1200 + 16: return "HDM_CREATEDRAGIMAGE";
4810         case 0x1200 + 17: return "HDM_GETORDERARRAY";
4811         case 0x1200 + 18: return "HDM_SETORDERARRAY";
4812         case 0x1200 + 19: return "HDM_SETHOTDIVIDER";
4813
4814         // tab control
4815         case 0x1300 + 2: return "TCM_GETIMAGELIST";
4816         case 0x1300 + 3: return "TCM_SETIMAGELIST";
4817         case 0x1300 + 4: return "TCM_GETITEMCOUNT";
4818         case 0x1300 + 5: return "TCM_GETITEMA";
4819         case 0x1300 + 60: return "TCM_GETITEMW";
4820         case 0x1300 + 6: return "TCM_SETITEMA";
4821         case 0x1300 + 61: return "TCM_SETITEMW";
4822         case 0x1300 + 7: return "TCM_INSERTITEMA";
4823         case 0x1300 + 62: return "TCM_INSERTITEMW";
4824         case 0x1300 + 8: return "TCM_DELETEITEM";
4825         case 0x1300 + 9: return "TCM_DELETEALLITEMS";
4826         case 0x1300 + 10: return "TCM_GETITEMRECT";
4827         case 0x1300 + 11: return "TCM_GETCURSEL";
4828         case 0x1300 + 12: return "TCM_SETCURSEL";
4829         case 0x1300 + 13: return "TCM_HITTEST";
4830         case 0x1300 + 14: return "TCM_SETITEMEXTRA";
4831         case 0x1300 + 40: return "TCM_ADJUSTRECT";
4832         case 0x1300 + 41: return "TCM_SETITEMSIZE";
4833         case 0x1300 + 42: return "TCM_REMOVEIMAGE";
4834         case 0x1300 + 43: return "TCM_SETPADDING";
4835         case 0x1300 + 44: return "TCM_GETROWCOUNT";
4836         case 0x1300 + 45: return "TCM_GETTOOLTIPS";
4837         case 0x1300 + 46: return "TCM_SETTOOLTIPS";
4838         case 0x1300 + 47: return "TCM_GETCURFOCUS";
4839         case 0x1300 + 48: return "TCM_SETCURFOCUS";
4840         case 0x1300 + 49: return "TCM_SETMINTABWIDTH";
4841         case 0x1300 + 50: return "TCM_DESELECTALL";
4842
4843         // toolbar
4844         case WM_USER+1: return "TB_ENABLEBUTTON";
4845         case WM_USER+2: return "TB_CHECKBUTTON";
4846         case WM_USER+3: return "TB_PRESSBUTTON";
4847         case WM_USER+4: return "TB_HIDEBUTTON";
4848         case WM_USER+5: return "TB_INDETERMINATE";
4849         case WM_USER+9: return "TB_ISBUTTONENABLED";
4850         case WM_USER+10: return "TB_ISBUTTONCHECKED";
4851         case WM_USER+11: return "TB_ISBUTTONPRESSED";
4852         case WM_USER+12: return "TB_ISBUTTONHIDDEN";
4853         case WM_USER+13: return "TB_ISBUTTONINDETERMINATE";
4854         case WM_USER+17: return "TB_SETSTATE";
4855         case WM_USER+18: return "TB_GETSTATE";
4856         case WM_USER+19: return "TB_ADDBITMAP";
4857         case WM_USER+20: return "TB_ADDBUTTONS";
4858         case WM_USER+21: return "TB_INSERTBUTTON";
4859         case WM_USER+22: return "TB_DELETEBUTTON";
4860         case WM_USER+23: return "TB_GETBUTTON";
4861         case WM_USER+24: return "TB_BUTTONCOUNT";
4862         case WM_USER+25: return "TB_COMMANDTOINDEX";
4863         case WM_USER+26: return "TB_SAVERESTOREA";
4864         case WM_USER+76: return "TB_SAVERESTOREW";
4865         case WM_USER+27: return "TB_CUSTOMIZE";
4866         case WM_USER+28: return "TB_ADDSTRINGA";
4867         case WM_USER+77: return "TB_ADDSTRINGW";
4868         case WM_USER+29: return "TB_GETITEMRECT";
4869         case WM_USER+30: return "TB_BUTTONSTRUCTSIZE";
4870         case WM_USER+31: return "TB_SETBUTTONSIZE";
4871         case WM_USER+32: return "TB_SETBITMAPSIZE";
4872         case WM_USER+33: return "TB_AUTOSIZE";
4873         case WM_USER+35: return "TB_GETTOOLTIPS";
4874         case WM_USER+36: return "TB_SETTOOLTIPS";
4875         case WM_USER+37: return "TB_SETPARENT";
4876         case WM_USER+39: return "TB_SETROWS";
4877         case WM_USER+40: return "TB_GETROWS";
4878         case WM_USER+42: return "TB_SETCMDID";
4879         case WM_USER+43: return "TB_CHANGEBITMAP";
4880         case WM_USER+44: return "TB_GETBITMAP";
4881         case WM_USER+45: return "TB_GETBUTTONTEXTA";
4882         case WM_USER+75: return "TB_GETBUTTONTEXTW";
4883         case WM_USER+46: return "TB_REPLACEBITMAP";
4884         case WM_USER+47: return "TB_SETINDENT";
4885         case WM_USER+48: return "TB_SETIMAGELIST";
4886         case WM_USER+49: return "TB_GETIMAGELIST";
4887         case WM_USER+50: return "TB_LOADIMAGES";
4888         case WM_USER+51: return "TB_GETRECT";
4889         case WM_USER+52: return "TB_SETHOTIMAGELIST";
4890         case WM_USER+53: return "TB_GETHOTIMAGELIST";
4891         case WM_USER+54: return "TB_SETDISABLEDIMAGELIST";
4892         case WM_USER+55: return "TB_GETDISABLEDIMAGELIST";
4893         case WM_USER+56: return "TB_SETSTYLE";
4894         case WM_USER+57: return "TB_GETSTYLE";
4895         case WM_USER+58: return "TB_GETBUTTONSIZE";
4896         case WM_USER+59: return "TB_SETBUTTONWIDTH";
4897         case WM_USER+60: return "TB_SETMAXTEXTROWS";
4898         case WM_USER+61: return "TB_GETTEXTROWS";
4899         case WM_USER+41: return "TB_GETBITMAPFLAGS";
4900
4901 #endif //WIN32
4902
4903         default:
4904             static char s_szBuf[128];
4905             sprintf(s_szBuf, "<unknown message = %d>", message);
4906             return s_szBuf;
4907     }
4908 }
4909 #endif //__WXDEBUG__
4910
4911 static void TranslateKbdEventToMouse(wxWindowMSW *win,
4912                                      int *x, int *y, WPARAM *flags)
4913 {
4914     // construct the key mask
4915     WPARAM& fwKeys = *flags;
4916
4917     fwKeys = MK_RBUTTON;
4918     if ( wxIsCtrlDown() )
4919         fwKeys |= MK_CONTROL;
4920     if ( wxIsShiftDown() )
4921         fwKeys |= MK_SHIFT;
4922
4923     // simulate right mouse button click
4924     DWORD dwPos = ::GetMessagePos();
4925     *x = GET_X_LPARAM(dwPos);
4926     *y = GET_Y_LPARAM(dwPos);
4927
4928     win->ScreenToClient(x, y);
4929 }
4930
4931 static TEXTMETRIC wxGetTextMetrics(const wxWindowMSW *win)
4932 {
4933     // prepare the DC
4934     TEXTMETRIC tm;
4935     HWND hwnd = GetHwndOf(win);
4936     HDC hdc = ::GetDC(hwnd);
4937
4938 #if !wxDIALOG_UNIT_COMPATIBILITY
4939     // and select the current font into it
4940     HFONT hfont = GetHfontOf(win->GetFont());
4941     if ( hfont )
4942     {
4943         hfont = (HFONT)::SelectObject(hdc, hfont);
4944     }
4945 #endif
4946
4947     // finally retrieve the text metrics from it
4948     GetTextMetrics(hdc, &tm);
4949
4950 #if !wxDIALOG_UNIT_COMPATIBILITY
4951     // and clean up
4952     if ( hfont )
4953     {
4954         (void)::SelectObject(hdc, hfont);
4955     }
4956 #endif
4957
4958     ::ReleaseDC(hwnd, hdc);
4959
4960     return tm;
4961 }
4962
4963 // Find the wxWindow at the current mouse position, returning the mouse
4964 // position.
4965 wxWindow* wxFindWindowAtPointer(wxPoint& WXUNUSED(pt))
4966 {
4967     return wxFindWindowAtPoint(wxGetMousePosition());
4968 }
4969
4970 wxWindow* wxFindWindowAtPoint(const wxPoint& pt)
4971 {
4972     POINT pt2;
4973     pt2.x = pt.x;
4974     pt2.y = pt.y;
4975     HWND hWndHit = ::WindowFromPoint(pt2);
4976
4977     wxWindow* win = wxFindWinFromHandle((WXHWND) hWndHit) ;
4978     HWND hWnd = hWndHit;
4979
4980     // Try to find a window with a wxWindow associated with it
4981     while (!win && (hWnd != 0))
4982     {
4983         hWnd = ::GetParent(hWnd);
4984         win = wxFindWinFromHandle((WXHWND) hWnd) ;
4985     }
4986     return win;
4987 }
4988
4989 // Get the current mouse position.
4990 wxPoint wxGetMousePosition()
4991 {
4992     POINT pt;
4993     GetCursorPos( & pt );
4994     return wxPoint(pt.x, pt.y);
4995 }
4996