]> git.saurik.com Git - wxWidgets.git/blame - src/mac/mdi.cpp
compositing and transition changes
[wxWidgets.git] / src / mac / mdi.cpp
CommitLineData
e9576ca5
SC
1/////////////////////////////////////////////////////////////////////////////
2// Name: mdi.cpp
3// Purpose: MDI classes
a31a5f85 4// Author: Stefan Csomor
e9576ca5 5// Modified by:
a31a5f85 6// Created: 1998-01-01
e9576ca5 7// RCS-ID: $Id$
a31a5f85 8// Copyright: (c) Stefan Csomor
e40298d5 9// Licence: wxWindows licence
e9576ca5
SC
10/////////////////////////////////////////////////////////////////////////////
11
12#ifdef __GNUG__
13#pragma implementation "mdi.h"
14#endif
15
16#include "wx/mdi.h"
17#include "wx/menu.h"
18#include "wx/settings.h"
70024cfb 19#include "wx/log.h"
e9576ca5 20
76a5e5d2 21#include "wx/mac/private.h"
70024cfb 22#include "wx/mac/uma.h"
76a5e5d2 23
fe08e597 24extern wxWindowList wxModelessWindows;
e9576ca5 25
2f1ae414 26#if !USE_SHARED_LIBRARY
e9576ca5
SC
27IMPLEMENT_DYNAMIC_CLASS(wxMDIParentFrame, wxFrame)
28IMPLEMENT_DYNAMIC_CLASS(wxMDIChildFrame, wxFrame)
29IMPLEMENT_DYNAMIC_CLASS(wxMDIClientWindow, wxWindow)
30
31BEGIN_EVENT_TABLE(wxMDIParentFrame, wxFrame)
e9576ca5
SC
32 EVT_ACTIVATE(wxMDIParentFrame::OnActivate)
33 EVT_SYS_COLOUR_CHANGED(wxMDIParentFrame::OnSysColourChanged)
34END_EVENT_TABLE()
35
36BEGIN_EVENT_TABLE(wxMDIClientWindow, wxWindow)
37 EVT_SCROLL(wxMDIClientWindow::OnScroll)
38END_EVENT_TABLE()
39
2f1ae414 40#endif
e9576ca5 41
0a67a93b
SC
42static const int IDM_WINDOWTILE = 4001;
43static const int IDM_WINDOWTILEHOR = 4001;
44static const int IDM_WINDOWCASCADE = 4002;
45static const int IDM_WINDOWICONS = 4003;
46static const int IDM_WINDOWNEXT = 4004;
47static const int IDM_WINDOWTILEVERT = 4005;
4f3b37fd 48static const int IDM_WINDOWPREV = 4006;
0a67a93b
SC
49
50// This range gives a maximum of 500 MDI children. Should be enough :-)
51static const int wxFIRST_MDI_CHILD = 4100;
52static const int wxLAST_MDI_CHILD = 4600;
53
54// Status border dimensions
55static const int wxTHICK_LINE_BORDER = 3;
56
e9576ca5
SC
57// Parent frame
58
59wxMDIParentFrame::wxMDIParentFrame()
60{
0a67a93b
SC
61 m_clientWindow = NULL;
62 m_currentChild = NULL;
63 m_windowMenu = (wxMenu*) NULL;
64 m_parentFrameActive = TRUE;
e9576ca5
SC
65}
66
67bool wxMDIParentFrame::Create(wxWindow *parent,
68 wxWindowID id,
69 const wxString& title,
70 const wxPoint& pos,
71 const wxSize& size,
72 long style,
73 const wxString& name)
74{
e40298d5
JS
75 m_clientWindow = NULL;
76 m_currentChild = NULL;
77
78 // this style can be used to prevent a window from having the standard MDI
79 // "Window" menu
80 if ( style & wxFRAME_NO_WINDOW_MENU )
81 {
82 m_windowMenu = (wxMenu *)NULL;
83 style -= wxFRAME_NO_WINDOW_MENU ;
84 }
85 else // normal case: we have the window menu, so construct it
86 {
87 m_windowMenu = new wxMenu;
0a67a93b 88
e40298d5
JS
89 m_windowMenu->Append(IDM_WINDOWCASCADE, wxT("&Cascade"));
90 m_windowMenu->Append(IDM_WINDOWTILEHOR, wxT("Tile &Horizontally"));
91 m_windowMenu->Append(IDM_WINDOWTILEVERT, wxT("Tile &Vertically"));
92 m_windowMenu->AppendSeparator();
93 m_windowMenu->Append(IDM_WINDOWICONS, wxT("&Arrange Icons"));
94 m_windowMenu->Append(IDM_WINDOWNEXT, wxT("&Next"));
95 }
96
70024cfb 97 wxFrame::Create( parent , id , title , pos , size , style , name ) ;
e40298d5
JS
98 m_parentFrameActive = TRUE;
99
100 OnCreateClient();
101
e9576ca5
SC
102 return TRUE;
103}
104
105wxMDIParentFrame::~wxMDIParentFrame()
106{
0a67a93b
SC
107 DestroyChildren();
108 // already delete by DestroyChildren()
35eace3a 109#if wxUSE_TOOLBAR
0a67a93b 110 m_frameToolBar = NULL;
35eace3a
JS
111#endif
112#if wxUSE_STATUSBAR
0a67a93b 113 m_frameStatusBar = NULL;
35eace3a 114#endif
0a67a93b 115 m_clientWindow = NULL ;
e40298d5 116
0a67a93b
SC
117 if (m_windowMenu)
118 {
119 delete m_windowMenu;
120 m_windowMenu = (wxMenu*) NULL;
121 }
e40298d5 122
0a67a93b
SC
123 if ( m_clientWindow )
124 {
125 delete m_clientWindow;
126 m_clientWindow = NULL ;
127 }
e9576ca5
SC
128}
129
0a67a93b 130
e9576ca5
SC
131void wxMDIParentFrame::SetMenuBar(wxMenuBar *menu_bar)
132{
e40298d5 133 wxFrame::SetMenuBar( menu_bar ) ;
e9576ca5
SC
134}
135
70024cfb 136void wxMDIParentFrame::MacActivate(long timestamp, bool activating)
e9576ca5 137{
7d671c08 138 wxLogDebug(wxT("MDI PARENT=%p MacActivate(0x%08lx,%s)"),this,timestamp,activating?wxT("ACTIV"):wxT("deact"));
70024cfb 139 if(activating)
e40298d5 140 {
70024cfb
DE
141 if(s_macDeactivateWindow && s_macDeactivateWindow->GetParent()==this)
142 {
7d671c08 143 wxLogDebug(wxT("child had been scheduled for deactivation, rehighlighting"));
70024cfb 144 UMAHighlightAndActivateWindow((WindowRef)s_macDeactivateWindow->MacGetWindowRef(), true);
7d671c08 145 wxLogDebug(wxT("done highliting child"));
70024cfb
DE
146 s_macDeactivateWindow = NULL;
147 }
148 else if(s_macDeactivateWindow == this)
149 {
7d671c08 150 wxLogDebug(wxT("Avoided deactivation/activation of this=%p"), this);
70024cfb
DE
151 s_macDeactivateWindow = NULL;
152 }
153 else // window to deactivate is NULL or is not us or one of our kids
154 {
155 // activate kid instead
156 if(m_currentChild)
157 m_currentChild->MacActivate(timestamp,activating);
158 else
159 wxFrame::MacActivate(timestamp,activating);
160 }
e40298d5 161 }
70024cfb 162 else
e40298d5 163 {
70024cfb
DE
164 // We were scheduled for deactivation, and now we do it.
165 if(s_macDeactivateWindow==this)
e40298d5 166 {
70024cfb
DE
167 s_macDeactivateWindow = NULL;
168 if(m_currentChild)
169 m_currentChild->MacActivate(timestamp,activating);
170 wxFrame::MacActivate(timestamp,activating);
171 }
172 else // schedule ourselves for deactivation
173 {
174 if(s_macDeactivateWindow)
7d671c08
SC
175 wxLogDebug(wxT("window=%p SHOULD have been deactivated, oh well!"),s_macDeactivateWindow);
176 wxLogDebug(wxT("Scheduling delayed MDI Parent deactivation"));
70024cfb 177 s_macDeactivateWindow = this;
e40298d5 178 }
e40298d5 179 }
e9576ca5
SC
180}
181
70024cfb
DE
182void wxMDIParentFrame::OnActivate(wxActivateEvent& event)
183{
184 event.Skip();
185}
186
e9576ca5
SC
187// Returns the active MDI child window
188wxMDIChildFrame *wxMDIParentFrame::GetActiveChild() const
189{
e40298d5 190 return m_currentChild ;
e9576ca5
SC
191}
192
193// Create the client window class (don't Create the window,
194// just return a new class)
195wxMDIClientWindow *wxMDIParentFrame::OnCreateClient()
196{
0a67a93b
SC
197 m_clientWindow = new wxMDIClientWindow( this );
198 return m_clientWindow;
e9576ca5
SC
199}
200
201// Responds to colour changes, and passes event on to children.
202void wxMDIParentFrame::OnSysColourChanged(wxSysColourChangedEvent& event)
203{
204 // TODO
e40298d5 205
e9576ca5
SC
206 // Propagate the event to the non-top-level children
207 wxFrame::OnSysColourChanged(event);
208}
209
210// MDI operations
211void wxMDIParentFrame::Cascade()
212{
213 // TODO
214}
215
216void wxMDIParentFrame::Tile()
217{
218 // TODO
219}
220
221void wxMDIParentFrame::ArrangeIcons()
222{
223 // TODO
224}
225
226void wxMDIParentFrame::ActivateNext()
227{
228 // TODO
229}
230
231void wxMDIParentFrame::ActivatePrevious()
232{
233 // TODO
234}
235
236// Child frame
237
238wxMDIChildFrame::wxMDIChildFrame()
0a67a93b
SC
239{
240 Init() ;
241}
242void wxMDIChildFrame::Init()
e9576ca5
SC
243{
244}
245
246bool wxMDIChildFrame::Create(wxMDIParentFrame *parent,
e40298d5
JS
247 wxWindowID id,
248 const wxString& title,
249 const wxPoint& pos,
250 const wxSize& size,
251 long style,
252 const wxString& name)
e9576ca5
SC
253{
254 SetName(name);
e40298d5 255
e9576ca5
SC
256 if ( id > -1 )
257 m_windowId = id;
258 else
259 m_windowId = (int)NewControlId();
e40298d5 260
e9576ca5 261 if (parent) parent->AddChild(this);
e40298d5
JS
262
263 MacCreateRealWindow( title, pos , size , MacRemoveBordersFromStyle(style) , name ) ;
264
265 m_macWindowBackgroundTheme = kThemeBrushDocumentWindowBackground ;
266 SetThemeWindowBackground( (WindowRef) m_macWindow , m_macWindowBackgroundTheme , false ) ;
267
e9576ca5
SC
268 wxModelessWindows.Append(this);
269 return FALSE;
270}
271
272wxMDIChildFrame::~wxMDIChildFrame()
273{
70024cfb
DE
274 wxMDIParentFrame *mdiparent = wxDynamicCast(m_parent, wxMDIParentFrame);
275 wxASSERT(mdiparent);
276 if(mdiparent->m_currentChild == this)
277 mdiparent->m_currentChild = NULL;
0a67a93b
SC
278 DestroyChildren();
279 // already delete by DestroyChildren()
35eace3a 280#if wxUSE_TOOLBAR
0a67a93b 281 m_frameToolBar = NULL;
35eace3a
JS
282#endif
283#if wxUSE_STATUSBAR
0a67a93b 284 m_frameStatusBar = NULL;
35eace3a 285#endif
e9576ca5
SC
286}
287
288void wxMDIChildFrame::SetMenuBar(wxMenuBar *menu_bar)
289{
e40298d5 290 return wxFrame::SetMenuBar( menu_bar ) ;
e9576ca5
SC
291}
292
70024cfb
DE
293void wxMDIChildFrame::MacActivate(long timestamp, bool activating)
294{
7d671c08 295 wxLogDebug(wxT("MDI child=%p MacActivate(0x%08lx,%s)"),this,timestamp,activating?wxT("ACTIV"):wxT("deact"));
70024cfb
DE
296 wxMDIParentFrame *mdiparent = wxDynamicCast(m_parent, wxMDIParentFrame);
297 wxASSERT(mdiparent);
298 if(activating)
299 {
300 if(s_macDeactivateWindow == m_parent)
301 {
7d671c08 302 wxLogDebug(wxT("parent had been scheduled for deactivation, rehighlighting"));
70024cfb 303 UMAHighlightAndActivateWindow((WindowRef)s_macDeactivateWindow->MacGetWindowRef(), true);
7d671c08 304 wxLogDebug(wxT("done highliting parent"));
70024cfb
DE
305 s_macDeactivateWindow = NULL;
306 }
307 else if((mdiparent->m_currentChild==this) || !s_macDeactivateWindow)
308 mdiparent->wxFrame::MacActivate(timestamp,activating);
309
310 if(mdiparent->m_currentChild && mdiparent->m_currentChild!=this)
311 mdiparent->m_currentChild->wxFrame::MacActivate(timestamp,false);
312 mdiparent->m_currentChild = this;
313
314 if(s_macDeactivateWindow==this)
315 {
7d671c08 316 wxLogDebug(wxT("Avoided deactivation/activation of this=%p"),this);
70024cfb
DE
317 s_macDeactivateWindow=NULL;
318 }
319 else
320 wxFrame::MacActivate(timestamp, activating);
321 }
322 else
323 {
324 // We were scheduled for deactivation, and now we do it.
325 if(s_macDeactivateWindow==this)
326 {
327 s_macDeactivateWindow = NULL;
328 wxFrame::MacActivate(timestamp,activating);
329 if(mdiparent->m_currentChild==this)
330 mdiparent->wxFrame::MacActivate(timestamp,activating);
331 }
332 else // schedule ourselves for deactivation
333 {
334 if(s_macDeactivateWindow)
7d671c08
SC
335 wxLogDebug(wxT("window=%p SHOULD have been deactivated, oh well!"),s_macDeactivateWindow);
336 wxLogDebug(wxT("Scheduling delayed deactivation"));
70024cfb
DE
337 s_macDeactivateWindow = this;
338 }
339 }
340}
341
e9576ca5
SC
342// MDI operations
343void wxMDIChildFrame::Maximize()
344{
0a67a93b 345 wxFrame::Maximize() ;
e9576ca5
SC
346}
347
348void wxMDIChildFrame::Restore()
349{
0a67a93b 350 wxFrame::Restore() ;
e9576ca5
SC
351}
352
353void wxMDIChildFrame::Activate()
354{
e9576ca5
SC
355}
356
0a67a93b
SC
357//-----------------------------------------------------------------------------
358// wxMDIClientWindow
359//-----------------------------------------------------------------------------
e9576ca5
SC
360
361wxMDIClientWindow::wxMDIClientWindow()
362{
363}
364
365wxMDIClientWindow::~wxMDIClientWindow()
366{
0a67a93b 367 DestroyChildren();
e9576ca5
SC
368}
369
370bool wxMDIClientWindow::CreateClient(wxMDIParentFrame *parent, long style)
371{
e40298d5 372
0a67a93b 373 m_windowId = (int)NewControlId();
e40298d5 374
0a67a93b
SC
375 if ( parent )
376 {
e40298d5 377 parent->AddChild(this);
0a67a93b 378 }
a756f210 379 m_backgroundColour = wxSystemSettings::GetColour(wxSYS_COLOUR_APPWORKSPACE);
e40298d5 380
0a67a93b
SC
381 wxModelessWindows.Append(this);
382 return TRUE;
e9576ca5
SC
383}
384
be7a1013
DE
385// Get size *available for subwindows* i.e. excluding menu bar.
386void wxMDIClientWindow::DoGetClientSize(int *x, int *y) const
387{
388 wxDisplaySize( x , y ) ;
389}
390
e9576ca5
SC
391// Explicitly call default scroll behaviour
392void wxMDIClientWindow::OnScroll(wxScrollEvent& event)
393{
e9576ca5
SC
394}
395