sc/source/ui/pagedlg/tphfedit.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 "scitems.hxx"
  21 #include <editeng/eeitem.hxx>
  22
  23
  24 #include <editeng/editobj.hxx>
  25 #include <editeng/editstat.hxx>
  26 #include <editeng/editview.hxx>
  27 #include <editeng/flditem.hxx>
  28 #include <editeng/adjustitem.hxx>
  29 #include <sfx2/basedlgs.hxx>
  30 #include <sfx2/objsh.hxx>
  31 #include <vcl/msgbox.hxx>
  32 #include <vcl/svapp.hxx>
  33
  34 #include "tphfedit.hxx"
  35 #include "editutil.hxx"
  36 #include "global.hxx"
  37 #include "attrib.hxx"
  38 #include "patattr.hxx"
  39 #include "scresid.hxx"
  40 #include "sc.hrc"
  41 #include "globstr.hrc"
  42 #include "tabvwsh.hxx"
  43 #include "prevwsh.hxx"
  44 #include "AccessibleEditObject.hxx"
  45
  46 #include "scabstdlg.hxx"
  47
  48
  49 // STATIC DATA -----------------------------------------------------------
  50 static ScEditWindow* pActiveEdWnd = NULL;
  51
  52 ScEditWindow* GetScEditWindow ()
  53 {
  54     return pActiveEdWnd;
  55 }
  56
  57 //========================================================================
  58
  59 static void lcl_GetFieldData( ScHeaderFieldData& rData )
  60 {
  61     SfxViewShell* pShell = SfxViewShell::Current();
  62     if (pShell)
  63     {
  64         if (pShell->ISA(ScTabViewShell))
  65             ((ScTabViewShell*)pShell)->FillFieldData(rData);
  66         else if (pShell->ISA(ScPreviewShell))
  67             ((ScPreviewShell*)pShell)->FillFieldData(rData);
  68     }
  69 }
  70
  71 //========================================================================
  72 // class ScEditWindow
  73 //========================================================================
  74
  75 ScEditWindow::ScEditWindow( Window* pParent, WinBits nBits, ScEditWindowLocation eLoc )
  76     :   Control( pParent, nBits ),
  77     eLocation(eLoc),
  78     pAcc(NULL)
  79 {
  80     EnableRTL(false);
  81
  82     const StyleSettings& rStyleSettings = Application::GetSettings().GetStyleSettings();
  83     Color aBgColor = rStyleSettings.GetWindowColor();
  84
  85     SetMapMode( MAP_TWIP );
  86     SetPointer( POINTER_TEXT );
  87     SetBackground( aBgColor );
  88
  89     Size aSize( GetOutputSize() );
  90     aSize.Height() *= 4;
  91
  92     pEdEngine = new ScHeaderEditEngine( EditEngine::CreatePool(), sal_True );
  93     pEdEngine->SetPaperSize( aSize );
  94     pEdEngine->SetRefDevice( this );
  95
  96     ScHeaderFieldData aData;
  97     lcl_GetFieldData( aData );
  98
  99         //  Feldbefehle:
 100     pEdEngine->SetData( aData );
 101     pEdEngine->SetControlWord( pEdEngine->GetControlWord() | EE_CNTRL_MARKFIELDS );
 102     mbRTL = ScGlobal::IsSystemRTL();
 103     if (mbRTL)
 104         pEdEngine->SetDefaultHorizontalTextDirection(EE_HTEXTDIR_R2L);
 105
 106     pEdView = new EditView( pEdEngine, this );
 107     pEdView->SetOutputArea( Rectangle( Point(0,0), GetOutputSize() ) );
 108
 109     pEdView->SetBackgroundColor( aBgColor );
 110     pEdEngine->InsertView( pEdView );
 111 }
 112
 113 void ScEditWindow::Resize()
 114 {
 115     Size aOutputSize(GetOutputSize());
 116     Size aSize(aOutputSize);
 117     aSize.Height() *= 4;
 118     pEdEngine->SetPaperSize(aSize);
 119     pEdView->SetOutputArea(Rectangle(Point(0,0), aOutputSize));
 120     Control::Resize();
 121 }
 122
 123 // -----------------------------------------------------------------------
 124
 125 ScEditWindow::~ScEditWindow()
 126 {
 127     // delete Accessible object before deleting EditEngine and EditView
 128     if (pAcc)
 129     {
 130         ::com::sun::star::uno::Reference< ::com::sun::star::accessibility::XAccessible > xTemp = xAcc;
 131         if (xTemp.is())
 132             pAcc->dispose();
 133     }
 134     delete pEdEngine;
 135     delete pEdView;
 136 }
 137
 138 extern "C" SAL_DLLPUBLIC_EXPORT Window* SAL_CALL makeScEditWindow(Window *pParent, VclBuilder::stringmap &)
 139 {
 140     return new ScEditWindow (pParent, WB_BORDER|WB_TABSTOP, Left);
 141 }
 142
 143 // -----------------------------------------------------------------------
 144
 145 void ScEditWindow::SetNumType(SvxNumType eNumType)
 146 {
 147     pEdEngine->SetNumType(eNumType);
 148     pEdEngine->UpdateFields();
 149 }
 150
 151 // -----------------------------------------------------------------------
 152
 153 EditTextObject* ScEditWindow::CreateTextObject()
 154 {
 155     //  Absatzattribute zuruecksetzen
 156     //  (GetAttribs beim Format-Dialog-Aufruf gibt immer gesetzte Items zurueck)
 157
 158     const SfxItemSet& rEmpty = pEdEngine->GetEmptyItemSet();
 159     sal_Int32 nParCnt = pEdEngine->GetParagraphCount();
 160     for (sal_Int32 i=0; i<nParCnt; i++)
 161         pEdEngine->SetParaAttribs( i, rEmpty );
 162
 163     return pEdEngine->CreateTextObject();
 164 }
 165
 166 // -----------------------------------------------------------------------
 167
 168 void ScEditWindow::SetFont( const ScPatternAttr& rPattern )
 169 {
 170     SfxItemSet* pSet = new SfxItemSet( pEdEngine->GetEmptyItemSet() );
 171     rPattern.FillEditItemSet( pSet );
 172     //  FillEditItemSet adjusts font height to 1/100th mm,
 173     //  but for header/footer twips is needed, as in the PatternAttr:
 174     pSet->Put( rPattern.GetItem(ATTR_FONT_HEIGHT), EE_CHAR_FONTHEIGHT );
 175     pSet->Put( rPattern.GetItem(ATTR_CJK_FONT_HEIGHT), EE_CHAR_FONTHEIGHT_CJK );
 176     pSet->Put( rPattern.GetItem(ATTR_CTL_FONT_HEIGHT), EE_CHAR_FONTHEIGHT_CTL );
 177     if (mbRTL)
 178         pSet->Put( SvxAdjustItem( SVX_ADJUST_RIGHT, EE_PARA_JUST ) );
 179     pEdEngine->SetDefaults( pSet );
 180 }
 181
 182 // -----------------------------------------------------------------------
 183
 184 void ScEditWindow::SetText( const EditTextObject& rTextObject )
 185 {
 186     pEdEngine->SetText( rTextObject );
 187 }
 188
 189 // -----------------------------------------------------------------------
 190
 191 void ScEditWindow::InsertField( const SvxFieldItem& rFld )
 192 {
 193     pEdView->InsertField( rFld );
 194 }
 195
 196 // -----------------------------------------------------------------------
 197
 198 void ScEditWindow::SetCharAttriutes()
 199 {
 200     SfxObjectShell* pDocSh  = SfxObjectShell::Current();
 201
 202     SfxViewShell*       pViewSh = SfxViewShell::Current();
 203
 204     ScTabViewShell* pTabViewSh = PTR_CAST(ScTabViewShell, SfxViewShell::Current());
 205
 206
 207     OSL_ENSURE( pDocSh,  "Current DocShell not found" );
 208     OSL_ENSURE( pViewSh, "Current ViewShell not found" );
 209
 210     if ( pDocSh && pViewSh )
 211     {
 212         if(pTabViewSh!=NULL) pTabViewSh->SetInFormatDialog(sal_True);
 213
 214         SfxItemSet aSet( pEdView->GetAttribs() );
 215
 216         ScAbstractDialogFactory* pFact = ScAbstractDialogFactory::Create();
 217         OSL_ENSURE(pFact, "ScAbstractFactory create fail!");
 218
 219         SfxAbstractTabDialog* pDlg = pFact->CreateScCharDlg(  GetParent(),  &aSet,
 220                                                             pDocSh,RID_SCDLG_CHAR );
 221         OSL_ENSURE(pDlg, "Dialog create fail!");
 222         pDlg->SetText( ScGlobal::GetRscString( STR_TEXTATTRS ) );
 223         if ( pDlg->Execute() == RET_OK )
 224         {
 225             aSet.ClearItem();
 226             aSet.Put( *pDlg->GetOutputItemSet() );
 227             pEdView->SetAttribs( aSet );
 228         }
 229
 230         if(pTabViewSh!=NULL) pTabViewSh->SetInFormatDialog(false);
 231         delete pDlg;
 232     }
 233 }
 234
 235 // -----------------------------------------------------------------------
 236
 237 void ScEditWindow::Paint( const Rectangle& rRect )
 238 {
 239     const StyleSettings& rStyleSettings = Application::GetSettings().GetStyleSettings();
 240     Color aBgColor = rStyleSettings.GetWindowColor();
 241
 242     pEdView->SetBackgroundColor( aBgColor );
 243
 244     SetBackground( aBgColor );
 245
 246     Control::Paint( rRect );
 247
 248     pEdView->Paint( rRect );
 249 }
 250
 251 // -----------------------------------------------------------------------
 252
 253 void ScEditWindow::MouseMove( const MouseEvent& rMEvt )
 254 {
 255     pEdView->MouseMove( rMEvt );
 256 }
 257
 258 // -----------------------------------------------------------------------
 259
 260 void ScEditWindow::MouseButtonDown( const MouseEvent& rMEvt )
 261 {
 262     if ( !HasFocus() )
 263         GrabFocus();
 264
 265     pEdView->MouseButtonDown( rMEvt );
 266 }
 267
 268 // -----------------------------------------------------------------------
 269
 270 void ScEditWindow::MouseButtonUp( const MouseEvent& rMEvt )
 271 {
 272     pEdView->MouseButtonUp( rMEvt );
 273 }
 274
 275 // -----------------------------------------------------------------------
 276
 277 void ScEditWindow::KeyInput( const KeyEvent& rKEvt )
 278 {
 279     sal_uInt16 nKey =  rKEvt.GetKeyCode().GetModifier()
 280                  + rKEvt.GetKeyCode().GetCode();
 281
 282     if ( nKey == KEY_TAB || nKey == KEY_TAB + KEY_SHIFT )
 283     {
 284         Control::KeyInput( rKEvt );
 285     }
 286     else if ( !pEdView->PostKeyEvent( rKEvt ) )
 287     {
 288         Control::KeyInput( rKEvt );
 289     }
 290 }
 291
 292 // -----------------------------------------------------------------------
 293
 294 void ScEditWindow::Command( const CommandEvent& rCEvt )
 295 {
 296     pEdView->Command( rCEvt );
 297 }
 298
 299 // -----------------------------------------------------------------------
 300
 301 void ScEditWindow::GetFocus()
 302 {
 303     pActiveEdWnd = this;
 304
 305     ::com::sun::star::uno::Reference< ::com::sun::star::accessibility::XAccessible > xTemp = xAcc;
 306     if (xTemp.is() && pAcc)
 307     {
 308         pAcc->GotFocus();
 309     }
 310     else
 311         pAcc = NULL;
 312 }
 313
 314 void ScEditWindow::LoseFocus()
 315 {
 316     ::com::sun::star::uno::Reference< ::com::sun::star::accessibility::XAccessible > xTemp = xAcc;
 317     if (xTemp.is() && pAcc)
 318     {
 319         pAcc->LostFocus();
 320     }
 321     else
 322         pAcc = NULL;
 323 }
 324
 325 // -----------------------------------------------------------------------
 326
 327 ::com::sun::star::uno::Reference< ::com::sun::star::accessibility::XAccessible > ScEditWindow::CreateAccessible()
 328 {
 329     OUString sName;
 330     OUString sDescription(GetHelpText());
 331     switch (eLocation)
 332     {
 333     case Left:
 334         {
 335             sName = OUString(ScResId(STR_ACC_LEFTAREA_NAME));
 336         }
 337         break;
 338     case Center:
 339         {
 340             sName = OUString(ScResId(STR_ACC_CENTERAREA_NAME));
 341         }
 342         break;
 343     case Right:
 344         {
 345             sName = OUString(ScResId(STR_ACC_RIGHTAREA_NAME));
 346         }
 347         break;
 348     }
 349     pAcc = new ScAccessibleEditObject(GetAccessibleParentWindow()->GetAccessible(), pEdView, this,
 350         OUString(sName), OUString(sDescription), ScAccessibleEditObject::EditControl);
 351     ::com::sun::star::uno::Reference< ::com::sun::star::accessibility::XAccessible > xAccessible = pAcc;
 352     xAcc = xAccessible;
 353     return pAcc;
 354 }
 355
 356 ScExtIButton::ScExtIButton(Window* pParent, WinBits nBits )
 357     : ImageButton(pParent,nBits), pPopupMenu(NULL)
 358 {
 359     nSelected=0;
 360     aTimer.SetTimeout(600);
 361     SetDropDown( true);
 362 }
 363
 364 extern "C" SAL_DLLPUBLIC_EXPORT Window* SAL_CALL makeScExtIButton(Window *pParent, VclBuilder::stringmap &)
 365 {
 366     return new ScExtIButton (pParent, 0);// WB_BORDER|WB_TABSTOP);
 367 }
 368
 369 void ScExtIButton::SetPopupMenu(PopupMenu* pPopUp)
 370 {
 371     pPopupMenu=pPopUp;
 372 }
 373
 374 sal_uInt16 ScExtIButton::GetSelected() const
 375 {
 376     return nSelected;
 377 }
 378
 379 OString ScExtIButton::GetSelectedIdent() const
 380 {
 381     return aSelectedIdent;
 382 }
 383
 384 void ScExtIButton::MouseButtonDown( const MouseEvent& rMEvt )
 385 {
 386     if(!aTimer.IsActive())
 387     {
 388         aTimer.Start();
 389         aTimer.SetTimeoutHdl(LINK( this, ScExtIButton, TimerHdl));
 390     }
 391
 392     ImageButton::MouseButtonDown(rMEvt );
 393 }
 394
 395 void ScExtIButton::MouseButtonUp( const MouseEvent& rMEvt)
 396 {
 397     aTimer.Stop();
 398     aTimer.SetTimeoutHdl(Link());
 399     ImageButton::MouseButtonUp(rMEvt );
 400 }
 401
 402 void ScExtIButton::Click()
 403 {
 404     aTimer.Stop();
 405     aTimer.SetTimeoutHdl(Link());
 406     ImageButton::Click();
 407 }
 408
 409 void ScExtIButton::StartPopup()
 410 {
 411     nSelected=0;
 412     aSelectedIdent = OString();
 413
 414     if(pPopupMenu!=NULL)
 415     {
 416         SetPressed( sal_True );
 417         EndSelection();
 418         Point aPoint(0,0);
 419         aPoint.Y()=GetOutputSizePixel().Height();
 420
 421         nSelected = pPopupMenu->Execute( this, aPoint );
 422
 423         if(nSelected)
 424         {
 425             aSelectedIdent = pPopupMenu->GetItemIdent(nSelected);
 426             aMLink.Call(this);
 427         }
 428
 429         SetPressed( false);
 430     }
 431 }
 432
 433 long ScExtIButton::PreNotify( NotifyEvent& rNEvt )
 434 {
 435     sal_uInt16 nSwitch=rNEvt.GetType();
 436     if(nSwitch==EVENT_MOUSEBUTTONUP)
 437     {
 438         MouseButtonUp(*rNEvt.GetMouseEvent());
 439     }
 440
 441     return ImageButton::PreNotify(rNEvt );
 442 }
 443
 444 IMPL_LINK_NOARG(ScExtIButton, TimerHdl)
 445 {
 446     StartPopup();
 447     return 0;
 448 }
 449
 450
 451 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */