src/msw/toplevel.cpp

   1 ///////////////////////////////////////////////////////////////////////////////
   2 // Name:        src/msw/toplevel.cpp
   3 // Purpose:     implements wxTopLevelWindow for MSW
   4 // Author:      Vadim Zeitlin
   5 // Modified by:
   6 // Created:     24.09.01
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) 2001 SciTech Software, Inc. (www.scitechsoft.com)
   9 // Licence:     wxWindows licence
  10 ///////////////////////////////////////////////////////////////////////////////
  11
  12 // ============================================================================
  13 // declarations
  14 // ============================================================================
  15
  16 // ----------------------------------------------------------------------------
  17 // headers
  18 // ----------------------------------------------------------------------------
  19
  20 // For compilers that support precompilation, includes "wx.h".
  21 #include "wx/wxprec.h"
  22
  23 #ifdef __BORLANDC__
  24     #pragma hdrstop
  25 #endif
  26
  27 #include "wx/toplevel.h"
  28
  29 #ifndef WX_PRECOMP
  30     #include "wx/app.h"
  31     #include "wx/dialog.h"
  32     #include "wx/string.h"
  33     #include "wx/log.h"
  34     #include "wx/intl.h"
  35     #include "wx/frame.h"
  36     #include "wx/containr.h"        // wxSetFocusToChild()
  37     #include "wx/module.h"
  38 #endif //WX_PRECOMP
  39
  40 #include "wx/dynlib.h"
  41
  42 #include "wx/msw/private.h"
  43 #if defined(__WXWINCE__) && !defined(__HANDHELDPC__)
  44     #include <ole2.h>
  45     #include <shellapi.h>
  46     // Standard SDK doesn't have aygshell.dll: see include/wx/msw/wince/libraries.h
  47     #if _WIN32_WCE < 400 || !defined(__WINCE_STANDARDSDK__)
  48         #include <aygshell.h>
  49     #endif
  50 #endif
  51
  52 #include "wx/msw/winundef.h"
  53 #include "wx/msw/missing.h"
  54
  55 #include "wx/display.h"
  56
  57 #ifndef ICON_BIG
  58     #define ICON_BIG 1
  59 #endif
  60
  61 #ifndef ICON_SMALL
  62     #define ICON_SMALL 0
  63 #endif
  64
  65 // ----------------------------------------------------------------------------
  66 // stubs for missing functions under MicroWindows
  67 // ----------------------------------------------------------------------------
  68
  69 #ifdef __WXMICROWIN__
  70
  71 // static inline bool IsIconic(HWND WXUNUSED(hwnd)) { return false; }
  72 static inline bool IsZoomed(HWND WXUNUSED(hwnd)) { return false; }
  73
  74 #endif // __WXMICROWIN__
  75
  76 // NB: wxDlgProc must be defined here and not in dialog.cpp because the latter
  77 //     is not included by wxUniv build which does need wxDlgProc
  78 LONG APIENTRY _EXPORT
  79 wxDlgProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam);
  80
  81 // ----------------------------------------------------------------------------
  82 // wxTLWHiddenParentModule: used to manage the hidden parent window (we need a
  83 // module to ensure that the window is always deleted)
  84 // ----------------------------------------------------------------------------
  85
  86 class wxTLWHiddenParentModule : public wxModule
  87 {
  88 public:
  89     // module init/finalize
  90     virtual bool OnInit();
  91     virtual void OnExit();
  92
  93     // get the hidden window (creates on demand)
  94     static HWND GetHWND();
  95
  96 private:
  97     // the HWND of the hidden parent
  98     static HWND ms_hwnd;
  99
 100     // the class used to create it
 101     static const wxChar *ms_className;
 102
 103     DECLARE_DYNAMIC_CLASS(wxTLWHiddenParentModule)
 104 };
 105
 106 IMPLEMENT_DYNAMIC_CLASS(wxTLWHiddenParentModule, wxModule)
 107
 108 // ============================================================================
 109 // wxTopLevelWindowMSW implementation
 110 // ============================================================================
 111
 112 BEGIN_EVENT_TABLE(wxTopLevelWindowMSW, wxTopLevelWindowBase)
 113     EVT_ACTIVATE(wxTopLevelWindowMSW::OnActivate)
 114 END_EVENT_TABLE()
 115
 116 // ----------------------------------------------------------------------------
 117 // wxTopLevelWindowMSW creation
 118 // ----------------------------------------------------------------------------
 119
 120 void wxTopLevelWindowMSW::Init()
 121 {
 122     m_iconized =
 123     m_maximizeOnShow = false;
 124
 125     // Data to save/restore when calling ShowFullScreen
 126     m_fsStyle = 0;
 127     m_fsOldWindowStyle = 0;
 128     m_fsIsMaximized = false;
 129     m_fsIsShowing = false;
 130
 131     m_winLastFocused = NULL;
 132
 133 #if defined(__SMARTPHONE__) && defined(__WXWINCE__)
 134     m_MenuBarHWND = 0;
 135 #endif
 136
 137 #if defined(__SMARTPHONE__) || defined(__POCKETPC__)
 138     SHACTIVATEINFO* info = new SHACTIVATEINFO;
 139     wxZeroMemory(*info);
 140     info->cbSize = sizeof(SHACTIVATEINFO);
 141
 142     m_activateInfo = (void*) info;
 143 #endif
 144
 145     m_menuSystem = NULL;
 146 }
 147
 148 WXDWORD wxTopLevelWindowMSW::MSWGetStyle(long style, WXDWORD *exflags) const
 149 {
 150     // let the base class deal with the common styles but fix the ones which
 151     // don't make sense for us (we also deal with the borders ourselves)
 152     WXDWORD msflags = wxWindow::MSWGetStyle
 153                       (
 154                         (style & ~wxBORDER_MASK) | wxBORDER_NONE, exflags
 155                       ) & ~WS_CHILD & ~WS_VISIBLE;
 156
 157     // For some reason, WS_VISIBLE needs to be defined on creation for
 158     // SmartPhone 2003. The title can fail to be displayed otherwise.
 159 #if defined(__SMARTPHONE__) || (defined(__WXWINCE__) && _WIN32_WCE < 400)
 160     msflags |= WS_VISIBLE;
 161     ((wxTopLevelWindowMSW*)this)->wxWindowBase::Show(true);
 162 #endif
 163
 164     // first select the kind of window being created
 165     //
 166     // note that if we don't set WS_POPUP, Windows assumes WS_OVERLAPPED and
 167     // creates a window with both caption and border, hence we need to use
 168     // WS_POPUP in a few cases just to avoid having caption/border which we
 169     // don't want
 170
 171     // border and caption styles
 172     if ( ( style & wxRESIZE_BORDER ) && !IsAlwaysMaximized())
 173         msflags |= WS_THICKFRAME;
 174     else if ( exflags && ((style & wxBORDER_DOUBLE) || (style & wxBORDER_RAISED)) )
 175         *exflags |= WS_EX_DLGMODALFRAME;
 176     else if ( !(style & wxBORDER_NONE) )
 177         msflags |= WS_BORDER;
 178 #ifndef __POCKETPC__
 179     else
 180         msflags |= WS_POPUP;
 181 #endif
 182
 183     // normally we consider that all windows without a caption must be popups,
 184     // but CE is an exception: there windows normally do not have the caption
 185     // but shouldn't be made popups as popups can't have menus and don't look
 186     // like normal windows anyhow
 187
 188     // TODO: Smartphone appears to like wxCAPTION, but we should check that
 189     // we need it.
 190 #if defined(__SMARTPHONE__) || !defined(__WXWINCE__)
 191     if ( style & wxCAPTION )
 192         msflags |= WS_CAPTION;
 193 #ifndef __WXWINCE__
 194     else
 195         msflags |= WS_POPUP;
 196 #endif // !__WXWINCE__
 197 #endif
 198
 199     // next translate the individual flags
 200
 201     // WS_EX_CONTEXTHELP is incompatible with WS_MINIMIZEBOX and WS_MAXIMIZEBOX
 202     // and is ignored if we specify both of them, but chances are that if we
 203     // use wxWS_EX_CONTEXTHELP, we really do want to have the context help
 204     // button while wxMINIMIZE/wxMAXIMIZE are included by default, so the help
 205     // takes precedence
 206     if ( !(GetExtraStyle() & wxWS_EX_CONTEXTHELP) )
 207     {
 208         if ( style & wxMINIMIZE_BOX )
 209             msflags |= WS_MINIMIZEBOX;
 210         if ( style & wxMAXIMIZE_BOX )
 211             msflags |= WS_MAXIMIZEBOX;
 212     }
 213
 214 #ifndef __WXWINCE__
 215     // notice that if wxCLOSE_BOX is specified we need to use WS_SYSMENU too as
 216     // otherwise the close box doesn't appear
 217     if ( style & (wxSYSTEM_MENU | wxCLOSE_BOX) )
 218         msflags |= WS_SYSMENU;
 219 #endif // !__WXWINCE__
 220
 221     // NB: under CE these 2 styles are not supported currently, we should
 222     //     call Minimize()/Maximize() "manually" if we want to support them
 223     if ( style & wxMINIMIZE )
 224         msflags |= WS_MINIMIZE;
 225
 226     if ( style & wxMAXIMIZE )
 227         msflags |= WS_MAXIMIZE;
 228
 229     // Keep this here because it saves recoding this function in wxTinyFrame
 230     if ( style & wxTINY_CAPTION )
 231         msflags |= WS_CAPTION;
 232
 233     if ( exflags )
 234     {
 235         // there is no taskbar under CE, so omit all this
 236 #if !defined(__WXWINCE__)
 237         if ( !(GetExtraStyle() & wxTOPLEVEL_EX_DIALOG) )
 238         {
 239             if ( style & wxFRAME_TOOL_WINDOW )
 240             {
 241                 // create the palette-like window
 242                 *exflags |= WS_EX_TOOLWINDOW;
 243
 244                 // tool windows shouldn't appear on the taskbar (as documented)
 245                 style |= wxFRAME_NO_TASKBAR;
 246             }
 247
 248             // We have to solve 2 different problems here:
 249             //
 250             // 1. frames with wxFRAME_NO_TASKBAR flag shouldn't appear in the
 251             //    taskbar even if they don't have a parent
 252             //
 253             // 2. frames without this style should appear in the taskbar even
 254             //    if they're owned (Windows only puts non owned windows into
 255             //    the taskbar normally)
 256             //
 257             // The second one is solved here by using WS_EX_APPWINDOW flag, the
 258             // first one is dealt with in our MSWGetParent() method
 259             // implementation
 260             if ( !(style & wxFRAME_NO_TASKBAR) && GetParent() )
 261             {
 262                 // need to force the frame to appear in the taskbar
 263                 *exflags |= WS_EX_APPWINDOW;
 264             }
 265             //else: nothing to do [here]
 266         }
 267
 268         if ( GetExtraStyle() & wxWS_EX_CONTEXTHELP )
 269             *exflags |= WS_EX_CONTEXTHELP;
 270 #endif // !__WXWINCE__
 271
 272         if ( style & wxSTAY_ON_TOP )
 273             *exflags |= WS_EX_TOPMOST;
 274     }
 275
 276     return msflags;
 277 }
 278
 279 WXHWND wxTopLevelWindowMSW::MSWGetParent() const
 280 {
 281     // for the frames without wxFRAME_FLOAT_ON_PARENT style we should use NULL
 282     // parent HWND or it would be always on top of its parent which is not what
 283     // we usually want (in fact, we only want it for frames with the
 284     // wxFRAME_FLOAT_ON_PARENT flag)
 285     HWND hwndParent = NULL;
 286     if ( HasFlag(wxFRAME_FLOAT_ON_PARENT) )
 287     {
 288         const wxWindow *parent = GetParent();
 289
 290         if ( !parent )
 291         {
 292             // this flag doesn't make sense then and will be ignored
 293             wxFAIL_MSG( wxT("wxFRAME_FLOAT_ON_PARENT but no parent?") );
 294         }
 295         else
 296         {
 297             hwndParent = GetHwndOf(parent);
 298         }
 299     }
 300     //else: don't float on parent, must not be owned
 301
 302     // now deal with the 2nd taskbar-related problem (see comments above in
 303     // MSWGetStyle())
 304     if ( HasFlag(wxFRAME_NO_TASKBAR) && !hwndParent )
 305     {
 306         // use hidden parent
 307         hwndParent = wxTLWHiddenParentModule::GetHWND();
 308     }
 309
 310     return (WXHWND)hwndParent;
 311 }
 312
 313 #if defined(__SMARTPHONE__) || defined(__POCKETPC__)
 314 bool wxTopLevelWindowMSW::HandleSettingChange(WXWPARAM wParam, WXLPARAM lParam)
 315 {
 316     SHACTIVATEINFO *info = (SHACTIVATEINFO*) m_activateInfo;
 317     if ( info )
 318     {
 319         SHHandleWMSettingChange(GetHwnd(), wParam, lParam, info);
 320     }
 321
 322     return wxWindowMSW::HandleSettingChange(wParam, lParam);
 323 }
 324 #endif
 325
 326 WXLRESULT wxTopLevelWindowMSW::MSWWindowProc(WXUINT message, WXWPARAM wParam, WXLPARAM lParam)
 327 {
 328     WXLRESULT rc = 0;
 329     bool processed = false;
 330
 331     switch ( message )
 332     {
 333 #if defined(__SMARTPHONE__) || defined(__POCKETPC__)
 334         case WM_ACTIVATE:
 335         {
 336             SHACTIVATEINFO* info = (SHACTIVATEINFO*) m_activateInfo;
 337             if (info)
 338             {
 339                 DWORD flags = 0;
 340                 if (GetExtraStyle() & wxTOPLEVEL_EX_DIALOG) flags = SHA_INPUTDIALOG;
 341                 SHHandleWMActivate(GetHwnd(), wParam, lParam, info, flags);
 342             }
 343
 344             // This implicitly sends a wxEVT_ACTIVATE_APP event
 345             if (wxTheApp)
 346                 wxTheApp->SetActive(wParam != 0, FindFocus());
 347
 348             break;
 349         }
 350         case WM_HIBERNATE:
 351         {
 352             if (wxTheApp)
 353             {
 354                 wxActivateEvent event(wxEVT_HIBERNATE, true, wxID_ANY);
 355                 event.SetEventObject(wxTheApp);
 356                 processed = wxTheApp->ProcessEvent(event);
 357             }
 358             break;
 359         }
 360 #endif // __SMARTPHONE__ || __POCKETPC__
 361
 362         case WM_SYSCOMMAND:
 363             // We may need to generate events for the items added to the system
 364             // menu if it had been created (and presumably modified).
 365             if ( m_menuSystem )
 366             {
 367                 // From MSDN:
 368                 //
 369                 //      ... the four low-order bits of the wParam parameter are
 370                 //      used internally by the system. To obtain the correct
 371                 //      result when testing the value of wParam, an application
 372                 //      must combine the value 0xFFF0 with the wParam value by
 373                 //      using the bitwise AND operator.
 374                 unsigned id = wParam & 0xfff0;
 375
 376                 // SC_SIZE is the first of the system-defined commands and we
 377                 // leave those to DefWindowProc().
 378                 if ( id < SC_SIZE )
 379                 {
 380                     if ( m_menuSystem->MSWCommand(0 /* unused anyhow */, id) )
 381                         processed = true;
 382                 }
 383             }
 384             break;
 385     }
 386
 387     if ( !processed )
 388         rc = wxTopLevelWindowBase::MSWWindowProc(message, wParam, lParam);
 389
 390     return rc;
 391 }
 392
 393 bool wxTopLevelWindowMSW::CreateDialog(const void *dlgTemplate,
 394                                        const wxString& title,
 395                                        const wxPoint& pos,
 396                                        const wxSize& size)
 397 {
 398 #ifdef __WXMICROWIN__
 399     // no dialogs support under MicroWin yet
 400     return CreateFrame(title, pos, size);
 401 #else // !__WXMICROWIN__
 402     // static cast is valid as we're only ever called for dialogs
 403     wxWindow * const
 404         parent = static_cast<wxDialog *>(this)->GetParentForModalDialog();
 405
 406     m_hWnd = (WXHWND)::CreateDialogIndirect
 407                        (
 408                         wxGetInstance(),
 409                         (DLGTEMPLATE*)dlgTemplate,
 410                         parent ? GetHwndOf(parent) : NULL,
 411                         (DLGPROC)wxDlgProc
 412                        );
 413
 414     if ( !m_hWnd )
 415     {
 416         wxFAIL_MSG(wxT("Failed to create dialog. Incorrect DLGTEMPLATE?"));
 417
 418         wxLogSysError(wxT("Can't create dialog using memory template"));
 419
 420         return false;
 421     }
 422
 423 #if !defined(__WXWINCE__)
 424     // For some reason, the system menu is activated when we use the
 425     // WS_EX_CONTEXTHELP style, so let's set a reasonable icon
 426     if ( HasExtraStyle(wxWS_EX_CONTEXTHELP) )
 427     {
 428         wxFrame *winTop = wxDynamicCast(wxTheApp->GetTopWindow(), wxFrame);
 429         if ( winTop )
 430         {
 431             wxIcon icon = winTop->GetIcon();
 432             if ( icon.IsOk() )
 433             {
 434                 ::SendMessage(GetHwnd(), WM_SETICON,
 435                               (WPARAM)TRUE,
 436                               (LPARAM)GetHiconOf(icon));
 437             }
 438         }
 439     }
 440 #endif // !__WXWINCE__
 441
 442 #if !defined(__WXWINCE__) || defined(__WINCE_STANDARDSDK__)
 443     // move the dialog to its initial position without forcing repainting
 444     int x, y, w, h;
 445     (void)MSWGetCreateWindowCoords(pos, size, x, y, w, h);
 446
 447     if ( x == (int)CW_USEDEFAULT )
 448     {
 449         // Let the system position the window, just set its size.
 450         ::SetWindowPos(GetHwnd(), 0,
 451                        0, 0, w, h,
 452                        SWP_NOMOVE | SWP_NOZORDER);
 453     }
 454     else // Move the window to the desired location and set its size too.
 455     {
 456         if ( !::MoveWindow(GetHwnd(), x, y, w, h, FALSE) )
 457         {
 458             wxLogLastError(wxT("MoveWindow"));
 459         }
 460     }
 461 #endif // !__WXWINCE__
 462
 463     if ( !title.empty() )
 464     {
 465         ::SetWindowText(GetHwnd(), title.wx_str());
 466     }
 467
 468     SubclassWin(m_hWnd);
 469
 470 #ifdef __SMARTPHONE__
 471     // Work around title non-display glitch
 472     Show(false);
 473 #endif
 474
 475     return true;
 476 #endif // __WXMICROWIN__/!__WXMICROWIN__
 477 }
 478
 479 bool wxTopLevelWindowMSW::CreateFrame(const wxString& title,
 480                                       const wxPoint& pos,
 481                                       const wxSize& size)
 482 {
 483     WXDWORD exflags;
 484     WXDWORD flags = MSWGetCreateWindowFlags(&exflags);
 485
 486     const wxSize sz = IsAlwaysMaximized() ? wxDefaultSize : size;
 487
 488 #ifndef __WXWINCE__
 489     if ( wxTheApp->GetLayoutDirection() == wxLayout_RightToLeft )
 490         exflags |= WS_EX_LAYOUTRTL;
 491 #endif
 492
 493     return MSWCreate(MSWGetRegisteredClassName(),
 494                      title.wx_str(), pos, sz, flags, exflags);
 495 }
 496
 497 bool wxTopLevelWindowMSW::Create(wxWindow *parent,
 498                                  wxWindowID id,
 499                                  const wxString& title,
 500                                  const wxPoint& pos,
 501                                  const wxSize& size,
 502                                  long style,
 503                                  const wxString& name)
 504 {
 505     wxSize sizeReal = size;
 506     if ( !sizeReal.IsFullySpecified() )
 507     {
 508         sizeReal.SetDefaults(GetDefaultSize());
 509     }
 510
 511     // notice that we should append this window to wxTopLevelWindows list
 512     // before calling CreateBase() as it behaves differently for TLW and
 513     // non-TLW windows
 514     wxTopLevelWindows.Append(this);
 515
 516     bool ret = CreateBase(parent, id, pos, sizeReal, style, name);
 517     if ( !ret )
 518         return false;
 519
 520     if ( parent )
 521         parent->AddChild(this);
 522
 523     if ( GetExtraStyle() & wxTOPLEVEL_EX_DIALOG )
 524     {
 525         // we have different dialog templates to allows creation of dialogs
 526         // with & without captions under MSWindows, resizable or not (but a
 527         // resizable dialog always has caption - otherwise it would look too
 528         // strange)
 529
 530         // we need 3 additional WORDs for dialog menu, class and title (as we
 531         // don't use DS_SETFONT we don't need the fourth WORD for the font)
 532         static const int dlgsize = sizeof(DLGTEMPLATE) + (sizeof(WORD) * 3);
 533         DLGTEMPLATE *dlgTemplate = (DLGTEMPLATE *)malloc(dlgsize);
 534         memset(dlgTemplate, 0, dlgsize);
 535
 536         // these values are arbitrary, they won't be used normally anyhow
 537         dlgTemplate->x  = 34;
 538         dlgTemplate->y  = 22;
 539         dlgTemplate->cx = 144;
 540         dlgTemplate->cy = 75;
 541
 542         // reuse the code in MSWGetStyle() but correct the results slightly for
 543         // the dialog
 544         //
 545         // NB: we need a temporary variable as we can't pass pointer to
 546         //     dwExtendedStyle directly, it's not aligned correctly for 64 bit
 547         //     architectures
 548         WXDWORD dwExtendedStyle;
 549         dlgTemplate->style = MSWGetStyle(style, &dwExtendedStyle);
 550         dlgTemplate->dwExtendedStyle = dwExtendedStyle;
 551
 552         // all dialogs are popups
 553         dlgTemplate->style |= WS_POPUP;
 554
 555 #ifndef __WXWINCE__
 556         if ( wxTheApp->GetLayoutDirection() == wxLayout_RightToLeft )
 557         {
 558             dlgTemplate->dwExtendedStyle |= WS_EX_LAYOUTRTL;
 559         }
 560
 561         // force 3D-look if necessary, it looks impossibly ugly otherwise
 562         if ( style & (wxRESIZE_BORDER | wxCAPTION) )
 563             dlgTemplate->style |= DS_MODALFRAME;
 564 #endif
 565
 566         ret = CreateDialog(dlgTemplate, title, pos, sizeReal);
 567         free(dlgTemplate);
 568     }
 569     else // !dialog
 570     {
 571         ret = CreateFrame(title, pos, sizeReal);
 572     }
 573
 574 #ifndef __WXWINCE__
 575     if ( ret && !(GetWindowStyleFlag() & wxCLOSE_BOX) )
 576     {
 577         EnableCloseButton(false);
 578     }
 579 #endif
 580
 581     // for standard dialogs the dialog manager generates WM_CHANGEUISTATE
 582     // itself but for custom windows we have to do it ourselves in order to
 583     // make the keyboard indicators (such as underlines for accelerators and
 584     // focus rectangles) work under Win2k+
 585     if ( ret )
 586     {
 587         MSWUpdateUIState(UIS_INITIALIZE);
 588     }
 589
 590     // Note: if we include PocketPC in this test, dialogs can fail to show up,
 591     // for example the text entry dialog in the dialogs sample. Problem with Maximise()?
 592 #if defined(__WXWINCE__) && (defined(__SMARTPHONE__) || defined(__WINCE_STANDARDSDK__))
 593     if ( ( style & wxMAXIMIZE ) || IsAlwaysMaximized() )
 594     {
 595         this->Maximize();
 596     }
 597 #endif
 598
 599 #if defined(__SMARTPHONE__) && defined(__WXWINCE__)
 600     SetRightMenu(); // to nothing for initialization
 601 #endif
 602
 603     return ret;
 604 }
 605
 606 wxTopLevelWindowMSW::~wxTopLevelWindowMSW()
 607 {
 608     delete m_menuSystem;
 609
 610     SendDestroyEvent();
 611
 612 #if defined(__SMARTPHONE__) || defined(__POCKETPC__)
 613     SHACTIVATEINFO* info = (SHACTIVATEINFO*) m_activateInfo;
 614     delete info;
 615     m_activateInfo = NULL;
 616 #endif
 617
 618     // after destroying an owned window, Windows activates the next top level
 619     // window in Z order but it may be different from our owner (to reproduce
 620     // this simply Alt-TAB to another application and back before closing the
 621     // owned frame) whereas we always want to yield activation to our parent
 622     if ( HasFlag(wxFRAME_FLOAT_ON_PARENT) )
 623     {
 624         wxWindow *parent = GetParent();
 625         if ( parent )
 626         {
 627             ::BringWindowToTop(GetHwndOf(parent));
 628         }
 629     }
 630 }
 631
 632 // ----------------------------------------------------------------------------
 633 // wxTopLevelWindowMSW showing
 634 // ----------------------------------------------------------------------------
 635
 636 void wxTopLevelWindowMSW::DoShowWindow(int nShowCmd)
 637 {
 638     ::ShowWindow(GetHwnd(), nShowCmd);
 639
 640     // Hiding the window doesn't change its iconized state.
 641     if ( nShowCmd != SW_HIDE )
 642     {
 643         // Otherwise restoring, maximizing or showing the window normally also
 644         // makes it not iconized and only minimizing it does make it iconized.
 645         m_iconized = nShowCmd == SW_MINIMIZE;
 646     }
 647 }
 648
 649 void wxTopLevelWindowMSW::ShowWithoutActivating()
 650 {
 651     if ( !wxWindowBase::Show(true) )
 652         return;
 653
 654     DoShowWindow(SW_SHOWNA);
 655 }
 656
 657 bool wxTopLevelWindowMSW::Show(bool show)
 658 {
 659     // don't use wxWindow version as we want to call DoShowWindow() ourselves
 660     if ( !wxWindowBase::Show(show) )
 661         return false;
 662
 663     int nShowCmd;
 664     if ( show )
 665     {
 666         if ( m_maximizeOnShow )
 667         {
 668             // show and maximize
 669             nShowCmd = SW_MAXIMIZE;
 670
 671             // This is necessary, or no window appears
 672 #if defined( __WINCE_STANDARDSDK__) || defined(__SMARTPHONE__)
 673             DoShowWindow(SW_SHOW);
 674 #endif
 675
 676             m_maximizeOnShow = false;
 677         }
 678         else if ( m_iconized )
 679         {
 680             // iconize and show
 681             nShowCmd = SW_MINIMIZE;
 682         }
 683         else // just show
 684         {
 685             // we shouldn't use SW_SHOW which also activates the window for
 686             // tool frames (as they shouldn't steal focus from the main window)
 687             // nor for the currently disabled windows as they would be enabled
 688             // as a side effect
 689             if ( HasFlag(wxFRAME_TOOL_WINDOW) || !IsEnabled() )
 690                 nShowCmd = SW_SHOWNA;
 691             else
 692                 nShowCmd = SW_SHOW;
 693         }
 694     }
 695     else // hide
 696     {
 697         nShowCmd = SW_HIDE;
 698     }
 699
 700 #if wxUSE_DEFERRED_SIZING
 701     // we only set pending size if we're maximized before being shown, now that
 702     // we're shown we don't need it any more (it is reset in size event handler
 703     // for child windows but we have to do it ourselves for this parent window)
 704     //
 705     // make sure to reset it before actually showing the window as this will
 706     // generate WM_SIZE events and we want to use the correct client size from
 707     // them, not the size returned by WM_NCCALCSIZE in DoGetClientSize() which
 708     // turns out to be wrong for maximized windows (see #11762)
 709     m_pendingSize = wxDefaultSize;
 710 #endif // wxUSE_DEFERRED_SIZING
 711
 712     DoShowWindow(nShowCmd);
 713
 714 #if defined(__WXWINCE__) && (_WIN32_WCE >= 400 && !defined(__POCKETPC__) && !defined(__SMARTPHONE__))
 715     // Addornments have to be added when the frame is the correct size
 716     wxFrame* frame = wxDynamicCast(this, wxFrame);
 717     if (frame && frame->GetMenuBar())
 718         frame->GetMenuBar()->AddAdornments(GetWindowStyleFlag());
 719 #endif
 720
 721     return true;
 722 }
 723
 724 // ----------------------------------------------------------------------------
 725 // wxTopLevelWindowMSW maximize/minimize
 726 // ----------------------------------------------------------------------------
 727
 728 void wxTopLevelWindowMSW::Maximize(bool maximize)
 729 {
 730     if ( IsShown() )
 731     {
 732         // just maximize it directly
 733         DoShowWindow(maximize ? SW_MAXIMIZE : SW_RESTORE);
 734     }
 735     else // hidden
 736     {
 737         // we can't maximize the hidden frame because it shows it as well,
 738         // so just remember that we should do it later in this case
 739         m_maximizeOnShow = maximize;
 740
 741 #if wxUSE_DEFERRED_SIZING
 742         // after calling Maximize() the client code expects to get the frame
 743         // "real" size and doesn't want to know that, because of implementation
 744         // details, the frame isn't really maximized yet but will be only once
 745         // it's shown, so return our size as it will be then in this case
 746         if ( maximize )
 747         {
 748             // we must only change pending size here, and not call SetSize()
 749             // because otherwise Windows would think that this (full screen)
 750             // size is the natural size for the frame and so would use it when
 751             // the user clicks on "restore" title bar button instead of the
 752             // correct initial frame size
 753             //
 754             // NB: unfortunately we don't know which display we're on yet so we
 755             //     have to use the default one
 756             m_pendingSize = wxGetClientDisplayRect().GetSize();
 757         }
 758         //else: can't do anything in this case, we don't have the old size
 759 #endif // wxUSE_DEFERRED_SIZING
 760     }
 761 }
 762
 763 bool wxTopLevelWindowMSW::IsMaximized() const
 764 {
 765     return IsAlwaysMaximized() ||
 766 #if !defined(__SMARTPHONE__) && !defined(__POCKETPC__) && !defined(__WINCE_STANDARDSDK__)
 767
 768            (::IsZoomed(GetHwnd()) != 0) ||
 769 #endif
 770            m_maximizeOnShow;
 771 }
 772
 773 void wxTopLevelWindowMSW::Iconize(bool iconize)
 774 {
 775     if ( iconize == m_iconized )
 776     {
 777         // Do nothing, in particular don't restore non-iconized windows when
 778         // Iconize(false) is called as this would wrongly un-maximize them.
 779         return;
 780     }
 781
 782     if ( IsShown() )
 783     {
 784         // change the window state immediately
 785         DoShowWindow(iconize ? SW_MINIMIZE : SW_RESTORE);
 786     }
 787     else // hidden
 788     {
 789         // iconizing the window shouldn't show it so just remember that we need
 790         // to become iconized when shown later
 791         m_iconized = true;
 792     }
 793 }
 794
 795 bool wxTopLevelWindowMSW::IsIconized() const
 796 {
 797 #ifdef __WXWINCE__
 798     return false;
 799 #else
 800     if ( !IsShown() )
 801         return m_iconized;
 802
 803     // don't use m_iconized, it may be briefly out of sync with the real state
 804     // as it's only modified when we receive a WM_SIZE and we could be called
 805     // from an event handler from one of the messages we receive before it,
 806     // such as WM_MOVE
 807     return ::IsIconic(GetHwnd()) != 0;
 808 #endif
 809 }
 810
 811 void wxTopLevelWindowMSW::Restore()
 812 {
 813     DoShowWindow(SW_RESTORE);
 814 }
 815
 816 void wxTopLevelWindowMSW::SetLayoutDirection(wxLayoutDirection dir)
 817 {
 818     if ( dir == wxLayout_Default )
 819         dir = wxTheApp->GetLayoutDirection();
 820
 821     if ( dir != wxLayout_Default )
 822         wxTopLevelWindowBase::SetLayoutDirection(dir);
 823 }
 824
 825 // ----------------------------------------------------------------------------
 826 // wxTopLevelWindowMSW geometry
 827 // ----------------------------------------------------------------------------
 828
 829 #ifndef __WXWINCE__
 830
 831 void wxTopLevelWindowMSW::DoGetPosition(int *x, int *y) const
 832 {
 833     if ( IsIconized() )
 834     {
 835         WINDOWPLACEMENT wp;
 836         wp.length = sizeof(WINDOWPLACEMENT);
 837         if ( ::GetWindowPlacement(GetHwnd(), &wp) )
 838         {
 839             RECT& rc = wp.rcNormalPosition;
 840
 841             // the position returned by GetWindowPlacement() is in workspace
 842             // coordinates except for windows with WS_EX_TOOLWINDOW style
 843             if ( !HasFlag(wxFRAME_TOOL_WINDOW) )
 844             {
 845                 // we must use the correct display for the translation as the
 846                 // task bar might be shown on one display but not the other one
 847                 int n = wxDisplay::GetFromWindow(this);
 848                 wxDisplay dpy(n == wxNOT_FOUND ? 0 : n);
 849                 const wxPoint ptOfs = dpy.GetClientArea().GetPosition() -
 850                                       dpy.GetGeometry().GetPosition();
 851
 852                 rc.left += ptOfs.x;
 853                 rc.top += ptOfs.y;
 854             }
 855
 856             if ( x )
 857                 *x = rc.left;
 858             if ( y )
 859                 *y = rc.top;
 860
 861             return;
 862         }
 863
 864         wxLogLastError(wxT("GetWindowPlacement"));
 865     }
 866     //else: normal case
 867
 868     wxTopLevelWindowBase::DoGetPosition(x, y);
 869 }
 870
 871 void wxTopLevelWindowMSW::DoGetSize(int *width, int *height) const
 872 {
 873     if ( IsIconized() )
 874     {
 875         WINDOWPLACEMENT wp;
 876         wp.length = sizeof(WINDOWPLACEMENT);
 877         if ( ::GetWindowPlacement(GetHwnd(), &wp) )
 878         {
 879             const RECT& rc = wp.rcNormalPosition;
 880
 881             if ( width )
 882                 *width = rc.right - rc.left;
 883             if ( height )
 884                 *height = rc.bottom - rc.top;
 885
 886             return;
 887         }
 888
 889         wxLogLastError(wxT("GetWindowPlacement"));
 890     }
 891     //else: normal case
 892
 893     wxTopLevelWindowBase::DoGetSize(width, height);
 894 }
 895
 896 #endif // __WXWINCE__
 897
 898 void
 899 wxTopLevelWindowMSW::MSWGetCreateWindowCoords(const wxPoint& pos,
 900                                               const wxSize& size,
 901                                               int& x, int& y,
 902                                               int& w, int& h) const
 903 {
 904     // let the system position the window if no explicit position was specified
 905     if ( pos.x == wxDefaultCoord )
 906     {
 907         // if x is set to CW_USEDEFAULT, y parameter is ignored anyhow so we
 908         // can just as well set it to CW_USEDEFAULT as well
 909         x =
 910         y = CW_USEDEFAULT;
 911     }
 912     else
 913     {
 914         // OTOH, if x is not set to CW_USEDEFAULT, y shouldn't be set to it
 915         // neither because it is not handled as a special value by Windows then
 916         // and so we have to choose some default value for it, even if a
 917         // completely arbitrary one
 918         static const int DEFAULT_Y = 200;
 919
 920         x = pos.x;
 921         y = pos.y == wxDefaultCoord ? DEFAULT_Y : pos.y;
 922     }
 923
 924     if ( size.x == wxDefaultCoord || size.y == wxDefaultCoord )
 925     {
 926         // We don't use CW_USEDEFAULT here for several reasons:
 927         //
 928         //  1. It results in huge frames on modern screens (1000*800 is not
 929         //     uncommon on my 1280*1024 screen) which is way too big for a half
 930         //     empty frame of most of wxWidgets samples for example)
 931         //
 932         //  2. It is buggy for frames with wxFRAME_TOOL_WINDOW style for which
 933         //     the default is for whatever reason 8*8 which breaks client <->
 934         //     window size calculations (it would be nice if it didn't, but it
 935         //     does and the simplest way to fix it seemed to change the broken
 936         //     default size anyhow)
 937         //
 938         //  3. There is just no advantage in doing it: with x and y it is
 939         //     possible that [future versions of] Windows position the new top
 940         //     level window in some smart way which we can't do, but we can
 941         //     guess a reasonably good size for a new window just as well
 942         //     ourselves
 943         //
 944         // The only exception is for the Windows CE platform where the system
 945         // does know better than we how should the windows be sized
 946 #ifdef _WIN32_WCE
 947         w =
 948         h = CW_USEDEFAULT;
 949 #else // !_WIN32_WCE
 950         wxSize sizeReal = size;
 951         sizeReal.SetDefaults(GetDefaultSize());
 952
 953         w = sizeReal.x;
 954         h = sizeReal.y;
 955 #endif // _WIN32_WCE/!_WIN32_WCE
 956     }
 957     else
 958     {
 959         w = size.x;
 960         h = size.y;
 961     }
 962 }
 963
 964 // ----------------------------------------------------------------------------
 965 // wxTopLevelWindowMSW fullscreen
 966 // ----------------------------------------------------------------------------
 967
 968 bool wxTopLevelWindowMSW::ShowFullScreen(bool show, long style)
 969 {
 970     if ( show == IsFullScreen() )
 971     {
 972         // nothing to do
 973         return true;
 974     }
 975
 976     m_fsIsShowing = show;
 977
 978     if ( show )
 979     {
 980         m_fsStyle = style;
 981
 982         // zap the frame borders
 983
 984         // save the 'normal' window style
 985         m_fsOldWindowStyle = GetWindowLong(GetHwnd(), GWL_STYLE);
 986
 987         // save the old position, width & height, maximize state
 988         m_fsOldSize = GetRect();
 989         m_fsIsMaximized = IsMaximized();
 990
 991         // decide which window style flags to turn off
 992         LONG newStyle = m_fsOldWindowStyle;
 993         LONG offFlags = 0;
 994
 995         if (style & wxFULLSCREEN_NOBORDER)
 996         {
 997             offFlags |= WS_BORDER;
 998 #ifndef __WXWINCE__
 999             offFlags |= WS_THICKFRAME;
1000 #endif
1001         }
1002         if (style & wxFULLSCREEN_NOCAPTION)
1003             offFlags |= WS_CAPTION | WS_SYSMENU;
1004
1005         newStyle &= ~offFlags;
1006
1007         // change our window style to be compatible with full-screen mode
1008         ::SetWindowLong(GetHwnd(), GWL_STYLE, newStyle);
1009
1010         wxRect rect;
1011 #if wxUSE_DISPLAY
1012         // resize to the size of the display containing us
1013         int dpy = wxDisplay::GetFromWindow(this);
1014         if ( dpy != wxNOT_FOUND )
1015         {
1016             rect = wxDisplay(dpy).GetGeometry();
1017         }
1018         else // fall back to the main desktop
1019 #endif // wxUSE_DISPLAY
1020         {
1021             // resize to the size of the desktop
1022             wxCopyRECTToRect(wxGetWindowRect(::GetDesktopWindow()), rect);
1023 #ifdef __WXWINCE__
1024             // FIXME: size of the bottom menu (toolbar)
1025             // should be taken in account
1026             rect.height += rect.y;
1027             rect.y       = 0;
1028 #endif
1029         }
1030
1031         SetSize(rect);
1032
1033         // now flush the window style cache and actually go full-screen
1034         long flags = SWP_FRAMECHANGED;
1035
1036         // showing the frame full screen should also show it if it's still
1037         // hidden
1038         if ( !IsShown() )
1039         {
1040             // don't call wxWindow version to avoid flicker from calling
1041             // ::ShowWindow() -- we're going to show the window at the correct
1042             // location directly below -- but do call the wxWindowBase version
1043             // to sync the internal m_isShown flag
1044             wxWindowBase::Show();
1045
1046             flags |= SWP_SHOWWINDOW;
1047         }
1048
1049         SetWindowPos(GetHwnd(), HWND_TOP,
1050                      rect.x, rect.y, rect.width, rect.height,
1051                      flags);
1052
1053 #if !defined(__HANDHELDPC__) && (defined(__WXWINCE__) && (_WIN32_WCE < 400))
1054         ::SHFullScreen(GetHwnd(), SHFS_HIDETASKBAR | SHFS_HIDESIPBUTTON);
1055 #endif
1056
1057         // finally send an event allowing the window to relayout itself &c
1058         wxSizeEvent event(rect.GetSize(), GetId());
1059         event.SetEventObject(this);
1060         HandleWindowEvent(event);
1061     }
1062     else // stop showing full screen
1063     {
1064 #if !defined(__HANDHELDPC__) && (defined(__WXWINCE__) && (_WIN32_WCE < 400))
1065         ::SHFullScreen(GetHwnd(), SHFS_SHOWTASKBAR | SHFS_SHOWSIPBUTTON);
1066 #endif
1067         Maximize(m_fsIsMaximized);
1068         SetWindowLong(GetHwnd(),GWL_STYLE, m_fsOldWindowStyle);
1069         SetWindowPos(GetHwnd(),HWND_TOP,m_fsOldSize.x, m_fsOldSize.y,
1070             m_fsOldSize.width, m_fsOldSize.height, SWP_FRAMECHANGED);
1071     }
1072
1073     return true;
1074 }
1075
1076 // ----------------------------------------------------------------------------
1077 // wxTopLevelWindowMSW misc
1078 // ----------------------------------------------------------------------------
1079
1080 void wxTopLevelWindowMSW::SetTitle( const wxString& title)
1081 {
1082     SetLabel(title);
1083 }
1084
1085 wxString wxTopLevelWindowMSW::GetTitle() const
1086 {
1087     return GetLabel();
1088 }
1089
1090 bool wxTopLevelWindowMSW::DoSelectAndSetIcon(const wxIconBundle& icons,
1091                                              int smX,
1092                                              int smY,
1093                                              int i)
1094 {
1095     const wxSize size(::GetSystemMetrics(smX), ::GetSystemMetrics(smY));
1096
1097     // Try the exact size first.
1098     wxIcon icon = icons.GetIconOfExactSize(size);
1099
1100     if ( !icon.IsOk() )
1101     {
1102         // If we didn't find any, set at least some icon: it will look scaled
1103         // and ugly but in practice it's impossible to prevent this because not
1104         // everyone can provide the icons in all sizes used by all versions of
1105         // Windows in all DPIs (this would include creating them in at least
1106         // 14, 16, 22, 32, 48, 64 and 128 pixel sizes).
1107         icon = icons.GetIcon(size);
1108     }
1109
1110     if ( !icon.IsOk() )
1111         return false;
1112
1113     ::SendMessage(GetHwnd(), WM_SETICON, i, (LPARAM)GetHiconOf(icon));
1114     return true;
1115 }
1116
1117 void wxTopLevelWindowMSW::SetIcons(const wxIconBundle& icons)
1118 {
1119     wxTopLevelWindowBase::SetIcons(icons);
1120
1121     if ( icons.IsEmpty() )
1122     {
1123         // FIXME: SetIcons(wxNullIconBundle) should unset existing icons,
1124         //        but we currently don't do that
1125         wxASSERT_MSG( m_icons.IsEmpty(), "unsetting icons doesn't work" );
1126         return;
1127     }
1128
1129     DoSelectAndSetIcon(icons, SM_CXSMICON, SM_CYSMICON, ICON_SMALL);
1130     DoSelectAndSetIcon(icons, SM_CXICON, SM_CYICON, ICON_BIG);
1131 }
1132
1133 bool wxTopLevelWindowMSW::EnableCloseButton(bool enable)
1134 {
1135 #if !defined(__WXMICROWIN__)
1136     // get system (a.k.a. window) menu
1137     HMENU hmenu = GetSystemMenu(GetHwnd(), FALSE /* get it */);
1138     if ( !hmenu )
1139     {
1140         // no system menu at all -- ok if we want to remove the close button
1141         // anyhow, but bad if we want to show it
1142         return !enable;
1143     }
1144
1145     // enabling/disabling the close item from it also automatically
1146     // disables/enables the close title bar button
1147     if ( ::EnableMenuItem(hmenu, SC_CLOSE,
1148                           MF_BYCOMMAND |
1149                           (enable ? MF_ENABLED : MF_GRAYED)) == -1 )
1150     {
1151         wxLogLastError(wxT("EnableMenuItem(SC_CLOSE)"));
1152
1153         return false;
1154     }
1155 #ifndef __WXWINCE__
1156     // update appearance immediately
1157     if ( !::DrawMenuBar(GetHwnd()) )
1158     {
1159         wxLogLastError(wxT("DrawMenuBar"));
1160     }
1161 #endif
1162 #endif // !__WXMICROWIN__
1163
1164     return true;
1165 }
1166
1167 #ifndef __WXWINCE__
1168
1169 bool wxTopLevelWindowMSW::SetShape(const wxRegion& region)
1170 {
1171     wxCHECK_MSG( HasFlag(wxFRAME_SHAPED), false,
1172                  wxT("Shaped windows must be created with the wxFRAME_SHAPED style."));
1173
1174     // The empty region signifies that the shape should be removed from the
1175     // window.
1176     if ( region.IsEmpty() )
1177     {
1178         if (::SetWindowRgn(GetHwnd(), NULL, TRUE) == 0)
1179         {
1180             wxLogLastError(wxT("SetWindowRgn"));
1181             return false;
1182         }
1183         return true;
1184     }
1185
1186     // Windows takes ownership of the region, so
1187     // we'll have to make a copy of the region to give to it.
1188     DWORD noBytes = ::GetRegionData(GetHrgnOf(region), 0, NULL);
1189     RGNDATA *rgnData = (RGNDATA*) new char[noBytes];
1190     ::GetRegionData(GetHrgnOf(region), noBytes, rgnData);
1191     HRGN hrgn = ::ExtCreateRegion(NULL, noBytes, rgnData);
1192     delete[] (char*) rgnData;
1193
1194     // SetWindowRgn expects the region to be in coordinants
1195     // relative to the window, not the client area.  Figure
1196     // out the offset, if any.
1197     RECT rect;
1198     DWORD dwStyle =   ::GetWindowLong(GetHwnd(), GWL_STYLE);
1199     DWORD dwExStyle = ::GetWindowLong(GetHwnd(), GWL_EXSTYLE);
1200     ::GetClientRect(GetHwnd(), &rect);
1201     ::AdjustWindowRectEx(&rect, dwStyle, ::GetMenu(GetHwnd()) != NULL, dwExStyle);
1202     ::OffsetRgn(hrgn, -rect.left, -rect.top);
1203
1204     // Now call the shape API with the new region.
1205     if (::SetWindowRgn(GetHwnd(), hrgn, TRUE) == 0)
1206     {
1207         wxLogLastError(wxT("SetWindowRgn"));
1208         return false;
1209     }
1210     return true;
1211 }
1212
1213 #endif // !__WXWINCE__
1214
1215 void wxTopLevelWindowMSW::RequestUserAttention(int flags)
1216 {
1217     // check if we can use FlashWindowEx(): unfortunately a simple test for
1218     // FLASHW_STOP doesn't work because MSVC6 headers do #define it but don't
1219     // provide FlashWindowEx() declaration, so try to detect whether we have
1220     // real headers for WINVER 0x0500 by checking for existence of a symbol not
1221     // declated in MSVC6 header
1222 #if defined(FLASHW_STOP) && defined(VK_XBUTTON1) && wxUSE_DYNLIB_CLASS
1223     // available in the headers, check if it is supported by the system
1224     typedef BOOL (WINAPI *FlashWindowEx_t)(FLASHWINFO *pfwi);
1225     static FlashWindowEx_t s_pfnFlashWindowEx = NULL;
1226     if ( !s_pfnFlashWindowEx )
1227     {
1228         wxDynamicLibrary dllUser32(wxT("user32.dll"));
1229         s_pfnFlashWindowEx = (FlashWindowEx_t)
1230                                 dllUser32.GetSymbol(wxT("FlashWindowEx"));
1231
1232         // we can safely unload user32.dll here, it's going to remain loaded as
1233         // long as the program is running anyhow
1234     }
1235
1236     if ( s_pfnFlashWindowEx )
1237     {
1238         WinStruct<FLASHWINFO> fwi;
1239         fwi.hwnd = GetHwnd();
1240         fwi.dwFlags = FLASHW_ALL;
1241         if ( flags & wxUSER_ATTENTION_INFO )
1242         {
1243             // just flash a few times
1244             fwi.uCount = 3;
1245         }
1246         else // wxUSER_ATTENTION_ERROR
1247         {
1248             // flash until the user notices it
1249             fwi.dwFlags |= FLASHW_TIMERNOFG;
1250         }
1251
1252         s_pfnFlashWindowEx(&fwi);
1253     }
1254     else // FlashWindowEx() not available
1255 #endif // FlashWindowEx() defined
1256     {
1257         wxUnusedVar(flags);
1258 #ifndef __WXWINCE__
1259         ::FlashWindow(GetHwnd(), TRUE);
1260 #endif // __WXWINCE__
1261     }
1262 }
1263
1264 wxMenu *wxTopLevelWindowMSW::MSWGetSystemMenu() const
1265 {
1266     if ( !m_menuSystem )
1267     {
1268         HMENU hmenu = ::GetSystemMenu(GetHwnd(), FALSE);
1269         if ( !hmenu )
1270         {
1271             wxLogLastError(wxT("GetSystemMenu()"));
1272             return NULL;
1273         }
1274
1275         wxTopLevelWindowMSW * const
1276             self = const_cast<wxTopLevelWindowMSW *>(this);
1277
1278         self->m_menuSystem = wxMenu::MSWNewFromHMENU(hmenu);
1279
1280         // We need to somehow associate this menu with this window to ensure
1281         // that we get events from it. A natural idea would be to pretend that
1282         // it's attached to our menu bar but this wouldn't work if we don't
1283         // have any menu bar which is a common case for applications using
1284         // custom items in the system menu (they mostly do it exactly because
1285         // they don't have any other menus).
1286         //
1287         // So reuse the invoking window pointer instead, this is not exactly
1288         // correct but doesn't seem to have any serious drawbacks.
1289         m_menuSystem->SetInvokingWindow(self);
1290     }
1291
1292     return m_menuSystem;
1293 }
1294
1295 // ----------------------------------------------------------------------------
1296 // Transparency support
1297 // ---------------------------------------------------------------------------
1298
1299 bool wxTopLevelWindowMSW::SetTransparent(wxByte alpha)
1300 {
1301 #if wxUSE_DYNLIB_CLASS
1302     typedef DWORD (WINAPI *PSETLAYEREDWINDOWATTR)(HWND, DWORD, BYTE, DWORD);
1303     static PSETLAYEREDWINDOWATTR
1304         pSetLayeredWindowAttributes = (PSETLAYEREDWINDOWATTR)-1;
1305
1306     if ( pSetLayeredWindowAttributes == (PSETLAYEREDWINDOWATTR)-1 )
1307     {
1308         wxDynamicLibrary dllUser32(wxT("user32.dll"));
1309
1310         // use RawGetSymbol() and not GetSymbol() to avoid error messages under
1311         // Windows 95: there is nothing the user can do about this anyhow
1312         pSetLayeredWindowAttributes = (PSETLAYEREDWINDOWATTR)
1313             dllUser32.RawGetSymbol(wxT("SetLayeredWindowAttributes"));
1314
1315         // it's ok to destroy dllUser32 here, we link statically to user32.dll
1316         // anyhow so it won't be unloaded
1317     }
1318
1319     if ( !pSetLayeredWindowAttributes )
1320         return false;
1321 #endif // wxUSE_DYNLIB_CLASS
1322
1323     LONG exstyle = GetWindowLong(GetHwnd(), GWL_EXSTYLE);
1324
1325     // if setting alpha to fully opaque then turn off the layered style
1326     if (alpha == 255)
1327     {
1328         SetWindowLong(GetHwnd(), GWL_EXSTYLE, exstyle & ~WS_EX_LAYERED);
1329         Refresh();
1330         return true;
1331     }
1332
1333 #if wxUSE_DYNLIB_CLASS
1334     // Otherwise, set the layered style if needed and set the alpha value
1335     if ((exstyle & WS_EX_LAYERED) == 0 )
1336         SetWindowLong(GetHwnd(), GWL_EXSTYLE, exstyle | WS_EX_LAYERED);
1337
1338     if ( pSetLayeredWindowAttributes(GetHwnd(), 0, (BYTE)alpha, LWA_ALPHA) )
1339         return true;
1340 #endif // wxUSE_DYNLIB_CLASS
1341
1342     return false;
1343 }
1344
1345 bool wxTopLevelWindowMSW::CanSetTransparent()
1346 {
1347     // The API is available on win2k and above
1348
1349     static int os_type = -1;
1350     static int ver_major = -1;
1351
1352     if (os_type == -1)
1353         os_type = ::wxGetOsVersion(&ver_major);
1354
1355     return (os_type == wxOS_WINDOWS_NT && ver_major >= 5);
1356 }
1357
1358 void wxTopLevelWindowMSW::DoEnable(bool enable)
1359 {
1360     wxTopLevelWindowBase::DoEnable(enable);
1361
1362     // Enabling or disabling a window may change its appearance. Unfortunately,
1363     // in at least some situation, toplevel windows don't repaint themselves,
1364     // so we have to issue explicit refresh to avoid rendering artifacts.
1365     //
1366     // TODO: find out just what exactly is wrong here
1367     Refresh();
1368 }
1369
1370 void wxTopLevelWindowMSW::DoFreeze()
1371 {
1372     // do nothing: freezing toplevel window causes paint and mouse events
1373     // to go through it any TLWs under it, so the best we can do is to freeze
1374     // all children -- and wxWindowBase::Freeze() does that
1375 }
1376
1377 void wxTopLevelWindowMSW::DoThaw()
1378 {
1379     // intentionally empty -- see DoFreeze()
1380 }
1381
1382
1383 // ----------------------------------------------------------------------------
1384 // wxTopLevelWindow event handling
1385 // ----------------------------------------------------------------------------
1386
1387 // Default activation behaviour - set the focus for the first child
1388 // subwindow found.
1389 void wxTopLevelWindowMSW::OnActivate(wxActivateEvent& event)
1390 {
1391     if ( event.GetActive() )
1392     {
1393         // restore focus to the child which was last focused unless we already
1394         // have it
1395         wxLogTrace(wxT("focus"), wxT("wxTLW %p activated."), m_hWnd);
1396
1397         wxWindow *winFocus = FindFocus();
1398         if ( !winFocus || wxGetTopLevelParent(winFocus) != this )
1399         {
1400             wxWindow *parent = m_winLastFocused ? m_winLastFocused->GetParent()
1401                                                 : NULL;
1402             if ( !parent )
1403             {
1404                 parent = this;
1405             }
1406
1407             wxSetFocusToChild(parent, &m_winLastFocused);
1408         }
1409     }
1410     else // deactivating
1411     {
1412         // remember the last focused child if it is our child
1413         m_winLastFocused = FindFocus();
1414
1415         if ( m_winLastFocused )
1416         {
1417             // let it know that it doesn't have focus any more
1418             // But this will already be done via WM_KILLFOCUS, so we'll get two kill
1419             // focus events if we call it explicitly.
1420             // m_winLastFocused->HandleKillFocus((WXHWND)NULL);
1421
1422             // and don't remember it if it's a child from some other frame
1423             if ( wxGetTopLevelParent(m_winLastFocused) != this )
1424             {
1425                 m_winLastFocused = NULL;
1426             }
1427         }
1428
1429         wxLogTrace(wxT("focus"),
1430                    wxT("wxTLW %p deactivated, last focused: %p."),
1431                    m_hWnd,
1432                    m_winLastFocused ? GetHwndOf(m_winLastFocused) : NULL);
1433
1434         event.Skip();
1435     }
1436 }
1437
1438 // the DialogProc for all wxWidgets dialogs
1439 LONG APIENTRY _EXPORT
1440 wxDlgProc(HWND hDlg,
1441           UINT message,
1442           WPARAM WXUNUSED(wParam),
1443           LPARAM WXUNUSED(lParam))
1444 {
1445     switch ( message )
1446     {
1447         case WM_INITDIALOG:
1448         {
1449             // under CE, add a "Ok" button in the dialog title bar and make it full
1450             // screen
1451             //
1452             // TODO: find the window for this HWND, and take into account
1453             // wxMAXIMIZE and wxCLOSE_BOX. For now, assume both are present.
1454             //
1455             // Standard SDK doesn't have aygshell.dll: see
1456             // include/wx/msw/wince/libraries.h
1457 #if defined(__WXWINCE__) && !defined(__WINCE_STANDARDSDK__) && !defined(__HANDHELDPC__)
1458             SHINITDLGINFO shidi;
1459             shidi.dwMask = SHIDIM_FLAGS;
1460             shidi.dwFlags = SHIDIF_SIZEDLG // take account of the SIP or menubar
1461 #ifndef __SMARTPHONE__
1462                             | SHIDIF_DONEBUTTON
1463 #endif
1464                         ;
1465             shidi.hDlg = hDlg;
1466             SHInitDialog( &shidi );
1467 #else // no SHInitDialog()
1468             wxUnusedVar(hDlg);
1469 #endif
1470             // for WM_INITDIALOG, returning TRUE tells system to set focus to
1471             // the first control in the dialog box, but as we set the focus
1472             // ourselves, we return FALSE for it as well
1473             return FALSE;
1474         }
1475     }
1476
1477     // for almost all messages, returning FALSE means that we didn't process
1478     // the message
1479     return FALSE;
1480 }
1481
1482 // ============================================================================
1483 // wxTLWHiddenParentModule implementation
1484 // ============================================================================
1485
1486 HWND wxTLWHiddenParentModule::ms_hwnd = NULL;
1487
1488 const wxChar *wxTLWHiddenParentModule::ms_className = NULL;
1489
1490 bool wxTLWHiddenParentModule::OnInit()
1491 {
1492     ms_hwnd = NULL;
1493     ms_className = NULL;
1494
1495     return true;
1496 }
1497
1498 void wxTLWHiddenParentModule::OnExit()
1499 {
1500     if ( ms_hwnd )
1501     {
1502         if ( !::DestroyWindow(ms_hwnd) )
1503         {
1504             wxLogLastError(wxT("DestroyWindow(hidden TLW parent)"));
1505         }
1506
1507         ms_hwnd = NULL;
1508     }
1509
1510     if ( ms_className )
1511     {
1512         if ( !::UnregisterClass(ms_className, wxGetInstance()) )
1513         {
1514             wxLogLastError(wxT("UnregisterClass(\"wxTLWHiddenParent\")"));
1515         }
1516
1517         ms_className = NULL;
1518     }
1519 }
1520
1521 /* static */
1522 HWND wxTLWHiddenParentModule::GetHWND()
1523 {
1524     if ( !ms_hwnd )
1525     {
1526         if ( !ms_className )
1527         {
1528             static const wxChar *HIDDEN_PARENT_CLASS = wxT("wxTLWHiddenParent");
1529
1530             WNDCLASS wndclass;
1531             wxZeroMemory(wndclass);
1532
1533             wndclass.lpfnWndProc   = DefWindowProc;
1534             wndclass.hInstance     = wxGetInstance();
1535             wndclass.lpszClassName = HIDDEN_PARENT_CLASS;
1536
1537             if ( !::RegisterClass(&wndclass) )
1538             {
1539                 wxLogLastError(wxT("RegisterClass(\"wxTLWHiddenParent\")"));
1540             }
1541             else
1542             {
1543                 ms_className = HIDDEN_PARENT_CLASS;
1544             }
1545         }
1546
1547         ms_hwnd = ::CreateWindow(ms_className, wxEmptyString, 0, 0, 0, 0, 0, NULL,
1548                                  (HMENU)NULL, wxGetInstance(), NULL);
1549         if ( !ms_hwnd )
1550         {
1551             wxLogLastError(wxT("CreateWindow(hidden TLW parent)"));
1552         }
1553     }
1554
1555     return ms_hwnd;
1556 }