]> git.saurik.com Git - wxWidgets.git/blob - src/mac/frame.cpp
Updated to new PyCrust
[wxWidgets.git] / src / mac / frame.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: frame.cpp
3 // Purpose: wxFrameMac
4 // Author: AUTHOR
5 // Modified by:
6 // Created: ??/??/98
7 // RCS-ID: $Id$
8 // Copyright: (c) AUTHOR
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 #ifdef __GNUG__
13 #pragma implementation "frame.h"
14 #endif
15
16 #include "wx/frame.h"
17 #include "wx/statusbr.h"
18 #include "wx/toolbar.h"
19 #include "wx/menuitem.h"
20 #include "wx/menu.h"
21 #include "wx/dcclient.h"
22 #include "wx/dialog.h"
23 #include "wx/settings.h"
24 #include "wx/app.h"
25
26 #include "wx/mac/uma.h"
27
28 extern wxWindowList wxModelessWindows;
29 extern wxList wxPendingDelete;
30
31 #if !USE_SHARED_LIBRARY
32 BEGIN_EVENT_TABLE(wxFrameMac, wxFrameBase)
33 EVT_ACTIVATE(wxFrameMac::OnActivate)
34 // EVT_MENU_HIGHLIGHT_ALL(wxFrameMac::OnMenuHighlight)
35 EVT_SYS_COLOUR_CHANGED(wxFrameMac::OnSysColourChanged)
36 // EVT_IDLE(wxFrameMac::OnIdle)
37 // EVT_CLOSE(wxFrameMac::OnCloseWindow)
38 END_EVENT_TABLE()
39
40 IMPLEMENT_DYNAMIC_CLASS(wxFrameMac, wxWindow)
41 #endif
42 #ifndef __WXUNIVERSAL__
43 IMPLEMENT_DYNAMIC_CLASS(wxFrame, wxFrameMac)
44 #endif
45
46 #if wxUSE_NATIVE_STATUSBAR
47 bool wxFrameMac::m_useNativeStatusBar = TRUE;
48 #else
49 bool wxFrameMac::m_useNativeStatusBar = FALSE;
50 #endif
51
52 #define WX_MAC_STATUSBAR_HEIGHT 15
53 // ----------------------------------------------------------------------------
54 // creation/destruction
55 // ----------------------------------------------------------------------------
56
57 void wxFrameMac::Init()
58 {
59 m_frameMenuBar = NULL;
60
61 #if wxUSE_TOOLBAR
62 m_frameToolBar = NULL ;
63 #endif
64 m_frameStatusBar = NULL;
65 m_winLastFocused = NULL ;
66
67 m_iconized = FALSE;
68
69 #if wxUSE_TOOLTIPS
70 m_hwndToolTip = 0;
71 #endif
72 }
73
74 wxPoint wxFrameMac::GetClientAreaOrigin() const
75 {
76 // on mac we are at position -1,-1 with the control
77 wxPoint pt(0, 0);
78
79 #if wxUSE_TOOLBAR
80 if ( GetToolBar() )
81 {
82 int w, h;
83 GetToolBar()->GetSize(& w, & h);
84
85 if ( GetToolBar()->GetWindowStyleFlag() & wxTB_VERTICAL )
86 {
87 pt.x += w - 1;
88 }
89 else
90 {
91 pt.y += h - 1 ;
92 }
93 }
94 #endif // wxUSE_TOOLBAR
95
96 return pt;
97 }
98
99 bool wxFrameMac::Create(wxWindow *parent,
100 wxWindowID id,
101 const wxString& title,
102 const wxPoint& pos,
103 const wxSize& size,
104 long style,
105 const wxString& name)
106 {
107 SetBackgroundColour(wxSystemSettings::GetSystemColour(wxSYS_COLOUR_APPWORKSPACE));
108
109 if ( !wxTopLevelWindow::Create(parent, id, title, pos, size, style, name) )
110 return FALSE;
111
112 MacCreateRealWindow( title, pos , size , MacRemoveBordersFromStyle(style) , name ) ;
113
114 m_macWindowData->m_macWindowBackgroundTheme = kThemeBrushDocumentWindowBackground ;
115
116 wxModelessWindows.Append(this);
117
118 return TRUE;
119 }
120
121 wxFrameMac::~wxFrameMac()
122 {
123 m_isBeingDeleted = TRUE;
124
125 DeleteAllBars();
126
127 }
128
129
130 bool wxFrameMac::Enable(bool enable)
131 {
132 if ( !wxWindow::Enable(enable) )
133 return FALSE;
134
135 if ( m_frameMenuBar && m_frameMenuBar == wxMenuBar::MacGetInstalledMenuBar() )
136 {
137 for ( int i = 0 ; i < m_frameMenuBar->GetMenuCount() ; ++ i )
138 {
139 m_frameMenuBar->EnableTop( i , enable ) ;
140 }
141 }
142
143 return TRUE;
144 }
145
146 wxStatusBar *wxFrameMac::OnCreateStatusBar(int number, long style, wxWindowID id,
147 const wxString& name)
148 {
149 wxStatusBar *statusBar = NULL;
150
151 statusBar = new wxStatusBar(this, id,
152 style, name);
153 statusBar->SetSize( 100 , 15 ) ;
154 statusBar->SetFieldsCount(number);
155 return statusBar;
156 }
157
158 void wxFrameMac::PositionStatusBar()
159 {
160 if (m_frameStatusBar )
161 {
162 int w, h;
163 GetClientSize(&w, &h);
164 int sw, sh;
165 m_frameStatusBar->GetSize(&sw, &sh);
166
167 // Since we wish the status bar to be directly under the client area,
168 // we use the adjusted sizes without using wxSIZE_NO_ADJUSTMENTS.
169 m_frameStatusBar->SetSize(0, h, w, sh);
170 }
171 }
172
173 // Responds to colour changes, and passes event on to children.
174 void wxFrameMac::OnSysColourChanged(wxSysColourChangedEvent& event)
175 {
176 SetBackgroundColour(wxSystemSettings::GetSystemColour(wxSYS_COLOUR_APPWORKSPACE));
177 Refresh();
178
179 if ( m_frameStatusBar )
180 {
181 wxSysColourChangedEvent event2;
182 event2.SetEventObject( m_frameStatusBar );
183 m_frameStatusBar->ProcessEvent(event2);
184 }
185
186 // Propagate the event to the non-top-level children
187 wxWindow::OnSysColourChanged(event);
188 }
189
190
191 // Default activation behaviour - set the focus for the first child
192 // subwindow found.
193 void wxFrameMac::OnActivate(wxActivateEvent& event)
194 {
195 if ( !event.GetActive() )
196 {
197 // remember the last focused child if it is our child
198 m_winLastFocused = FindFocus();
199
200 // so we NULL it out if it's a child from some other frame
201 wxWindow *win = m_winLastFocused;
202 while ( win )
203 {
204 if ( win->IsTopLevel() )
205 {
206 if ( win != this )
207 {
208 m_winLastFocused = NULL;
209 }
210
211 break;
212 }
213
214 win = win->GetParent();
215 }
216
217 event.Skip();
218 }
219 else
220 {
221 // restore focus to the child which was last focused
222 wxWindow *parent = m_winLastFocused ? m_winLastFocused->GetParent()
223 : NULL;
224 if ( !parent )
225 {
226 parent = this;
227 }
228
229 wxSetFocusToChild(parent, &m_winLastFocused);
230
231 if ( m_frameMenuBar != NULL )
232 {
233 m_frameMenuBar->MacInstallMenuBar() ;
234 }
235 }
236 }
237
238 void wxFrameMac::DoGetClientSize(int *x, int *y) const
239 {
240 wxWindow::DoGetClientSize( x , y ) ;
241
242 #if wxUSE_STATUSBAR
243 if ( GetStatusBar() && y )
244 {
245 int statusX, statusY;
246 GetStatusBar()->GetClientSize(&statusX, &statusY);
247 *y -= statusY;
248 }
249 #endif // wxUSE_STATUSBAR
250
251 wxPoint pt(GetClientAreaOrigin());
252 if ( y )
253 *y -= pt.y;
254 if ( x )
255 *x -= pt.x;
256 }
257
258 void wxFrameMac::DoSetClientSize(int clientwidth, int clientheight)
259 {
260 int currentclientwidth , currentclientheight ;
261 int currentwidth , currentheight ;
262
263 GetClientSize( &currentclientwidth , &currentclientheight ) ;
264 GetSize( &currentwidth , &currentheight ) ;
265
266 // find the current client size
267
268 // Find the difference between the entire window (title bar and all)
269 // and the client area; add this to the new client size to move the
270 // window
271
272 DoSetSize( -1 , -1 , currentwidth + clientwidth - currentclientwidth ,
273 currentheight + clientheight - currentclientheight , wxSIZE_USE_EXISTING ) ;
274 }
275
276
277 #if wxUSE_TOOLBAR
278 wxToolBar* wxFrameMac::CreateToolBar(long style, wxWindowID id, const wxString& name)
279 {
280 if ( wxFrameBase::CreateToolBar(style, id, name) )
281 {
282 PositionToolBar();
283 }
284
285 return m_frameToolBar;
286 }
287
288 void wxFrameMac::PositionToolBar()
289 {
290 int cw, ch;
291
292 cw = m_width ;
293 ch = m_height ;
294
295 if ( GetStatusBar() )
296 {
297 int statusX, statusY;
298 GetStatusBar()->GetClientSize(&statusX, &statusY);
299 ch -= statusY;
300 }
301
302 if (GetToolBar())
303 {
304 int tw, th;
305 GetToolBar()->GetSize(& tw, & th);
306
307 if (GetToolBar()->GetWindowStyleFlag() & wxTB_VERTICAL)
308 {
309 // Use the 'real' position. wxSIZE_NO_ADJUSTMENTS
310 // means, pretend we don't have toolbar/status bar, so we
311 // have the original client size.
312 GetToolBar()->SetSize(-1, -1, tw, ch + 2 , wxSIZE_NO_ADJUSTMENTS | wxSIZE_ALLOW_MINUS_ONE );
313 }
314 else
315 {
316 // Use the 'real' position
317 GetToolBar()->SetSize(-1, -1, cw + 2, th, wxSIZE_NO_ADJUSTMENTS | wxSIZE_ALLOW_MINUS_ONE );
318 }
319 }
320 }
321 #endif