src/msw/window.cpp

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