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