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 )
 208             parent = this;
 209
 210         wxSetFocusToChild(parent, &m_winLastFocused);
 211
 212         if (m_frameMenuBar != NULL)
 213         {
 214             m_frameMenuBar->MacInstallMenuBar() ;
 215         }
 216         else if (wxTheApp->GetTopWindow() && wxTheApp->GetTopWindow()->IsKindOf(CLASSINFO(wxFrame)))
 217         {
 218             // Trying toplevel frame membar
 219             if (((wxFrame*)wxTheApp->GetTopWindow())->GetMenuBar())
 220                 ((wxFrame*)wxTheApp->GetTopWindow())->GetMenuBar()->MacInstallMenuBar();
 221          }
 222     }
 223 }
 224
 225 void wxFrame::DetachMenuBar()
 226 {
 227     if ( m_frameMenuBar )
 228         m_frameMenuBar->UnsetInvokingWindow();
 229
 230     wxFrameBase::DetachMenuBar();
 231 }
 232
 233 void wxFrame::AttachMenuBar( wxMenuBar *menuBar )
 234 {
 235     wxFrame* tlf = wxDynamicCast( wxFindWinFromMacWindow( FrontNonFloatingWindow() ) , wxFrame );
 236     bool makeCurrent = false;
 237
 238     // if this is already the current menubar or we are the frontmost window
 239     if ( (tlf == this) || (m_frameMenuBar == wxMenuBar::MacGetInstalledMenuBar()) )
 240         makeCurrent = true;
 241     // or there is an app-level menubar like MDI
 242     else if ( tlf && (tlf->GetMenuBar() == NULL) && (((wxFrame*)wxTheApp->GetTopWindow()) == this) )
 243         makeCurrent = true;
 244
 245     wxFrameBase::AttachMenuBar( menuBar );
 246
 247     if (m_frameMenuBar)
 248     {
 249         m_frameMenuBar->SetInvokingWindow( this );
 250         if (makeCurrent)
 251             m_frameMenuBar->MacInstallMenuBar();
 252     }
 253 }
 254
 255 void wxFrame::DoGetClientSize(int *x, int *y) const
 256 {
 257     wxTopLevelWindow::DoGetClientSize( x , y );
 258
 259 #if wxUSE_STATUSBAR
 260     if ( GetStatusBar() && GetStatusBar()->IsShown() && y )
 261         *y -= WX_MAC_STATUSBAR_HEIGHT;
 262 #endif
 263
 264 #if wxUSE_TOOLBAR
 265     wxToolBar *toolbar = GetToolBar();
 266     if ( toolbar && toolbar->IsShown() )
 267     {
 268         int w, h;
 269         toolbar->GetSize(&w, &h);
 270
 271         if ( toolbar->GetWindowStyleFlag() & wxTB_VERTICAL )
 272         {
 273             if ( x )
 274                 *x -= w;
 275         }
 276         else
 277         {
 278 #if !wxMAC_USE_NATIVE_TOOLBAR
 279             if ( y )
 280                 *y -= h;
 281 #endif
 282         }
 283     }
 284 #endif
 285 }
 286
 287 bool wxFrame::MacIsChildOfClientArea( const wxWindow* child ) const
 288 {
 289 #if wxUSE_STATUSBAR
 290     if ( child == GetStatusBar() )
 291         return false ;
 292 #endif
 293
 294 #if wxUSE_TOOLBAR
 295     if ( child == GetToolBar() )
 296         return false ;
 297 #endif
 298
 299     return wxFrameBase::MacIsChildOfClientArea( child ) ;
 300 }
 301
 302 void wxFrame::DoSetClientSize(int clientwidth, int clientheight)
 303 {
 304     int currentclientwidth , currentclientheight ;
 305     int currentwidth , currentheight ;
 306
 307     GetClientSize( &currentclientwidth , &currentclientheight ) ;
 308     if ( clientwidth == -1 )
 309         clientwidth = currentclientwidth ;
 310     if ( clientheight == -1 )
 311         clientheight = currentclientheight ;
 312     GetSize( &currentwidth , &currentheight ) ;
 313
 314     // find the current client size
 315
 316     // Find the difference between the entire window (title bar and all) and
 317     // the client area; add this to the new client size to move the window
 318     DoSetSize( -1 , -1 , currentwidth + clientwidth - currentclientwidth ,
 319         currentheight + clientheight - currentclientheight , wxSIZE_USE_EXISTING ) ;
 320 }
 321
 322 #if wxUSE_TOOLBAR
 323 void wxFrame::SetToolBar(wxToolBar *toolbar)
 324 {
 325     if ( m_frameToolBar == toolbar )
 326         return ;
 327
 328 #if wxMAC_USE_NATIVE_TOOLBAR
 329     if ( m_frameToolBar )
 330         m_frameToolBar->MacInstallNativeToolbar( false ) ;
 331 #endif
 332
 333     m_frameToolBar = toolbar ;
 334
 335 #if wxMAC_USE_NATIVE_TOOLBAR
 336     if ( toolbar )
 337         toolbar->MacInstallNativeToolbar( true ) ;
 338 #endif
 339 }
 340
 341 wxToolBar* wxFrame::CreateToolBar(long style, wxWindowID id, const wxString& name)
 342 {
 343     if ( wxFrameBase::CreateToolBar(style, id, name) )
 344         PositionToolBar();
 345
 346     return m_frameToolBar;
 347 }
 348
 349 void wxFrame::PositionToolBar()
 350 {
 351     int cw, ch;
 352
 353     GetSize( &cw , &ch ) ;
 354
 355     if (GetStatusBar() && GetStatusBar()->IsShown())
 356     {
 357         int statusX, statusY;
 358
 359         GetStatusBar()->GetClientSize(&statusX, &statusY);
 360         ch -= statusY;
 361     }
 362
 363     if (GetToolBar())
 364     {
 365         int tx, ty, tw, th;
 366
 367         tx = ty = 0 ;
 368         GetToolBar()->GetSize(&tw, &th);
 369         if (GetToolBar()->GetWindowStyleFlag() & wxTB_VERTICAL)
 370         {
 371             // Use the 'real' position. wxSIZE_NO_ADJUSTMENTS
 372             // means, pretend we don't have toolbar/status bar, so we
 373             // have the original client size.
 374             GetToolBar()->SetSize(tx , ty , tw, ch , wxSIZE_NO_ADJUSTMENTS );
 375         }
 376         else
 377         {
 378 #if !wxMAC_USE_NATIVE_TOOLBAR
 379             // Use the 'real' position
 380             GetToolBar()->SetSize(tx , ty , cw , th, wxSIZE_NO_ADJUSTMENTS );
 381 #endif
 382         }
 383     }
 384 }
 385
 386 void wxFrame::PositionBars()
 387 {
 388 #if wxUSE_STATUSBAR
 389     PositionStatusBar();
 390 #endif
 391 #if wxUSE_TOOLBAR
 392     PositionToolBar();
 393 #endif
 394 }
 395
 396 #endif
 397