vcl/source/control/ivctrl.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20
  21 #include <vcl/toolkit/ivctrl.hxx>
  22 #include "imivctl.hxx"
  23 #include <vcl/accessiblefactory.hxx>
  24 #include <vcl/bitmapex.hxx>
  25 #include <vcl/commandevent.hxx>
  26 #include <vcl/mnemonic.hxx>
  27 #include <vcl/settings.hxx>
  28 #include <vcl/tabctrl.hxx>
  29 #include <vcl/vclevent.hxx>
  30 #include <vcl/uitest/uiobject.hxx>
  31 #include <vcl/uitest/logger.hxx>
  32 #include <vcl/uitest/eventdescription.hxx>
  33 #include <verticaltabctrl.hxx>
  34
  35 using namespace ::com::sun::star::accessibility;
  36
  37 namespace
  38 {
  39 void collectUIInformation( const OUString& aID, const OUString& aPos , const OUString& aParent )
  40 {
  41     EventDescription aDescription;
  42     aDescription.aID = aID;
  43     aDescription.aParameters = {{ "POS" ,  aPos}};
  44     aDescription.aAction = "SELECT";
  45     aDescription.aParent = aParent;
  46     aDescription.aKeyWord = "VerticalTab";
  47     UITestLogger::getInstance().logEvent(aDescription);
  48 }
  49 }
  50
  51 /*****************************************************************************
  52 |
  53 | class : SvxIconChoiceCtrlEntry
  54 |
  55 \*****************************************************************************/
  56
  57 SvxIconChoiceCtrlEntry::SvxIconChoiceCtrlEntry( const OUString& rText,
  58                                                 const Image& rImage )
  59     : aImage(rImage)
  60     , aText(rText)
  61     , nPos(0)
  62     , pblink(nullptr)
  63     , pflink(nullptr)
  64     , eTextMode(SvxIconChoiceCtrlTextMode::Short)
  65     , nX(0)
  66     , nY(0)
  67     , nFlags(SvxIconViewFlags::NONE)
  68 {
  69 }
  70
  71 OUString SvxIconChoiceCtrlEntry::GetDisplayText() const
  72 {
  73     return MnemonicGenerator::EraseAllMnemonicChars( aText );
  74 }
  75
  76
  77 SvxIconChoiceCtrlColumnInfo::SvxIconChoiceCtrlColumnInfo( const SvxIconChoiceCtrlColumnInfo& rInfo )
  78 {
  79     nWidth = rInfo.nWidth;
  80 }
  81
  82 /*****************************************************************************
  83 |
  84 | class : SvtIconChoiceCtrl
  85 |
  86 \*****************************************************************************/
  87
  88 SvtIconChoiceCtrl::SvtIconChoiceCtrl( vcl::Window* pParent, WinBits nWinStyle ) :
  89
  90      // WB_CLIPCHILDREN on, as ScrollBars lie on the window!
  91     Control( pParent, nWinStyle | WB_CLIPCHILDREN ),
  92
  93     _pImpl           ( new SvxIconChoiceCtrl_Impl( this, nWinStyle ) )
  94 {
  95     SetLineColor();
  96     _pImpl->InitSettings();
  97     _pImpl->SetPositionMode( SvxIconChoiceCtrlPositionMode::AutoArrange );
  98 }
  99
 100 void SvtIconChoiceCtrl::SetSelectionMode(SelectionMode eMode)
 101 {
 102     _pImpl->SetSelectionMode(eMode);
 103 }
 104
 105 SvtIconChoiceCtrl::~SvtIconChoiceCtrl()
 106 {
 107     disposeOnce();
 108 }
 109
 110 void SvtIconChoiceCtrl::dispose()
 111 {
 112     if (_pImpl)
 113     {
 114         _pImpl->CallEventListeners( VclEventId::ObjectDying, nullptr );
 115         _pImpl.reset();
 116     }
 117     Control::dispose();
 118 }
 119
 120 SvxIconChoiceCtrlEntry* SvtIconChoiceCtrl::InsertEntry( const OUString& rText, const Image& rImage  )
 121 {
 122     SvxIconChoiceCtrlEntry* pEntry = new SvxIconChoiceCtrlEntry( rText, rImage);
 123
 124     _pImpl->InsertEntry(std::unique_ptr<SvxIconChoiceCtrlEntry>(pEntry), _pImpl->GetEntryCount());
 125
 126     return pEntry;
 127 }
 128
 129 void SvtIconChoiceCtrl::RemoveEntry(sal_Int32 nIndex)
 130 {
 131     _pImpl->RemoveEntry(nIndex);
 132 }
 133
 134 void SvtIconChoiceCtrl::DrawEntryImage( SvxIconChoiceCtrlEntry const * pEntry, const Point& rPos, OutputDevice& rDev )
 135 {
 136     rDev.DrawImage( rPos, pEntry->GetImage() );
 137 }
 138
 139 OUString SvtIconChoiceCtrl::GetEntryText( SvxIconChoiceCtrlEntry const * pEntry )
 140 {
 141     return pEntry->GetText();
 142 }
 143
 144 void SvtIconChoiceCtrl::Paint(vcl::RenderContext& rRenderContext, const tools::Rectangle& rRect)
 145 {
 146     _pImpl->Paint(rRenderContext, rRect);
 147 }
 148
 149 void SvtIconChoiceCtrl::MouseButtonDown( const MouseEvent& rMEvt )
 150 {
 151     if( !_pImpl->MouseButtonDown( rMEvt ) )
 152         Control::MouseButtonDown( rMEvt );
 153 }
 154
 155 void SvtIconChoiceCtrl::MouseButtonUp( const MouseEvent& rMEvt )
 156 {
 157     if( !_pImpl->MouseButtonUp( rMEvt ) )
 158         Control::MouseButtonUp( rMEvt );
 159 }
 160
 161 void SvtIconChoiceCtrl::MouseMove( const MouseEvent& rMEvt )
 162 {
 163     if( !_pImpl->MouseMove( rMEvt ) )
 164         Control::MouseMove( rMEvt );
 165 }
 166 void SvtIconChoiceCtrl::ArrangeIcons()
 167 {
 168     if ( GetStyle() & WB_ALIGN_TOP )
 169     {
 170         Size aFullSize;
 171         tools::Rectangle aEntryRect;
 172
 173         for ( sal_Int32 i = 0; i < GetEntryCount(); i++ )
 174         {
 175             SvxIconChoiceCtrlEntry* pEntry = GetEntry ( i );
 176             aEntryRect = _pImpl->GetEntryBoundRect ( pEntry );
 177
 178             aFullSize.setWidth ( aFullSize.getWidth()+aEntryRect.GetWidth() );
 179         }
 180
 181         _pImpl->Arrange ( false, aFullSize.getWidth(), 0 );
 182     }
 183     else if ( GetStyle() & WB_ALIGN_LEFT )
 184     {
 185         Size aFullSize;
 186         tools::Rectangle aEntryRect;
 187
 188         for ( sal_Int32 i = 0; i < GetEntryCount(); i++ )
 189         {
 190             SvxIconChoiceCtrlEntry* pEntry = GetEntry ( i );
 191             aEntryRect = _pImpl->GetEntryBoundRect ( pEntry );
 192
 193             aFullSize.setHeight ( aFullSize.getHeight()+aEntryRect.GetHeight() );
 194         }
 195
 196         _pImpl->Arrange ( false, 0, aFullSize.getHeight() );
 197     }
 198     else
 199     {
 200         _pImpl->Arrange(false, 0, 0);
 201     }
 202     _pImpl->Arrange( false, 0, 1000 );
 203 }
 204 void SvtIconChoiceCtrl::Resize()
 205 {
 206     _pImpl->Resize();
 207     Control::Resize();
 208 }
 209
 210 void SvtIconChoiceCtrl::GetFocus()
 211 {
 212     _pImpl->GetFocus();
 213     Control::GetFocus();
 214     SvxIconChoiceCtrlEntry* pSelectedEntry = GetSelectedEntry();
 215     if ( pSelectedEntry )
 216         _pImpl->CallEventListeners( VclEventId::ListboxSelect, pSelectedEntry );
 217 }
 218
 219 void SvtIconChoiceCtrl::LoseFocus()
 220 {
 221     if (_pImpl)
 222         _pImpl->LoseFocus();
 223     Control::LoseFocus();
 224 }
 225
 226 void SvtIconChoiceCtrl::SetFont(const vcl::Font& rFont)
 227 {
 228     if (rFont != GetFont())
 229     {
 230         Control::SetFont(rFont);
 231         _pImpl->FontModified();
 232     }
 233 }
 234
 235 void SvtIconChoiceCtrl::SetPointFont(const vcl::Font& rFont)
 236 {
 237     if (rFont != GetPointFont(*this)) //FIXME
 238     {
 239         Control::SetPointFont(*this, rFont); //FIXME
 240         _pImpl->FontModified();
 241     }
 242 }
 243
 244 WinBits SvtIconChoiceCtrl::GetStyle() const
 245 {
 246     return _pImpl->GetStyle();
 247 }
 248
 249 void SvtIconChoiceCtrl::Command(const CommandEvent& rCEvt)
 250 {
 251     _pImpl->Command( rCEvt );
 252     //pass at least alt press/release to parent impl
 253     if (rCEvt.GetCommand() == CommandEventId::ModKeyChange)
 254         Control::Command(rCEvt);
 255 }
 256
 257 #ifdef DBG_UTIL
 258 void SvtIconChoiceCtrl::SetEntryTextMode( SvxIconChoiceCtrlTextMode eMode, SvxIconChoiceCtrlEntry* pEntry )
 259 {
 260     _pImpl->SetEntryTextMode( eMode, pEntry );
 261 }
 262 #endif
 263
 264 sal_Int32 SvtIconChoiceCtrl::GetEntryCount() const
 265 {
 266     return _pImpl ? _pImpl->GetEntryCount() : 0;
 267 }
 268
 269 SvxIconChoiceCtrlEntry* SvtIconChoiceCtrl::GetEntry( sal_Int32 nPos ) const
 270 {
 271     return _pImpl ? _pImpl->GetEntry( nPos ) : nullptr;
 272 }
 273
 274 SvxIconChoiceCtrlEntry* SvtIconChoiceCtrl::GetSelectedEntry() const
 275 {
 276     return _pImpl ? _pImpl->GetFirstSelectedEntry() : nullptr;
 277 }
 278
 279 void SvtIconChoiceCtrl::ClickIcon()
 280 {
 281     GetSelectedEntry();
 282     _aClickIconHdl.Call( this );
 283 }
 284
 285 void SvtIconChoiceCtrl::KeyInput( const KeyEvent& rKEvt )
 286 {
 287     bool bKeyUsed = DoKeyInput( rKEvt );
 288     if ( !bKeyUsed )
 289     {
 290         Control::KeyInput( rKEvt );
 291     }
 292 }
 293 bool SvtIconChoiceCtrl::DoKeyInput( const KeyEvent& rKEvt )
 294 {
 295     return _pImpl->KeyInput( rKEvt );
 296 }
 297 sal_Int32 SvtIconChoiceCtrl::GetEntryListPos( SvxIconChoiceCtrlEntry const * pEntry ) const
 298 {
 299     return _pImpl->GetEntryListPos( pEntry );
 300 }
 301 SvxIconChoiceCtrlEntry* SvtIconChoiceCtrl::GetCursor( ) const
 302 {
 303     return _pImpl->GetCurEntry( );
 304 }
 305 void SvtIconChoiceCtrl::SetCursor( SvxIconChoiceCtrlEntry* pEntry )
 306 {
 307     _pImpl->SetCursor( pEntry );
 308 }
 309
 310 void SvtIconChoiceCtrl::DataChanged( const DataChangedEvent& rDCEvt )
 311 {
 312     if ( ((rDCEvt.GetType() == DataChangedEventType::SETTINGS) ||
 313          (rDCEvt.GetType() == DataChangedEventType::FONTSUBSTITUTION) ||
 314          (rDCEvt.GetType() == DataChangedEventType::FONTS) ) &&
 315          (rDCEvt.GetFlags() & AllSettingsFlags::STYLE) )
 316     {
 317         _pImpl->InitSettings();
 318         Invalidate(InvalidateFlags::NoChildren);
 319     }
 320     else
 321         Control::DataChanged( rDCEvt );
 322 }
 323
 324 void SvtIconChoiceCtrl::SetBackground( const Wallpaper& rPaper )
 325 {
 326     if( rPaper == GetBackground() )
 327         return;
 328
 329     const StyleSettings& rStyleSettings = GetSettings().GetStyleSettings();
 330     // if it is the default (empty) wallpaper
 331     if (rPaper.IsEmpty())
 332     {
 333         Control::SetBackground( rStyleSettings.GetFieldColor() );
 334     }
 335     else
 336     {
 337         Wallpaper aBackground( rPaper );
 338         // HACK, as background might be transparent!
 339         if( !aBackground.IsBitmap() )
 340             aBackground.SetStyle( WallpaperStyle::Tile );
 341
 342         WallpaperStyle eStyle = aBackground.GetStyle();
 343         Color aBack( aBackground.GetColor());
 344         if( aBack == COL_TRANSPARENT &&
 345             (!aBackground.IsBitmap() ||
 346              aBackground.GetBitmap().IsTransparent() ||
 347              (eStyle != WallpaperStyle::Tile && eStyle != WallpaperStyle::Scale)) )
 348         {
 349             aBackground.SetColor( rStyleSettings.GetFieldColor() );
 350         }
 351         if( aBackground.IsScrollable() )
 352         {
 353             tools::Rectangle aRect;
 354             aRect.SetSize( Size(32765, 32765) );
 355             aBackground.SetRect( aRect );
 356         }
 357         else
 358         {
 359             tools::Rectangle aRect( _pImpl->GetOutputRect() );
 360             aBackground.SetRect( aRect );
 361         }
 362         Control::SetBackground( aBackground );
 363     }
 364
 365     // If text colors are attributed "hard," don't use automatism to select
 366     // a readable text color.
 367     vcl::Font aFont( GetFont() );
 368     aFont.SetColor( rStyleSettings.GetFieldTextColor() );
 369     SetFont( aFont );
 370
 371     Invalidate(InvalidateFlags::NoChildren);
 372 }
 373
 374 void SvtIconChoiceCtrl::RequestHelp( const HelpEvent& rHEvt )
 375 {
 376     if ( !_pImpl->RequestHelp( rHEvt ) )
 377         Control::RequestHelp( rHEvt );
 378 }
 379
 380 tools::Rectangle SvtIconChoiceCtrl::GetBoundingBox( SvxIconChoiceCtrlEntry* pEntry ) const
 381 {
 382     return _pImpl->GetEntryBoundRect( pEntry );
 383 }
 384
 385 void SvtIconChoiceCtrl::FillLayoutData() const
 386 {
 387     CreateLayoutData();
 388     const_cast<SvtIconChoiceCtrl*>(this)->Invalidate();
 389 }
 390
 391 tools::Rectangle SvtIconChoiceCtrl::GetEntryCharacterBounds( const sal_Int32 _nEntryPos, const sal_Int32 _nCharacterIndex ) const
 392 {
 393     tools::Rectangle aRect;
 394
 395     Pair aEntryCharacterRange = GetLineStartEnd( _nEntryPos );
 396     if ( aEntryCharacterRange.A() + _nCharacterIndex < aEntryCharacterRange.B() )
 397     {
 398         aRect = GetCharacterBounds( aEntryCharacterRange.A() + _nCharacterIndex );
 399     }
 400
 401     return aRect;
 402 }
 403
 404 void SvtIconChoiceCtrl::SetNoSelection()
 405 {
 406     _pImpl->SetNoSelection();
 407 }
 408
 409 void SvtIconChoiceCtrl::CallImplEventListeners(VclEventId nEvent, void* pData)
 410 {
 411     CallEventListeners(nEvent, pData);
 412 }
 413 css::uno::Reference< XAccessible > SvtIconChoiceCtrl::CreateAccessible()
 414 {
 415     vcl::Window* pParent = GetAccessibleParentWindow();
 416     DBG_ASSERT( pParent, "SvTreeListBox::CreateAccessible - accessible parent not found" );
 417
 418     css::uno::Reference< XAccessible > xAccessible;
 419     if ( pParent )
 420     {
 421         css::uno::Reference< XAccessible > xAccParent = pParent->GetAccessible();
 422         if ( xAccParent.is() )
 423         {
 424             css::uno::Reference< css::awt::XWindowPeer > xHoldAlive(GetComponentInterface());
 425             xAccessible = _pImpl->GetAccessibleFactory().createAccessibleIconChoiceCtrl( *this, xAccParent );
 426         }
 427     }
 428     return xAccessible;
 429 }
 430
 431 struct VerticalTabPageData
 432 {
 433     OString sId;
 434     SvxIconChoiceCtrlEntry* pEntry;
 435     VclPtr<vcl::Window> xPage;      ///< the TabPage itself
 436 };
 437
 438 VerticalTabControl::VerticalTabControl(vcl::Window* pParent)
 439     : VclHBox(pParent)
 440     , m_xChooser(VclPtr<SvtIconChoiceCtrl>::Create(this, WB_3DLOOK | WB_ICON | WB_BORDER |
 441                                                          WB_NOCOLUMNHEADER | WB_HIGHLIGHTFRAME |
 442                                                          WB_NODRAGSELECTION | WB_TABSTOP | WB_CLIPCHILDREN |
 443                                                          WB_ALIGN_LEFT | WB_NOHSCROLL))
 444     , m_xBox(VclPtr<VclVBox>::Create(this))
 445 {
 446     SetStyle(GetStyle() | WB_DIALOGCONTROL);
 447     SetType(WindowType::VERTICALTABCONTROL);
 448     m_xChooser->SetSelectionMode(SelectionMode::Single);
 449     m_xChooser->SetClickHdl(LINK(this, VerticalTabControl, ChosePageHdl_Impl));
 450     m_xChooser->set_width_request(110);
 451     m_xChooser->set_height_request(400);
 452     m_xChooser->SetSizePixel(Size(110, 400));
 453     m_xBox->set_vexpand(true);
 454     m_xBox->set_hexpand(true);
 455     m_xBox->set_expand(true);
 456     m_xBox->Show();
 457     m_xChooser->Show();
 458 }
 459
 460 VerticalTabControl::~VerticalTabControl()
 461 {
 462     disposeOnce();
 463 }
 464
 465 void VerticalTabControl::dispose()
 466 {
 467     m_xChooser.disposeAndClear();
 468     m_xBox.disposeAndClear();
 469     VclHBox::dispose();
 470 }
 471
 472 IMPL_LINK_NOARG(VerticalTabControl, ChosePageHdl_Impl, SvtIconChoiceCtrl*, void)
 473 {
 474     SvxIconChoiceCtrlEntry *pEntry = m_xChooser->GetSelectedEntry();
 475     if (!pEntry)
 476         pEntry = m_xChooser->GetCursor();
 477
 478     VerticalTabPageData* pData = GetPageData(pEntry);
 479
 480     if (pData->sId != m_sCurrentPageId)
 481         SetCurPageId(pData->sId);
 482 }
 483
 484 void VerticalTabControl::ActivatePage()
 485 {
 486     m_aActivateHdl.Call( this );
 487 }
 488
 489 bool VerticalTabControl::DeactivatePage()
 490 {
 491     return !m_aDeactivateHdl.IsSet() || m_aDeactivateHdl.Call(this);
 492 }
 493
 494 VerticalTabPageData* VerticalTabControl::GetPageData(const SvxIconChoiceCtrlEntry* pEntry) const
 495 {
 496     VerticalTabPageData* pRet = nullptr;
 497     for (auto & pData : maPageList)
 498     {
 499         if (pData->pEntry == pEntry)
 500         {
 501             pRet = pData.get();
 502             break;
 503         }
 504     }
 505     return pRet;
 506 }
 507
 508 VerticalTabPageData* VerticalTabControl::GetPageData(const OString& rId) const
 509 {
 510     VerticalTabPageData* pRet = nullptr;
 511     for (auto & pData : maPageList)
 512     {
 513         if (pData->sId == rId)
 514         {
 515             pRet = pData.get();
 516             break;
 517         }
 518     }
 519     return pRet;
 520 }
 521
 522 void VerticalTabControl::SetCurPageId(const OString& rId)
 523 {
 524     OString sOldPageId = GetCurPageId();
 525     if (sOldPageId == rId)
 526         return;
 527
 528     VerticalTabPageData* pOldData = GetPageData(sOldPageId);
 529     if (pOldData && pOldData->xPage)
 530     {
 531         if (!DeactivatePage())
 532             return;
 533         pOldData->xPage->Hide();
 534     }
 535
 536     m_sCurrentPageId = "";
 537
 538     VerticalTabPageData* pNewData = GetPageData(rId);
 539     if (pNewData && pNewData->xPage)
 540     {
 541         m_sCurrentPageId = rId;
 542         m_xChooser->SetCursor(pNewData->pEntry);
 543
 544         ActivatePage();
 545         pNewData->xPage->Show();
 546     }
 547     collectUIInformation(get_id(),OStringToOUString(m_sCurrentPageId,RTL_TEXTENCODING_UTF8), GetPageParent()->get_id());
 548 }
 549
 550 OString VerticalTabControl::GetPageId(sal_uInt16 nIndex) const
 551 {
 552     return maPageList[nIndex]->sId;
 553 }
 554
 555 void VerticalTabControl::InsertPage(const rtl::OString &rIdent, const rtl::OUString& rLabel, const Image& rImage,
 556                                     const rtl::OUString& rTooltip, VclPtr<vcl::Window> xPage, int nPos)
 557 {
 558     SvxIconChoiceCtrlEntry* pEntry = m_xChooser->InsertEntry(rLabel, rImage);
 559     pEntry->SetQuickHelpText(rTooltip);
 560     m_xChooser->ArrangeIcons();
 561     VerticalTabPageData* pNew;
 562     if (nPos == -1)
 563     {
 564         maPageList.emplace_back(new VerticalTabPageData);
 565         pNew = maPageList.back().get();
 566     }
 567     else
 568     {
 569         maPageList.emplace(maPageList.begin() + nPos, new VerticalTabPageData);
 570         pNew = maPageList[nPos].get();
 571     }
 572     pNew->sId = rIdent;
 573     pNew->pEntry = pEntry;
 574     pNew->xPage = xPage;
 575     Size aOrigPrefSize(m_xBox->get_preferred_size());
 576     Size aPagePrefSize(xPage->get_preferred_size());
 577     m_xBox->set_width_request(std::max(aOrigPrefSize.Width(), aPagePrefSize.Width()));
 578     m_xBox->set_height_request(std::max(aOrigPrefSize.Height(), aPagePrefSize.Height()));
 579     pNew->xPage->Hide();
 580 }
 581
 582 void VerticalTabControl::RemovePage(const rtl::OString &rPageId)
 583 {
 584     for (auto it = maPageList.begin(), end = maPageList.end(); it != end; ++it)
 585     {
 586         VerticalTabPageData* pData = it->get();
 587         if (pData->sId == rPageId)
 588         {
 589             sal_Int32 nEntryListPos = m_xChooser->GetEntryListPos(pData->pEntry);
 590             m_xChooser->RemoveEntry(nEntryListPos);
 591             m_xChooser->ArrangeIcons();
 592             maPageList.erase(it);
 593             break;
 594         }
 595     }
 596 }
 597
 598 sal_uInt16 VerticalTabControl::GetPagePos(const OString& rPageId) const
 599 {
 600     VerticalTabPageData* pData = GetPageData(rPageId);
 601     if (!pData)
 602         return TAB_PAGE_NOTFOUND;
 603     return m_xChooser->GetEntryListPos(pData->pEntry);
 604 }
 605
 606 VclPtr<vcl::Window> VerticalTabControl::GetPage(const OString& rPageId)
 607 {
 608     VerticalTabPageData* pData = GetPageData(rPageId);
 609     if (!pData)
 610         return nullptr;
 611     return pData->xPage;
 612 }
 613
 614 OUString VerticalTabControl::GetPageText(const OString& rPageId) const
 615 {
 616     VerticalTabPageData* pData = GetPageData(rPageId);
 617     if (!pData)
 618         return OUString();
 619     return pData->pEntry->GetText();
 620 }
 621
 622 void VerticalTabControl::SetPageText(const OString& rPageId, const OUString& rText)
 623 {
 624     VerticalTabPageData* pData = GetPageData(rPageId);
 625     if (!pData)
 626         return;
 627     pData->pEntry->SetText(rText);
 628 }
 629
 630 FactoryFunction VerticalTabControl::GetUITestFactory() const
 631 {
 632     return VerticalTabControlUIObject::create;
 633 }
 634
 635 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */