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