sc/source/ui/view/tabvwshe.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 #include <comphelper/string.hxx>
  21 #include <editeng/eeitem.hxx>
  22
  23 #include "scitems.hxx"
  24 #include <editeng/editview.hxx>
  25 #include <editeng/flditem.hxx>
  26 #include <svx/hlnkitem.hxx>
  27 #include <svl/srchitem.hxx>
  28 #include <sfx2/dispatch.hxx>
  29 #include <sfx2/viewfrm.hxx>
  30 #include <sfx2/request.hxx>
  31 #include <sfx2/objface.hxx>
  32 #include <svl/stritem.hxx>
  33
  34 #include "tabvwsh.hxx"
  35 #include "sc.hrc"
  36 #include "scmod.hxx"
  37 #include "impex.hxx"
  38 #include "editsh.hxx"
  39 #include "dociter.hxx"
  40 #include "inputhdl.hxx"
  41 #include <svx/srchdlg.hxx>
  42 #include "document.hxx"
  43 #include <gridwin.hxx>
  44
  45 OUString ScTabViewShell::GetSelectionText( bool bWholeWord )
  46 {
  47     OUString aStrSelection;
  48
  49     if ( pEditShell && pEditShell == GetMySubShell() )
  50     {
  51         aStrSelection = pEditShell->GetSelectionText( bWholeWord );
  52     }
  53     else
  54     {
  55         ScRange aRange;
  56
  57         if ( GetViewData().GetSimpleArea( aRange ) == SC_MARK_SIMPLE )
  58         {
  59             ScDocument* pDoc = GetViewData().GetDocument();
  60             if ( bInFormatDialog && aRange.aStart.Row() != aRange.aEnd.Row() )
  61             {
  62                 // Range auf eine Datenzeile begrenzen
  63                 // (nur wenn der Aufruf aus einem Format-Dialog kommt)
  64                 ScHorizontalCellIterator aIter( pDoc, aRange.aStart.Tab(),
  65                     aRange.aStart.Col(), aRange.aStart.Row(),
  66                     aRange.aEnd.Col(), aRange.aEnd.Row() );
  67                 SCCOL nCol;
  68                 SCROW nRow;
  69                 if ( aIter.GetNext( nCol, nRow ) )
  70                 {
  71                     aRange.aStart.SetCol( nCol );
  72                     aRange.aStart.SetRow( nRow );
  73                     aRange.aEnd.SetRow( nRow );
  74                 }
  75                 else
  76                     aRange.aEnd = aRange.aStart;
  77             }
  78             else
  79             {
  80                 // #i111531# with 1M rows it was necessary to limit the range
  81                 // to the actually used data area.
  82                 SCCOL nCol1, nCol2;
  83                 SCROW nRow1, nRow2;
  84                 SCTAB nTab1, nTab2;
  85                 aRange.GetVars( nCol1, nRow1, nTab1, nCol2, nRow2, nTab2);
  86                 bool bShrunk;
  87                 pDoc->ShrinkToUsedDataArea( bShrunk, nTab1, nCol1, nRow1, nCol2, nRow2, false);
  88                 if (bShrunk)
  89                 {
  90                     aRange.aStart.SetCol( nCol1 );
  91                     aRange.aStart.SetRow( nRow1 );
  92                     aRange.aEnd.SetCol( nCol2 );
  93                     aRange.aEnd.SetRow( nRow2 );
  94                 }
  95             }
  96
  97             ScImportExport aObj( pDoc, aRange );
  98             aObj.SetFormulas( GetViewData().GetOptions().GetOption( VOPT_FORMULAS ) );
  99             OUString aExportOUString;
 100             aObj.ExportString( aExportOUString );
 101             aStrSelection = convertLineEnd(aExportOUString, LINEEND_CR);
 102
 103             //  Tab/CR durch Space ersetzen, wenn fuer Dialog oder per Basic/SelectionTextExt,
 104             //  oder wenn es eine einzelne Zeile ist.
 105             //  Sonst mehrzeilig mit Tabs beibehalten (z.B. Mail oder Basic/SelectionText).
 106             //  Fuer Mail werden die Tabs dann spaeter in (mehrere) Spaces gewandelt.
 107
 108             if ( bInFormatDialog || bWholeWord || aRange.aEnd.Row() == aRange.aStart.Row() )
 109             {
 110                 aStrSelection = aStrSelection.replaceAll(OUString(CHAR_CR), " ");
 111                 aStrSelection = aStrSelection.replaceAll("\t", " ");
 112                 aStrSelection = comphelper::string::stripEnd(aStrSelection, ' ');
 113             }
 114         }
 115     }
 116
 117     return aStrSelection;
 118 }
 119
 120 void ScTabViewShell::InsertURL( const OUString& rName, const OUString& rURL, const OUString& rTarget,
 121                                 sal_uInt16 nMode )
 122 {
 123     SvxLinkInsertMode eMode = (SvxLinkInsertMode) nMode;
 124     bool bAsText = ( eMode != HLINK_BUTTON );       // Default ist jetzt Text
 125
 126     if ( bAsText )
 127     {
 128         if ( GetViewData().IsActive() )
 129         {
 130             //  if the view is active, always use InsertURLField, which starts EditMode
 131             //  and selects the URL, so it can be changed from the URL bar / dialog
 132
 133             InsertURLField( rName, rURL, rTarget );
 134         }
 135         else
 136         {
 137             //  if the view is not active, InsertURLField doesn't work
 138             //  -> use InsertBookmark to directly manipulate cell content
 139             //  bTryReplace=sal_True -> if cell contains only one URL, replace it
 140
 141             SCCOL nPosX = GetViewData().GetCurX();
 142             SCROW nPosY = GetViewData().GetCurY();
 143             InsertBookmark( rName, rURL, nPosX, nPosY, &rTarget, true );
 144         }
 145     }
 146     else
 147     {
 148         SC_MOD()->InputEnterHandler();
 149         InsertURLButton( rName, rURL, rTarget );
 150     }
 151 }
 152
 153 static void lcl_SelectFieldAfterInsert( EditView& rView )
 154 {
 155     ESelection aSel = rView.GetSelection();
 156     if ( aSel.nStartPos == aSel.nEndPos && aSel.nStartPos > 0 )
 157     {
 158         //  Cursor is behind the inserted field -> extend selection to the left
 159
 160         --aSel.nStartPos;
 161         rView.SetSelection( aSel );
 162     }
 163 }
 164
 165 void ScTabViewShell::InsertURLField( const OUString& rName, const OUString& rURL, const OUString& rTarget )
 166 {
 167     SvxURLField aURLField( rURL, rName, SVXURLFORMAT_REPR );
 168     aURLField.SetTargetFrame( rTarget );
 169     SvxFieldItem aURLItem( aURLField, EE_FEATURE_FIELD );
 170
 171     ScViewData&     rViewData   = GetViewData();
 172     ScModule*       pScMod      = SC_MOD();
 173     ScInputHandler* pHdl        = pScMod->GetInputHdl( rViewData.GetViewShell() );
 174
 175     bool bSelectFirst = false;
 176     if ( !pScMod->IsEditMode() )
 177     {
 178         if ( !SelectionEditable() )
 179         {
 180             // no error message (may be called from drag&drop)
 181             return;
 182         }
 183
 184         // single url in cell is shown in the dialog and replaced
 185         bSelectFirst = HasBookmarkAtCursor( NULL );
 186         pScMod->SetInputMode( SC_INPUT_TABLE );
 187     }
 188
 189     EditView*       pTopView    = pHdl->GetTopView();
 190     EditView*       pTableView  = pHdl->GetTableView();
 191     OSL_ENSURE( pTopView || pTableView, "No EditView" );
 192
 193     if ( bSelectFirst )
 194     {
 195         if ( pTopView )
 196             pTopView->SetSelection( ESelection(0,0,0,1) );
 197         if ( pTableView )
 198             pTableView->SetSelection( ESelection(0,0,0,1) );
 199     }
 200
 201     pHdl->DataChanging();
 202
 203     if ( pTopView )
 204     {
 205         pTopView->InsertField( aURLItem );
 206         lcl_SelectFieldAfterInsert( *pTopView );
 207     }
 208     if ( pTableView )
 209     {
 210         pTableView->InsertField( aURLItem );
 211         lcl_SelectFieldAfterInsert( *pTableView );
 212     }
 213
 214     pHdl->DataChanged();
 215 }
 216
 217 void ScTabViewShell::ExecSearch( SfxRequest& rReq )
 218 {
 219     const SfxItemSet*   pReqArgs    = rReq.GetArgs();
 220     sal_uInt16              nSlot       = rReq.GetSlot();
 221     const SfxPoolItem*  pItem;
 222
 223     switch ( nSlot )
 224     {
 225         case FID_SEARCH_NOW:
 226             {
 227                 if ( pReqArgs &&
 228                      SfxItemState::SET == pReqArgs->GetItemState(SID_SEARCH_ITEM, false, &pItem) )
 229                 {
 230                     OSL_ENSURE( pItem->ISA(SvxSearchItem), "falsches Item" );
 231                     const SvxSearchItem* pSearchItem = static_cast<const SvxSearchItem*>(pItem);
 232
 233                     ScGlobal::SetSearchItem( *pSearchItem );
 234                     bool bSuccess = SearchAndReplace( pSearchItem, true, rReq.IsAPI() );
 235                     const SfxChildWindow* pChildWindow = SfxViewFrame::Current()->GetChildWindow(
 236                             SvxSearchDialogWrapper::GetChildWindowId());
 237                     if (pChildWindow)
 238                     {
 239                         SvxSearchDialog* pSearchDlg = static_cast<SvxSearchDialog*>(pChildWindow->GetWindow());
 240                         if( pSearchDlg )
 241                         {
 242                             ScTabView* pTabView = GetViewData().GetView();
 243                             if( pTabView )
 244                             {
 245                                 vcl::Window* pWin = pTabView->GetActiveWin();
 246                                 if( pWin )
 247                                 {
 248                                     pSearchDlg->SetDocWin( pWin );
 249                                     pSearchDlg->SetSrchFlag( bSuccess );
 250                                 }
 251                             }
 252                         }
 253                     }
 254                     rReq.Done();
 255                 }
 256             }
 257             break;
 258
 259         case SID_SEARCH_ITEM:
 260             if (pReqArgs && SfxItemState::SET ==
 261                             pReqArgs->GetItemState(SID_SEARCH_ITEM, false, &pItem))
 262             {
 263                 //  Search-Item merken
 264                 OSL_ENSURE( pItem->ISA(SvxSearchItem), "falsches Item" );
 265                 ScGlobal::SetSearchItem( *static_cast<const SvxSearchItem*>(pItem ));
 266             }
 267             else
 268             {
 269                 OSL_FAIL("SID_SEARCH_ITEM ohne Parameter");
 270             }
 271             break;
 272         case FID_SEARCH:
 273         case FID_REPLACE:
 274         case FID_REPLACE_ALL:
 275         case FID_SEARCH_ALL:
 276             {
 277                 if (pReqArgs && SfxItemState::SET == pReqArgs->GetItemState(nSlot, false, &pItem))
 278                 {
 279                     //  SearchItem holen
 280
 281                     SvxSearchItem aSearchItem = ScGlobal::GetSearchItem();
 282
 283                     //  SearchItem fuellen
 284
 285                     aSearchItem.SetSearchString(static_cast<const SfxStringItem*>(pItem)->GetValue());
 286                     if(SfxItemState::SET == pReqArgs->GetItemState(FN_PARAM_1, false, &pItem))
 287                         aSearchItem.SetReplaceString(static_cast<const SfxStringItem*>(pItem)->GetValue());
 288
 289                     if (nSlot == FID_SEARCH)
 290                         aSearchItem.SetCommand(SvxSearchCmd::FIND);
 291                     else if(nSlot == FID_REPLACE)
 292                         aSearchItem.SetCommand(SvxSearchCmd::REPLACE);
 293                     else if(nSlot == FID_REPLACE_ALL)
 294                         aSearchItem.SetCommand(SvxSearchCmd::REPLACE_ALL);
 295                     else
 296                         aSearchItem.SetCommand(SvxSearchCmd::FIND_ALL);
 297
 298                     //  Request ausfuehren (dabei wird das SearchItem gespeichert)
 299
 300                     aSearchItem.SetWhich(SID_SEARCH_ITEM);
 301                     GetViewData().GetDispatcher().Execute( FID_SEARCH_NOW,
 302                             rReq.IsAPI() ? SfxCallMode::API|SfxCallMode::SYNCHRON :
 303                                             SfxCallMode::RECORD,
 304                             &aSearchItem, 0L );
 305                     const SfxChildWindow* pChildWindow = SfxViewFrame::Current()->GetChildWindow(
 306                             SvxSearchDialogWrapper::GetChildWindowId());
 307                     if (pChildWindow)
 308                     {
 309                         SvxSearchDialog* pSearchDlg = static_cast<SvxSearchDialog*>(pChildWindow->GetWindow());
 310                         if( pSearchDlg )
 311                         {
 312                             ScTabView* pTabView = GetViewData().GetView();
 313                             if( pTabView )
 314                             {
 315                                 vcl::Window* pWin = pTabView->GetActiveWin();
 316                                 if( pWin )
 317                                 {
 318                                     pSearchDlg->SetDocWin( pWin );
 319                                     pSearchDlg->SetSrchFlag();
 320                                 }
 321                             }
 322                         }
 323                     }
 324                 }
 325                 else
 326                 {
 327                     GetViewData().GetDispatcher().Execute(
 328                             SID_SEARCH_DLG, SfxCallMode::ASYNCHRON|SfxCallMode::RECORD );
 329                 }
 330             }
 331             break;
 332         case FID_REPEAT_SEARCH:
 333             {
 334                 //  nochmal mit ScGlobal::GetSearchItem()
 335
 336                 SvxSearchItem aSearchItem = ScGlobal::GetSearchItem();
 337                 aSearchItem.SetWhich(SID_SEARCH_ITEM);
 338                 GetViewData().GetDispatcher().Execute( FID_SEARCH_NOW,
 339                         rReq.IsAPI() ? SfxCallMode::API|SfxCallMode::SYNCHRON :
 340                                         SfxCallMode::RECORD,
 341                         &aSearchItem, 0L );
 342             }
 343             break;
 344 //      case FID_SEARCH_COUNT:
 345     }
 346 }
 347
 348 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */