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