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 #include "wx/wxprec.h"
  13
  14 #include "wx/frame.h"
  15 #include "wx/statusbr.h"
  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
  24 #include "wx/mac/uma.h"
  25
  26 extern wxWindowList wxModelessWindows;
  27 //extern wxList wxPendingDelete;
  28
  29 BEGIN_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)
  35 END_EVENT_TABLE()
  36
  37 IMPLEMENT_DYNAMIC_CLASS(wxFrame, wxTopLevelWindow)
  38
  39 #define WX_MAC_STATUSBAR_HEIGHT 18
  40
  41 // ----------------------------------------------------------------------------
  42 // creation/destruction
  43 // ----------------------------------------------------------------------------
  44
  45 void wxFrame::Init()
  46 {
  47     m_frameMenuBar = NULL;
  48     m_frameStatusBar = NULL;
  49     m_winLastFocused = NULL;
  50
  51 #if wxUSE_TOOLBAR
  52     m_frameToolBar = NULL;
  53 #endif
  54
  55 #if wxUSE_TOOLTIPS
  56     // NB: is this used anywhere?
  57     m_hwndToolTip = NULL;
  58 #endif
  59
  60     m_iconized = false;
  61 }
  62
  63 bool wxFrame::Create(wxWindow *parent,
  64            wxWindowID id,
  65            const wxString& title,
  66            const wxPoint& pos,
  67            const wxSize& size,
  68            long style,
  69            const wxString& name)
  70 {
  71
  72     if ( !wxTopLevelWindow::Create(parent, id, title, pos, size, style, name) )
  73         return false;
  74
  75     wxModelessWindows.Append(this);
  76
  77     return true;
  78 }
  79
  80 wxFrame::~wxFrame()
  81 {
  82     m_isBeingDeleted = true;
  83     DeleteAllBars();
  84 }
  85
  86 // get the origin of the client area in the client coordinates
  87 wxPoint wxFrame::GetClientAreaOrigin() const
  88 {
  89     wxPoint pt = wxTopLevelWindow::GetClientAreaOrigin();
  90
  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);
  97
  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     }
 109 #endif
 110
 111     return pt;
 112 }
 113
 114 bool wxFrame::Enable(bool enable)
 115 {
 116     if ( !wxWindow::Enable(enable) )
 117         return false;
 118
 119     if ( m_frameMenuBar && m_frameMenuBar == wxMenuBar::MacGetInstalledMenuBar() )
 120     {
 121         int iMaxMenu = m_frameMenuBar->GetMenuCount();
 122         for ( int i = 0 ; i < iMaxMenu ; ++ i )
 123         {
 124             m_frameMenuBar->EnableTop( i , enable ) ;
 125         }
 126     }
 127
 128     return true;
 129 }
 130
 131 wxStatusBar *wxFrame::OnCreateStatusBar(int number, long style, wxWindowID id,
 132     const wxString& name)
 133 {
 134     wxStatusBar *statusBar;
 135
 136     statusBar = new wxStatusBar(this, id, style, name);
 137     statusBar->SetSize(100, WX_MAC_STATUSBAR_HEIGHT);
 138     statusBar->SetFieldsCount(number);
 139
 140     return statusBar;
 141 }
 142
 143 void wxFrame::PositionStatusBar()
 144 {
 145     if (m_frameStatusBar && m_frameStatusBar->IsShown() )
 146     {
 147         int w, h;
 148         GetClientSize(&w, &h);
 149
 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.
 152         m_frameStatusBar->SetSize(0, h, w, WX_MAC_STATUSBAR_HEIGHT);
 153     }
 154 }
 155
 156 // Responds to colour changes, and passes event on to children.
 157 void wxFrame::OnSysColourChanged(wxSysColourChangedEvent& event)
 158 {
 159     SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_APPWORKSPACE));
 160     Refresh();
 161
 162     if ( m_frameStatusBar )
 163     {
 164         wxSysColourChangedEvent event2;
 165
 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
 174 // Default activation behaviour - set the focus for the first child
 175 // subwindow found.
 176 void wxFrame::OnActivate(wxActivateEvent& event)
 177 {
 178     if ( !event.GetActive() )
 179     {
 180        // remember the last focused child if it is our child
 181         m_winLastFocused = FindFocus();
 182
 183         // so we NULL it out if it's a child from some other frame
 184         wxWindow *win = m_winLastFocused;
 185         while ( win )
 186         {
 187             if ( win->IsTopLevel() )
 188             {
 189                 if ( win != this )
 190                     m_winLastFocused = NULL;
 191
 192                 break;
 193             }
 194
 195             win = win->GetParent();
 196         }
 197
 198         event.Skip();
 199     }
 200     else
 201     {
 202         // restore focus to the child which was last focused
 203         wxWindow *parent = m_winLastFocused
 204             ? m_winLastFocused->GetParent()
 205             : NULL;
 206
 207         if (parent == NULL)
 208             parent = this;
 209
 210         wxSetFocusToChild(parent, &m_winLastFocused);
 211
 212         if (m_frameMenuBar != NULL)
 213         {
 214             m_frameMenuBar->MacInstallMenuBar();
 215         }
 216         else
 217         {
 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         }
 226     }
 227 }
 228
 229 void wxFrame::DetachMenuBar()
 230 {
 231     if ( m_frameMenuBar )
 232         m_frameMenuBar->UnsetInvokingWindow();
 233
 234     wxFrameBase::DetachMenuBar();
 235 }
 236
 237 void wxFrame::AttachMenuBar( wxMenuBar *menuBar )
 238 {
 239     wxFrame* tlf = wxDynamicCast( wxFindWinFromMacWindow( FrontNonFloatingWindow() ) , wxFrame );
 240     bool makeCurrent = false;
 241
 242     // if this is already the current menubar or we are the frontmost window
 243     if ( (tlf == this) || (m_frameMenuBar == wxMenuBar::MacGetInstalledMenuBar()) )
 244         makeCurrent = true;
 245     // or there is an app-level menubar like MDI
 246     else if ( tlf && (tlf->GetMenuBar() == NULL) && (((wxFrame*)wxTheApp->GetTopWindow()) == this) )
 247         makeCurrent = true;
 248
 249     wxFrameBase::AttachMenuBar( menuBar );
 250
 251     if (m_frameMenuBar)
 252     {
 253         m_frameMenuBar->SetInvokingWindow( this );
 254         if (makeCurrent)
 255             m_frameMenuBar->MacInstallMenuBar();
 256     }
 257 }
 258
 259 void wxFrame::DoGetClientSize(int *x, int *y) const
 260 {
 261     wxTopLevelWindow::DoGetClientSize( x , y );
 262
 263 #if wxUSE_STATUSBAR
 264     if ( GetStatusBar() && GetStatusBar()->IsShown() && y )
 265         *y -= WX_MAC_STATUSBAR_HEIGHT;
 266 #endif
 267
 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         {
 277             if ( x )
 278                 *x -= w;
 279         }
 280         else
 281         {
 282 #if !wxMAC_USE_NATIVE_TOOLBAR
 283             if ( y )
 284                 *y -= h;
 285 #endif
 286         }
 287     }
 288 #endif
 289 }
 290
 291 bool wxFrame::MacIsChildOfClientArea( const wxWindow* child ) const
 292 {
 293 #if wxUSE_STATUSBAR
 294     if ( child == GetStatusBar() )
 295         return false ;
 296 #endif
 297
 298 #if wxUSE_TOOLBAR
 299     if ( child == GetToolBar() )
 300         return false ;
 301 #endif
 302
 303     return wxFrameBase::MacIsChildOfClientArea( child ) ;
 304 }
 305
 306 void wxFrame::DoSetClientSize(int clientwidth, int clientheight)
 307 {
 308     int currentclientwidth , currentclientheight ;
 309     int currentwidth , currentheight ;
 310
 311     GetClientSize( &currentclientwidth , &currentclientheight ) ;
 312     if ( clientwidth == -1 )
 313         clientwidth = currentclientwidth ;
 314     if ( clientheight == -1 )
 315         clientheight = currentclientheight ;
 316     GetSize( &currentwidth , &currentheight ) ;
 317
 318     // find the current client size
 319
 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
 322     DoSetSize( -1 , -1 , currentwidth + clientwidth - currentclientwidth ,
 323         currentheight + clientheight - currentclientheight , wxSIZE_USE_EXISTING ) ;
 324 }
 325
 326 #if wxUSE_TOOLBAR
 327 void wxFrame::SetToolBar(wxToolBar *toolbar)
 328 {
 329     if ( m_frameToolBar == toolbar )
 330         return ;
 331
 332 #if wxMAC_USE_NATIVE_TOOLBAR
 333     if ( m_frameToolBar )
 334         m_frameToolBar->MacInstallNativeToolbar( false ) ;
 335 #endif
 336
 337     m_frameToolBar = toolbar ;
 338
 339 #if wxMAC_USE_NATIVE_TOOLBAR
 340     if ( toolbar )
 341         toolbar->MacInstallNativeToolbar( true ) ;
 342 #endif
 343 }
 344
 345 wxToolBar* wxFrame::CreateToolBar(long style, wxWindowID id, const wxString& name)
 346 {
 347     if ( wxFrameBase::CreateToolBar(style, id, name) )
 348         PositionToolBar();
 349
 350     return m_frameToolBar;
 351 }
 352
 353 void wxFrame::PositionToolBar()
 354 {
 355     int cw, ch;
 356
 357     GetSize( &cw , &ch ) ;
 358
 359     if (GetStatusBar() && GetStatusBar()->IsShown())
 360     {
 361         int statusX, statusY;
 362
 363         GetStatusBar()->GetClientSize(&statusX, &statusY);
 364         ch -= statusY;
 365     }
 366
 367     if (GetToolBar())
 368     {
 369         int tx, ty, tw, th;
 370
 371         tx = ty = 0 ;
 372         GetToolBar()->GetSize(&tw, &th);
 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.
 378             GetToolBar()->SetSize(tx , ty , tw, ch , wxSIZE_NO_ADJUSTMENTS );
 379         }
 380         else
 381         {
 382 #if !wxMAC_USE_NATIVE_TOOLBAR
 383             // Use the 'real' position
 384             GetToolBar()->SetSize(tx , ty , cw , th, wxSIZE_NO_ADJUSTMENTS );
 385 #endif
 386         }
 387     }
 388 }
 389
 390 void wxFrame::PositionBars()
 391 {
 392 #if wxUSE_STATUSBAR
 393     PositionStatusBar();
 394 #endif
 395 #if wxUSE_TOOLBAR
 396     PositionToolBar();
 397 #endif
 398 }
 399
 400 #endif
 401