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