sw/source/ui/fldui/fldtdlg.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 <cmdid.h>
  21 #include <swtypes.hxx>
  22 #include <unotools/confignode.hxx>
  23 #include <comphelper/processfactory.hxx>
  24 #include <sfx2/basedlgs.hxx>
  25 #include <sfx2/dispatch.hxx>
  26 #include <vcl/msgbox.hxx>
  27 #include <sfx2/htmlmode.hxx>
  28 #include <viewopt.hxx>
  29 #include <docsh.hxx>
  30 #include <fldwrap.hxx>
  31 #include <flddb.hxx>
  32 #include <flddinf.hxx>
  33 #include <fldvar.hxx>
  34 #include <flddok.hxx>
  35 #include <fldfunc.hxx>
  36 #include <fldref.hxx>
  37 #include <wrtsh.hxx>
  38 #include <view.hxx>
  39 #include <fldtdlg.hxx>
  40 #include <swmodule.hxx>
  41
  42 #include <helpid.h>
  43 #include <fldui.hrc>
  44 #include <globals.hrc>
  45 #include <fldtdlg.hrc>
  46
  47 #include <com/sun/star/document/XDocumentProperties.hpp>
  48 #include <com/sun/star/document/XDocumentPropertiesSupplier.hpp>
  49
  50
  51 /*--------------------------------------------------------------------
  52     Description:    carrier of the dialog
  53  --------------------------------------------------------------------*/
  54
  55
  56 SwFldDlg::SwFldDlg(SfxBindings* pB, SwChildWinWrapper* pCW, Window *pParent)
  57     : SfxTabDialog( pParent, SW_RES( DLG_FLD_INSERT )),
  58     m_pChildWin(pCW),
  59     m_pBindings(pB),
  60     m_bDataBaseMode(sal_False)
  61 {
  62     SetStyle(GetStyle()|WB_STDMODELESS);
  63     m_bHtmlMode = (::GetHtmlMode((SwDocShell*)SfxObjectShell::Current()) & HTMLMODE_ON) != 0;
  64
  65     RemoveResetButton();
  66
  67     GetOKButton().SetText(String(SW_RES(STR_FLD_INSERT)));
  68     GetOKButton().SetHelpId(HID_FIELD_INSERT);
  69     GetOKButton().SetHelpText(aEmptyStr);   // so that generated help text is used
  70
  71     GetCancelButton().SetText(String(SW_RES(STR_FLD_CLOSE)));
  72     GetCancelButton().SetHelpId(HID_FIELD_CLOSE);
  73     GetCancelButton().SetHelpText(aEmptyStr);   // so that generated help text is used
  74     GetCancelButton().SetClickHdl(LINK(this, SwFldDlg, CancelHdl));
  75
  76     FreeResource();
  77
  78     GetOKButton().SetClickHdl(LINK(this, SwFldDlg, OKHdl));
  79
  80     AddTabPage(TP_FLD_DOK, SwFldDokPage::Create, 0);
  81     AddTabPage(TP_FLD_VAR, SwFldVarPage::Create, 0);
  82     AddTabPage(TP_FLD_DOKINF, SwFldDokInfPage::Create, 0);
  83
  84     if (!m_bHtmlMode)
  85     {
  86         AddTabPage(TP_FLD_REF, SwFldRefPage::Create, 0);
  87         AddTabPage(TP_FLD_FUNC, SwFldFuncPage::Create, 0);
  88
  89         utl::OConfigurationTreeRoot aCfgRoot
  90             = utl::OConfigurationTreeRoot::createWithComponentContext(
  91                 ::comphelper::getProcessComponentContext(),
  92                 OUString(
  93                         "/org.openoffice.Office.DataAccess/Policies/Features/Writer" ),
  94                 -1,
  95                 utl::OConfigurationTreeRoot::CM_READONLY);
  96
  97         sal_Bool bDatabaseFields = sal_True;
  98         aCfgRoot.getNodeValue(
  99             OUString("DatabaseFields")) >>= bDatabaseFields;
 100
 101         if (bDatabaseFields)
 102             AddTabPage(TP_FLD_DB, SwFldDBPage::Create, 0);
 103         else
 104             RemoveTabPage(TP_FLD_DB);
 105     }
 106     else
 107     {
 108         RemoveTabPage(TP_FLD_REF);
 109         RemoveTabPage(TP_FLD_FUNC);
 110         RemoveTabPage(TP_FLD_DB);
 111     }
 112 }
 113
 114 SwFldDlg::~SwFldDlg()
 115 {
 116 }
 117
 118 sal_Bool SwFldDlg::Close()
 119 {
 120     m_pBindings->GetDispatcher()->
 121         Execute(m_bDataBaseMode ? FN_INSERT_FIELD_DATA_ONLY : FN_INSERT_FIELD,
 122         SFX_CALLMODE_ASYNCHRON|SFX_CALLMODE_RECORD);
 123     return sal_True;
 124 }
 125
 126 void SwFldDlg::Initialize(SfxChildWinInfo *pInfo)
 127 {
 128     Point aPos;
 129     Size aSize;
 130
 131     if ( pInfo->aSize.Width() != 0 && pInfo->aSize.Height() != 0 )
 132     {
 133         aPos = pInfo->aPos;
 134         if ( GetStyle() & WB_SIZEABLE )
 135             SetSizePixel( pInfo->aSize );
 136
 137         // remember initial size from pInfo
 138         aSize = GetSizePixel();
 139
 140         // should the FloatingWindow get zoomed?
 141         if ( pInfo->nFlags & SFX_CHILDWIN_ZOOMIN )
 142             RollUp();
 143     }
 144     else
 145     {
 146         // remember initial size from resource or ctor
 147         aSize = GetSizePixel();
 148
 149         Size aParentSize = GetParent()->GetOutputSizePixel();
 150         aPos.X() += ( aParentSize.Width() - aSize.Width() ) / 2;
 151         aPos.Y() += ( aParentSize.Height() - aSize.Height() ) / 2;
 152     }
 153
 154     Point aPoint;
 155     Rectangle aRect = GetDesktopRectPixel();
 156     aPoint.X() = aRect.Right() - aSize.Width();
 157     aPoint.Y() = aRect.Bottom() - aSize.Height();
 158
 159     aPoint = OutputToScreenPixel( aPoint );
 160
 161     if ( aPos.X() > aPoint.X() )
 162         aPos.X() = aPoint.X() ;
 163     if ( aPos.Y() > aPoint.Y() )
 164         aPos.Y() = aPoint.Y();
 165
 166     if ( aPos.X() < 0 ) aPos.X() = 0;
 167     if ( aPos.Y() < 0 ) aPos.Y() = 0;
 168
 169     SetPosPixel( aPos );
 170 }
 171
 172 SfxItemSet* SwFldDlg::CreateInputItemSet( sal_uInt16 nID  )
 173 {
 174     if ( nID == TP_FLD_DOKINF )
 175     {
 176         SwDocShell* pDocSh = (SwDocShell*)SfxObjectShell::Current();
 177         SfxItemSet* pISet = new SfxItemSet( pDocSh->GetPool(), SID_DOCINFO, SID_DOCINFO );
 178         using namespace ::com::sun::star;
 179         uno::Reference<document::XDocumentPropertiesSupplier> xDPS(
 180             pDocSh->GetModel(), uno::UNO_QUERY_THROW);
 181         uno::Reference<document::XDocumentProperties> xDocProps
 182             = xDPS->getDocumentProperties();
 183         uno::Reference< beans::XPropertySet > xUDProps(
 184             xDocProps->getUserDefinedProperties(),
 185             uno::UNO_QUERY_THROW);
 186         pISet->Put( SfxUnoAnyItem( SID_DOCINFO, uno::makeAny(xUDProps) ) );
 187         return pISet;
 188     }
 189     else
 190         return 0;
 191 }
 192
 193 /*--------------------------------------------------------------------
 194      Description: kick off inserting of new fields
 195  --------------------------------------------------------------------*/
 196
 197 IMPL_LINK_NOARG(SwFldDlg, OKHdl)
 198 {
 199     if (GetOKButton().IsEnabled())
 200     {
 201         SfxTabPage* pPage = GetTabPage(GetCurPageId());
 202         pPage->FillItemSet(*(SfxItemSet*)0);
 203
 204         GetOKButton().GrabFocus();  // because of InputField-Dlg
 205     }
 206
 207     return 0;
 208 }
 209
 210 IMPL_LINK_NOARG(SwFldDlg, CancelHdl)
 211 {
 212     Close();
 213     return 0;
 214 }
 215
 216
 217 /*--------------------------------------------------------------------
 218     Description: newly initialise dialog after Doc-Switch
 219  --------------------------------------------------------------------*/
 220
 221 void SwFldDlg::ReInitDlg()
 222 {
 223     SwDocShell* pDocSh = (SwDocShell*)SfxObjectShell::Current();
 224     sal_Bool bNewMode = (::GetHtmlMode(pDocSh) & HTMLMODE_ON) != 0;
 225
 226     if (bNewMode != m_bHtmlMode)
 227     {
 228         SfxViewFrame::Current()->GetDispatcher()->
 229             Execute(FN_INSERT_FIELD, SFX_CALLMODE_ASYNCHRON|SFX_CALLMODE_RECORD);
 230         Close();
 231     }
 232
 233     SwView* pActiveView = ::GetActiveView();
 234     if(!pActiveView)
 235         return;
 236     const SwWrtShell& rSh = pActiveView->GetWrtShell();
 237     GetOKButton().Enable( !rSh.IsReadOnlyAvailable() ||
 238                           !rSh.HasReadonlySel() );
 239
 240     ReInitTabPage(TP_FLD_DOK);
 241     ReInitTabPage(TP_FLD_VAR);
 242     ReInitTabPage(TP_FLD_DOKINF);
 243
 244     if (!m_bHtmlMode)
 245     {
 246         ReInitTabPage(TP_FLD_REF);
 247         ReInitTabPage(TP_FLD_FUNC);
 248         ReInitTabPage(TP_FLD_DB);
 249     }
 250
 251     m_pChildWin->SetOldDocShell(pDocSh);
 252 }
 253
 254 /*--------------------------------------------------------------------
 255     Description: newly initialise TabPage after Doc-Switch
 256  --------------------------------------------------------------------*/
 257
 258 void SwFldDlg::ReInitTabPage( sal_uInt16 nPageId, sal_Bool bOnlyActivate )
 259 {
 260     SwFldPage* pPage = (SwFldPage* )GetTabPage(nPageId);
 261
 262     if ( pPage )
 263         pPage->EditNewField( bOnlyActivate );   // newly initialise TabPage
 264 }
 265
 266 /*--------------------------------------------------------------------
 267     Description: newly initialise after activation of a few TabPages
 268  --------------------------------------------------------------------*/
 269
 270 void SwFldDlg::Activate()
 271 {
 272     SwView* pView = ::GetActiveView();
 273     if( pView )
 274     {
 275         bool bHtmlMode = (::GetHtmlMode((SwDocShell*)SfxObjectShell::Current()) & HTMLMODE_ON) != 0;
 276         const SwWrtShell& rSh = pView->GetWrtShell();
 277         GetOKButton().Enable( !rSh.IsReadOnlyAvailable() ||
 278                               !rSh.HasReadonlySel() );
 279
 280         ReInitTabPage( TP_FLD_VAR, sal_True );
 281
 282         if( !bHtmlMode )
 283         {
 284             ReInitTabPage( TP_FLD_REF, sal_True );
 285             ReInitTabPage( TP_FLD_FUNC, sal_True );
 286         }
 287     }
 288 }
 289
 290 void SwFldDlg::EnableInsert(sal_Bool bEnable)
 291 {
 292     if( bEnable )
 293     {
 294         SwView* pView = ::GetActiveView();
 295         OSL_ENSURE(pView, "no view found");
 296         if( !pView ||
 297                 (pView->GetWrtShell().IsReadOnlyAvailable() &&
 298                     pView->GetWrtShell().HasReadonlySel()) )
 299             bEnable = sal_False;
 300     }
 301     GetOKButton().Enable(bEnable);
 302 }
 303
 304 void SwFldDlg::InsertHdl()
 305 {
 306     GetOKButton().Click();
 307 }
 308
 309 void SwFldDlg::ActivateDatabasePage()
 310 {
 311     m_bDataBaseMode = sal_True;
 312     ShowPage( TP_FLD_DB );
 313     SfxTabPage* pDBPage =  GetTabPage( TP_FLD_DB );
 314     if( pDBPage )
 315     {
 316         ((SwFldDBPage*)pDBPage)->ActivateMailMergeAddress();
 317     }
 318     //remove all other pages
 319     RemoveTabPage(TP_FLD_DOK);
 320     RemoveTabPage(TP_FLD_VAR);
 321     RemoveTabPage(TP_FLD_DOKINF);
 322     RemoveTabPage(TP_FLD_REF);
 323     RemoveTabPage(TP_FLD_FUNC);
 324 }
 325
 326 void SwFldDlg::PageCreated(sal_uInt16 nId, SfxTabPage& rPage)
 327 {
 328     if( TP_FLD_DB == nId)
 329     {
 330         SfxDispatcher* pDispatch = m_pBindings->GetDispatcher();
 331         SfxViewFrame* pViewFrame = pDispatch ? pDispatch->GetFrame() : 0;
 332         if(pViewFrame)
 333         {
 334             const TypeId aSwViewTypeId = TYPE(SwView);
 335             SfxViewShell* pViewShell = SfxViewShell::GetFirst( &aSwViewTypeId );
 336             while(pViewShell && pViewShell->GetViewFrame() != pViewFrame)
 337             {
 338                 pViewShell = SfxViewShell::GetNext( *pViewShell, &aSwViewTypeId );
 339             }
 340             if(pViewShell)
 341                 static_cast<SwFldDBPage&>(rPage).SetWrtShell(static_cast<SwView*>(pViewShell)->GetWrtShell());
 342         }
 343     }
 344 }
 345
 346
 347 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */