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