]> git.saurik.com Git - wxWidgets.git/blame - src/mac/carbon/frame.cpp
renamed RGBColor setter to avoid former overload being an override
[wxWidgets.git] / src / mac / carbon / frame.cpp
CommitLineData
e9576ca5
SC
1/////////////////////////////////////////////////////////////////////////////
2// Name: frame.cpp
0d53fc34 3// Purpose: wxFrame
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
65571936 9// Licence: wxWindows licence
e9576ca5
SC
10/////////////////////////////////////////////////////////////////////////////
11
3d1a4878
SC
12#include "wx/wxprec.h"
13
e9576ca5 14#include "wx/frame.h"
03e11df5 15#include "wx/statusbr.h"
e9576ca5
SC
16#include "wx/toolbar.h"
17#include "wx/menuitem.h"
18#include "wx/menu.h"
19#include "wx/dcclient.h"
20#include "wx/dialog.h"
21#include "wx/settings.h"
22#include "wx/app.h"
23
d497dca4 24#include "wx/mac/uma.h"
519cb848 25
fe08e597 26extern wxWindowList wxModelessWindows;
617bfeec 27//extern wxList wxPendingDelete;
e9576ca5 28
0d53fc34
VS
29BEGIN_EVENT_TABLE(wxFrame, wxFrameBase)
30 EVT_ACTIVATE(wxFrame::OnActivate)
31 // EVT_MENU_HIGHLIGHT_ALL(wxFrame::OnMenuHighlight)
32 EVT_SYS_COLOUR_CHANGED(wxFrame::OnSysColourChanged)
33// EVT_IDLE(wxFrame::OnIdle)
34// EVT_CLOSE(wxFrame::OnCloseWindow)
e9576ca5
SC
35END_EVENT_TABLE()
36
ac0fa9ef 37IMPLEMENT_DYNAMIC_CLASS(wxFrame, wxTopLevelWindow)
e9576ca5 38
902725ee 39#define WX_MAC_STATUSBAR_HEIGHT 18
7ad25aed 40
2f1ae414
SC
41// ----------------------------------------------------------------------------
42// creation/destruction
43// ----------------------------------------------------------------------------
44
0d53fc34 45void wxFrame::Init()
e9576ca5 46{
e40298d5 47 m_frameMenuBar = NULL;
7ad25aed
DS
48 m_frameStatusBar = NULL;
49 m_winLastFocused = NULL;
902725ee 50
0a67a93b 51#if wxUSE_TOOLBAR
7ad25aed 52 m_frameToolBar = NULL;
0a67a93b 53#endif
902725ee 54
2f1ae414 55#if wxUSE_TOOLTIPS
7ad25aed
DS
56 // NB: is this used anywhere?
57 m_hwndToolTip = NULL;
519cb848 58#endif
7ad25aed
DS
59
60 m_iconized = false;
2f1ae414 61}
e7549107 62
0d53fc34 63bool wxFrame::Create(wxWindow *parent,
e9576ca5
SC
64 wxWindowID id,
65 const wxString& title,
66 const wxPoint& pos,
67 const wxSize& size,
68 long style,
69 const wxString& name)
70{
902725ee 71
a15eb0a5 72 if ( !wxTopLevelWindow::Create(parent, id, title, pos, size, style, name) )
902725ee
WS
73 return false;
74
e40298d5 75 wxModelessWindows.Append(this);
902725ee
WS
76
77 return true;
e9576ca5
SC
78}
79
0d53fc34 80wxFrame::~wxFrame()
e9576ca5 81{
902725ee 82 m_isBeingDeleted = true;
e40298d5 83 DeleteAllBars();
e9576ca5
SC
84}
85
e56d2520
SC
86// get the origin of the client area in the client coordinates
87wxPoint wxFrame::GetClientAreaOrigin() const
88{
89 wxPoint pt = wxTopLevelWindow::GetClientAreaOrigin();
7ad25aed 90
e56d2520
SC
91#if wxUSE_TOOLBAR && !defined(__WXUNIVERSAL__)
92 wxToolBar *toolbar = GetToolBar();
93 if ( toolbar && toolbar->IsShown() )
94 {
95 int w, h;
96 toolbar->GetSize(&w, &h);
7ad25aed 97
e56d2520
SC
98 if ( toolbar->GetWindowStyleFlag() & wxTB_VERTICAL )
99 {
100 pt.x += w;
101 }
102 else
103 {
104#if !wxMAC_USE_NATIVE_TOOLBAR
105 pt.y += h;
106#endif
107 }
108 }
7ad25aed 109#endif
be6068f6 110
e56d2520
SC
111 return pt;
112}
e9576ca5 113
0d53fc34 114bool wxFrame::Enable(bool enable)
e9576ca5 115{
2f1ae414 116 if ( !wxWindow::Enable(enable) )
902725ee 117 return false;
e9576ca5 118
e40298d5
JS
119 if ( m_frameMenuBar && m_frameMenuBar == wxMenuBar::MacGetInstalledMenuBar() )
120 {
7ad25aed 121 int iMaxMenu = m_frameMenuBar->GetMenuCount();
e40298d5
JS
122 for ( int i = 0 ; i < iMaxMenu ; ++ i )
123 {
124 m_frameMenuBar->EnableTop( i , enable ) ;
125 }
126 }
2f1ae414 127
902725ee 128 return true;
2f1ae414 129}
e9576ca5 130
0d53fc34 131wxStatusBar *wxFrame::OnCreateStatusBar(int number, long style, wxWindowID id,
e9576ca5
SC
132 const wxString& name)
133{
7ad25aed 134 wxStatusBar *statusBar;
e9576ca5 135
7ad25aed 136 statusBar = new wxStatusBar(this, id, style, name);
617bfeec 137 statusBar->SetSize(100, WX_MAC_STATUSBAR_HEIGHT);
e9576ca5 138 statusBar->SetFieldsCount(number);
7ad25aed 139
e9576ca5
SC
140 return statusBar;
141}
142
0d53fc34 143void wxFrame::PositionStatusBar()
e9576ca5 144{
f5d63a57 145 if (m_frameStatusBar && m_frameStatusBar->IsShown() )
e40298d5
JS
146 {
147 int w, h;
148 GetClientSize(&w, &h);
902725ee 149
e40298d5
JS
150 // Since we wish the status bar to be directly under the client area,
151 // we use the adjusted sizes without using wxSIZE_NO_ADJUSTMENTS.
f80ffb32 152 m_frameStatusBar->SetSize(0, h, w, WX_MAC_STATUSBAR_HEIGHT);
e40298d5 153 }
e9576ca5
SC
154}
155
e9576ca5 156// Responds to colour changes, and passes event on to children.
0d53fc34 157void wxFrame::OnSysColourChanged(wxSysColourChangedEvent& event)
e9576ca5 158{
a756f210 159 SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_APPWORKSPACE));
e9576ca5
SC
160 Refresh();
161
162 if ( m_frameStatusBar )
163 {
164 wxSysColourChangedEvent event2;
7ad25aed 165
e9576ca5
SC
166 event2.SetEventObject( m_frameStatusBar );
167 m_frameStatusBar->ProcessEvent(event2);
168 }
169
170 // Propagate the event to the non-top-level children
171 wxWindow::OnSysColourChanged(event);
172}
173
e9576ca5
SC
174// Default activation behaviour - set the focus for the first child
175// subwindow found.
0d53fc34 176void wxFrame::OnActivate(wxActivateEvent& event)
e9576ca5 177{
2f1ae414 178 if ( !event.GetActive() )
e9576ca5 179 {
a15eb0a5 180 // remember the last focused child if it is our child
7810c95b 181 m_winLastFocused = FindFocus();
a15eb0a5
SC
182
183 // so we NULL it out if it's a child from some other frame
184 wxWindow *win = m_winLastFocused;
185 while ( win )
7810c95b 186 {
a15eb0a5
SC
187 if ( win->IsTopLevel() )
188 {
189 if ( win != this )
a15eb0a5 190 m_winLastFocused = NULL;
a15eb0a5 191
7810c95b 192 break;
a15eb0a5 193 }
7810c95b 194
a15eb0a5 195 win = win->GetParent();
7810c95b
SC
196 }
197
2f1ae414 198 event.Skip();
e9576ca5 199 }
e40298d5
JS
200 else
201 {
a15eb0a5 202 // restore focus to the child which was last focused
7ad25aed
DS
203 wxWindow *parent = m_winLastFocused
204 ? m_winLastFocused->GetParent()
205 : NULL;
206
617bfeec 207 if (parent == NULL)
a15eb0a5 208 parent = this;
a15eb0a5 209
e40298d5 210 wxSetFocusToChild(parent, &m_winLastFocused);
7810c95b 211
7ad25aed 212 if (m_frameMenuBar != NULL)
e40298d5 213 {
617bfeec 214 m_frameMenuBar->MacInstallMenuBar();
e40298d5 215 }
617bfeec 216 else
2b5f62a0 217 {
617bfeec
DS
218 wxFrame *tlf = wxDynamicCast( wxTheApp->GetTopWindow(), wxFrame );
219 if (tlf != NULL)
220 {
221 // Trying top-level frame membar
222 if (tlf->GetMenuBar())
223 tlf->GetMenuBar()->MacInstallMenuBar();
224 }
225 }
e40298d5 226 }
e9576ca5
SC
227}
228
2b5f62a0
VZ
229void wxFrame::DetachMenuBar()
230{
231 if ( m_frameMenuBar )
2b5f62a0 232 m_frameMenuBar->UnsetInvokingWindow();
2b5f62a0
VZ
233
234 wxFrameBase::DetachMenuBar();
235}
236
237void wxFrame::AttachMenuBar( wxMenuBar *menuBar )
238{
487eedb8 239 wxFrame* tlf = wxDynamicCast( wxFindWinFromMacWindow( FrontNonFloatingWindow() ) , wxFrame );
be6068f6 240 bool makeCurrent = false;
d059fe4a 241
d059fe4a 242 // if this is already the current menubar or we are the frontmost window
487eedb8 243 if ( (tlf == this) || (m_frameMenuBar == wxMenuBar::MacGetInstalledMenuBar()) )
be6068f6
DS
244 makeCurrent = true;
245 // or there is an app-level menubar like MDI
487eedb8 246 else if ( tlf && (tlf->GetMenuBar() == NULL) && (((wxFrame*)wxTheApp->GetTopWindow()) == this) )
be6068f6
DS
247 makeCurrent = true;
248
249 wxFrameBase::AttachMenuBar( menuBar );
2b5f62a0
VZ
250
251 if (m_frameMenuBar)
d059fe4a 252 {
2b5f62a0 253 m_frameMenuBar->SetInvokingWindow( this );
d059fe4a 254 if (makeCurrent)
be6068f6 255 m_frameMenuBar->MacInstallMenuBar();
d059fe4a 256 }
2b5f62a0
VZ
257}
258
0d53fc34 259void wxFrame::DoGetClientSize(int *x, int *y) const
e9576ca5 260{
7ad25aed 261 wxTopLevelWindow::DoGetClientSize( x , y );
902725ee 262
2f1ae414 263#if wxUSE_STATUSBAR
f5d63a57 264 if ( GetStatusBar() && GetStatusBar()->IsShown() && y )
902725ee 265 *y -= WX_MAC_STATUSBAR_HEIGHT;
7ad25aed 266#endif
902725ee 267
facd6764
SC
268#if wxUSE_TOOLBAR
269 wxToolBar *toolbar = GetToolBar();
270 if ( toolbar && toolbar->IsShown() )
271 {
272 int w, h;
273 toolbar->GetSize(&w, &h);
274
275 if ( toolbar->GetWindowStyleFlag() & wxTB_VERTICAL )
276 {
7ad25aed
DS
277 if ( x )
278 *x -= w;
facd6764
SC
279 }
280 else
281 {
a85245b1 282#if !wxMAC_USE_NATIVE_TOOLBAR
7ad25aed
DS
283 if ( y )
284 *y -= h;
a85245b1 285#endif
facd6764
SC
286 }
287 }
7ad25aed 288#endif
e9576ca5
SC
289}
290
902725ee 291bool wxFrame::MacIsChildOfClientArea( const wxWindow* child ) const
e905b636
SC
292{
293#if wxUSE_STATUSBAR
294 if ( child == GetStatusBar() )
295 return false ;
7ad25aed 296#endif
e905b636
SC
297
298#if wxUSE_TOOLBAR
299 if ( child == GetToolBar() )
300 return false ;
7ad25aed 301#endif
e905b636
SC
302
303 return wxFrameBase::MacIsChildOfClientArea( child ) ;
304}
305
0d53fc34 306void wxFrame::DoSetClientSize(int clientwidth, int clientheight)
e9576ca5 307{
e40298d5
JS
308 int currentclientwidth , currentclientheight ;
309 int currentwidth , currentheight ;
902725ee 310
e40298d5 311 GetClientSize( &currentclientwidth , &currentclientheight ) ;
facd6764
SC
312 if ( clientwidth == -1 )
313 clientwidth = currentclientwidth ;
314 if ( clientheight == -1 )
315 clientheight = currentclientheight ;
e40298d5 316 GetSize( &currentwidth , &currentheight ) ;
902725ee 317
e40298d5 318 // find the current client size
519cb848 319
7ad25aed
DS
320 // Find the difference between the entire window (title bar and all) and
321 // the client area; add this to the new client size to move the window
e40298d5
JS
322 DoSetSize( -1 , -1 , currentwidth + clientwidth - currentclientwidth ,
323 currentheight + clientheight - currentclientheight , wxSIZE_USE_EXISTING ) ;
e9576ca5
SC
324}
325
519cb848 326#if wxUSE_TOOLBAR
e56d2520
SC
327void wxFrame::SetToolBar(wxToolBar *toolbar)
328{
329 if ( m_frameToolBar == toolbar )
330 return ;
be6068f6 331
e56d2520
SC
332#if wxMAC_USE_NATIVE_TOOLBAR
333 if ( m_frameToolBar )
7ad25aed 334 m_frameToolBar->MacInstallNativeToolbar( false ) ;
e56d2520 335#endif
7ad25aed 336
e56d2520 337 m_frameToolBar = toolbar ;
7ad25aed 338
e56d2520
SC
339#if wxMAC_USE_NATIVE_TOOLBAR
340 if ( toolbar )
341 toolbar->MacInstallNativeToolbar( true ) ;
342#endif
343}
344
0d53fc34 345wxToolBar* wxFrame::CreateToolBar(long style, wxWindowID id, const wxString& name)
e9576ca5 346{
2f1ae414 347 if ( wxFrameBase::CreateToolBar(style, id, name) )
e9576ca5 348 PositionToolBar();
e9576ca5 349
2f1ae414 350 return m_frameToolBar;
e9576ca5
SC
351}
352
0d53fc34 353void wxFrame::PositionToolBar()
e9576ca5
SC
354{
355 int cw, ch;
356
facd6764 357 GetSize( &cw , &ch ) ;
e9576ca5 358
7ad25aed 359 if (GetStatusBar() && GetStatusBar()->IsShown())
e9576ca5 360 {
7ad25aed
DS
361 int statusX, statusY;
362
363 GetStatusBar()->GetClientSize(&statusX, &statusY);
364 ch -= statusY;
e9576ca5
SC
365 }
366
367 if (GetToolBar())
368 {
facd6764 369 int tx, ty, tw, th;
902725ee 370
7ad25aed
DS
371 tx = ty = 0 ;
372 GetToolBar()->GetSize(&tw, &th);
e9576ca5
SC
373 if (GetToolBar()->GetWindowStyleFlag() & wxTB_VERTICAL)
374 {
375 // Use the 'real' position. wxSIZE_NO_ADJUSTMENTS
376 // means, pretend we don't have toolbar/status bar, so we
377 // have the original client size.
facd6764 378 GetToolBar()->SetSize(tx , ty , tw, ch , wxSIZE_NO_ADJUSTMENTS );
e9576ca5
SC
379 }
380 else
381 {
e56d2520 382#if !wxMAC_USE_NATIVE_TOOLBAR
e9576ca5 383 // Use the 'real' position
facd6764 384 GetToolBar()->SetSize(tx , ty , cw , th, wxSIZE_NO_ADJUSTMENTS );
e56d2520 385#endif
e9576ca5
SC
386 }
387 }
388}
6f02a879
VZ
389
390void wxFrame::PositionBars()
391{
392#if wxUSE_STATUSBAR
393 PositionStatusBar();
394#endif
395#if wxUSE_TOOLBAR
396 PositionToolBar();
397#endif
398}
399
519cb848 400#endif
7ad25aed 401