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