]> git.saurik.com Git - wxWidgets.git/blame - src/msw/toplevel.cpp
merge msw/gsocket.cpp into msw/sockmsw.cpp
[wxWidgets.git] / src / msw / toplevel.cpp
CommitLineData
82c9f85c 1///////////////////////////////////////////////////////////////////////////////
faa49bfd 2// Name: src/msw/toplevel.cpp
82c9f85c
VZ
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)
65571936 9// License: wxWindows licence
82c9f85c
VZ
10///////////////////////////////////////////////////////////////////////////////
11
12// ============================================================================
13// declarations
14// ============================================================================
15
16// ----------------------------------------------------------------------------
17// headers
18// ----------------------------------------------------------------------------
19
82c9f85c
VZ
20// For compilers that support precompilation, includes "wx.h".
21#include "wx/wxprec.h"
22
23#ifdef __BORLANDC__
24 #pragma hdrstop
25#endif
26
1832043f
WS
27#include "wx/toplevel.h"
28
82c9f85c 29#ifndef WX_PRECOMP
3a922bb4 30 #include "wx/app.h"
28b68852 31 #include "wx/dialog.h"
82c9f85c
VZ
32 #include "wx/string.h"
33 #include "wx/log.h"
34 #include "wx/intl.h"
14dd645e 35 #include "wx/frame.h"
706d74ab 36 #include "wx/containr.h" // wxSetFocusToChild()
02761f6c 37 #include "wx/module.h"
82c9f85c
VZ
38#endif //WX_PRECOMP
39
dc92adaf 40#include "wx/dynlib.h"
2b5f62a0 41
82c9f85c 42#include "wx/msw/private.h"
3d487566 43#if defined(__WXWINCE__) && !defined(__HANDHELDPC__)
02761f6c
WS
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
80a81a12
JS
50#endif
51
4676948b 52#include "wx/msw/winundef.h"
a6c2e2c7 53#include "wx/msw/missing.h"
4676948b 54
716645d3 55#include "wx/display.h"
7e25f59e 56
e121a72a
MB
57#ifndef ICON_BIG
58 #define ICON_BIG 1
59#endif
60
61#ifndef ICON_SMALL
62 #define ICON_SMALL 0
63#endif
64
82c9f85c
VZ
65// ----------------------------------------------------------------------------
66// stubs for missing functions under MicroWindows
67// ----------------------------------------------------------------------------
68
69#ifdef __WXMICROWIN__
70
bfbb0b4c
WS
71// static inline bool IsIconic(HWND WXUNUSED(hwnd)) { return false; }
72static inline bool IsZoomed(HWND WXUNUSED(hwnd)) { return false; }
82c9f85c
VZ
73
74#endif // __WXMICROWIN__
75
12447831
VZ
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
61179e28
VZ
78LONG APIENTRY _EXPORT
79wxDlgProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam);
80
2b5f62a0
VZ
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
86class wxTLWHiddenParentModule : public wxModule
87{
88public:
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
96private:
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
106IMPLEMENT_DYNAMIC_CLASS(wxTLWHiddenParentModule, wxModule)
9dfef5ac 107
82c9f85c
VZ
108// ============================================================================
109// wxTopLevelWindowMSW implementation
110// ============================================================================
111
085ad686
VZ
112BEGIN_EVENT_TABLE(wxTopLevelWindowMSW, wxTopLevelWindowBase)
113 EVT_ACTIVATE(wxTopLevelWindowMSW::OnActivate)
114END_EVENT_TABLE()
115
82c9f85c
VZ
116// ----------------------------------------------------------------------------
117// wxTopLevelWindowMSW creation
118// ----------------------------------------------------------------------------
119
120void wxTopLevelWindowMSW::Init()
121{
122 m_iconized =
bfbb0b4c 123 m_maximizeOnShow = false;
b225f659 124
c641b1d2
VS
125 // Data to save/restore when calling ShowFullScreen
126 m_fsStyle = 0;
127 m_fsOldWindowStyle = 0;
bfbb0b4c
WS
128 m_fsIsMaximized = false;
129 m_fsIsShowing = false;
085ad686
VZ
130
131 m_winLastFocused = (wxWindow *)NULL;
fb8a56b7 132
3180bc0e 133#if defined(__SMARTPHONE__) && defined(__WXWINCE__)
fb8a56b7
WS
134 m_MenuBarHWND = 0;
135#endif
08b97268
WS
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
b225f659
VZ
144}
145
b2d5a7ee 146WXDWORD wxTopLevelWindowMSW::MSWGetStyle(long style, WXDWORD *exflags) const
b225f659 147{
b2d5a7ee
VZ
148 // let the base class deal with the common styles but fix the ones which
149 // don't make sense for us (we also deal with the borders ourselves)
150 WXDWORD msflags = wxWindow::MSWGetStyle
151 (
152 (style & ~wxBORDER_MASK) | wxBORDER_NONE, exflags
31e7e89f 153 ) & ~WS_CHILD & ~WS_VISIBLE;
b225f659 154
aa29eefa
JS
155 // For some reason, WS_VISIBLE needs to be defined on creation for
156 // SmartPhone 2003. The title can fail to be displayed otherwise.
157#if defined(__SMARTPHONE__) || (defined(__WXWINCE__) && _WIN32_WCE < 400)
c1855476 158 msflags |= WS_VISIBLE;
aa29eefa 159 ((wxTopLevelWindowMSW*)this)->wxWindowBase::Show(true);
c1855476
RR
160#endif
161
b225f659 162 // first select the kind of window being created
dfb06c62
VZ
163 //
164 // note that if we don't set WS_POPUP, Windows assumes WS_OVERLAPPED and
0fcd3b92
VZ
165 // creates a window with both caption and border, hence we need to use
166 // WS_POPUP in a few cases just to avoid having caption/border which we
167 // don't want
0e082993
VZ
168
169 // border and caption styles
6f26f98e 170 if ( ( style & wxRESIZE_BORDER ) && !IsAlwaysMaximized())
0e082993 171 msflags |= WS_THICKFRAME;
f8d56830
JS
172 else if ( exflags && ((style & wxBORDER_DOUBLE) || (style & wxBORDER_RAISED)) )
173 *exflags |= WS_EX_DLGMODALFRAME;
0e082993
VZ
174 else if ( !(style & wxBORDER_NONE) )
175 msflags |= WS_BORDER;
9cce2fe2 176#ifndef __POCKETPC__
dfb06c62
VZ
177 else
178 msflags |= WS_POPUP;
82eda5ec 179#endif
0e082993 180
9ceeecb9 181 // normally we consider that all windows without a caption must be popups,
f76858d8
VZ
182 // but CE is an exception: there windows normally do not have the caption
183 // but shouldn't be made popups as popups can't have menus and don't look
184 // like normal windows anyhow
9ceeecb9
JS
185
186 // TODO: Smartphone appears to like wxCAPTION, but we should check that
187 // we need it.
188#if defined(__SMARTPHONE__) || !defined(__WXWINCE__)
0e082993
VZ
189 if ( style & wxCAPTION )
190 msflags |= WS_CAPTION;
f76858d8 191#ifndef __WXWINCE__
dfb06c62 192 else
b225f659 193 msflags |= WS_POPUP;
f76858d8 194#endif // !__WXWINCE__
9ceeecb9 195#endif
e5aa8b81 196
b225f659 197 // next translate the individual flags
dc134969
VZ
198
199 // WS_EX_CONTEXTHELP is incompatible with WS_MINIMIZEBOX and WS_MAXIMIZEBOX
200 // and is ignored if we specify both of them, but chances are that if we
7ce6cc9b 201 // use wxWS_EX_CONTEXTHELP, we really do want to have the context help
dc134969
VZ
202 // button while wxMINIMIZE/wxMAXIMIZE are included by default, so the help
203 // takes precedence
7ce6cc9b 204 if ( !(GetExtraStyle() & wxWS_EX_CONTEXTHELP) )
dc134969
VZ
205 {
206 if ( style & wxMINIMIZE_BOX )
207 msflags |= WS_MINIMIZEBOX;
208 if ( style & wxMAXIMIZE_BOX )
209 msflags |= WS_MAXIMIZEBOX;
210 }
9ceeecb9 211
faa49bfd 212#ifndef __WXWINCE__
2ccc5f11
VZ
213 // notice that if wxCLOSE_BOX is specified we need to use WS_SYSMENU too as
214 // otherwise the close box doesn't appear
215 if ( style & (wxSYSTEM_MENU | wxCLOSE_BOX) )
b225f659 216 msflags |= WS_SYSMENU;
2ccc5f11 217#endif // !__WXWINCE__
2a47cb1b 218
f76858d8
VZ
219 // NB: under CE these 2 styles are not supported currently, we should
220 // call Minimize()/Maximize() "manually" if we want to support them
b225f659
VZ
221 if ( style & wxMINIMIZE )
222 msflags |= WS_MINIMIZE;
9ceeecb9 223
b225f659
VZ
224 if ( style & wxMAXIMIZE )
225 msflags |= WS_MAXIMIZE;
0e082993 226
b225f659 227 // Keep this here because it saves recoding this function in wxTinyFrame
b225f659
VZ
228 if ( style & (wxTINY_CAPTION_VERT | wxTINY_CAPTION_HORIZ) )
229 msflags |= WS_CAPTION;
82eda5ec 230
b225f659
VZ
231 if ( exflags )
232 {
f76858d8 233 // there is no taskbar under CE, so omit all this
45f27284 234#if !defined(__WXWINCE__)
35bf863b
VZ
235 if ( !(GetExtraStyle() & wxTOPLEVEL_EX_DIALOG) )
236 {
9dfef5ac
VZ
237 if ( style & wxFRAME_TOOL_WINDOW )
238 {
239 // create the palette-like window
35bf863b 240 *exflags |= WS_EX_TOOLWINDOW;
404a4d93
VZ
241
242 // tool windows shouldn't appear on the taskbar (as documented)
243 style |= wxFRAME_NO_TASKBAR;
9dfef5ac
VZ
244 }
245
246 // We have to solve 2 different problems here:
247 //
248 // 1. frames with wxFRAME_NO_TASKBAR flag shouldn't appear in the
249 // taskbar even if they don't have a parent
250 //
251 // 2. frames without this style should appear in the taskbar even
252 // if they're owned (Windows only puts non owned windows into
253 // the taskbar normally)
254 //
255 // The second one is solved here by using WS_EX_APPWINDOW flag, the
256 // first one is dealt with in our MSWGetParent() method
257 // implementation
258 if ( !(style & wxFRAME_NO_TASKBAR) && GetParent() )
259 {
260 // need to force the frame to appear in the taskbar
35bf863b 261 *exflags |= WS_EX_APPWINDOW;
9dfef5ac
VZ
262 }
263 //else: nothing to do [here]
35bf863b 264 }
b554cf63 265
7ce6cc9b 266 if ( GetExtraStyle() & wxWS_EX_CONTEXTHELP )
b554cf63 267 *exflags |= WS_EX_CONTEXTHELP;
f76858d8 268#endif // !__WXWINCE__
b225f659
VZ
269
270 if ( style & wxSTAY_ON_TOP )
271 *exflags |= WS_EX_TOPMOST;
b225f659
VZ
272 }
273
274 return msflags;
275}
276
9dfef5ac
VZ
277WXHWND wxTopLevelWindowMSW::MSWGetParent() const
278{
279 // for the frames without wxFRAME_FLOAT_ON_PARENT style we should use NULL
280 // parent HWND or it would be always on top of its parent which is not what
281 // we usually want (in fact, we only want it for frames with the
282 // wxFRAME_FLOAT_ON_PARENT flag)
2b5f62a0 283 HWND hwndParent = NULL;
9dfef5ac
VZ
284 if ( HasFlag(wxFRAME_FLOAT_ON_PARENT) )
285 {
2b5f62a0 286 const wxWindow *parent = GetParent();
9dfef5ac 287
2b5f62a0
VZ
288 if ( !parent )
289 {
290 // this flag doesn't make sense then and will be ignored
291 wxFAIL_MSG( _T("wxFRAME_FLOAT_ON_PARENT but no parent?") );
292 }
293 else
294 {
295 hwndParent = GetHwndOf(parent);
296 }
9dfef5ac 297 }
2b5f62a0 298 //else: don't float on parent, must not be owned
9dfef5ac
VZ
299
300 // now deal with the 2nd taskbar-related problem (see comments above in
301 // MSWGetStyle())
2b5f62a0 302 if ( HasFlag(wxFRAME_NO_TASKBAR) && !hwndParent )
9dfef5ac 303 {
2b5f62a0
VZ
304 // use hidden parent
305 hwndParent = wxTLWHiddenParentModule::GetHWND();
9dfef5ac
VZ
306 }
307
2b5f62a0 308 return (WXHWND)hwndParent;
9dfef5ac
VZ
309}
310
b7e5ba8f
JG
311#if defined(__SMARTPHONE__) || defined(__POCKETPC__)
312bool wxTopLevelWindowMSW::HandleSettingChange(WXWPARAM wParam, WXLPARAM lParam)
313{
314 SHACTIVATEINFO *info = (SHACTIVATEINFO*) m_activateInfo;
315 if ( info )
316 {
1272e71b 317 SHHandleWMSettingChange(GetHwnd(), wParam, lParam, info);
b7e5ba8f
JG
318 }
319
1272e71b 320 return wxWindowMSW::HandleSettingChange(wParam, lParam);
b7e5ba8f
JG
321}
322#endif
323
08b97268
WS
324WXLRESULT wxTopLevelWindowMSW::MSWWindowProc(WXUINT message, WXWPARAM wParam, WXLPARAM lParam)
325{
326 WXLRESULT rc = 0;
327 bool processed = false;
328
8b0df0e1 329#if defined(__SMARTPHONE__) || defined(__POCKETPC__)
08b97268
WS
330 switch ( message )
331 {
08b97268
WS
332 case WM_ACTIVATE:
333 {
334 SHACTIVATEINFO* info = (SHACTIVATEINFO*) m_activateInfo;
335 if (info)
336 {
337 DWORD flags = 0;
338 if (GetExtraStyle() & wxTOPLEVEL_EX_DIALOG) flags = SHA_INPUTDIALOG;
339 SHHandleWMActivate(GetHwnd(), wParam, lParam, info, flags);
340 }
341
342 // This implicitly sends a wxEVT_ACTIVATE_APP event
343 if (wxTheApp)
344 wxTheApp->SetActive(wParam != 0, FindFocus());
345
346 break;
347 }
08b97268
WS
348 case WM_HIBERNATE:
349 {
350 if (wxTheApp)
351 {
352 wxActivateEvent event(wxEVT_HIBERNATE, true, wxID_ANY);
353 event.SetEventObject(wxTheApp);
354 processed = wxTheApp->ProcessEvent(event);
355 }
356 break;
357 }
08b97268 358 }
8b0df0e1 359#endif
08b97268
WS
360
361 if ( !processed )
362 rc = wxTopLevelWindowBase::MSWWindowProc(message, wParam, lParam);
363
364 return rc;
365}
366
6e8515a3 367bool wxTopLevelWindowMSW::CreateDialog(const void *dlgTemplate,
b225f659
VZ
368 const wxString& title,
369 const wxPoint& pos,
370 const wxSize& size)
371{
372#ifdef __WXMICROWIN__
373 // no dialogs support under MicroWin yet
374 return CreateFrame(title, pos, size);
375#else // !__WXMICROWIN__
376 wxWindow *parent = GetParent();
377
378 // for the dialogs without wxDIALOG_NO_PARENT style, use the top level
379 // app window as parent - this avoids creating modal dialogs without
380 // parent
381 if ( !parent && !(GetWindowStyleFlag() & wxDIALOG_NO_PARENT) )
382 {
383 parent = wxTheApp->GetTopWindow();
e058b98d 384
39cc7a0b 385 if ( parent )
e058b98d 386 {
39cc7a0b
VZ
387 // don't use transient windows as parents, this is dangerous as it
388 // can lead to a crash if the parent is destroyed before the child
389 //
390 // also don't use the window which is currently hidden as then the
391 // dialog would be hidden as well
392 if ( (parent->GetExtraStyle() & wxWS_EX_TRANSIENT) ||
393 !parent->IsShown() )
394 {
395 parent = NULL;
396 }
e058b98d 397 }
b225f659
VZ
398 }
399
434005ca
VZ
400 m_hWnd = (WXHWND)::CreateDialogIndirect
401 (
402 wxGetInstance(),
403 (DLGTEMPLATE*)dlgTemplate,
404 parent ? GetHwndOf(parent) : NULL,
405 (DLGPROC)wxDlgProc
406 );
b225f659
VZ
407
408 if ( !m_hWnd )
409 {
7e99eddf 410 wxFAIL_MSG(wxT("Failed to create dialog. Incorrect DLGTEMPLATE?"));
b225f659 411
7e99eddf 412 wxLogSysError(wxT("Can't create dialog using memory template"));
b225f659 413
bfbb0b4c 414 return false;
b225f659
VZ
415 }
416
b554cf63 417#if !defined(__WXWINCE__)
b225f659
VZ
418 // For some reason, the system menu is activated when we use the
419 // WS_EX_CONTEXTHELP style, so let's set a reasonable icon
8e5dbcdd 420 if ( HasExtraStyle(wxWS_EX_CONTEXTHELP) )
b225f659
VZ
421 {
422 wxFrame *winTop = wxDynamicCast(wxTheApp->GetTopWindow(), wxFrame);
423 if ( winTop )
424 {
425 wxIcon icon = winTop->GetIcon();
426 if ( icon.Ok() )
427 {
428 ::SendMessage(GetHwnd(), WM_SETICON,
429 (WPARAM)TRUE,
430 (LPARAM)GetHiconOf(icon));
431 }
432 }
433 }
8e5dbcdd 434#endif // !__WXWINCE__
b225f659
VZ
435
436 // move the dialog to its initial position without forcing repainting
437 int x, y, w, h;
72a11184 438 (void)MSWGetCreateWindowCoords(pos, size, x, y, w, h);
4c53c743 439
26268100
RD
440 if ( x == (int)CW_USEDEFAULT )
441 {
442 // centre it on the screen - what else can we do?
443 wxSize sizeDpy = wxGetDisplaySize();
444
445 x = (sizeDpy.x - w) / 2;
446 y = (sizeDpy.y - h) / 2;
447 }
448
a9928e9d 449#if !defined(__WXWINCE__) || defined(__WINCE_STANDARDSDK__)
4c53c743
VZ
450 if ( !::MoveWindow(GetHwnd(), x, y, w, h, FALSE) )
451 {
452 wxLogLastError(wxT("MoveWindow"));
b225f659 453 }
28c191aa 454#endif
b225f659
VZ
455
456 if ( !title.empty() )
457 {
e0a050e3 458 ::SetWindowText(GetHwnd(), title.wx_str());
b225f659
VZ
459 }
460
461 SubclassWin(m_hWnd);
faa49bfd 462
aa29eefa
JS
463#ifdef __SMARTPHONE__
464 // Work around title non-display glitch
465 Show(false);
faa49bfd 466#endif
b225f659 467
bfbb0b4c 468 return true;
b225f659
VZ
469#endif // __WXMICROWIN__/!__WXMICROWIN__
470}
471
472bool wxTopLevelWindowMSW::CreateFrame(const wxString& title,
473 const wxPoint& pos,
474 const wxSize& size)
475{
b2d5a7ee
VZ
476 WXDWORD exflags;
477 WXDWORD flags = MSWGetCreateWindowFlags(&exflags);
b225f659 478
6fd54d58 479 const wxSize sz = IsAlwaysMaximized() ? wxDefaultSize : size;
6f26f98e 480
08a58133 481#ifndef __WXWINCE__
978af864
VZ
482 if ( wxTheApp->GetLayoutDirection() == wxLayout_RightToLeft )
483 exflags |= WS_EX_LAYOUTRTL;
08a58133 484#endif
978af864 485
d9698bd4
VZ
486 return MSWCreate(MSWGetRegisteredClassName(),
487 title.wx_str(), pos, sz, flags, exflags);
82c9f85c
VZ
488}
489
490bool wxTopLevelWindowMSW::Create(wxWindow *parent,
491 wxWindowID id,
492 const wxString& title,
493 const wxPoint& pos,
494 const wxSize& size,
495 long style,
496 const wxString& name)
497{
999836aa 498 bool ret wxDUMMY_INITIALIZE(false);
2a47cb1b 499
2a47cb1b
VZ
500 wxSize sizeReal = size;
501 if ( !sizeReal.IsFullySpecified() )
502 {
503 sizeReal.SetDefaults(GetDefaultSize());
504 }
82c9f85c
VZ
505
506 m_windowStyle = style;
507
508 SetName(name);
509
bfbb0b4c 510 m_windowId = id == wxID_ANY ? NewControlId() : id;
82c9f85c
VZ
511
512 wxTopLevelWindows.Append(this);
513
514 if ( parent )
515 parent->AddChild(this);
516
b225f659
VZ
517 if ( GetExtraStyle() & wxTOPLEVEL_EX_DIALOG )
518 {
b225f659
VZ
519 // we have different dialog templates to allows creation of dialogs
520 // with & without captions under MSWindows, resizeable or not (but a
521 // resizeable dialog always has caption - otherwise it would look too
522 // strange)
434005ca
VZ
523
524 // we need 3 additional WORDs for dialog menu, class and title (as we
525 // don't use DS_SETFONT we don't need the fourth WORD for the font)
526 static const int dlgsize = sizeof(DLGTEMPLATE) + (sizeof(WORD) * 3);
527 DLGTEMPLATE *dlgTemplate = (DLGTEMPLATE *)malloc(dlgsize);
528 memset(dlgTemplate, 0, dlgsize);
529
530 // these values are arbitrary, they won't be used normally anyhow
6e8515a3
JS
531 dlgTemplate->x = 34;
532 dlgTemplate->y = 22;
533 dlgTemplate->cx = 144;
534 dlgTemplate->cy = 75;
535
434005ca
VZ
536 // reuse the code in MSWGetStyle() but correct the results slightly for
537 // the dialog
99ea81de
VZ
538 //
539 // NB: we need a temporary variable as we can't pass pointer to
540 // dwExtendedStyle directly, it's not aligned correctly for 64 bit
541 // architectures
542 WXDWORD dwExtendedStyle;
543 dlgTemplate->style = MSWGetStyle(style, &dwExtendedStyle);
544 dlgTemplate->dwExtendedStyle = dwExtendedStyle;
434005ca
VZ
545
546 // all dialogs are popups
547 dlgTemplate->style |= WS_POPUP;
08a58133
WS
548
549#ifndef __WXWINCE__
978af864
VZ
550 if ( wxTheApp->GetLayoutDirection() == wxLayout_RightToLeft )
551 {
552 dlgTemplate->dwExtendedStyle |= WS_EX_LAYOUTRTL;
553 }
434005ca
VZ
554
555 // force 3D-look if necessary, it looks impossibly ugly otherwise
556 if ( style & (wxRESIZE_BORDER | wxCAPTION) )
557 dlgTemplate->style |= DS_MODALFRAME;
9cce2fe2 558#endif
b225f659 559
2a47cb1b 560 ret = CreateDialog(dlgTemplate, title, pos, sizeReal);
6e8515a3 561 free(dlgTemplate);
b225f659
VZ
562 }
563 else // !dialog
564 {
2a47cb1b 565 ret = CreateFrame(title, pos, sizeReal);
9ca4dd06
VS
566 }
567
9ceeecb9 568#ifndef __WXWINCE__
9ca4dd06
VS
569 if ( ret && !(GetWindowStyleFlag() & wxCLOSE_BOX) )
570 {
571 EnableCloseButton(false);
b225f659 572 }
9ceeecb9 573#endif
9ca4dd06 574
d7e0024b
VZ
575 // for standard dialogs the dialog manager generates WM_CHANGEUISTATE
576 // itself but for custom windows we have to do it ourselves in order to
577 // make the keyboard indicators (such as underlines for accelerators and
578 // focus rectangles) work under Win2k+
bb655ead
VZ
579 if ( ret )
580 {
3ef092d6 581 MSWUpdateUIState(UIS_INITIALIZE);
bb655ead
VZ
582 }
583
f43255e8
WS
584 // Note: if we include PocketPC in this test, dialogs can fail to show up,
585 // for example the text entry dialog in the dialogs sample. Problem with Maximise()?
586#if defined(__WXWINCE__) && (defined(__SMARTPHONE__) || defined(__WINCE_STANDARDSDK__))
6f26f98e 587 if ( ( style & wxMAXIMIZE ) || IsAlwaysMaximized() )
991420e6
WS
588 {
589 this->Maximize();
590 }
f43255e8 591#endif
82eda5ec 592
3180bc0e 593#if defined(__SMARTPHONE__) && defined(__WXWINCE__)
fb8a56b7
WS
594 SetRightMenu(); // to nothing for initialization
595#endif
596
9ca4dd06 597 return ret;
82c9f85c
VZ
598}
599
600wxTopLevelWindowMSW::~wxTopLevelWindowMSW()
601{
08b97268
WS
602#if defined(__SMARTPHONE__) || defined(__POCKETPC__)
603 SHACTIVATEINFO* info = (SHACTIVATEINFO*) m_activateInfo;
604 delete info;
605 m_activateInfo = NULL;
606#endif
607
d6fb86a8
VZ
608 // after destroying an owned window, Windows activates the next top level
609 // window in Z order but it may be different from our owner (to reproduce
610 // this simply Alt-TAB to another application and back before closing the
611 // owned frame) whereas we always want to yield activation to our parent
612 if ( HasFlag(wxFRAME_FLOAT_ON_PARENT) )
613 {
614 wxWindow *parent = GetParent();
615 if ( parent )
616 {
617 ::BringWindowToTop(GetHwndOf(parent));
618 }
619 }
82c9f85c
VZ
620}
621
82c9f85c
VZ
622// ----------------------------------------------------------------------------
623// wxTopLevelWindowMSW showing
624// ----------------------------------------------------------------------------
625
626void wxTopLevelWindowMSW::DoShowWindow(int nShowCmd)
627{
628 ::ShowWindow(GetHwnd(), nShowCmd);
629
630 m_iconized = nShowCmd == SW_MINIMIZE;
631}
632
633bool wxTopLevelWindowMSW::Show(bool show)
634{
635 // don't use wxWindow version as we want to call DoShowWindow() ourselves
636 if ( !wxWindowBase::Show(show) )
bfbb0b4c 637 return false;
82c9f85c
VZ
638
639 int nShowCmd;
640 if ( show )
641 {
642 if ( m_maximizeOnShow )
643 {
644 // show and maximize
645 nShowCmd = SW_MAXIMIZE;
646
991420e6 647 // This is necessary, or no window appears
aa29eefa 648#if defined( __WINCE_STANDARDSDK__) || defined(__SMARTPHONE__)
991420e6 649 DoShowWindow(SW_SHOW);
a9928e9d
JS
650#endif
651
bfbb0b4c 652 m_maximizeOnShow = false;
82c9f85c
VZ
653 }
654 else // just show
655 {
00f7f5a7
VZ
656 // we shouldn't use SW_SHOW which also activates the window for
657 // tool frames (as they shouldn't steal focus from the main window)
658 // nor for the currently disabled windows as they would be enabled
659 // as a side effect
660 if ( HasFlag(wxFRAME_TOOL_WINDOW) || !IsEnabled() )
661 nShowCmd = SW_SHOWNA;
662 else
663 nShowCmd = SW_SHOW;
82c9f85c
VZ
664 }
665 }
666 else // hide
667 {
668 nShowCmd = SW_HIDE;
669 }
670
671 DoShowWindow(nShowCmd);
672
a9928e9d
JS
673#if defined(__WXWINCE__) && (_WIN32_WCE >= 400 && !defined(__POCKETPC__) && !defined(__SMARTPHONE__))
674 // Addornments have to be added when the frame is the correct size
675 wxFrame* frame = wxDynamicCast(this, wxFrame);
676 if (frame && frame->GetMenuBar())
677 frame->GetMenuBar()->AddAdornments(GetWindowStyleFlag());
678#endif
0567fdfc 679
6fd54d58
VZ
680 // we only set pending size if we're maximized before being shown, now that
681 // we're shown we don't need it any more (it is reset in size event handler
682 // for child windows but we have to do it ourselves for this parent window)
683 m_pendingSize = wxDefaultSize;
684
0567fdfc 685 return true;
82c9f85c
VZ
686}
687
688// ----------------------------------------------------------------------------
689// wxTopLevelWindowMSW maximize/minimize
690// ----------------------------------------------------------------------------
691
692void wxTopLevelWindowMSW::Maximize(bool maximize)
693{
694 if ( IsShown() )
695 {
696 // just maximize it directly
697 DoShowWindow(maximize ? SW_MAXIMIZE : SW_RESTORE);
698 }
699 else // hidden
700 {
73c902d6
DS
701 // we can't maximize the hidden frame because it shows it as well,
702 // so just remember that we should do it later in this case
a0be434e 703 m_maximizeOnShow = maximize;
ac2de323
VZ
704
705 // after calling Maximize() the client code expects to get the frame
706 // "real" size and doesn't want to know that, because of implementation
707 // details, the frame isn't really maximized yet but will be only once
708 // it's shown, so return our size as it will be then in this case
7889b795
VZ
709 if ( maximize )
710 {
6fd54d58
VZ
711 // we must only change pending size here, and not call SetSize()
712 // because otherwise Windows would think that this (full screen)
713 // size is the natural size for the frame and so would use it when
714 // the user clicks on "restore" title bar button instead of the
715 // correct initial frame size
716 //
717 // NB: unfortunately we don't know which display we're on yet so we
718 // have to use the default one
719 m_pendingSize = wxGetClientDisplayRect().GetSize();
7889b795
VZ
720 }
721 //else: can't do anything in this case, we don't have the old size
82c9f85c
VZ
722 }
723}
724
725bool wxTopLevelWindowMSW::IsMaximized() const
726{
979a0320 727 return IsAlwaysMaximized() ||
a8e89343
JS
728#if !defined(__SMARTPHONE__) && !defined(__POCKETPC__) && !defined(__WINCE_STANDARDSDK__)
729
979a0320 730 (::IsZoomed(GetHwnd()) != 0) ||
4676948b 731#endif
979a0320 732 m_maximizeOnShow;
82c9f85c
VZ
733}
734
735void wxTopLevelWindowMSW::Iconize(bool iconize)
736{
737 DoShowWindow(iconize ? SW_MINIMIZE : SW_RESTORE);
738}
739
740bool wxTopLevelWindowMSW::IsIconized() const
741{
4676948b 742#ifdef __WXWINCE__
bfbb0b4c 743 return false;
4676948b 744#else
9f01395e
VZ
745 // don't use m_iconized, it may be briefly out of sync with the real state
746 // as it's only modified when we receive a WM_SIZE and we could be called
747 // from an event handler from one of the messages we receive before it,
748 // such as WM_MOVE
749 return ::IsIconic(GetHwnd()) != 0;
4676948b 750#endif
82c9f85c
VZ
751}
752
753void wxTopLevelWindowMSW::Restore()
754{
755 DoShowWindow(SW_RESTORE);
756}
757
978af864
VZ
758void wxTopLevelWindowMSW::SetLayoutDirection(wxLayoutDirection dir)
759{
760 if ( dir == wxLayout_Default )
761 dir = wxTheApp->GetLayoutDirection();
762
763 if ( dir != wxLayout_Default )
764 wxTopLevelWindowBase::SetLayoutDirection(dir);
765}
766
d43eb2a0
VZ
767// ----------------------------------------------------------------------------
768// wxTopLevelWindowMSW geometry
769// ----------------------------------------------------------------------------
770
b7036299
WS
771#ifndef __WXWINCE__
772
c5dc89a1
WS
773void wxTopLevelWindowMSW::DoGetPosition(int *x, int *y) const
774{
d43eb2a0
VZ
775 if ( IsIconized() )
776 {
777 WINDOWPLACEMENT wp;
778 wp.length = sizeof(WINDOWPLACEMENT);
779 if ( ::GetWindowPlacement(GetHwnd(), &wp) )
780 {
781 RECT& rc = wp.rcNormalPosition;
782
783 // the position returned by GetWindowPlacement() is in workspace
784 // coordinates except for windows with WS_EX_TOOLWINDOW style
785 if ( !HasFlag(wxFRAME_TOOL_WINDOW) )
786 {
787 // we must use the correct display for the translation as the
788 // task bar might be shown on one display but not the other one
789 int n = wxDisplay::GetFromWindow(this);
790 wxDisplay dpy(n == wxNOT_FOUND ? 0 : n);
791 const wxPoint ptOfs = dpy.GetClientArea().GetPosition() -
792 dpy.GetGeometry().GetPosition();
793
794 rc.left += ptOfs.x;
795 rc.top += ptOfs.y;
796 }
797
798 if ( x )
799 *x = rc.left;
800 if ( y )
801 *y = rc.top;
802
803 return;
804 }
805
806 wxLogLastError(_T("GetWindowPlacement"));
807 }
808 //else: normal case
809
810 wxTopLevelWindowBase::DoGetPosition(x, y);
811}
812
813void wxTopLevelWindowMSW::DoGetSize(int *width, int *height) const
814{
815 if ( IsIconized() )
816 {
817 WINDOWPLACEMENT wp;
818 wp.length = sizeof(WINDOWPLACEMENT);
819 if ( ::GetWindowPlacement(GetHwnd(), &wp) )
820 {
821 const RECT& rc = wp.rcNormalPosition;
822
823 if ( width )
824 *width = rc.right - rc.left;
825 if ( height )
826 *height = rc.bottom - rc.top;
827
828 return;
829 }
830
831 wxLogLastError(_T("GetWindowPlacement"));
832 }
833 //else: normal case
834
835 wxTopLevelWindowBase::DoGetSize(width, height);
836}
837
c5dc89a1
WS
838#endif // __WXWINCE__
839
c641b1d2
VS
840// ----------------------------------------------------------------------------
841// wxTopLevelWindowMSW fullscreen
842// ----------------------------------------------------------------------------
843
844bool wxTopLevelWindowMSW::ShowFullScreen(bool show, long style)
845{
716645d3 846 if ( show == IsFullScreen() )
c641b1d2 847 {
716645d3 848 // nothing to do
bfbb0b4c 849 return true;
716645d3
VZ
850 }
851
852 m_fsIsShowing = show;
c641b1d2 853
716645d3
VZ
854 if ( show )
855 {
c641b1d2
VS
856 m_fsStyle = style;
857
858 // zap the frame borders
859
860 // save the 'normal' window style
716645d3 861 m_fsOldWindowStyle = GetWindowLong(GetHwnd(), GWL_STYLE);
c641b1d2
VS
862
863 // save the old position, width & height, maximize state
864 m_fsOldSize = GetRect();
865 m_fsIsMaximized = IsMaximized();
866
867 // decide which window style flags to turn off
868 LONG newStyle = m_fsOldWindowStyle;
869 LONG offFlags = 0;
870
871 if (style & wxFULLSCREEN_NOBORDER)
4676948b
JS
872 {
873 offFlags |= WS_BORDER;
874#ifndef __WXWINCE__
875 offFlags |= WS_THICKFRAME;
876#endif
877 }
c641b1d2 878 if (style & wxFULLSCREEN_NOCAPTION)
716645d3 879 offFlags |= WS_CAPTION | WS_SYSMENU;
c641b1d2 880
716645d3 881 newStyle &= ~offFlags;
c641b1d2
VS
882
883 // change our window style to be compatible with full-screen mode
716645d3 884 ::SetWindowLong(GetHwnd(), GWL_STYLE, newStyle);
c641b1d2 885
716645d3
VZ
886 wxRect rect;
887#if wxUSE_DISPLAY
888 // resize to the size of the display containing us
889 int dpy = wxDisplay::GetFromWindow(this);
890 if ( dpy != wxNOT_FOUND )
891 {
892 rect = wxDisplay(dpy).GetGeometry();
893 }
894 else // fall back to the main desktop
86828e0f 895#endif // wxUSE_DISPLAY
716645d3
VZ
896 {
897 // resize to the size of the desktop
898 wxCopyRECTToRect(wxGetWindowRect(::GetDesktopWindow()), rect);
80a81a12
JS
899#ifdef __WXWINCE__
900 // FIXME: size of the bottom menu (toolbar)
901 // should be taken in account
902 rect.height += rect.y;
903 rect.y = 0;
4676948b 904#endif
716645d3 905 }
c641b1d2 906
716645d3 907 SetSize(rect);
c641b1d2
VS
908
909 // now flush the window style cache and actually go full-screen
716645d3 910 long flags = SWP_FRAMECHANGED;
c641b1d2 911
716645d3
VZ
912 // showing the frame full screen should also show it if it's still
913 // hidden
914 if ( !IsShown() )
915 {
916 // don't call wxWindow version to avoid flicker from calling
917 // ::ShowWindow() -- we're going to show the window at the correct
918 // location directly below -- but do call the wxWindowBase version
919 // to sync the internal m_isShown flag
920 wxWindowBase::Show();
c641b1d2 921
716645d3
VZ
922 flags |= SWP_SHOWWINDOW;
923 }
c641b1d2 924
716645d3
VZ
925 SetWindowPos(GetHwnd(), HWND_TOP,
926 rect.x, rect.y, rect.width, rect.height,
927 flags);
c641b1d2 928
3d487566 929#if !defined(__HANDHELDPC__) && (defined(__WXWINCE__) && (_WIN32_WCE < 400))
80a81a12
JS
930 ::SHFullScreen(GetHwnd(), SHFS_HIDETASKBAR | SHFS_HIDESIPBUTTON);
931#endif
932
716645d3
VZ
933 // finally send an event allowing the window to relayout itself &c
934 wxSizeEvent event(rect.GetSize(), GetId());
937013e0 935 HandleWindowEvent(event);
716645d3
VZ
936 }
937 else // stop showing full screen
938 {
3d487566 939#if !defined(__HANDHELDPC__) && (defined(__WXWINCE__) && (_WIN32_WCE < 400))
80a81a12
JS
940 ::SHFullScreen(GetHwnd(), SHFS_SHOWTASKBAR | SHFS_SHOWSIPBUTTON);
941#endif
c641b1d2 942 Maximize(m_fsIsMaximized);
716645d3
VZ
943 SetWindowLong(GetHwnd(),GWL_STYLE, m_fsOldWindowStyle);
944 SetWindowPos(GetHwnd(),HWND_TOP,m_fsOldSize.x, m_fsOldSize.y,
c641b1d2 945 m_fsOldSize.width, m_fsOldSize.height, SWP_FRAMECHANGED);
c641b1d2 946 }
716645d3 947
bfbb0b4c 948 return true;
c641b1d2
VS
949}
950
82c9f85c
VZ
951// ----------------------------------------------------------------------------
952// wxTopLevelWindowMSW misc
953// ----------------------------------------------------------------------------
954
faa49bfd
WS
955void wxTopLevelWindowMSW::SetTitle( const wxString& title)
956{
957 SetLabel(title);
958}
959
960wxString wxTopLevelWindowMSW::GetTitle() const
961{
962 return GetLabel();
963}
964
0f278d77 965bool wxTopLevelWindowMSW::DoSelectAndSetIcon(const wxIconBundle& icons,
b9e66233
VZ
966 int smX,
967 int smY,
968 int i)
f618020a 969{
b9e66233 970 const wxSize size(::GetSystemMetrics(smX), ::GetSystemMetrics(smY));
82c9f85c 971
b9e66233
VZ
972 const wxIcon icon = icons.GetIconOfExactSize(size);
973 if ( icon.Ok() )
f618020a 974 {
b9e66233 975 ::SendMessage(GetHwnd(), WM_SETICON, i, (LPARAM)GetHiconOf(icon));
0f278d77 976 return true;
f618020a 977 }
0f278d77
VS
978
979 return false;
b9e66233 980}
f618020a 981
b9e66233
VZ
982void wxTopLevelWindowMSW::SetIcons(const wxIconBundle& icons)
983{
984 wxTopLevelWindowBase::SetIcons(icons);
985
13e451ae
VS
986 if ( icons.IsEmpty() )
987 {
988 // FIXME: SetIcons(wxNullIconBundle) should unset existing icons,
989 // but we currently don't do that
990 wxASSERT_MSG( m_icons.IsEmpty(), "unsetting icons doesn't work" );
991 return;
992 }
993
e822d1bd
VZ
994 if ( !DoSelectAndSetIcon(icons, SM_CXSMICON, SM_CYSMICON, ICON_SMALL) &&
995 !DoSelectAndSetIcon(icons, SM_CXICON, SM_CYICON, ICON_BIG) )
996 {
997 wxFAIL_MSG( "icon bundle doesn't contain any suitable icon" );
998 }
82c9f85c 999}
a91cf80c
VZ
1000
1001bool wxTopLevelWindowMSW::EnableCloseButton(bool enable)
1002{
4676948b 1003#if !defined(__WXMICROWIN__)
a91cf80c 1004 // get system (a.k.a. window) menu
068959b9 1005 HMENU hmenu = GetSystemMenu(GetHwnd(), FALSE /* get it */);
a91cf80c
VZ
1006 if ( !hmenu )
1007 {
660b1906
VZ
1008 // no system menu at all -- ok if we want to remove the close button
1009 // anyhow, but bad if we want to show it
1010 return !enable;
a91cf80c
VZ
1011 }
1012
1013 // enabling/disabling the close item from it also automatically
1014 // disables/enables the close title bar button
aaf765a5
VZ
1015 if ( ::EnableMenuItem(hmenu, SC_CLOSE,
1016 MF_BYCOMMAND |
1017 (enable ? MF_ENABLED : MF_GRAYED)) == -1 )
a91cf80c
VZ
1018 {
1019 wxLogLastError(_T("EnableMenuItem(SC_CLOSE)"));
1020
bfbb0b4c 1021 return false;
a91cf80c 1022 }
960b193e 1023#ifndef __WXWINCE__
a91cf80c
VZ
1024 // update appearance immediately
1025 if ( !::DrawMenuBar(GetHwnd()) )
1026 {
1027 wxLogLastError(_T("DrawMenuBar"));
1028 }
960b193e 1029#endif
a91cf80c
VZ
1030#endif // !__WXMICROWIN__
1031
bfbb0b4c 1032 return true;
a91cf80c
VZ
1033}
1034
2a47cb1b
VZ
1035#ifndef __WXWINCE__
1036
1542ea39
RD
1037bool wxTopLevelWindowMSW::SetShape(const wxRegion& region)
1038{
bfbb0b4c 1039 wxCHECK_MSG( HasFlag(wxFRAME_SHAPED), false,
6a7e6411
RD
1040 _T("Shaped windows must be created with the wxFRAME_SHAPED style."));
1041
1542ea39
RD
1042 // The empty region signifies that the shape should be removed from the
1043 // window.
1044 if ( region.IsEmpty() )
1045 {
1046 if (::SetWindowRgn(GetHwnd(), NULL, TRUE) == 0)
1047 {
1048 wxLogLastError(_T("SetWindowRgn"));
bfbb0b4c 1049 return false;
1542ea39 1050 }
bfbb0b4c 1051 return true;
1542ea39
RD
1052 }
1053
1054 // Windows takes ownership of the region, so
1055 // we'll have to make a copy of the region to give to it.
1056 DWORD noBytes = ::GetRegionData(GetHrgnOf(region), 0, NULL);
1057 RGNDATA *rgnData = (RGNDATA*) new char[noBytes];
1058 ::GetRegionData(GetHrgnOf(region), noBytes, rgnData);
1059 HRGN hrgn = ::ExtCreateRegion(NULL, noBytes, rgnData);
1060 delete[] (char*) rgnData;
1061
1062 // SetWindowRgn expects the region to be in coordinants
1063 // relative to the window, not the client area. Figure
1064 // out the offset, if any.
1065 RECT rect;
1066 DWORD dwStyle = ::GetWindowLong(GetHwnd(), GWL_STYLE);
1067 DWORD dwExStyle = ::GetWindowLong(GetHwnd(), GWL_EXSTYLE);
1068 ::GetClientRect(GetHwnd(), &rect);
1069 ::AdjustWindowRectEx(&rect, dwStyle, FALSE, dwExStyle);
1070 ::OffsetRgn(hrgn, -rect.left, -rect.top);
1071
1072 // Now call the shape API with the new region.
1073 if (::SetWindowRgn(GetHwnd(), hrgn, TRUE) == 0)
1074 {
1075 wxLogLastError(_T("SetWindowRgn"));
bfbb0b4c 1076 return false;
1542ea39 1077 }
bfbb0b4c 1078 return true;
1542ea39
RD
1079}
1080
2a47cb1b
VZ
1081#endif // !__WXWINCE__
1082
dc92adaf
VZ
1083void wxTopLevelWindowMSW::RequestUserAttention(int flags)
1084{
3a6b0a3e
VZ
1085 // check if we can use FlashWindowEx(): unfortunately a simple test for
1086 // FLASHW_STOP doesn't work because MSVC6 headers do #define it but don't
1087 // provide FlashWindowEx() declaration, so try to detect whether we have
1088 // real headers for WINVER 0x0500 by checking for existence of a symbol not
1089 // declated in MSVC6 header
a8ff046b 1090#if defined(FLASHW_STOP) && defined(VK_XBUTTON1) && wxUSE_DYNLIB_CLASS
dc92adaf
VZ
1091 // available in the headers, check if it is supported by the system
1092 typedef BOOL (WINAPI *FlashWindowEx_t)(FLASHWINFO *pfwi);
3432c148 1093 static FlashWindowEx_t s_pfnFlashWindowEx = NULL;
dc92adaf
VZ
1094 if ( !s_pfnFlashWindowEx )
1095 {
1096 wxDynamicLibrary dllUser32(_T("user32.dll"));
1097 s_pfnFlashWindowEx = (FlashWindowEx_t)
1098 dllUser32.GetSymbol(_T("FlashWindowEx"));
1099
3103e8a9 1100 // we can safely unload user32.dll here, it's going to remain loaded as
dc92adaf
VZ
1101 // long as the program is running anyhow
1102 }
1103
1104 if ( s_pfnFlashWindowEx )
1105 {
1106 WinStruct<FLASHWINFO> fwi;
1107 fwi.hwnd = GetHwnd();
1108 fwi.dwFlags = FLASHW_ALL;
1109 if ( flags & wxUSER_ATTENTION_INFO )
1110 {
1111 // just flash a few times
1112 fwi.uCount = 3;
1113 }
1114 else // wxUSER_ATTENTION_ERROR
1115 {
1116 // flash until the user notices it
1117 fwi.dwFlags |= FLASHW_TIMERNOFG;
1118 }
1119
1120 s_pfnFlashWindowEx(&fwi);
1121 }
1122 else // FlashWindowEx() not available
4f79eb79 1123#endif // FlashWindowEx() defined
dc92adaf
VZ
1124 {
1125 wxUnusedVar(flags);
068959b9 1126#ifndef __WXWINCE__
dc92adaf 1127 ::FlashWindow(GetHwnd(), TRUE);
068959b9 1128#endif // __WXWINCE__
dc92adaf
VZ
1129 }
1130}
1131
50f3c41d
RD
1132// ---------------------------------------------------------------------------
1133
07880314 1134bool wxTopLevelWindowMSW::SetTransparent(wxByte alpha)
50f3c41d 1135{
a8ff046b 1136#if wxUSE_DYNLIB_CLASS
50f3c41d 1137 typedef DWORD (WINAPI *PSETLAYEREDWINDOWATTR)(HWND, DWORD, BYTE, DWORD);
caf587aa
VZ
1138 static PSETLAYEREDWINDOWATTR
1139 pSetLayeredWindowAttributes = (PSETLAYEREDWINDOWATTR)-1;
50f3c41d 1140
caf587aa 1141 if ( pSetLayeredWindowAttributes == (PSETLAYEREDWINDOWATTR)-1 )
50f3c41d
RD
1142 {
1143 wxDynamicLibrary dllUser32(_T("user32.dll"));
caf587aa
VZ
1144
1145 // use RawGetSymbol() and not GetSymbol() to avoid error messages under
1146 // Windows 95: there is nothing the user can do about this anyhow
50f3c41d 1147 pSetLayeredWindowAttributes = (PSETLAYEREDWINDOWATTR)
caf587aa
VZ
1148 dllUser32.RawGetSymbol(wxT("SetLayeredWindowAttributes"));
1149
1150 // it's ok to destroy dllUser32 here, we link statically to user32.dll
1151 // anyhow so it won't be unloaded
50f3c41d 1152 }
caf587aa
VZ
1153
1154 if ( !pSetLayeredWindowAttributes )
50f3c41d 1155 return false;
a8ff046b 1156#endif // wxUSE_DYNLIB_CLASS
50f3c41d
RD
1157
1158 LONG exstyle = GetWindowLong(GetHwnd(), GWL_EXSTYLE);
1159
1160 // if setting alpha to fully opaque then turn off the layered style
1161 if (alpha == 255)
1162 {
1163 SetWindowLong(GetHwnd(), GWL_EXSTYLE, exstyle & ~WS_EX_LAYERED);
1164 Refresh();
1165 return true;
1166 }
1167
a8ff046b 1168#if wxUSE_DYNLIB_CLASS
50f3c41d
RD
1169 // Otherwise, set the layered style if needed and set the alpha value
1170 if ((exstyle & WS_EX_LAYERED) == 0 )
1171 SetWindowLong(GetHwnd(), GWL_EXSTYLE, exstyle | WS_EX_LAYERED);
1172
a8ff046b
VZ
1173 if ( pSetLayeredWindowAttributes(GetHwnd(), 0, (BYTE)alpha, LWA_ALPHA) )
1174 return true;
1175#endif // wxUSE_DYNLIB_CLASS
1176
1177 return false;
50f3c41d
RD
1178}
1179
07880314 1180bool wxTopLevelWindowMSW::CanSetTransparent()
50f3c41d
RD
1181{
1182 // The API is available on win2k and above
02761f6c 1183
50f3c41d
RD
1184 static int os_type = -1;
1185 static int ver_major = -1;
1186
1187 if (os_type == -1)
1188 os_type = ::wxGetOsVersion(&ver_major);
1189
406d283a 1190 return (os_type == wxOS_WINDOWS_NT && ver_major >= 5);
50f3c41d
RD
1191}
1192
0dd9b9e2 1193
17808a75 1194void wxTopLevelWindowMSW::DoFreeze()
0dd9b9e2 1195{
1c8e5c51
VS
1196 // do nothing: freezing toplevel window causes paint and mouse events
1197 // to go through it any TLWs under it, so the best we can do is to freeze
1198 // all children -- and wxWindowBase::Freeze() does that
0dd9b9e2
RD
1199}
1200
17808a75 1201void wxTopLevelWindowMSW::DoThaw()
0dd9b9e2 1202{
1c8e5c51 1203 // intentionally empty -- see DoFreeze()
0dd9b9e2
RD
1204}
1205
1206
085ad686
VZ
1207// ----------------------------------------------------------------------------
1208// wxTopLevelWindow event handling
1209// ----------------------------------------------------------------------------
1210
1211// Default activation behaviour - set the focus for the first child
1212// subwindow found.
1213void wxTopLevelWindowMSW::OnActivate(wxActivateEvent& event)
1214{
1215 if ( event.GetActive() )
1216 {
2736a5de
VZ
1217 // restore focus to the child which was last focused unless we already
1218 // have it
dca0f651 1219 wxLogTrace(_T("focus"), _T("wxTLW %p activated."), m_hWnd);
085ad686 1220
2736a5de
VZ
1221 wxWindow *winFocus = FindFocus();
1222 if ( !winFocus || wxGetTopLevelParent(winFocus) != this )
085ad686 1223 {
2736a5de
VZ
1224 wxWindow *parent = m_winLastFocused ? m_winLastFocused->GetParent()
1225 : NULL;
1226 if ( !parent )
1227 {
1228 parent = this;
1229 }
085ad686 1230
2736a5de
VZ
1231 wxSetFocusToChild(parent, &m_winLastFocused);
1232 }
085ad686
VZ
1233 }
1234 else // deactivating
1235 {
1236 // remember the last focused child if it is our child
1237 m_winLastFocused = FindFocus();
1238
13834828
VZ
1239 if ( m_winLastFocused )
1240 {
1241 // let it know that it doesn't have focus any more
b89e104e
JS
1242 // But this will already be done via WM_KILLFOCUS, so we'll get two kill
1243 // focus events if we call it explicitly.
1244 // m_winLastFocused->HandleKillFocus((WXHWND)NULL);
13834828 1245
2736a5de
VZ
1246 // and don't remember it if it's a child from some other frame
1247 if ( wxGetTopLevelParent(m_winLastFocused) != this )
085ad686 1248 {
2736a5de 1249 m_winLastFocused = NULL;
085ad686 1250 }
085ad686
VZ
1251 }
1252
1253 wxLogTrace(_T("focus"),
dca0f651
VZ
1254 _T("wxTLW %p deactivated, last focused: %p."),
1255 m_hWnd,
1256 m_winLastFocused ? GetHwndOf(m_winLastFocused) : NULL);
085ad686
VZ
1257
1258 event.Skip();
1259 }
1260}
1261
77ffb593 1262// the DialogProc for all wxWidgets dialogs
12447831 1263LONG APIENTRY _EXPORT
0fc58b86 1264wxDlgProc(HWND hDlg,
2eb10e2a 1265 UINT message,
3c96418b
JG
1266 WPARAM WXUNUSED(wParam),
1267 LPARAM WXUNUSED(lParam))
12447831 1268{
08b97268 1269 switch ( message )
12447831 1270 {
08b97268
WS
1271 case WM_INITDIALOG:
1272 {
1273 // under CE, add a "Ok" button in the dialog title bar and make it full
1274 // screen
1275 //
1276 // TODO: find the window for this HWND, and take into account
1277 // wxMAXIMIZE and wxCLOSE_BOX. For now, assume both are present.
1278 //
1279 // Standard SDK doesn't have aygshell.dll: see
1280 // include/wx/msw/wince/libraries.h
3d487566 1281#if defined(__WXWINCE__) && !defined(__WINCE_STANDARDSDK__) && !defined(__HANDHELDPC__)
08b97268
WS
1282 SHINITDLGINFO shidi;
1283 shidi.dwMask = SHIDIM_FLAGS;
1284 shidi.dwFlags = SHIDIF_SIZEDLG // take account of the SIP or menubar
ef6d716b 1285#ifndef __SMARTPHONE__
08b97268 1286 | SHIDIF_DONEBUTTON
ef6d716b
WS
1287#endif
1288 ;
08b97268
WS
1289 shidi.hDlg = hDlg;
1290 SHInitDialog( &shidi );
a48e51ce 1291#else // no SHInitDialog()
08b97268
WS
1292 wxUnusedVar(hDlg);
1293#endif
1294 // for WM_INITDIALOG, returning TRUE tells system to set focus to
1295 // the first control in the dialog box, but as we set the focus
1296 // ourselves, we return FALSE for it as well
1297 return FALSE;
1298 }
12447831 1299 }
a48e51ce
VZ
1300
1301 // for almost all messages, returning FALSE means that we didn't process
1302 // the message
a48e51ce 1303 return FALSE;
12447831
VZ
1304}
1305
2b5f62a0
VZ
1306// ============================================================================
1307// wxTLWHiddenParentModule implementation
1308// ============================================================================
1309
1310HWND wxTLWHiddenParentModule::ms_hwnd = NULL;
1311
1312const wxChar *wxTLWHiddenParentModule::ms_className = NULL;
1313
1314bool wxTLWHiddenParentModule::OnInit()
1315{
1316 ms_hwnd = NULL;
1317 ms_className = NULL;
1318
bfbb0b4c 1319 return true;
2b5f62a0
VZ
1320}
1321
1322void wxTLWHiddenParentModule::OnExit()
1323{
1324 if ( ms_hwnd )
1325 {
1326 if ( !::DestroyWindow(ms_hwnd) )
1327 {
1328 wxLogLastError(_T("DestroyWindow(hidden TLW parent)"));
1329 }
1330
1331 ms_hwnd = NULL;
1332 }
1333
1334 if ( ms_className )
1335 {
1336 if ( !::UnregisterClass(ms_className, wxGetInstance()) )
1337 {
1338 wxLogLastError(_T("UnregisterClass(\"wxTLWHiddenParent\")"));
1339 }
1340
1341 ms_className = NULL;
1342 }
1343}
1344
1345/* static */
1346HWND wxTLWHiddenParentModule::GetHWND()
1347{
1348 if ( !ms_hwnd )
1349 {
1350 if ( !ms_className )
1351 {
1352 static const wxChar *HIDDEN_PARENT_CLASS = _T("wxTLWHiddenParent");
1353
1354 WNDCLASS wndclass;
1355 wxZeroMemory(wndclass);
1356
1357 wndclass.lpfnWndProc = DefWindowProc;
1358 wndclass.hInstance = wxGetInstance();
1359 wndclass.lpszClassName = HIDDEN_PARENT_CLASS;
1360
1361 if ( !::RegisterClass(&wndclass) )
1362 {
1363 wxLogLastError(_T("RegisterClass(\"wxTLWHiddenParent\")"));
1364 }
1365 else
1366 {
1367 ms_className = HIDDEN_PARENT_CLASS;
1368 }
1369 }
1370
fda7962d 1371 ms_hwnd = ::CreateWindow(ms_className, wxEmptyString, 0, 0, 0, 0, 0, NULL,
2b5f62a0
VZ
1372 (HMENU)NULL, wxGetInstance(), NULL);
1373 if ( !ms_hwnd )
1374 {
1375 wxLogLastError(_T("CreateWindow(hidden TLW parent)"));
1376 }
1377 }
1378
1379 return ms_hwnd;
1380}