src/msw/window.cpp

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