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