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