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 // License:     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 #ifndef WX_PRECOMP
  28     #include "wx/app.h"
  29     #include "wx/toplevel.h"
  30     #include "wx/dialog.h"
  31     #include "wx/string.h"
  32     #include "wx/log.h"
  33     #include "wx/intl.h"
  34     #include "wx/frame.h"
  35     #include "wx/containr.h"        // wxSetFocusToChild()
  36 #endif //WX_PRECOMP
  37
  38 #include "wx/module.h"
  39 #include "wx/dynlib.h"
  40
  41 #include "wx/msw/private.h"
  42 #if defined(__WXWINCE__) && !defined(__HANDHELDPC__)
  43   #include <ole2.h>
  44   #include <shellapi.h>
  45   // Standard SDK doesn't have aygshell.dll: see include/wx/msw/wince/libraries.h
  46   #if _WIN32_WCE < 400 || !defined(__WINCE_STANDARDSDK__)
  47     #include <aygshell.h>
  48   #endif
  49 #include "wx/msw/wince/missing.h"
  50 #endif
  51
  52 #include "wx/msw/missing.h"
  53 #include "wx/msw/winundef.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 // globals
  83 // ----------------------------------------------------------------------------
  84
  85 // the name of the default wxWidgets class
  86 #ifdef __WXWINCE__
  87 extern       wxChar *wxCanvasClassName;
  88 #else
  89 extern const wxChar *wxCanvasClassName;
  90 #endif
  91
  92 // ----------------------------------------------------------------------------
  93 // wxTLWHiddenParentModule: used to manage the hidden parent window (we need a
  94 // module to ensure that the window is always deleted)
  95 // ----------------------------------------------------------------------------
  96
  97 class wxTLWHiddenParentModule : public wxModule
  98 {
  99 public:
 100     // module init/finalize
 101     virtual bool OnInit();
 102     virtual void OnExit();
 103
 104     // get the hidden window (creates on demand)
 105     static HWND GetHWND();
 106
 107 private:
 108     // the HWND of the hidden parent
 109     static HWND ms_hwnd;
 110
 111     // the class used to create it
 112     static const wxChar *ms_className;
 113
 114     DECLARE_DYNAMIC_CLASS(wxTLWHiddenParentModule)
 115 };
 116
 117 IMPLEMENT_DYNAMIC_CLASS(wxTLWHiddenParentModule, wxModule)
 118
 119 // ============================================================================
 120 // wxTopLevelWindowMSW implementation
 121 // ============================================================================
 122
 123 BEGIN_EVENT_TABLE(wxTopLevelWindowMSW, wxTopLevelWindowBase)
 124     EVT_ACTIVATE(wxTopLevelWindowMSW::OnActivate)
 125 END_EVENT_TABLE()
 126
 127 // ----------------------------------------------------------------------------
 128 // wxTopLevelWindowMSW creation
 129 // ----------------------------------------------------------------------------
 130
 131 void wxTopLevelWindowMSW::Init()
 132 {
 133     m_iconized =
 134     m_maximizeOnShow = false;
 135
 136     // Data to save/restore when calling ShowFullScreen
 137     m_fsStyle = 0;
 138     m_fsOldWindowStyle = 0;
 139     m_fsIsMaximized = false;
 140     m_fsIsShowing = false;
 141
 142     m_winLastFocused = (wxWindow *)NULL;
 143
 144 #if defined(__SMARTPHONE__) && defined(__WXWINCE__)
 145     m_MenuBarHWND = 0;
 146 #endif
 147
 148 #if defined(__SMARTPHONE__) || defined(__POCKETPC__)
 149     SHACTIVATEINFO* info = new SHACTIVATEINFO;
 150     wxZeroMemory(*info);
 151     info->cbSize = sizeof(SHACTIVATEINFO);
 152
 153     m_activateInfo = (void*) info;
 154 #endif
 155 }
 156
 157 WXDWORD wxTopLevelWindowMSW::MSWGetStyle(long style, WXDWORD *exflags) const
 158 {
 159     // let the base class deal with the common styles but fix the ones which
 160     // don't make sense for us (we also deal with the borders ourselves)
 161     WXDWORD msflags = wxWindow::MSWGetStyle
 162                       (
 163                         (style & ~wxBORDER_MASK) | wxBORDER_NONE, exflags
 164                       ) & ~WS_CHILD & ~WS_VISIBLE;
 165
 166     // For some reason, WS_VISIBLE needs to be defined on creation for
 167     // SmartPhone 2003. The title can fail to be displayed otherwise.
 168 #if defined(__SMARTPHONE__) || (defined(__WXWINCE__) && _WIN32_WCE < 400)
 169     msflags |= WS_VISIBLE;
 170     ((wxTopLevelWindowMSW*)this)->wxWindowBase::Show(true);
 171 #endif
 172
 173     // first select the kind of window being created
 174     //
 175     // note that if we don't set WS_POPUP, Windows assumes WS_OVERLAPPED and
 176     // creates a window with both caption and border, hence we need to use
 177     // WS_POPUP in a few cases just to avoid having caption/border which we
 178     // don't want
 179
 180 #if !(defined(__SMARTPHONE__) && defined(__WXWINCE__))
 181     // border and caption styles
 182     if ( style & wxRESIZE_BORDER )
 183         msflags |= WS_THICKFRAME;
 184     else if ( exflags && ((style & wxBORDER_DOUBLE) || (style & wxBORDER_RAISED)) )
 185         *exflags |= WS_EX_DLGMODALFRAME;
 186     else if ( !(style & wxBORDER_NONE) )
 187         msflags |= WS_BORDER;
 188 #ifndef __POCKETPC__
 189     else
 190         msflags |= WS_POPUP;
 191 #endif
 192 #endif
 193
 194     // normally we consider that all windows without a caption must be popups,
 195     // but CE is an exception: there windows normally do not have the caption
 196     // but shouldn't be made popups as popups can't have menus and don't look
 197     // like normal windows anyhow
 198
 199     // TODO: Smartphone appears to like wxCAPTION, but we should check that
 200     // we need it.
 201 #if defined(__SMARTPHONE__) || !defined(__WXWINCE__)
 202     if ( style & wxCAPTION )
 203         msflags |= WS_CAPTION;
 204 #ifndef __WXWINCE__
 205     else
 206         msflags |= WS_POPUP;
 207 #endif // !__WXWINCE__
 208 #endif
 209
 210     // next translate the individual flags
 211     if ( style & wxMINIMIZE_BOX )
 212         msflags |= WS_MINIMIZEBOX;
 213     if ( style & wxMAXIMIZE_BOX )
 214         msflags |= WS_MAXIMIZEBOX;
 215
 216 #ifndef __WXWINCE__
 217     if ( style & wxSYSTEM_MENU )
 218         msflags |= WS_SYSMENU;
 219 #endif
 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 !defined(__POCKETPC__)
 227     if ( style & wxMAXIMIZE )
 228         msflags |= WS_MAXIMIZE;
 229 #endif
 230
 231     // Keep this here because it saves recoding this function in wxTinyFrame
 232     if ( style & (wxTINY_CAPTION_VERT | wxTINY_CAPTION_HORIZ) )
 233         msflags |= WS_CAPTION;
 234
 235     if ( exflags )
 236     {
 237         // there is no taskbar under CE, so omit all this
 238 #if !defined(__WXWINCE__)
 239         if ( !(GetExtraStyle() & wxTOPLEVEL_EX_DIALOG) )
 240         {
 241             if ( style & wxFRAME_TOOL_WINDOW )
 242             {
 243                 // create the palette-like window
 244                 *exflags |= WS_EX_TOOLWINDOW;
 245
 246                 // tool windows shouldn't appear on the taskbar (as documented)
 247                 style |= wxFRAME_NO_TASKBAR;
 248             }
 249
 250             // We have to solve 2 different problems here:
 251             //
 252             // 1. frames with wxFRAME_NO_TASKBAR flag shouldn't appear in the
 253             //    taskbar even if they don't have a parent
 254             //
 255             // 2. frames without this style should appear in the taskbar even
 256             //    if they're owned (Windows only puts non owned windows into
 257             //    the taskbar normally)
 258             //
 259             // The second one is solved here by using WS_EX_APPWINDOW flag, the
 260             // first one is dealt with in our MSWGetParent() method
 261             // implementation
 262             if ( !(style & wxFRAME_NO_TASKBAR) && GetParent() )
 263             {
 264                 // need to force the frame to appear in the taskbar
 265                 *exflags |= WS_EX_APPWINDOW;
 266             }
 267             //else: nothing to do [here]
 268         }
 269
 270         if ( GetExtraStyle() & wxFRAME_EX_CONTEXTHELP )
 271             *exflags |= WS_EX_CONTEXTHELP;
 272 #endif // !__WXWINCE__
 273
 274         if ( style & wxSTAY_ON_TOP )
 275             *exflags |= WS_EX_TOPMOST;
 276     }
 277
 278     return msflags;
 279 }
 280
 281 WXHWND wxTopLevelWindowMSW::MSWGetParent() const
 282 {
 283     // for the frames without wxFRAME_FLOAT_ON_PARENT style we should use NULL
 284     // parent HWND or it would be always on top of its parent which is not what
 285     // we usually want (in fact, we only want it for frames with the
 286     // wxFRAME_FLOAT_ON_PARENT flag)
 287     HWND hwndParent = NULL;
 288     if ( HasFlag(wxFRAME_FLOAT_ON_PARENT) )
 289     {
 290         const wxWindow *parent = GetParent();
 291
 292         if ( !parent )
 293         {
 294             // this flag doesn't make sense then and will be ignored
 295             wxFAIL_MSG( _T("wxFRAME_FLOAT_ON_PARENT but no parent?") );
 296         }
 297         else
 298         {
 299             hwndParent = GetHwndOf(parent);
 300         }
 301     }
 302     //else: don't float on parent, must not be owned
 303
 304     // now deal with the 2nd taskbar-related problem (see comments above in
 305     // MSWGetStyle())
 306     if ( HasFlag(wxFRAME_NO_TASKBAR) && !hwndParent )
 307     {
 308         // use hidden parent
 309         hwndParent = wxTLWHiddenParentModule::GetHWND();
 310     }
 311
 312     return (WXHWND)hwndParent;
 313 }
 314
 315 bool wxTopLevelWindowMSW::HandleSettingChange(WXWPARAM wParam, WXLPARAM lParam)
 316 {
 317     SHACTIVATEINFO* info = (SHACTIVATEINFO*) m_activateInfo;
 318     if (!info) return false;
 319     return SHHandleWMSettingChange(GetHwnd(), wParam, lParam, info) == TRUE;
 320 }
 321
 322 WXLRESULT wxTopLevelWindowMSW::MSWWindowProc(WXUINT message, WXWPARAM wParam, WXLPARAM lParam)
 323 {
 324     WXLRESULT rc = 0;
 325     bool processed = false;
 326
 327     switch ( message )
 328     {
 329 #if defined(__SMARTPHONE__) || defined(__POCKETPC__)
 330         case WM_ACTIVATE:
 331         {
 332             SHACTIVATEINFO* info = (SHACTIVATEINFO*) m_activateInfo;
 333             if (info)
 334             {
 335                 DWORD flags = 0;
 336                 if (GetExtraStyle() & wxTOPLEVEL_EX_DIALOG) flags = SHA_INPUTDIALOG;
 337                 SHHandleWMActivate(GetHwnd(), wParam, lParam, info, flags);
 338             }
 339
 340             // This implicitly sends a wxEVT_ACTIVATE_APP event
 341             if (wxTheApp)
 342                 wxTheApp->SetActive(wParam != 0, FindFocus());
 343
 344             break;
 345         }
 346         case WM_SETTINGCHANGE:
 347         {
 348             processed = HandleSettingChange(wParam,lParam);
 349             break;
 350         }
 351         case WM_HIBERNATE:
 352         {
 353             if (wxTheApp)
 354             {
 355                 wxActivateEvent event(wxEVT_HIBERNATE, true, wxID_ANY);
 356                 event.SetEventObject(wxTheApp);
 357                 processed = wxTheApp->ProcessEvent(event);
 358             }
 359             break;
 360         }
 361 #endif
 362     }
 363
 364     if ( !processed )
 365         rc = wxTopLevelWindowBase::MSWWindowProc(message, wParam, lParam);
 366
 367     return rc;
 368 }
 369
 370 bool wxTopLevelWindowMSW::CreateDialog(const void *dlgTemplate,
 371                                        const wxString& title,
 372                                        const wxPoint& pos,
 373                                        const wxSize& size)
 374 {
 375 #ifdef __WXMICROWIN__
 376     // no dialogs support under MicroWin yet
 377     return CreateFrame(title, pos, size);
 378 #else // !__WXMICROWIN__
 379     wxWindow *parent = GetParent();
 380
 381     // for the dialogs without wxDIALOG_NO_PARENT style, use the top level
 382     // app window as parent - this avoids creating modal dialogs without
 383     // parent
 384     if ( !parent && !(GetWindowStyleFlag() & wxDIALOG_NO_PARENT) )
 385     {
 386         parent = wxTheApp->GetTopWindow();
 387
 388         if ( parent )
 389         {
 390             // don't use transient windows as parents, this is dangerous as it
 391             // can lead to a crash if the parent is destroyed before the child
 392             //
 393             // also don't use the window which is currently hidden as then the
 394             // dialog would be hidden as well
 395             if ( (parent->GetExtraStyle() & wxWS_EX_TRANSIENT) ||
 396                     !parent->IsShown() )
 397             {
 398                 parent = NULL;
 399             }
 400         }
 401     }
 402
 403     m_hWnd = (WXHWND)::CreateDialogIndirect
 404                        (
 405                         wxGetInstance(),
 406                         (DLGTEMPLATE*)dlgTemplate,
 407                         parent ? GetHwndOf(parent) : NULL,
 408                         (DLGPROC)wxDlgProc
 409                        );
 410
 411     if ( !m_hWnd )
 412     {
 413         wxFAIL_MSG(wxT("Failed to create dialog. Incorrect DLGTEMPLATE?"));
 414
 415         wxLogSysError(wxT("Can't create dialog using memory template"));
 416
 417         return false;
 418     }
 419
 420     WXDWORD exflags;
 421     (void)MSWGetCreateWindowFlags(&exflags);
 422
 423     if ( exflags )
 424     {
 425         ::SetWindowLong(GetHwnd(), GWL_EXSTYLE, exflags);
 426         ::SetWindowPos(GetHwnd(),
 427                        exflags & WS_EX_TOPMOST ? HWND_TOPMOST : 0,
 428                        0, 0, 0, 0,
 429                        SWP_NOSIZE |
 430                        SWP_NOMOVE |
 431                        (exflags & WS_EX_TOPMOST ? 0 : SWP_NOZORDER) |
 432                        SWP_NOACTIVATE);
 433     }
 434
 435 #if !defined(__WXWINCE__)
 436     // For some reason, the system menu is activated when we use the
 437     // WS_EX_CONTEXTHELP style, so let's set a reasonable icon
 438     if ( exflags & WS_EX_CONTEXTHELP )
 439     {
 440         wxFrame *winTop = wxDynamicCast(wxTheApp->GetTopWindow(), wxFrame);
 441         if ( winTop )
 442         {
 443             wxIcon icon = winTop->GetIcon();
 444             if ( icon.Ok() )
 445             {
 446                 ::SendMessage(GetHwnd(), WM_SETICON,
 447                               (WPARAM)TRUE,
 448                               (LPARAM)GetHiconOf(icon));
 449             }
 450         }
 451     }
 452 #endif
 453
 454     // move the dialog to its initial position without forcing repainting
 455     int x, y, w, h;
 456     (void)MSWGetCreateWindowCoords(pos, size, x, y, w, h);
 457
 458     if ( x == (int)CW_USEDEFAULT )
 459     {
 460         // centre it on the screen - what else can we do?
 461         wxSize sizeDpy = wxGetDisplaySize();
 462
 463         x = (sizeDpy.x - w) / 2;
 464         y = (sizeDpy.y - h) / 2;
 465     }
 466
 467 #if !defined(__WXWINCE__) || defined(__WINCE_STANDARDSDK__)
 468     if ( !::MoveWindow(GetHwnd(), x, y, w, h, FALSE) )
 469     {
 470         wxLogLastError(wxT("MoveWindow"));
 471     }
 472 #endif
 473
 474     if ( !title.empty() )
 475     {
 476         ::SetWindowText(GetHwnd(), title);
 477     }
 478
 479     SubclassWin(m_hWnd);
 480
 481 #ifdef __SMARTPHONE__
 482     // Work around title non-display glitch
 483     Show(false);
 484 #endif
 485
 486     return true;
 487 #endif // __WXMICROWIN__/!__WXMICROWIN__
 488 }
 489
 490 bool wxTopLevelWindowMSW::CreateFrame(const wxString& title,
 491                                       const wxPoint& pos,
 492                                       const wxSize& size)
 493 {
 494     WXDWORD exflags;
 495     WXDWORD flags = MSWGetCreateWindowFlags(&exflags);
 496
 497 #if !defined(__HANDHELDPC__) && ((defined(_WIN32_WCE) && _WIN32_WCE < 400) || \
 498     defined(__POCKETPC__) || \
 499     defined(__SMARTPHONE__))
 500     // Always expand to fit the screen in PocketPC or SmartPhone
 501     wxSize sz(wxDefaultSize);
 502     wxUnusedVar(size);
 503 #else // other (including normal desktop) Windows
 504     wxSize sz(size);
 505 #endif
 506
 507     bool result = MSWCreate(wxCanvasClassName, title, pos, sz, flags, exflags);
 508
 509     return result;
 510 }
 511
 512 bool wxTopLevelWindowMSW::Create(wxWindow *parent,
 513                                  wxWindowID id,
 514                                  const wxString& title,
 515                                  const wxPoint& pos,
 516                                  const wxSize& size,
 517                                  long style,
 518                                  const wxString& name)
 519 {
 520     bool ret wxDUMMY_INITIALIZE(false);
 521
 522     // init our fields
 523     Init();
 524
 525     wxSize sizeReal = size;
 526     if ( !sizeReal.IsFullySpecified() )
 527     {
 528         sizeReal.SetDefaults(GetDefaultSize());
 529     }
 530
 531     m_windowStyle = style;
 532
 533     SetName(name);
 534
 535     m_windowId = id == wxID_ANY ? NewControlId() : id;
 536
 537     wxTopLevelWindows.Append(this);
 538
 539     if ( parent )
 540         parent->AddChild(this);
 541
 542     if ( GetExtraStyle() & wxTOPLEVEL_EX_DIALOG )
 543     {
 544         // we have different dialog templates to allows creation of dialogs
 545         // with & without captions under MSWindows, resizeable or not (but a
 546         // resizeable dialog always has caption - otherwise it would look too
 547         // strange)
 548
 549         // we need 3 additional WORDs for dialog menu, class and title (as we
 550         // don't use DS_SETFONT we don't need the fourth WORD for the font)
 551         static const int dlgsize = sizeof(DLGTEMPLATE) + (sizeof(WORD) * 3);
 552         DLGTEMPLATE *dlgTemplate = (DLGTEMPLATE *)malloc(dlgsize);
 553         memset(dlgTemplate, 0, dlgsize);
 554
 555         // these values are arbitrary, they won't be used normally anyhow
 556         dlgTemplate->x  = 34;
 557         dlgTemplate->y  = 22;
 558         dlgTemplate->cx = 144;
 559         dlgTemplate->cy = 75;
 560
 561         // reuse the code in MSWGetStyle() but correct the results slightly for
 562         // the dialog
 563         dlgTemplate->style = MSWGetStyle(style, NULL);
 564
 565         // all dialogs are popups
 566         dlgTemplate->style |= WS_POPUP;
 567
 568 #ifndef __WXWINCE__
 569         // force 3D-look if necessary, it looks impossibly ugly otherwise
 570         if ( style & (wxRESIZE_BORDER | wxCAPTION) )
 571             dlgTemplate->style |= DS_MODALFRAME;
 572 #endif
 573
 574         ret = CreateDialog(dlgTemplate, title, pos, sizeReal);
 575         free(dlgTemplate);
 576     }
 577     else // !dialog
 578     {
 579         ret = CreateFrame(title, pos, sizeReal);
 580     }
 581
 582 #ifndef __WXWINCE__
 583     if ( ret && !(GetWindowStyleFlag() & wxCLOSE_BOX) )
 584     {
 585         EnableCloseButton(false);
 586     }
 587 #endif
 588
 589     // for standard dialogs the dialog manager generates WM_CHANGEUISTATE
 590     // itself but for custom windows we have to do it ourselves in order to
 591     // make the keyboard indicators (such as underlines for accelerators and
 592     // focus rectangles) work under Win2k+
 593     if ( ret )
 594     {
 595         MSWUpdateUIState(UIS_INITIALIZE);
 596     }
 597
 598     // Note: if we include PocketPC in this test, dialogs can fail to show up,
 599     // for example the text entry dialog in the dialogs sample. Problem with Maximise()?
 600 #if defined(__WXWINCE__) && (defined(__SMARTPHONE__) || defined(__WINCE_STANDARDSDK__))
 601     if ( style & wxMAXIMIZE )
 602     {
 603         this->Maximize();
 604     }
 605 #endif
 606
 607 #if defined(__SMARTPHONE__) && defined(__WXWINCE__)
 608     SetRightMenu(); // to nothing for initialization
 609 #endif
 610
 611     return ret;
 612 }
 613
 614 wxTopLevelWindowMSW::~wxTopLevelWindowMSW()
 615 {
 616 #if defined(__SMARTPHONE__) || defined(__POCKETPC__)
 617     SHACTIVATEINFO* info = (SHACTIVATEINFO*) m_activateInfo;
 618     delete info;
 619     m_activateInfo = NULL;
 620 #endif
 621
 622     // after destroying an owned window, Windows activates the next top level
 623     // window in Z order but it may be different from our owner (to reproduce
 624     // this simply Alt-TAB to another application and back before closing the
 625     // owned frame) whereas we always want to yield activation to our parent
 626     if ( HasFlag(wxFRAME_FLOAT_ON_PARENT) )
 627     {
 628         wxWindow *parent = GetParent();
 629         if ( parent )
 630         {
 631             ::BringWindowToTop(GetHwndOf(parent));
 632         }
 633     }
 634 }
 635
 636 // ----------------------------------------------------------------------------
 637 // wxTopLevelWindowMSW showing
 638 // ----------------------------------------------------------------------------
 639
 640 void wxTopLevelWindowMSW::DoShowWindow(int nShowCmd)
 641 {
 642     ::ShowWindow(GetHwnd(), nShowCmd);
 643
 644     m_iconized = nShowCmd == SW_MINIMIZE;
 645 }
 646
 647 bool wxTopLevelWindowMSW::Show(bool show)
 648 {
 649     // don't use wxWindow version as we want to call DoShowWindow() ourselves
 650     if ( !wxWindowBase::Show(show) )
 651         return false;
 652
 653     int nShowCmd;
 654     if ( show )
 655     {
 656         if ( m_maximizeOnShow )
 657         {
 658             // show and maximize
 659             nShowCmd = SW_MAXIMIZE;
 660
 661             // This is necessary, or no window appears
 662 #if defined( __WINCE_STANDARDSDK__) || defined(__SMARTPHONE__)
 663             DoShowWindow(SW_SHOW);
 664 #endif
 665
 666             m_maximizeOnShow = false;
 667         }
 668         else // just show
 669         {
 670            if ( GetWindowStyle() & wxFRAME_TOOL_WINDOW )
 671                nShowCmd = SW_SHOWNA;
 672            else
 673                nShowCmd = SW_SHOW;
 674         }
 675     }
 676     else // hide
 677     {
 678         nShowCmd = SW_HIDE;
 679     }
 680
 681     DoShowWindow(nShowCmd);
 682
 683 #if defined(__WXWINCE__) && (_WIN32_WCE >= 400 && !defined(__POCKETPC__) && !defined(__SMARTPHONE__))
 684     // Addornments have to be added when the frame is the correct size
 685     wxFrame* frame = wxDynamicCast(this, wxFrame);
 686     if (frame && frame->GetMenuBar())
 687         frame->GetMenuBar()->AddAdornments(GetWindowStyleFlag());
 688 #endif
 689
 690     return true;
 691 }
 692
 693 // ----------------------------------------------------------------------------
 694 // wxTopLevelWindowMSW maximize/minimize
 695 // ----------------------------------------------------------------------------
 696
 697 void wxTopLevelWindowMSW::Maximize(bool maximize)
 698 {
 699     if ( IsShown() )
 700     {
 701         // just maximize it directly
 702         DoShowWindow(maximize ? SW_MAXIMIZE : SW_RESTORE);
 703     }
 704     else // hidden
 705     {
 706         // we can't maximize the hidden frame because it shows it as well, so
 707         // just remember that we should do it later in this case
 708         m_maximizeOnShow = maximize;
 709
 710         // after calling Maximize() the client code expects to get the frame
 711         // "real" size and doesn't want to know that, because of implementation
 712         // details, the frame isn't really maximized yet but will be only once
 713         // it's shown, so return our size as it will be then in this case
 714
 715         // we don't know which display we're on yet so use the default one
 716         SetSize(wxGetClientDisplayRect().GetSize());
 717     }
 718 }
 719
 720 bool wxTopLevelWindowMSW::IsMaximized() const
 721 {
 722 #ifdef __WXWINCE__
 723     return false;
 724 #else
 725     return m_maximizeOnShow || ::IsZoomed(GetHwnd()) != 0;
 726 #endif
 727 }
 728
 729 void wxTopLevelWindowMSW::Iconize(bool iconize)
 730 {
 731     DoShowWindow(iconize ? SW_MINIMIZE : SW_RESTORE);
 732 }
 733
 734 bool wxTopLevelWindowMSW::IsIconized() const
 735 {
 736 #ifdef __WXWINCE__
 737     return false;
 738 #else
 739     // also update the current state
 740     ((wxTopLevelWindowMSW *)this)->m_iconized = ::IsIconic(GetHwnd()) != 0;
 741
 742     return m_iconized;
 743 #endif
 744 }
 745
 746 void wxTopLevelWindowMSW::Restore()
 747 {
 748     DoShowWindow(SW_RESTORE);
 749 }
 750
 751 // ----------------------------------------------------------------------------
 752 // wxTopLevelWindowMSW fullscreen
 753 // ----------------------------------------------------------------------------
 754
 755 bool wxTopLevelWindowMSW::ShowFullScreen(bool show, long style)
 756 {
 757     if ( show == IsFullScreen() )
 758     {
 759         // nothing to do
 760         return true;
 761     }
 762
 763     m_fsIsShowing = show;
 764
 765     if ( show )
 766     {
 767         m_fsStyle = style;
 768
 769         // zap the frame borders
 770
 771         // save the 'normal' window style
 772         m_fsOldWindowStyle = GetWindowLong(GetHwnd(), GWL_STYLE);
 773
 774         // save the old position, width & height, maximize state
 775         m_fsOldSize = GetRect();
 776         m_fsIsMaximized = IsMaximized();
 777
 778         // decide which window style flags to turn off
 779         LONG newStyle = m_fsOldWindowStyle;
 780         LONG offFlags = 0;
 781
 782         if (style & wxFULLSCREEN_NOBORDER)
 783         {
 784             offFlags |= WS_BORDER;
 785 #ifndef __WXWINCE__
 786             offFlags |= WS_THICKFRAME;
 787 #endif
 788         }
 789         if (style & wxFULLSCREEN_NOCAPTION)
 790             offFlags |= WS_CAPTION | WS_SYSMENU;
 791
 792         newStyle &= ~offFlags;
 793
 794         // change our window style to be compatible with full-screen mode
 795         ::SetWindowLong(GetHwnd(), GWL_STYLE, newStyle);
 796
 797         wxRect rect;
 798 #if wxUSE_DISPLAY
 799         // resize to the size of the display containing us
 800         int dpy = wxDisplay::GetFromWindow(this);
 801         if ( dpy != wxNOT_FOUND )
 802         {
 803             rect = wxDisplay(dpy).GetGeometry();
 804         }
 805         else // fall back to the main desktop
 806 #endif // wxUSE_DISPLAY
 807         {
 808             // resize to the size of the desktop
 809             wxCopyRECTToRect(wxGetWindowRect(::GetDesktopWindow()), rect);
 810 #ifdef __WXWINCE__
 811             // FIXME: size of the bottom menu (toolbar)
 812             // should be taken in account
 813             rect.height += rect.y;
 814             rect.y       = 0;
 815 #endif
 816         }
 817
 818         SetSize(rect);
 819
 820         // now flush the window style cache and actually go full-screen
 821         long flags = SWP_FRAMECHANGED;
 822
 823         // showing the frame full screen should also show it if it's still
 824         // hidden
 825         if ( !IsShown() )
 826         {
 827             // don't call wxWindow version to avoid flicker from calling
 828             // ::ShowWindow() -- we're going to show the window at the correct
 829             // location directly below -- but do call the wxWindowBase version
 830             // to sync the internal m_isShown flag
 831             wxWindowBase::Show();
 832
 833             flags |= SWP_SHOWWINDOW;
 834         }
 835
 836         SetWindowPos(GetHwnd(), HWND_TOP,
 837                      rect.x, rect.y, rect.width, rect.height,
 838                      flags);
 839
 840 #if !defined(__HANDHELDPC__) && (defined(__WXWINCE__) && (_WIN32_WCE < 400))
 841         ::SHFullScreen(GetHwnd(), SHFS_HIDETASKBAR | SHFS_HIDESIPBUTTON);
 842 #endif
 843
 844         // finally send an event allowing the window to relayout itself &c
 845         wxSizeEvent event(rect.GetSize(), GetId());
 846         GetEventHandler()->ProcessEvent(event);
 847     }
 848     else // stop showing full screen
 849     {
 850 #if !defined(__HANDHELDPC__) && (defined(__WXWINCE__) && (_WIN32_WCE < 400))
 851         ::SHFullScreen(GetHwnd(), SHFS_SHOWTASKBAR | SHFS_SHOWSIPBUTTON);
 852 #endif
 853         Maximize(m_fsIsMaximized);
 854         SetWindowLong(GetHwnd(),GWL_STYLE, m_fsOldWindowStyle);
 855         SetWindowPos(GetHwnd(),HWND_TOP,m_fsOldSize.x, m_fsOldSize.y,
 856             m_fsOldSize.width, m_fsOldSize.height, SWP_FRAMECHANGED);
 857     }
 858
 859     return true;
 860 }
 861
 862 // ----------------------------------------------------------------------------
 863 // wxTopLevelWindowMSW misc
 864 // ----------------------------------------------------------------------------
 865
 866 void wxTopLevelWindowMSW::SetTitle( const wxString& title)
 867 {
 868     SetLabel(title);
 869 }
 870
 871 wxString wxTopLevelWindowMSW::GetTitle() const
 872 {
 873     return GetLabel();
 874 }
 875
 876 void wxTopLevelWindowMSW::SetIcon(const wxIcon& icon)
 877 {
 878     SetIcons( wxIconBundle( icon ) );
 879 }
 880
 881 void wxTopLevelWindowMSW::SetIcons(const wxIconBundle& icons)
 882 {
 883     wxTopLevelWindowBase::SetIcons(icons);
 884
 885 #if defined(__WIN95__) && !defined(__WXMICROWIN__)
 886     const wxIcon& sml = icons.GetIcon( wxSize( 16, 16 ) );
 887     if( sml.Ok() && sml.GetWidth() == 16 && sml.GetHeight() == 16 )
 888     {
 889         ::SendMessage( GetHwndOf( this ), WM_SETICON, ICON_SMALL,
 890                        (LPARAM)GetHiconOf(sml) );
 891     }
 892
 893     const wxIcon& big = icons.GetIcon( wxSize( 32, 32 ) );
 894     if( big.Ok() && big.GetWidth() == 32 && big.GetHeight() == 32 )
 895     {
 896         ::SendMessage( GetHwndOf( this ), WM_SETICON, ICON_BIG,
 897                        (LPARAM)GetHiconOf(big) );
 898     }
 899 #endif // __WIN95__
 900 }
 901
 902 bool wxTopLevelWindowMSW::EnableCloseButton(bool enable)
 903 {
 904 #if !defined(__WXMICROWIN__)
 905     // get system (a.k.a. window) menu
 906     HMENU hmenu = GetSystemMenu(GetHwnd(), FALSE /* get it */);
 907     if ( !hmenu )
 908     {
 909         // no system menu at all -- ok if we want to remove the close button
 910         // anyhow, but bad if we want to show it
 911         return !enable;
 912     }
 913
 914     // enabling/disabling the close item from it also automatically
 915     // disables/enables the close title bar button
 916     if ( ::EnableMenuItem(hmenu, SC_CLOSE,
 917                           MF_BYCOMMAND |
 918                           (enable ? MF_ENABLED : MF_GRAYED)) == -1 )
 919     {
 920         wxLogLastError(_T("EnableMenuItem(SC_CLOSE)"));
 921
 922         return false;
 923     }
 924 #ifndef __WXWINCE__
 925     // update appearance immediately
 926     if ( !::DrawMenuBar(GetHwnd()) )
 927     {
 928         wxLogLastError(_T("DrawMenuBar"));
 929     }
 930 #endif
 931 #endif // !__WXMICROWIN__
 932
 933     return true;
 934 }
 935
 936 #ifndef __WXWINCE__
 937
 938 bool wxTopLevelWindowMSW::SetShape(const wxRegion& region)
 939 {
 940     wxCHECK_MSG( HasFlag(wxFRAME_SHAPED), false,
 941                  _T("Shaped windows must be created with the wxFRAME_SHAPED style."));
 942
 943     // The empty region signifies that the shape should be removed from the
 944     // window.
 945     if ( region.IsEmpty() )
 946     {
 947         if (::SetWindowRgn(GetHwnd(), NULL, TRUE) == 0)
 948         {
 949             wxLogLastError(_T("SetWindowRgn"));
 950             return false;
 951         }
 952         return true;
 953     }
 954
 955     // Windows takes ownership of the region, so
 956     // we'll have to make a copy of the region to give to it.
 957     DWORD noBytes = ::GetRegionData(GetHrgnOf(region), 0, NULL);
 958     RGNDATA *rgnData = (RGNDATA*) new char[noBytes];
 959     ::GetRegionData(GetHrgnOf(region), noBytes, rgnData);
 960     HRGN hrgn = ::ExtCreateRegion(NULL, noBytes, rgnData);
 961     delete[] (char*) rgnData;
 962
 963     // SetWindowRgn expects the region to be in coordinants
 964     // relative to the window, not the client area.  Figure
 965     // out the offset, if any.
 966     RECT rect;
 967     DWORD dwStyle =   ::GetWindowLong(GetHwnd(), GWL_STYLE);
 968     DWORD dwExStyle = ::GetWindowLong(GetHwnd(), GWL_EXSTYLE);
 969     ::GetClientRect(GetHwnd(), &rect);
 970     ::AdjustWindowRectEx(&rect, dwStyle, FALSE, dwExStyle);
 971     ::OffsetRgn(hrgn, -rect.left, -rect.top);
 972
 973     // Now call the shape API with the new region.
 974     if (::SetWindowRgn(GetHwnd(), hrgn, TRUE) == 0)
 975     {
 976         wxLogLastError(_T("SetWindowRgn"));
 977         return false;
 978     }
 979     return true;
 980 }
 981
 982 #endif // !__WXWINCE__
 983
 984 void wxTopLevelWindowMSW::RequestUserAttention(int flags)
 985 {
 986     // check if we can use FlashWindowEx(): unfortunately a simple test for
 987     // FLASHW_STOP doesn't work because MSVC6 headers do #define it but don't
 988     // provide FlashWindowEx() declaration, so try to detect whether we have
 989     // real headers for WINVER 0x0500 by checking for existence of a symbol not
 990     // declated in MSVC6 header
 991 #if defined(FLASHW_STOP) && defined(VK_XBUTTON1)
 992     // available in the headers, check if it is supported by the system
 993     typedef BOOL (WINAPI *FlashWindowEx_t)(FLASHWINFO *pfwi);
 994     FlashWindowEx_t s_pfnFlashWindowEx = NULL;
 995     if ( !s_pfnFlashWindowEx )
 996     {
 997         wxDynamicLibrary dllUser32(_T("user32.dll"));
 998         s_pfnFlashWindowEx = (FlashWindowEx_t)
 999                                 dllUser32.GetSymbol(_T("FlashWindowEx"));
1000
1001         // we can safely unload user32.dll here, it's going to remain loaded as
1002         // long as the program is running anyhow
1003     }
1004
1005     if ( s_pfnFlashWindowEx )
1006     {
1007         WinStruct<FLASHWINFO> fwi;
1008         fwi.hwnd = GetHwnd();
1009         fwi.dwFlags = FLASHW_ALL;
1010         if ( flags & wxUSER_ATTENTION_INFO )
1011         {
1012             // just flash a few times
1013             fwi.uCount = 3;
1014         }
1015         else // wxUSER_ATTENTION_ERROR
1016         {
1017             // flash until the user notices it
1018             fwi.dwFlags |= FLASHW_TIMERNOFG;
1019         }
1020
1021         s_pfnFlashWindowEx(&fwi);
1022     }
1023     else // FlashWindowEx() not available
1024 #endif // FlashWindowEx() defined
1025     {
1026         wxUnusedVar(flags);
1027 #ifndef __WXWINCE__
1028         ::FlashWindow(GetHwnd(), TRUE);
1029 #endif // __WXWINCE__
1030     }
1031 }
1032
1033 // ----------------------------------------------------------------------------
1034 // wxTopLevelWindow event handling
1035 // ----------------------------------------------------------------------------
1036
1037 // Default activation behaviour - set the focus for the first child
1038 // subwindow found.
1039 void wxTopLevelWindowMSW::OnActivate(wxActivateEvent& event)
1040 {
1041     if ( event.GetActive() )
1042     {
1043         // restore focus to the child which was last focused unless we already
1044         // have it
1045         wxLogTrace(_T("focus"), _T("wxTLW %08x activated."), (int) m_hWnd);
1046
1047         wxWindow *winFocus = FindFocus();
1048         if ( !winFocus || wxGetTopLevelParent(winFocus) != this )
1049         {
1050             wxWindow *parent = m_winLastFocused ? m_winLastFocused->GetParent()
1051                                                 : NULL;
1052             if ( !parent )
1053             {
1054                 parent = this;
1055             }
1056
1057             wxSetFocusToChild(parent, &m_winLastFocused);
1058         }
1059     }
1060     else // deactivating
1061     {
1062         // remember the last focused child if it is our child
1063         m_winLastFocused = FindFocus();
1064
1065         if ( m_winLastFocused )
1066         {
1067             // let it know that it doesn't have focus any more
1068             m_winLastFocused->HandleKillFocus((WXHWND)NULL);
1069
1070             // and don't remember it if it's a child from some other frame
1071             if ( wxGetTopLevelParent(m_winLastFocused) != this )
1072             {
1073                 m_winLastFocused = NULL;
1074             }
1075         }
1076
1077         wxLogTrace(_T("focus"),
1078                    _T("wxTLW %08x deactivated, last focused: %08x."),
1079                    (int) m_hWnd,
1080                    (int) (m_winLastFocused ? GetHwndOf(m_winLastFocused)
1081                                            : NULL));
1082
1083         event.Skip();
1084     }
1085 }
1086
1087 // the DialogProc for all wxWidgets dialogs
1088 LONG APIENTRY _EXPORT
1089 wxDlgProc(HWND hDlg,
1090           UINT message,
1091           WPARAM wParam,
1092           LPARAM lParam)
1093 {
1094     switch ( message )
1095     {
1096         case WM_INITDIALOG:
1097         {
1098             // under CE, add a "Ok" button in the dialog title bar and make it full
1099             // screen
1100             //
1101             // TODO: find the window for this HWND, and take into account
1102             // wxMAXIMIZE and wxCLOSE_BOX. For now, assume both are present.
1103             //
1104             // Standard SDK doesn't have aygshell.dll: see
1105             // include/wx/msw/wince/libraries.h
1106 #if defined(__WXWINCE__) && !defined(__WINCE_STANDARDSDK__) && !defined(__HANDHELDPC__)
1107             SHINITDLGINFO shidi;
1108             shidi.dwMask = SHIDIM_FLAGS;
1109             shidi.dwFlags = SHIDIF_SIZEDLG // take account of the SIP or menubar
1110 #ifndef __SMARTPHONE__
1111                             | SHIDIF_DONEBUTTON
1112 #endif
1113                         ;
1114             shidi.hDlg = hDlg;
1115             SHInitDialog( &shidi );
1116 #else // no SHInitDialog()
1117             wxUnusedVar(hDlg);
1118 #endif
1119             // for WM_INITDIALOG, returning TRUE tells system to set focus to
1120             // the first control in the dialog box, but as we set the focus
1121             // ourselves, we return FALSE for it as well
1122             return FALSE;
1123         }
1124
1125 #if defined(__SMARTPHONE__) || defined(__POCKETPC__)
1126         case WM_SETTINGCHANGE:
1127         {
1128             wxTopLevelWindow *tlw = wxDynamicCast(wxGetWindowFromHWND(hDlg), wxTopLevelWindow);
1129             if(tlw) return tlw->HandleSettingChange(wParam,lParam) ? TRUE : FALSE;
1130         }
1131 #endif
1132     }
1133
1134     // for almost all messages, returning FALSE means that we didn't process
1135     // the message
1136     return FALSE;
1137 }
1138
1139 // ============================================================================
1140 // wxTLWHiddenParentModule implementation
1141 // ============================================================================
1142
1143 HWND wxTLWHiddenParentModule::ms_hwnd = NULL;
1144
1145 const wxChar *wxTLWHiddenParentModule::ms_className = NULL;
1146
1147 bool wxTLWHiddenParentModule::OnInit()
1148 {
1149     ms_hwnd = NULL;
1150     ms_className = NULL;
1151
1152     return true;
1153 }
1154
1155 void wxTLWHiddenParentModule::OnExit()
1156 {
1157     if ( ms_hwnd )
1158     {
1159         if ( !::DestroyWindow(ms_hwnd) )
1160         {
1161             wxLogLastError(_T("DestroyWindow(hidden TLW parent)"));
1162         }
1163
1164         ms_hwnd = NULL;
1165     }
1166
1167     if ( ms_className )
1168     {
1169         if ( !::UnregisterClass(ms_className, wxGetInstance()) )
1170         {
1171             wxLogLastError(_T("UnregisterClass(\"wxTLWHiddenParent\")"));
1172         }
1173
1174         ms_className = NULL;
1175     }
1176 }
1177
1178 /* static */
1179 HWND wxTLWHiddenParentModule::GetHWND()
1180 {
1181     if ( !ms_hwnd )
1182     {
1183         if ( !ms_className )
1184         {
1185             static const wxChar *HIDDEN_PARENT_CLASS = _T("wxTLWHiddenParent");
1186
1187             WNDCLASS wndclass;
1188             wxZeroMemory(wndclass);
1189
1190             wndclass.lpfnWndProc   = DefWindowProc;
1191             wndclass.hInstance     = wxGetInstance();
1192             wndclass.lpszClassName = HIDDEN_PARENT_CLASS;
1193
1194             if ( !::RegisterClass(&wndclass) )
1195             {
1196                 wxLogLastError(_T("RegisterClass(\"wxTLWHiddenParent\")"));
1197             }
1198             else
1199             {
1200                 ms_className = HIDDEN_PARENT_CLASS;
1201             }
1202         }
1203
1204         ms_hwnd = ::CreateWindow(ms_className, wxEmptyString, 0, 0, 0, 0, 0, NULL,
1205                                  (HMENU)NULL, wxGetInstance(), NULL);
1206         if ( !ms_hwnd )
1207         {
1208             wxLogLastError(_T("CreateWindow(hidden TLW parent)"));
1209         }
1210     }
1211
1212     return ms_hwnd;
1213 }