src/msw/notebook.cpp

   1 ///////////////////////////////////////////////////////////////////////////////
   2 // Name:        msw/notebook.cpp
   3 // Purpose:     implementation of wxNotebook
   4 // Author:      Vadim Zeitlin
   5 // Modified by:
   6 // Created:     11.06.98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) 1998 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
   9 // Licence:     wxWindows license
  10 ///////////////////////////////////////////////////////////////////////////////
  11
  12 #ifdef __GNUG__
  13 #pragma implementation "notebook.h"
  14 #endif
  15
  16 // For compilers that support precompilation, includes "wx.h".
  17 #include "wx/wxprec.h"
  18
  19 #ifdef __BORLANDC__
  20     #pragma hdrstop
  21 #endif
  22
  23 #if wxUSE_NOTEBOOK
  24
  25 // wxWindows
  26 #ifndef WX_PRECOMP
  27   #include  "wx/string.h"
  28 #endif  // WX_PRECOMP
  29
  30 #include  "wx/log.h"
  31 #include  "wx/imaglist.h"
  32 #include  "wx/event.h"
  33 #include  "wx/control.h"
  34 #include  "wx/notebook.h"
  35
  36 #include  "wx/msw/private.h"
  37
  38 // Windows standard headers
  39 #ifndef   __WIN95__
  40   #error  "wxNotebook is only supported Windows 95 and above"
  41 #endif    //Win95
  42
  43 #include  <windowsx.h>  // for SetWindowFont
  44
  45 #ifndef __TWIN32__
  46     #ifdef __GNUWIN32_OLD__
  47         #include "wx/msw/gnuwin32/extra.h"
  48     #endif
  49 #endif
  50
  51 #if defined(__WIN95__) && !((defined(__GNUWIN32_OLD__) || defined(__TWIN32__)) && !defined(__CYGWIN10__))
  52     #include <commctrl.h>
  53 #endif
  54
  55 // ----------------------------------------------------------------------------
  56 // macros
  57 // ----------------------------------------------------------------------------
  58
  59 // check that the page index is valid
  60 #define IS_VALID_PAGE(nPage) (((nPage) >= 0) && ((nPage) < GetPageCount()))
  61
  62 // hide the ugly cast
  63 #define m_hwnd    (HWND)GetHWND()
  64
  65 // ----------------------------------------------------------------------------
  66 // constants
  67 // ----------------------------------------------------------------------------
  68
  69 // This is a work-around for missing defines in gcc-2.95 headers
  70 #ifndef TCS_RIGHT
  71     #define TCS_RIGHT       0x0002
  72 #endif
  73
  74 #ifndef TCS_VERTICAL
  75     #define TCS_VERTICAL    0x0080
  76 #endif
  77
  78 #ifndef TCS_BOTTOM
  79     #define TCS_BOTTOM      TCS_RIGHT
  80 #endif
  81
  82 // ----------------------------------------------------------------------------
  83 // event table
  84 // ----------------------------------------------------------------------------
  85
  86 DEFINE_EVENT_TYPE(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGED)
  87 DEFINE_EVENT_TYPE(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGING)
  88
  89 BEGIN_EVENT_TABLE(wxNotebook, wxControl)
  90     EVT_NOTEBOOK_PAGE_CHANGED(-1, wxNotebook::OnSelChange)
  91
  92     EVT_SIZE(wxNotebook::OnSize)
  93
  94     EVT_SET_FOCUS(wxNotebook::OnSetFocus)
  95
  96     EVT_NAVIGATION_KEY(wxNotebook::OnNavigationKey)
  97 END_EVENT_TABLE()
  98
  99 IMPLEMENT_DYNAMIC_CLASS(wxNotebook, wxControl)
 100 IMPLEMENT_DYNAMIC_CLASS(wxNotebookEvent, wxNotifyEvent)
 101
 102 // ============================================================================
 103 // implementation
 104 // ============================================================================
 105
 106 // ----------------------------------------------------------------------------
 107 // wxNotebook construction
 108 // ----------------------------------------------------------------------------
 109
 110 // common part of all ctors
 111 void wxNotebook::Init()
 112 {
 113   m_bOwnsImageList = FALSE;
 114   m_imageList = NULL;
 115   m_nSelection = -1;
 116 }
 117
 118 // default for dynamic class
 119 wxNotebook::wxNotebook()
 120 {
 121   Init();
 122 }
 123
 124 // the same arguments as for wxControl
 125 wxNotebook::wxNotebook(wxWindow *parent,
 126                        wxWindowID id,
 127                        const wxPoint& pos,
 128                        const wxSize& size,
 129                        long style,
 130                        const wxString& name)
 131 {
 132   Init();
 133
 134   Create(parent, id, pos, size, style, name);
 135 }
 136
 137 // Create() function
 138 bool wxNotebook::Create(wxWindow *parent,
 139                         wxWindowID id,
 140                         const wxPoint& pos,
 141                         const wxSize& size,
 142                         long style,
 143                         const wxString& name)
 144 {
 145   // base init
 146   if ( !CreateBase(parent, id, pos, size, style, wxDefaultValidator, name) )
 147       return FALSE;
 148
 149   // colors and font
 150   m_backgroundColour = wxColour(GetSysColor(COLOR_BTNFACE));
 151   m_foregroundColour = *wxBLACK;
 152
 153   // style
 154   m_windowStyle = style | wxTAB_TRAVERSAL;
 155
 156   long tabStyle = WS_CHILD | WS_VISIBLE | WS_TABSTOP | TCS_TABS;
 157
 158   if ( m_windowStyle & wxCLIP_SIBLINGS )
 159     tabStyle |= WS_CLIPSIBLINGS;
 160   if (m_windowStyle & wxCLIP_CHILDREN)
 161     tabStyle |= WS_CLIPCHILDREN;
 162   if ( m_windowStyle & wxTC_MULTILINE )
 163     tabStyle |= TCS_MULTILINE;
 164   if ( m_windowStyle & wxBORDER )
 165     tabStyle &= WS_BORDER;
 166   if (m_windowStyle & wxNB_FIXEDWIDTH)
 167     tabStyle |= TCS_FIXEDWIDTH ;
 168   if (m_windowStyle & wxNB_BOTTOM)
 169     tabStyle |= TCS_RIGHT;
 170   if (m_windowStyle & wxNB_LEFT)
 171     tabStyle |= TCS_VERTICAL;
 172   if (m_windowStyle & wxNB_RIGHT)
 173     tabStyle |= TCS_VERTICAL|TCS_RIGHT;
 174
 175
 176   if ( !MSWCreate(GetId(), GetParent(), WC_TABCONTROL,
 177                   this, NULL, pos.x, pos.y, size.x, size.y,
 178                   tabStyle, NULL, 0) )
 179   {
 180     return FALSE;
 181   }
 182
 183   // Not all compilers recognise SetWindowFont
 184   ::SendMessage(GetHwnd(), WM_SETFONT,
 185                 (WPARAM)::GetStockObject(DEFAULT_GUI_FONT), TRUE);
 186
 187
 188   if ( parent != NULL )
 189     parent->AddChild(this);
 190
 191   SubclassWin(m_hWnd);
 192
 193   return TRUE;
 194 }
 195
 196 // dtor
 197 wxNotebook::~wxNotebook()
 198 {
 199   if (m_bOwnsImageList) delete m_pImageList;
 200 }
 201
 202 // ----------------------------------------------------------------------------
 203 // wxNotebook accessors
 204 // ----------------------------------------------------------------------------
 205 int wxNotebook::GetPageCount() const
 206 {
 207   // consistency check
 208   wxASSERT( (int)m_pages.Count() == TabCtrl_GetItemCount(m_hwnd) );
 209
 210   return m_pages.Count();
 211 }
 212
 213 int wxNotebook::GetRowCount() const
 214 {
 215   return TabCtrl_GetRowCount(m_hwnd);
 216 }
 217
 218 int wxNotebook::SetSelection(int nPage)
 219 {
 220   wxCHECK_MSG( IS_VALID_PAGE(nPage), -1, wxT("notebook page out of range") );
 221
 222   ChangePage(m_nSelection, nPage);
 223
 224   return TabCtrl_SetCurSel(m_hwnd, nPage);
 225 }
 226
 227 bool wxNotebook::SetPageText(int nPage, const wxString& strText)
 228 {
 229   wxCHECK_MSG( IS_VALID_PAGE(nPage), FALSE, wxT("notebook page out of range") );
 230
 231   TC_ITEM tcItem;
 232   tcItem.mask = TCIF_TEXT;
 233   tcItem.pszText = (wxChar *)strText.c_str();
 234
 235   return TabCtrl_SetItem(m_hwnd, nPage, &tcItem) != 0;
 236 }
 237
 238 wxString wxNotebook::GetPageText(int nPage) const
 239 {
 240   wxCHECK_MSG( IS_VALID_PAGE(nPage), wxT(""), wxT("notebook page out of range") );
 241
 242   wxChar buf[256];
 243   TC_ITEM tcItem;
 244   tcItem.mask = TCIF_TEXT;
 245   tcItem.pszText = buf;
 246   tcItem.cchTextMax = WXSIZEOF(buf);
 247
 248   wxString str;
 249   if ( TabCtrl_GetItem(m_hwnd, nPage, &tcItem) )
 250     str = tcItem.pszText;
 251
 252   return str;
 253 }
 254
 255 int wxNotebook::GetPageImage(int nPage) const
 256 {
 257   wxCHECK_MSG( IS_VALID_PAGE(nPage), -1, wxT("notebook page out of range") );
 258
 259   TC_ITEM tcItem;
 260   tcItem.mask = TCIF_IMAGE;
 261
 262   return TabCtrl_GetItem(m_hwnd, nPage, &tcItem) ? tcItem.iImage : -1;
 263 }
 264
 265 bool wxNotebook::SetPageImage(int nPage, int nImage)
 266 {
 267   wxCHECK_MSG( IS_VALID_PAGE(nPage), FALSE, wxT("notebook page out of range") );
 268
 269   TC_ITEM tcItem;
 270   tcItem.mask = TCIF_IMAGE;
 271   tcItem.iImage = nImage;
 272
 273   return TabCtrl_SetItem(m_hwnd, nPage, &tcItem) != 0;
 274 }
 275
 276 void wxNotebook::SetImageList(wxImageList* imageList)
 277 {
 278   if ( m_bOwnsImageList )
 279   {
 280       delete m_imageList;
 281   }
 282
 283   m_bOwnsImageList = FALSE;
 284   m_imageList = imageList;
 285
 286   TabCtrl_SetImageList(m_hwnd, (HIMAGELIST)imageList->GetHIMAGELIST());
 287 }
 288
 289 void wxNotebook::AssignImageList(wxImageList* imageList)
 290 {
 291   SetImageList(imageList);
 292   m_bOwnsImageList = TRUE;
 293 }
 294
 295 // ----------------------------------------------------------------------------
 296 // wxNotebook size settings
 297 // ----------------------------------------------------------------------------
 298
 299 void wxNotebook::SetPageSize(const wxSize& size)
 300 {
 301     // transform the page size into the notebook size
 302     RECT rc;
 303     rc.left =
 304     rc.top = 0;
 305     rc.right = size.x;
 306     rc.bottom = size.y;
 307
 308     TabCtrl_AdjustRect(GetHwnd(), TRUE, &rc);
 309
 310     // and now set it
 311     SetSize(rc.right - rc.left, rc.bottom - rc.top);
 312 }
 313
 314 void wxNotebook::SetPadding(const wxSize& padding)
 315 {
 316     TabCtrl_SetPadding(GetHwnd(), padding.x, padding.y);
 317 }
 318
 319 // Windows-only at present. Also, you must use the wxNB_FIXEDWIDTH
 320 // style.
 321 void wxNotebook::SetTabSize(const wxSize& sz)
 322 {
 323     ::SendMessage(GetHwnd(), TCM_SETITEMSIZE, 0, MAKELPARAM(sz.x, sz.y));
 324 }
 325
 326 // ----------------------------------------------------------------------------
 327 // wxNotebook operations
 328 // ----------------------------------------------------------------------------
 329
 330 // remove one page from the notebook
 331 bool wxNotebook::DeletePage(int nPage)
 332 {
 333   wxCHECK_MSG( IS_VALID_PAGE(nPage), FALSE, wxT("notebook page out of range") );
 334
 335   if ( m_nSelection == nPage ) {
 336       // advance selection backwards - the page being deleted shouldn't be left
 337       // selected
 338       AdvanceSelection(FALSE);
 339   }
 340
 341   TabCtrl_DeleteItem(m_hwnd, nPage);
 342
 343   delete m_pages[nPage];
 344   m_pages.Remove(nPage);
 345
 346   if ( m_pages.IsEmpty() ) {
 347       // no selection if the notebook became empty
 348       m_nSelection = -1;
 349   }
 350   else
 351       m_nSelection = TabCtrl_GetCurSel(m_hwnd);
 352
 353
 354   return TRUE;
 355 }
 356
 357 // remove one page from the notebook, without deleting
 358 wxNotebookPage *wxNotebook::DoRemovePage(int nPage)
 359 {
 360   wxCHECK_MSG( IS_VALID_PAGE(nPage), NULL, wxT("notebook page out of range") );
 361
 362   TabCtrl_DeleteItem(m_hwnd, nPage);
 363
 364   wxNotebookPage *pageRemoved = m_pages[nPage];
 365   m_pages.Remove(nPage);
 366
 367   if ( m_pages.IsEmpty() )
 368     m_nSelection = -1;
 369   else
 370     m_nSelection = TabCtrl_GetCurSel(m_hwnd);
 371
 372   return pageRemoved;
 373 }
 374
 375 // remove all pages
 376 bool wxNotebook::DeleteAllPages()
 377 {
 378   int nPageCount = GetPageCount();
 379   int nPage;
 380   for ( nPage = 0; nPage < nPageCount; nPage++ )
 381     delete m_pages[nPage];
 382
 383   m_pages.Clear();
 384
 385   TabCtrl_DeleteAllItems(m_hwnd);
 386
 387   m_nSelection = -1;
 388
 389   return TRUE;
 390 }
 391
 392 // add a page to the notebook
 393 bool wxNotebook::AddPage(wxNotebookPage *pPage,
 394                          const wxString& strText,
 395                          bool bSelect,
 396                          int imageId)
 397 {
 398   return InsertPage(GetPageCount(), pPage, strText, bSelect, imageId);
 399 }
 400
 401 // same as AddPage() but does it at given position
 402 bool wxNotebook::InsertPage(int nPage,
 403                             wxNotebookPage *pPage,
 404                             const wxString& strText,
 405                             bool bSelect,
 406                             int imageId)
 407 {
 408   wxASSERT( pPage != NULL );
 409   wxCHECK( IS_VALID_PAGE(nPage) || nPage == GetPageCount(), FALSE );
 410
 411   // do add the tab to the control
 412
 413   // init all fields to 0
 414   TC_ITEM tcItem;
 415   memset(&tcItem, 0, sizeof(tcItem));
 416
 417   if ( imageId != -1 )
 418   {
 419     tcItem.mask |= TCIF_IMAGE;
 420     tcItem.iImage  = imageId;
 421   }
 422
 423   if ( !strText.IsEmpty() )
 424   {
 425     tcItem.mask |= TCIF_TEXT;
 426     tcItem.pszText = (wxChar *)strText.c_str(); // const_cast
 427   }
 428
 429   if ( TabCtrl_InsertItem(m_hwnd, nPage, &tcItem) == -1 ) {
 430     wxLogError(wxT("Can't create the notebook page '%s'."), strText.c_str());
 431
 432     return FALSE;
 433   }
 434
 435   // if the inserted page is before the selected one, we must update the
 436   // index of the selected page
 437   if ( nPage <= m_nSelection )
 438   {
 439     // one extra page added
 440     m_nSelection++;
 441   }
 442
 443   // save the pointer to the page
 444   m_pages.Insert(pPage, nPage);
 445
 446   // don't show pages by default (we'll need to adjust their size first)
 447   HWND hwnd = GetWinHwnd(pPage);
 448   SetWindowLong(hwnd, GWL_STYLE, GetWindowLong(hwnd, GWL_STYLE) & ~WS_VISIBLE);
 449
 450   // this updates internal flag too - otherwise it will get out of sync
 451   pPage->Show(FALSE);
 452
 453   // fit the notebook page to the tab control's display area
 454   RECT rc;
 455   rc.left = rc.top = 0;
 456   GetSize((int *)&rc.right, (int *)&rc.bottom);
 457   TabCtrl_AdjustRect(m_hwnd, FALSE, &rc);
 458   pPage->SetSize(rc.left, rc.top, rc.right - rc.left, rc.bottom - rc.top);
 459
 460   // some page should be selected: either this one or the first one if there is
 461   // still no selection
 462   int selNew = -1;
 463   if ( bSelect )
 464     selNew = nPage;
 465   else if ( m_nSelection == -1 )
 466     selNew = 0;
 467
 468   if ( selNew != -1 )
 469     SetSelection(selNew);
 470
 471   return TRUE;
 472 }
 473
 474 // ----------------------------------------------------------------------------
 475 // wxNotebook callbacks
 476 // ----------------------------------------------------------------------------
 477
 478 void wxNotebook::OnSize(wxSizeEvent& event)
 479 {
 480   // fit the notebook page to the tab control's display area
 481   RECT rc;
 482   rc.left = rc.top = 0;
 483   GetSize((int *)&rc.right, (int *)&rc.bottom);
 484
 485   TabCtrl_AdjustRect(m_hwnd, FALSE, &rc);
 486
 487   int width = rc.right - rc.left,
 488       height = rc.bottom - rc.top;
 489   size_t nCount = m_pages.Count();
 490   for ( size_t nPage = 0; nPage < nCount; nPage++ ) {
 491     wxNotebookPage *pPage = m_pages[nPage];
 492     pPage->SetSize(rc.left, rc.top, width, height);
 493   }
 494
 495   event.Skip();
 496 }
 497
 498 void wxNotebook::OnSelChange(wxNotebookEvent& event)
 499 {
 500   // is it our tab control?
 501   if ( event.GetEventObject() == this )
 502   {
 503       int sel = event.GetOldSelection();
 504       if ( sel != -1 )
 505         m_pages[sel]->Show(FALSE);
 506
 507       sel = event.GetSelection();
 508       if ( sel != -1 )
 509       {
 510         wxNotebookPage *pPage = m_pages[sel];
 511         pPage->Show(TRUE);
 512         pPage->SetFocus();
 513       }
 514
 515       m_nSelection = sel;
 516   }
 517
 518   // we want to give others a chance to process this message as well
 519   event.Skip();
 520 }
 521
 522 void wxNotebook::OnSetFocus(wxFocusEvent& event)
 523 {
 524     // this function is only called when the focus is explicitly set (i.e. from
 525     // the program) to the notebook - in this case we don't need the
 526     // complicated OnNavigationKey() logic because the programmer knows better
 527     // what [s]he wants
 528
 529     // set focus to the currently selected page if any
 530     if ( m_nSelection != -1 )
 531         m_pages[m_nSelection]->SetFocus();
 532
 533     event.Skip();
 534 }
 535
 536 void wxNotebook::OnNavigationKey(wxNavigationKeyEvent& event)
 537 {
 538     if ( event.IsWindowChange() ) {
 539         // change pages
 540         AdvanceSelection(event.GetDirection());
 541     }
 542     else {
 543         // we get this event in 2 cases
 544         //
 545         // a) one of our pages might have generated it because the user TABbed
 546         // out from it in which case we should propagate the event upwards and
 547         // our parent will take care of setting the focus to prev/next sibling
 548         //
 549         // or
 550         //
 551         // b) the parent panel wants to give the focus to us so that we
 552         // forward it to our selected page. We can't deal with this in
 553         // OnSetFocus() because we don't know which direction the focus came
 554         // from in this case and so can't choose between setting the focus to
 555         // first or last panel child
 556
 557         wxWindow *parent = GetParent();
 558         if ( event.GetEventObject() == parent )
 559         {
 560             // no, it doesn't come from child, case (b): forward to a page
 561             if ( m_nSelection != -1 )
 562             {
 563                 // so that the page knows that the event comes from it's parent
 564                 // and is being propagated downwards
 565                 event.SetEventObject(this);
 566
 567                 wxWindow *page = m_pages[m_nSelection];
 568                 if ( !page->GetEventHandler()->ProcessEvent(event) )
 569                 {
 570                     page->SetFocus();
 571                 }
 572                 //else: page manages focus inside it itself
 573             }
 574             else
 575             {
 576                 // we have no pages - still have to give focus to _something_
 577                 SetFocus();
 578             }
 579         }
 580         else
 581         {
 582             // it comes from our child, case (a), pass to the parent
 583             if ( parent ) {
 584                 event.SetCurrentFocus(this);
 585                 parent->GetEventHandler()->ProcessEvent(event);
 586             }
 587         }
 588     }
 589 }
 590
 591 // ----------------------------------------------------------------------------
 592 // wxNotebook base class virtuals
 593 // ----------------------------------------------------------------------------
 594
 595 // override these 2 functions to do nothing: everything is done in OnSize
 596
 597 void wxNotebook::SetConstraintSizes(bool WXUNUSED(recurse))
 598 {
 599   // don't set the sizes of the pages - their correct size is not yet known
 600   wxControl::SetConstraintSizes(FALSE);
 601 }
 602
 603 bool wxNotebook::DoPhase(int WXUNUSED(nPhase))
 604 {
 605   return TRUE;
 606 }
 607
 608 bool wxNotebook::MSWOnNotify(int idCtrl, WXLPARAM lParam, WXLPARAM* result)
 609 {
 610   wxNotebookEvent event(wxEVT_NULL, m_windowId);
 611
 612   NMHDR* hdr = (NMHDR *)lParam;
 613   switch ( hdr->code ) {
 614     case TCN_SELCHANGE:
 615       event.SetEventType(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGED);
 616       break;
 617
 618     case TCN_SELCHANGING:
 619       event.SetEventType(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGING);
 620       break;
 621
 622     default:
 623       return wxControl::MSWOnNotify(idCtrl, lParam, result);
 624   }
 625
 626   event.SetSelection(TabCtrl_GetCurSel(m_hwnd));
 627   event.SetOldSelection(m_nSelection);
 628   event.SetEventObject(this);
 629   event.SetInt(idCtrl);
 630
 631   bool processed = GetEventHandler()->ProcessEvent(event);
 632   *result = !event.IsAllowed();
 633   return processed;
 634 }
 635
 636 // ----------------------------------------------------------------------------
 637 // wxNotebook helper functions
 638 // ----------------------------------------------------------------------------
 639
 640 // generate the page changing and changed events, hide the currently active
 641 // panel and show the new one
 642 void wxNotebook::ChangePage(int nOldSel, int nSel)
 643 {
 644   // MT-FIXME should use a real semaphore
 645   static bool s_bInsideChangePage = FALSE;
 646
 647   // when we call ProcessEvent(), our own OnSelChange() is called which calls
 648   // this function - break the infinite loop
 649   if ( s_bInsideChangePage )
 650     return;
 651
 652   // it's not an error (the message may be generated by the tab control itself)
 653   // and it may happen - just do nothing
 654   if ( nSel == nOldSel )
 655     return;
 656
 657   s_bInsideChangePage = TRUE;
 658
 659   wxNotebookEvent event(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGING, m_windowId);
 660   event.SetSelection(nSel);
 661   event.SetOldSelection(nOldSel);
 662   event.SetEventObject(this);
 663   if ( GetEventHandler()->ProcessEvent(event) && !event.IsAllowed() )
 664   {
 665     // program doesn't allow the page change
 666     s_bInsideChangePage = FALSE;
 667     return;
 668   }
 669
 670   event.SetEventType(wxEVT_COMMAND_NOTEBOOK_PAGE_CHANGED);
 671   GetEventHandler()->ProcessEvent(event);
 672
 673   s_bInsideChangePage = FALSE;
 674 }
 675
 676 #endif // wxUSE_NOTEBOOK