sc/source/ui/view/tabcont.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: tabcont.cxx,v $
  10  * $Revision: 1.17 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30
  31 // MARKER(update_precomp.py): autogen include statement, do not remove
  32 #include "precompiled_sc.hxx"
  33
  34
  35
  36 // INCLUDE ---------------------------------------------------------------
  37
  38 #include <sfx2/viewfrm.hxx>
  39 #include <sfx2/dispatch.hxx>
  40 #include <sfx2/docfile.hxx>
  41 #include <vcl/sound.hxx>
  42 #include <tools/urlobj.hxx>
  43 #include <vcl/svapp.hxx>
  44 #include "tabcont.hxx"
  45 #include "tabvwsh.hxx"
  46 #include "docsh.hxx"
  47 #include "scmod.hxx"
  48 #include "scresid.hxx"
  49 #include "sc.hrc"
  50 #include "globstr.hrc"
  51 #include "transobj.hxx"
  52 #include "clipparam.hxx"
  53
  54
  55 // STATIC DATA -----------------------------------------------------------
  56
  57 //==================================================================
  58
  59 ScTabControl::ScTabControl( Window* pParent, ScViewData* pData ) :
  60             TabBar( pParent, WinBits( WB_BORDER | WB_3DLOOK | WB_SCROLL |
  61                                     WB_RANGESELECT | WB_MULTISELECT | WB_DRAG | WB_SIZEABLE ) ),
  62             DropTargetHelper( this ),
  63             DragSourceHelper( this ),
  64             pViewData( pData ),
  65             nMouseClickPageId( TABBAR_PAGE_NOTFOUND ),
  66             nSelPageIdByMouse( TABBAR_PAGE_NOTFOUND ),
  67             bErrorShown( FALSE )
  68 {
  69     ScDocument* pDoc = pViewData->GetDocument();
  70
  71     String aString;
  72     Color aTabBgColor;
  73     SCTAB nCount = pDoc->GetTableCount();
  74     for (SCTAB i=0; i<nCount; i++)
  75     {
  76         if (pDoc->IsVisible(i))
  77         {
  78             if (pDoc->GetName(i,aString))
  79             {
  80                 if ( pDoc->IsScenario(i) )
  81                     InsertPage( static_cast<sal_uInt16>(i)+1, aString, TPB_SPECIAL );
  82                 else
  83                     InsertPage( static_cast<sal_uInt16>(i)+1, aString );
  84                 if ( !pViewData->IsDefaultTabBgColor(i) )
  85                 {
  86                     aTabBgColor = pViewData->GetTabBgColor(i);
  87                     /*SetTabBgColor(static_cast<sal_uInt16>(i)+1, aTabBgColor, pViewData->IsDefaultTabBgColor(i) );*/
  88                     SetTabBgColor( static_cast<sal_uInt16>(i)+1, aTabBgColor );
  89                 }
  90             }
  91         }
  92     }
  93
  94     SetCurPageId( static_cast<sal_uInt16>(pViewData->GetTabNo()) + 1 );
  95
  96     SetSizePixel( Size(SC_TABBAR_DEFWIDTH, 0) );
  97
  98     SetSplitHdl( LINK( pViewData->GetView(), ScTabView, TabBarResize ) );
  99
 100     EnableEditMode();
 101 }
 102
 103 ScTabControl::~ScTabControl()
 104 {
 105 }
 106
 107 USHORT ScTabControl::GetMaxId() const
 108 {
 109     USHORT nVisCnt = GetPageCount();
 110     if (nVisCnt)
 111         return GetPageId(nVisCnt-1);
 112
 113     return 0;
 114 }
 115
 116 SCTAB ScTabControl::GetPrivatDropPos(const Point& rPos )
 117 {
 118     USHORT nPos = ShowDropPos(rPos);
 119
 120     SCTAB nRealPos = static_cast<SCTAB>(nPos);
 121
 122     if(nPos !=0 )
 123     {
 124         ScDocument* pDoc = pViewData->GetDocument();
 125
 126         SCTAB nCount = pDoc->GetTableCount();
 127
 128         USHORT nViewPos=0;
 129         nRealPos = nCount;
 130         for (SCTAB i=0; i<nCount; i++)
 131         {
 132             if (pDoc->IsVisible(i))
 133             {
 134                 nViewPos++;
 135                 if(nViewPos==nPos)
 136                 {
 137                     SCTAB j;
 138                     for (j=i+1; j<nCount; j++)
 139                     {
 140                         if (pDoc->IsVisible(j))
 141                         {
 142                             break;
 143                         }
 144                     }
 145                     nRealPos =j;
 146                     break;
 147                 }
 148             }
 149         }
 150     }
 151     return nRealPos ;
 152 }
 153
 154 void ScTabControl::MouseButtonDown( const MouseEvent& rMEvt )
 155 {
 156     ScModule* pScMod = SC_MOD();
 157     if ( !pScMod->IsModalMode() && !pScMod->IsFormulaMode() && !IsInEditMode() )
 158     {
 159         //      View aktivieren
 160         pViewData->GetViewShell()->SetActive();                 // Appear und SetViewFrame
 161         pViewData->GetView()->ActiveGrabFocus();
 162     }
 163
 164     /*  #47745# Click into free area -> insert new sheet (like in Draw).
 165         Needing clean left click without modifiers (may be context menu).
 166         #106948# Remember clicks to all pages, to be able to move mouse pointer later. */
 167     if( rMEvt.IsLeft() && (rMEvt.GetModifier() == 0) )
 168         nMouseClickPageId = GetPageId( rMEvt.GetPosPixel() );
 169     else
 170         nMouseClickPageId = TABBAR_PAGE_NOTFOUND;
 171
 172     TabBar::MouseButtonDown( rMEvt );
 173 }
 174
 175 void ScTabControl::MouseButtonUp( const MouseEvent& rMEvt )
 176 {
 177     Point aPos = PixelToLogic( rMEvt.GetPosPixel() );
 178
 179     // mouse button down and up on same page?
 180     if( nMouseClickPageId != GetPageId( aPos ) )
 181         nMouseClickPageId = TABBAR_PAGE_NOTFOUND;
 182
 183     if ( rMEvt.GetClicks() == 2 && rMEvt.IsLeft() && nMouseClickPageId != 0 && nMouseClickPageId != TAB_PAGE_NOTFOUND )
 184     {
 185         SfxDispatcher* pDispatcher = pViewData->GetViewShell()->GetViewFrame()->GetDispatcher();
 186         pDispatcher->Execute( FID_TAB_MENU_RENAME, SFX_CALLMODE_SYNCHRON | SFX_CALLMODE_RECORD );
 187     }
 188
 189     if( nMouseClickPageId == 0 )
 190     {
 191         // Click in the area next to the existing tabs:
 192         // #i70320# if several sheets are selected, deselect all ecxept the current sheet,
 193         // otherwise add new sheet
 194         USHORT nSlot = ( GetSelectPageCount() > 1 ) ? FID_TAB_DESELECTALL : FID_INS_TABLE;
 195         SfxDispatcher* pDispatcher = pViewData->GetViewShell()->GetViewFrame()->GetDispatcher();
 196         pDispatcher->Execute( nSlot, SFX_CALLMODE_SYNCHRON | SFX_CALLMODE_RECORD );
 197         // forget page ID, to be really sure that the dialog is not called twice
 198         nMouseClickPageId = TABBAR_PAGE_NOTFOUND;
 199     }
 200
 201     TabBar::MouseButtonUp( rMEvt );
 202 }
 203
 204 void ScTabControl::Select()
 205 {
 206     /*  Remember last clicked page ID. */
 207     nSelPageIdByMouse = nMouseClickPageId;
 208     /*  Reset nMouseClickPageId, so that next Select() call may invalidate
 209         nSelPageIdByMouse (i.e. if called from keyboard). */
 210     nMouseClickPageId = TABBAR_PAGE_NOTFOUND;
 211
 212     ScModule* pScMod = SC_MOD();
 213     ScDocument* pDoc = pViewData->GetDocument();
 214     ScMarkData& rMark = pViewData->GetMarkData();
 215     SCTAB nCount = pDoc->GetTableCount();
 216     SCTAB i;
 217
 218     if ( pScMod->IsTableLocked() )              // darf jetzt nicht umgeschaltet werden ?
 219     {
 220         //      den alten Zustand des TabControls wiederherstellen:
 221
 222         for (i=0; i<nCount; i++)
 223             SelectPage( static_cast<sal_uInt16>(i)+1, rMark.GetTableSelect(i) );
 224         SetCurPageId( static_cast<sal_uInt16>(pViewData->GetTabNo()) + 1 );
 225
 226         Sound::Beep();
 227         return;
 228     }
 229
 230     USHORT nCurId = GetCurPageId();
 231     if (!nCurId) return;                        // kann vorkommen, wenn bei Excel-Import alles versteckt ist
 232     USHORT nPage = nCurId - 1;
 233
 234     // OLE-inplace deaktivieren
 235     if ( nPage != static_cast<sal_uInt16>(pViewData->GetTabNo()) )
 236         pViewData->GetView()->DrawMarkListHasChanged();
 237
 238     //  InputEnterHandler nur wenn nicht Referenzeingabe
 239
 240     BOOL bRefMode = pScMod->IsFormulaMode();
 241     if (!bRefMode)
 242         pScMod->InputEnterHandler();
 243
 244     for (i=0; i<nCount; i++)
 245         rMark.SelectTable( i, IsPageSelected(static_cast<sal_uInt16>(i)+1) );
 246
 247 /*              Markierungen werden per Default nicht pro Tabelle gehalten
 248     USHORT nSelCnt = GetSelectPageCount();
 249     if (nSelCnt>1)
 250         pDoc->ExtendMarksFromTable( nPage );
 251 */
 252
 253     SfxDispatcher& rDisp = pViewData->GetDispatcher();
 254     if (rDisp.IsLocked())
 255         pViewData->GetView()->SetTabNo( static_cast<SCTAB>(nPage) );
 256     else
 257     {
 258         //      Tabelle fuer Basic ist 1-basiert
 259         SfxUInt16Item aItem( SID_CURRENTTAB, nPage + 1 );
 260         rDisp.Execute( SID_CURRENTTAB, SFX_CALLMODE_SLOT | SFX_CALLMODE_RECORD,
 261                                 &aItem, (void*) NULL );
 262     }
 263
 264     SfxBindings& rBind = pViewData->GetBindings();
 265     rBind.Invalidate( FID_FILL_TAB );
 266     rBind.Invalidate( FID_TAB_DESELECTALL );
 267
 268     rBind.Invalidate( FID_INS_TABLE );
 269     rBind.Invalidate( FID_TAB_APPEND );
 270     rBind.Invalidate( FID_TAB_MOVE );
 271     rBind.Invalidate( FID_TAB_RENAME );
 272     rBind.Invalidate( FID_DELETE_TABLE );
 273     rBind.Invalidate( FID_TABLE_SHOW );
 274     rBind.Invalidate( FID_TABLE_HIDE );
 275     rBind.Invalidate( FID_TAB_SET_TAB_BG_COLOR );
 276
 277         //      SetReference nur wenn der Konsolidieren-Dialog offen ist
 278         //      (fuer Referenzen ueber mehrere Tabellen)
 279         //      bei anderen gibt das nur unnoetiges Gezappel
 280
 281     if ( bRefMode && pViewData->GetRefType() == SC_REFTYPE_REF )
 282         if ( pViewData->GetViewShell()->GetViewFrame()->HasChildWindow(SID_OPENDLG_CONSOLIDATE) )
 283         {
 284             ScRange aRange(
 285                     pViewData->GetRefStartX(), pViewData->GetRefStartY(), pViewData->GetRefStartZ(),
 286                     pViewData->GetRefEndX(), pViewData->GetRefEndY(), pViewData->GetRefEndZ() );
 287             pScMod->SetReference( aRange, pDoc, &rMark );
 288             pScMod->EndReference();                                             // wegen Auto-Hide
 289         }
 290 }
 291
 292 void ScTabControl::UpdateStatus()
 293 {
 294     ScDocument* pDoc = pViewData->GetDocument();
 295     ScMarkData& rMark = pViewData->GetMarkData();
 296     BOOL bActive = pViewData->IsActive();
 297
 298     SCTAB nCount = pDoc->GetTableCount();
 299     SCTAB i;
 300     String aString;
 301     SCTAB nMaxCnt = Max( nCount, static_cast<SCTAB>(GetMaxId()) );
 302     Color aTabBgColor;
 303
 304     BOOL bModified = FALSE;                                                                             // Tabellen-Namen
 305     for (i=0; i<nMaxCnt && !bModified; i++)
 306     {
 307         if (pDoc->IsVisible(i))
 308         {
 309             pDoc->GetName(i,aString);
 310             aTabBgColor = pViewData->GetTabBgColor(i);
 311         }
 312         else
 313         {
 314             aString.Erase();
 315         }
 316
 317         if ( (GetPageText(static_cast<sal_uInt16>(i)+1) != aString) || (GetTabBgColor(static_cast<sal_uInt16>(i)+1) != aTabBgColor) )
 318             bModified = TRUE;
 319     }
 320
 321     if (bModified)
 322     {
 323         Clear();
 324         for (i=0; i<nCount; i++)
 325         {
 326             if (pDoc->IsVisible(i))
 327             {
 328                 if (pDoc->GetName(i,aString))
 329                 {
 330                     if ( pDoc->IsScenario(i) )
 331                         InsertPage( static_cast<sal_uInt16>(i)+1, aString, TPB_SPECIAL );
 332                     else
 333                         InsertPage( static_cast<sal_uInt16>(i)+1, aString );
 334                     if ( !pViewData->IsDefaultTabBgColor(i) )
 335                     {
 336                         aTabBgColor = pViewData->GetTabBgColor(i);
 337                         SetTabBgColor( static_cast<sal_uInt16>(i)+1, aTabBgColor );
 338                     }
 339                 }
 340             }
 341         }
 342     }
 343     SetCurPageId( static_cast<sal_uInt16>(pViewData->GetTabNo()) + 1 );
 344
 345     if (bActive)
 346     {
 347         bModified = FALSE;                                                                                      // Selektion
 348         for (i=0; i<nMaxCnt && !bModified; i++)
 349             if ( rMark.GetTableSelect(i) != IsPageSelected(static_cast<sal_uInt16>(i)+1) )
 350                 bModified = TRUE;
 351
 352         // #i99576# the following loop is mis-optimized on unxsoli4 and the reason
 353         // why this file is in NOOPTFILES.
 354         if ( bModified )
 355             for (i=0; i<nCount; i++)
 356                 SelectPage( static_cast<sal_uInt16>(i)+1, rMark.GetTableSelect(i) );
 357     }
 358     else
 359     {
 360     }
 361 }
 362
 363 void ScTabControl::ActivateView(BOOL bActivate)
 364 {
 365 //      ScDocument* pDoc = pViewData->GetDocument();
 366     ScMarkData& rMark = pViewData->GetMarkData();
 367
 368 //      ResetMark direkt in TabView
 369 //      pDoc->ResetMark();
 370
 371     USHORT nCurId = GetCurPageId();
 372     if (!nCurId) return;                        // kann vorkommen, wenn bei Excel-Import alles versteckt ist
 373     USHORT nPage = nCurId - 1;
 374 //    USHORT nCount = GetMaxId();
 375
 376     /*
 377     USHORT i;
 378     for (i=0; i<nCount; i++)
 379     {
 380         SelectPage( i+1, FALSE );
 381         if (bActivate)
 382             rMark.SelectTable( i, FALSE );
 383     }
 384     */
 385     if (bActivate)
 386     {
 387         SelectPage( nPage+1, TRUE );
 388         rMark.SelectTable( static_cast<SCTAB>(nPage), TRUE );
 389     }
 390     Invalidate();
 391 }
 392
 393 void ScTabControl::SetSheetLayoutRTL( BOOL bSheetRTL )
 394 {
 395     SetEffectiveRTL( bSheetRTL );
 396     nSelPageIdByMouse = TABBAR_PAGE_NOTFOUND;
 397 }
 398
 399
 400 void ScTabControl::Command( const CommandEvent& rCEvt )
 401 {
 402     ScModule*           pScMod   = SC_MOD();
 403     ScTabViewShell* pViewSh  = pViewData->GetViewShell();
 404     BOOL                        bDisable = pScMod->IsFormulaMode() || pScMod->IsModalMode();
 405
 406     // ViewFrame erstmal aktivieren (Bug 19493):
 407     pViewSh->SetActive();
 408
 409     USHORT nCmd = rCEvt.GetCommand();
 410     if ( nCmd == COMMAND_CONTEXTMENU )
 411     {
 412         if (!bDisable)
 413         {
 414             // #i18735# select the page that is under the mouse cursor
 415             // if multiple tables are selected and the one under the cursor
 416             // is not part of them then unselect them
 417             USHORT nId = GetPageId( rCEvt.GetMousePosPixel() );
 418             if (nId)
 419             {
 420                 BOOL bAlreadySelected = IsPageSelected( nId );
 421                 //make the clicked page the current one
 422                 SetCurPageId( nId );
 423                 //change the selection when the current one is not already
 424                 //selected or part of a multi selection
 425                 if(!bAlreadySelected)
 426                 {
 427                     USHORT nCount = GetMaxId();
 428
 429                     for (USHORT i=1; i<=nCount; i++)
 430                         SelectPage( i, i==nId );
 431                     Select();
 432                 }
 433             }
 434
 435             // #i52073# OLE inplace editing has to be stopped before showing the sheet tab context menu
 436             pViewSh->DeactivateOle();
 437
 438             //  Popup-Menu:
 439             //  get Dispatcher from ViewData (ViewFrame) instead of Shell (Frame), so it can't be null
 440             pViewData->GetDispatcher().ExecutePopup( ScResId(RID_POPUP_TAB) );
 441         }
 442     }
 443 }
 444
 445 void ScTabControl::StartDrag( sal_Int8 /* nAction */, const Point& rPosPixel )
 446 {
 447     ScModule* pScMod = SC_MOD();
 448     BOOL bDisable = pScMod->IsFormulaMode() || pScMod->IsModalMode();
 449
 450     if (!bDisable)
 451     {
 452         Region aRegion( Rectangle(0,0,0,0) );
 453         CommandEvent aCEvt( rPosPixel, COMMAND_STARTDRAG, TRUE );       // needed for StartDrag
 454         if (TabBar::StartDrag( aCEvt, aRegion ))
 455             DoDrag( aRegion );
 456     }
 457 }
 458
 459 void ScTabControl::DoDrag( const Region& /* rRegion */ )
 460 {
 461     ScDocShell* pDocSh = pViewData->GetDocShell();
 462     ScDocument* pDoc = pDocSh->GetDocument();
 463
 464     SCTAB nTab = pViewData->GetTabNo();
 465     ScMarkData aTabMark = pViewData->GetMarkData();
 466     aTabMark.ResetMark();       // doesn't change marked table information
 467     aTabMark.SetMarkArea( ScRange(0,0,nTab,MAXCOL,MAXROW,nTab) );
 468
 469     ScDocument* pClipDoc = new ScDocument( SCDOCMODE_CLIP );
 470     ScClipParam aClipParam(ScRange(0, 0, 0, MAXCOL, MAXROW, 0), false);
 471     pDoc->CopyToClip(aClipParam, pClipDoc, &aTabMark, false);
 472
 473     TransferableObjectDescriptor aObjDesc;
 474     pDocSh->FillTransferableObjectDescriptor( aObjDesc );
 475     aObjDesc.maDisplayName = pDocSh->GetMedium()->GetURLObject().GetURLNoPass();
 476     // maSize is set in ScTransferObj ctor
 477
 478     ScTransferObj* pTransferObj = new ScTransferObj( pClipDoc, aObjDesc );
 479     com::sun::star::uno::Reference<com::sun::star::datatransfer::XTransferable> xTransferable( pTransferObj );
 480
 481     pTransferObj->SetDragSourceFlags( SC_DROP_TABLE );
 482
 483     pTransferObj->SetDragSource( pDocSh, aTabMark );
 484
 485     Window* pWindow = pViewData->GetActiveWin();
 486     SC_MOD()->SetDragObject( pTransferObj, NULL );              // for internal D&D
 487     pTransferObj->StartDrag( pWindow, DND_ACTION_COPYMOVE | DND_ACTION_LINK );
 488 }
 489
 490 USHORT lcl_DocShellNr( ScDocument* pDoc )
 491 {
 492     USHORT nShellCnt = 0;
 493     SfxObjectShell* pShell = SfxObjectShell::GetFirst();
 494     while ( pShell )
 495     {
 496         if ( pShell->Type() == TYPE(ScDocShell) )
 497         {
 498             if ( ((ScDocShell*)pShell)->GetDocument() == pDoc )
 499                 return nShellCnt;
 500
 501             ++nShellCnt;
 502         }
 503         pShell = SfxObjectShell::GetNext( *pShell );
 504     }
 505
 506     DBG_ERROR("Dokument nicht gefunden");
 507     return 0;
 508 }
 509
 510 sal_Int8 ScTabControl::ExecuteDrop( const ExecuteDropEvent& rEvt )
 511 {
 512     EndSwitchPage();
 513
 514     ScDocument* pDoc = pViewData->GetDocument();
 515     const ScDragData& rData = SC_MOD()->GetDragData();
 516     if ( rData.pCellTransfer && ( rData.pCellTransfer->GetDragSourceFlags() & SC_DROP_TABLE ) &&
 517             rData.pCellTransfer->GetSourceDocument() == pDoc )
 518     {
 519         // moving of tables within the document
 520         SCTAB nPos = GetPrivatDropPos( rEvt.maPosPixel );
 521         HideDropPos();
 522
 523         if ( nPos == rData.pCellTransfer->GetVisibleTab() && rEvt.mnAction == DND_ACTION_MOVE )
 524         {
 525             // #i83005# do nothing - don't move to the same position
 526             // (too easily triggered unintentionally, and might take a long time in large documents)
 527         }
 528         else
 529         {
 530             if ( !pDoc->GetChangeTrack() && pDoc->IsDocEditable() )
 531             {
 532                 //! use table selection from the tab control where dragging was started?
 533                 pViewData->GetView()->MoveTable( lcl_DocShellNr(pDoc), nPos, rEvt.mnAction != DND_ACTION_MOVE );
 534
 535                 rData.pCellTransfer->SetDragWasInternal();          // don't delete
 536                 return TRUE;
 537             }
 538             else
 539                 Sound::Beep();
 540         }
 541     }
 542
 543     return 0;
 544 }
 545
 546 sal_Int8 ScTabControl::AcceptDrop( const AcceptDropEvent& rEvt )
 547 {
 548     if ( rEvt.mbLeaving )
 549     {
 550         EndSwitchPage();
 551         HideDropPos();
 552         return rEvt.mnAction;
 553     }
 554
 555     const ScDocument* pDoc = pViewData->GetDocument();
 556     const ScDragData& rData = SC_MOD()->GetDragData();
 557     if ( rData.pCellTransfer && ( rData.pCellTransfer->GetDragSourceFlags() & SC_DROP_TABLE ) &&
 558             rData.pCellTransfer->GetSourceDocument() == pDoc )
 559     {
 560         // moving of tables within the document
 561         if ( !pDoc->GetChangeTrack() && pDoc->IsDocEditable() )
 562         {
 563             ShowDropPos( rEvt.maPosPixel );
 564             return rEvt.mnAction;
 565         }
 566     }
 567     else                                        // switch sheets for all formats
 568     {
 569         SwitchPage( rEvt.maPosPixel );          // switch sheet after timeout
 570         return 0;                                                       // nothing can be dropped here
 571     }
 572
 573     return 0;
 574 }
 575
 576 long ScTabControl::StartRenaming()
 577 {
 578     if ( pViewData->GetDocument()->IsDocEditable() )
 579         return TABBAR_RENAMING_YES;
 580     else
 581         return TABBAR_RENAMING_NO;
 582 }
 583
 584 long ScTabControl::AllowRenaming()
 585 {
 586     ScTabViewShell* pViewSh = pViewData->GetViewShell();
 587     DBG_ASSERT( pViewSh, "pViewData->GetViewShell()" );
 588
 589     long nRet = TABBAR_RENAMING_CANCEL;
 590     USHORT nId = GetEditPageId();
 591     if ( nId )
 592     {
 593         SCTAB nTab = nId - 1;
 594         String aNewName = GetEditText();
 595         BOOL bDone = pViewSh->RenameTable( aNewName, nTab );
 596         if ( bDone )
 597             nRet = TABBAR_RENAMING_YES;
 598         else if ( bErrorShown )
 599         {
 600             //  if the error message from this TabControl is currently visible,
 601             //  don't end edit mode now, to avoid problems when returning to
 602             //  the other call (showing the error) - this should not happen
 603             DBG_ERROR("ScTabControl::AllowRenaming: nested calls");
 604             nRet = TABBAR_RENAMING_NO;
 605         }
 606         else if ( Application::IsInModalMode() )
 607         {
 608             //  #73472# don't show error message above any modal dialog
 609             //  instead cancel renaming without error message
 610             nRet = TABBAR_RENAMING_CANCEL;
 611         }
 612         else
 613         {
 614             bErrorShown = TRUE;
 615             pViewSh->ErrorMessage( STR_INVALIDTABNAME );
 616             bErrorShown = FALSE;
 617             nRet = TABBAR_RENAMING_NO;
 618         }
 619     }
 620     return nRet;
 621 }
 622
 623 void ScTabControl::EndRenaming()
 624 {
 625     if ( HasFocus() )
 626         pViewData->GetView()->ActiveGrabFocus();
 627 }
 628
 629 void ScTabControl::Mirror()
 630 {
 631     TabBar::Mirror();
 632     if( nSelPageIdByMouse != TABBAR_PAGE_NOTFOUND )
 633     {
 634         Rectangle aRect( GetPageRect( GetCurPageId() ) );
 635         if( !aRect.IsEmpty() )
 636             SetPointerPosPixel( aRect.Center() );
 637         nSelPageIdByMouse = TABBAR_PAGE_NOTFOUND;  // only once after a Select()
 638     }
 639 }
 640
 641
 642