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