src/mac/carbon/notebmac.cpp

   1 ///////////////////////////////////////////////////////////////////////////////
   2 // Name:        src/mac/carbon/notebmac.cpp
   3 // Purpose:     implementation of wxNotebook
   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 #if wxUSE_NOTEBOOK
  15
  16 #include "wx/notebook.h"
  17
  18 #ifndef WX_PRECOMP
  19     #include "wx/string.h"
  20     #include "wx/log.h"
  21     #include "wx/app.h"
  22     #include "wx/image.h"
  23 #endif
  24
  25 #include "wx/string.h"
  26 #include "wx/imaglist.h"
  27 #include "wx/mac/uma.h"
  28
  29
  30 // check that the page index is valid
  31 #define IS_VALID_PAGE(nPage) ((nPage) < GetPageCount())
  32
  33
  34 DEFINE_EVENT_TYPE(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGED)
  35 DEFINE_EVENT_TYPE(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGING)
  36
  37 BEGIN_EVENT_TABLE(wxNotebook, wxControl)
  38     EVT_NOTEBOOK_PAGE_CHANGED(wxID_ANY, wxNotebook::OnSelChange)
  39
  40     EVT_SIZE(wxNotebook::OnSize)
  41     EVT_SET_FOCUS(wxNotebook::OnSetFocus)
  42     EVT_NAVIGATION_KEY(wxNotebook::OnNavigationKey)
  43 END_EVENT_TABLE()
  44
  45 IMPLEMENT_DYNAMIC_CLASS(wxNotebook, wxControl)
  46 IMPLEMENT_DYNAMIC_CLASS(wxNotebookEvent, wxCommandEvent)
  47
  48
  49 // common part of all ctors
  50 void wxNotebook::Init()
  51 {
  52     m_nSelection = -1;
  53 }
  54
  55 // default for dynamic class
  56 wxNotebook::wxNotebook()
  57 {
  58     Init();
  59 }
  60
  61 // the same arguments as for wxControl
  62 wxNotebook::wxNotebook( wxWindow *parent,
  63     wxWindowID id,
  64     const wxPoint& pos,
  65     const wxSize& size,
  66     long style,
  67     const wxString& name )
  68 {
  69     Init();
  70
  71     Create( parent, id, pos, size, style, name );
  72 }
  73
  74 bool wxNotebook::Create( wxWindow *parent,
  75     wxWindowID id,
  76     const wxPoint& pos,
  77     const wxSize& size,
  78     long style,
  79     const wxString& name )
  80 {
  81     m_macIsUserPane = false ;
  82
  83     if (! (style & wxBK_ALIGN_MASK))
  84         style |= wxBK_TOP;
  85
  86     if ( !wxNotebookBase::Create( parent, id, pos, size, style, name ) )
  87         return false;
  88
  89     Rect bounds = wxMacGetBoundsForControl( this, pos, size );
  90
  91     if ( bounds.right <= bounds.left )
  92         bounds.right = bounds.left + 100;
  93     if ( bounds.bottom <= bounds.top )
  94         bounds.bottom = bounds.top + 100;
  95
  96     UInt16 tabstyle = kControlTabDirectionNorth;
  97     if ( HasFlag(wxBK_LEFT) )
  98         tabstyle = kControlTabDirectionWest;
  99     else if ( HasFlag( wxBK_RIGHT ) )
 100         tabstyle = kControlTabDirectionEast;
 101     else if ( HasFlag( wxBK_BOTTOM ) )
 102         tabstyle = kControlTabDirectionSouth;
 103
 104     ControlTabSize tabsize;
 105     switch (GetWindowVariant())
 106     {
 107         case wxWINDOW_VARIANT_MINI:
 108             tabsize = 3 ;
 109             break;
 110
 111         case wxWINDOW_VARIANT_SMALL:
 112             tabsize = kControlTabSizeSmall;
 113             break;
 114
 115         default:
 116             tabsize = kControlTabSizeLarge;
 117             break;
 118     }
 119
 120     m_peer = new wxMacControl( this );
 121     OSStatus err = CreateTabsControl(
 122         MAC_WXHWND(parent->MacGetTopLevelWindowRef()), &bounds,
 123         tabsize, tabstyle, 0, NULL, m_peer->GetControlRefAddr() );
 124     verify_noerr( err );
 125
 126     MacPostControlCreate( pos, size );
 127
 128     return true ;
 129 }
 130
 131 // dtor
 132 wxNotebook::~wxNotebook()
 133 {
 134 }
 135
 136 // ----------------------------------------------------------------------------
 137 // wxNotebook accessors
 138 // ----------------------------------------------------------------------------
 139
 140 void wxNotebook::SetPadding(const wxSize& WXUNUSED(padding))
 141 {
 142     // unsupported by OS
 143 }
 144
 145 void wxNotebook::SetTabSize(const wxSize& WXUNUSED(sz))
 146 {
 147     // unsupported by OS
 148 }
 149
 150 void wxNotebook::SetPageSize(const wxSize& size)
 151 {
 152     SetSize( CalcSizeFromPage( size ) );
 153 }
 154
 155 wxSize wxNotebook::CalcSizeFromPage(const wxSize& sizePage) const
 156 {
 157     return DoGetSizeFromClientSize( sizePage );
 158 }
 159
 160 int wxNotebook::DoSetSelection(size_t nPage, int flags)
 161 {
 162     wxCHECK_MSG( IS_VALID_PAGE(nPage), wxNOT_FOUND, wxT("DoSetSelection: invalid notebook page") );
 163
 164     if ( m_nSelection == wxNOT_FOUND || nPage != (size_t)m_nSelection )
 165     {
 166         if ( flags & SetSelection_SendEvent )
 167         {
 168             if ( !SendPageChangingEvent(nPage) )
 169             {
 170                 // vetoed by program
 171                 return m_nSelection;
 172             }
 173             //else: program allows the page change
 174
 175             SendPageChangedEvent(m_nSelection, nPage);
 176         }
 177
 178         ChangePage(m_nSelection, nPage);
 179     }
 180     //else: no change
 181
 182     return m_nSelection;
 183 }
 184
 185 bool wxNotebook::SetPageText(size_t nPage, const wxString& strText)
 186 {
 187     wxCHECK_MSG( IS_VALID_PAGE(nPage), false, wxT("SetPageText: invalid notebook page") );
 188
 189     wxNotebookPage *page = m_pages[nPage];
 190     page->SetLabel(strText);
 191     MacSetupTabs();
 192
 193     return true;
 194 }
 195
 196 wxString wxNotebook::GetPageText(size_t nPage) const
 197 {
 198     wxCHECK_MSG( IS_VALID_PAGE(nPage), wxEmptyString, wxT("GetPageText: invalid notebook page") );
 199
 200     wxNotebookPage *page = m_pages[nPage];
 201
 202     return page->GetLabel();
 203 }
 204
 205 int wxNotebook::GetPageImage(size_t nPage) const
 206 {
 207     wxCHECK_MSG( IS_VALID_PAGE(nPage), wxNOT_FOUND, wxT("GetPageImage: invalid notebook page") );
 208
 209     return m_images[nPage];
 210 }
 211
 212 bool wxNotebook::SetPageImage(size_t nPage, int nImage)
 213 {
 214     wxCHECK_MSG( IS_VALID_PAGE(nPage), false,
 215         wxT("SetPageImage: invalid notebook page") );
 216     wxCHECK_MSG( m_imageList && nImage < m_imageList->GetImageCount(), false,
 217         wxT("SetPageImage: invalid image index") );
 218
 219     if ( nImage != m_images[nPage] )
 220     {
 221         // if the item didn't have an icon before or, on the contrary, did have
 222         // it but has lost it now, its size will change - but if the icon just
 223         // changes, it won't
 224         m_images[nPage] = nImage;
 225
 226         MacSetupTabs() ;
 227     }
 228
 229     return true;
 230 }
 231
 232 // ----------------------------------------------------------------------------
 233 // wxNotebook operations
 234 // ----------------------------------------------------------------------------
 235
 236 // remove one page from the notebook, without deleting the window
 237 wxNotebookPage* wxNotebook::DoRemovePage(size_t nPage)
 238 {
 239     wxCHECK_MSG( IS_VALID_PAGE(nPage), NULL,
 240         wxT("DoRemovePage: invalid notebook page") );
 241
 242     wxNotebookPage* page = m_pages[nPage] ;
 243     m_pages.RemoveAt(nPage);
 244
 245     MacSetupTabs();
 246
 247     if (m_nSelection >= (int)GetPageCount())
 248         m_nSelection = GetPageCount() - 1;
 249
 250     if (m_nSelection >= 0)
 251         m_pages[m_nSelection]->Show(true);
 252
 253     InvalidateBestSize();
 254
 255     return page;
 256 }
 257
 258 // remove all pages
 259 bool wxNotebook::DeleteAllPages()
 260 {
 261     WX_CLEAR_ARRAY(m_pages) ;
 262     MacSetupTabs();
 263     m_nSelection = -1 ;
 264     InvalidateBestSize();
 265
 266     return true;
 267 }
 268
 269 // same as AddPage() but does it at given position
 270 bool wxNotebook::InsertPage(size_t nPage,
 271     wxNotebookPage *pPage,
 272     const wxString& strText,
 273     bool bSelect,
 274     int imageId )
 275 {
 276     if ( !wxNotebookBase::InsertPage( nPage, pPage, strText, bSelect, imageId ) )
 277         return false;
 278
 279     wxASSERT_MSG( pPage->GetParent() == this, wxT("notebook pages must have notebook as parent") );
 280
 281     // don't show pages by default (we'll need to adjust their size first)
 282     pPage->Show( false ) ;
 283
 284     pPage->SetLabel( strText );
 285
 286     m_images.Insert( imageId, nPage );
 287
 288     MacSetupTabs();
 289
 290     wxRect rect = GetPageRect() ;
 291     pPage->SetSize( rect );
 292     if ( pPage->GetAutoLayout() )
 293         pPage->Layout();
 294
 295     // now deal with the selection
 296     // ---------------------------
 297
 298     // if the inserted page is before the selected one, we must update the
 299     // index of the selected page
 300
 301     if ( int(nPage) <= m_nSelection )
 302     {
 303         m_nSelection++;
 304
 305         // while this still is the same page showing, we need to update the tabs
 306         m_peer->SetValue( m_nSelection + 1 ) ;
 307     }
 308
 309     // some page should be selected: either this one or the first one if there
 310     // is still no selection
 311     int selNew = -1;
 312     if ( bSelect )
 313         selNew = nPage;
 314     else if ( m_nSelection == -1 )
 315         selNew = 0;
 316
 317     if ( selNew != -1 )
 318         SetSelection( selNew );
 319
 320     InvalidateBestSize();
 321
 322     return true;
 323 }
 324
 325 int wxNotebook::HitTest(const wxPoint& pt, long * flags) const
 326 {
 327     int resultV = wxNOT_FOUND;
 328
 329 #if TARGET_API_MAC_OSX
 330     const int countPages = GetPageCount();
 331
 332     // we have to convert from Client to Window relative coordinates
 333     wxPoint adjustedPt = pt + GetClientAreaOrigin();
 334     // and now to HIView native ones
 335     adjustedPt.x -= MacGetLeftBorderSize() ;
 336     adjustedPt.y -= MacGetTopBorderSize() ;
 337
 338     HIPoint hipoint= { adjustedPt.x , adjustedPt.y } ;
 339     HIViewPartCode outPart = 0 ;
 340     OSStatus err = HIViewGetPartHit( m_peer->GetControlRef(), &hipoint, &outPart );
 341
 342     int max = m_peer->GetMaximum() ;
 343     if ( outPart == 0 && max > 0 )
 344     {
 345         // this is a hack, as unfortunately a hit on an already selected tab returns 0,
 346         // so we have to go some extra miles to make sure we select something different
 347         // and try again ..
 348         int val = m_peer->GetValue() ;
 349         int maxval = max ;
 350         if ( max == 1 )
 351         {
 352             m_peer->SetMaximum( 2 ) ;
 353             maxval = 2 ;
 354         }
 355
 356         if ( val == 1 )
 357             m_peer->SetValue( maxval ) ;
 358         else
 359              m_peer->SetValue( 1 ) ;
 360
 361         err = HIViewGetPartHit( m_peer->GetControlRef(), &hipoint, &outPart );
 362
 363         m_peer->SetValue( val ) ;
 364         if ( max == 1 )
 365             m_peer->SetMaximum( 1 ) ;
 366     }
 367
 368     if ( outPart >= 1 && outPart <= countPages )
 369         resultV = outPart - 1 ;
 370 #endif // TARGET_API_MAC_OSX
 371
 372     if (flags != NULL)
 373     {
 374         *flags = 0;
 375
 376         // we cannot differentiate better
 377         if (resultV >= 0)
 378             *flags |= wxBK_HITTEST_ONLABEL;
 379         else
 380             *flags |= wxBK_HITTEST_NOWHERE;
 381     }
 382
 383     return resultV;
 384 }
 385
 386 // Added by Mark Newsam
 387 // When a page is added or deleted to the notebook this function updates
 388 // information held in the control so that it matches the order
 389 // the user would expect.
 390 //
 391 void wxNotebook::MacSetupTabs()
 392 {
 393     m_peer->SetMaximum( GetPageCount() ) ;
 394
 395     wxNotebookPage *page;
 396     ControlTabInfoRecV1 info;
 397
 398     const size_t countPages = GetPageCount();
 399     for (size_t ii = 0; ii < countPages; ii++)
 400     {
 401         page = m_pages[ii];
 402         info.version = kControlTabInfoVersionOne;
 403         info.iconSuiteID = 0;
 404         wxMacCFStringHolder cflabel( page->GetLabel(), m_font.GetEncoding() ) ;
 405         info.name = cflabel ;
 406         m_peer->SetData<ControlTabInfoRecV1>( ii + 1, kControlTabInfoTag, &info ) ;
 407
 408         if ( GetImageList() && GetPageImage(ii) >= 0 && UMAGetSystemVersion() >= 0x1020 )
 409         {
 410             const wxBitmap bmap = GetImageList()->GetBitmap( GetPageImage( ii ) ) ;
 411             if ( bmap.Ok() )
 412             {
 413                 ControlButtonContentInfo info ;
 414
 415                 wxMacCreateBitmapButton( &info, bmap ) ;
 416
 417                 OSStatus err = m_peer->SetData<ControlButtonContentInfo>( ii + 1, kControlTabImageContentTag, &info );
 418                 wxASSERT_MSG( err == noErr , wxT("Error when setting icon on tab") ) ;
 419
 420                 wxMacReleaseBitmapButton( &info ) ;
 421             }
 422         }
 423
 424         m_peer->SetTabEnabled( ii + 1, true ) ;
 425     }
 426
 427 #if wxMAC_USE_CORE_GRAPHICS
 428     Refresh();
 429 #else
 430     Rect bounds;
 431     m_peer->GetRectInWindowCoords( &bounds ) ;
 432     InvalWindowRect( (WindowRef)MacGetTopLevelWindowRef(), &bounds );
 433 #endif
 434 }
 435
 436 wxRect wxNotebook::GetPageRect() const
 437 {
 438     wxSize size = GetClientSize() ;
 439
 440     return wxRect( 0 , 0 , size.x , size.y ) ;
 441 }
 442
 443 // ----------------------------------------------------------------------------
 444 // wxNotebook callbacks
 445 // ----------------------------------------------------------------------------
 446
 447 // @@@ OnSize() is used for setting the font when it's called for the first
 448 //     time because doing it in ::Create() doesn't work (for unknown reasons)
 449 void wxNotebook::OnSize(wxSizeEvent& event)
 450 {
 451     unsigned int nCount = m_pages.Count();
 452     wxRect rect = GetPageRect() ;
 453
 454     for ( unsigned int nPage = 0; nPage < nCount; nPage++ )
 455     {
 456         wxNotebookPage *pPage = m_pages[nPage];
 457         pPage->SetSize(rect);
 458         if ( pPage->GetAutoLayout() )
 459             pPage->Layout();
 460     }
 461
 462     // Processing continues to next OnSize
 463     event.Skip();
 464 }
 465
 466 void wxNotebook::OnSelChange(wxNotebookEvent& event)
 467 {
 468     // is it our tab control?
 469     if ( event.GetEventObject() == this )
 470         ChangePage(event.GetOldSelection(), event.GetSelection());
 471
 472     // we want to give others a chance to process this message as well
 473     event.Skip();
 474 }
 475
 476 void wxNotebook::OnSetFocus(wxFocusEvent& event)
 477 {
 478     // set focus to the currently selected page if any
 479     if ( m_nSelection != -1 )
 480         m_pages[m_nSelection]->SetFocus();
 481
 482     event.Skip();
 483 }
 484
 485 void wxNotebook::OnNavigationKey(wxNavigationKeyEvent& event)
 486 {
 487     if ( event.IsWindowChange() )
 488     {
 489         // change pages
 490         AdvanceSelection( event.GetDirection() );
 491     }
 492     else
 493     {
 494         // we get this event in 2 cases
 495         //
 496         // a) one of our pages might have generated it because the user TABbed
 497         // out from it in which case we should propagate the event upwards and
 498         // our parent will take care of setting the focus to prev/next sibling
 499         //
 500         // or
 501         //
 502         // b) the parent panel wants to give the focus to us so that we
 503         // forward it to our selected page. We can't deal with this in
 504         // OnSetFocus() because we don't know which direction the focus came
 505         // from in this case and so can't choose between setting the focus to
 506         // first or last panel child
 507         wxWindow *parent = GetParent();
 508
 509         // the cast is here to fix a GCC ICE
 510         if ( ((wxWindow*)event.GetEventObject()) == parent )
 511         {
 512             // no, it doesn't come from child, case (b): forward to a page
 513             if ( m_nSelection != -1 )
 514             {
 515                 // so that the page knows that the event comes from it's parent
 516                 // and is being propagated downwards
 517                 event.SetEventObject( this );
 518
 519                 wxWindow *page = m_pages[m_nSelection];
 520                 if ( !page->GetEventHandler()->ProcessEvent( event ) )
 521                 {
 522                     page->SetFocus();
 523                 }
 524                 //else: page manages focus inside it itself
 525             }
 526             else
 527             {
 528                 // we have no pages - still have to give focus to _something_
 529                 SetFocus();
 530             }
 531         }
 532         else
 533         {
 534             // it comes from our child, case (a), pass to the parent
 535             if ( parent )
 536             {
 537                 event.SetCurrentFocus( this );
 538                 parent->GetEventHandler()->ProcessEvent( event );
 539             }
 540         }
 541     }
 542 }
 543
 544 // ----------------------------------------------------------------------------
 545 // wxNotebook base class virtuals
 546 // ----------------------------------------------------------------------------
 547
 548 #if wxUSE_CONSTRAINTS
 549
 550 // override these 2 functions to do nothing: everything is done in OnSize
 551
 552 void wxNotebook::SetConstraintSizes(bool WXUNUSED(recurse))
 553 {
 554     // don't set the sizes of the pages - their correct size is not yet known
 555     wxControl::SetConstraintSizes( false );
 556 }
 557
 558 bool wxNotebook::DoPhase(int WXUNUSED(nPhase))
 559 {
 560     return true;
 561 }
 562
 563 #endif // wxUSE_CONSTRAINTS
 564
 565 void wxNotebook::Command(wxCommandEvent& WXUNUSED(event))
 566 {
 567     wxFAIL_MSG(wxT("wxNotebook::Command not implemented"));
 568 }
 569
 570 // ----------------------------------------------------------------------------
 571 // wxNotebook helper functions
 572 // ----------------------------------------------------------------------------
 573
 574 // hide the currently active panel and show the new one
 575 void wxNotebook::ChangePage(int nOldSel, int nSel)
 576 {
 577     if (nOldSel == nSel)
 578         return;
 579
 580     if ( nOldSel != -1 )
 581         m_pages[nOldSel]->Show( false );
 582
 583     if ( nSel != -1 )
 584     {
 585         wxNotebookPage *pPage = m_pages[nSel];
 586         pPage->Show( true );
 587         pPage->SetFocus();
 588     }
 589
 590     m_nSelection = nSel;
 591     m_peer->SetValue( m_nSelection + 1 ) ;
 592 }
 593
 594 wxInt32 wxNotebook::MacControlHit(WXEVENTHANDLERREF WXUNUSED(handler) , WXEVENTREF WXUNUSED(event) )
 595 {
 596     OSStatus status = eventNotHandledErr ;
 597
 598     SInt32 newSel = m_peer->GetValue() - 1 ;
 599     if ( newSel != m_nSelection )
 600     {
 601         wxNotebookEvent changing(
 602             wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGING, m_windowId,
 603             newSel , m_nSelection );
 604         changing.SetEventObject( this );
 605         GetEventHandler()->ProcessEvent( changing );
 606
 607         if ( changing.IsAllowed() )
 608         {
 609             wxNotebookEvent event(
 610                 wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGED, m_windowId,
 611                 newSel, m_nSelection );
 612             event.SetEventObject( this );
 613             GetEventHandler()->ProcessEvent( event );
 614         }
 615         else
 616         {
 617             m_peer->SetValue( m_nSelection + 1 ) ;
 618         }
 619
 620         status = noErr ;
 621     }
 622
 623     return (wxInt32)status ;
 624 }
 625
 626 #endif