sc/source/ui/optdlg/tpformula.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: tpcalc.hxx,v $
  10  * $Revision: 1.9 $
  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 #undef SC_DLLIMPLEMENTATION
  35
  36
  37
  38 //------------------------------------------------------------------
  39
  40 #include "tpformula.hxx"
  41 #include "optdlg.hrc"
  42 #include "scresid.hxx"
  43 #include "formula/grammar.hxx"
  44 #include "docoptio.hxx"
  45 #include "global.hxx"
  46
  47 #include <unotools/localedatawrapper.hxx>
  48
  49 #include <com/sun/star/lang/Locale.hpp>
  50 #include <com/sun/star/i18n/LocaleDataItem.hpp>
  51
  52 using ::rtl::OUString;
  53 using ::com::sun::star::lang::Locale;
  54 using ::com::sun::star::i18n::LocaleDataItem;
  55
  56 ScTpFormulaOptions::ScTpFormulaOptions(Window* pParent, const SfxItemSet& rCoreAttrs) :
  57     SfxTabPage(pParent, ScResId(RID_SCPAGE_FORMULA), rCoreAttrs),
  58
  59     maFlFormulaOpt(this, ScResId(FL_FORMULA_OPTIONS)),
  60     maFtFormulaSyntax(this, ScResId(FT_FORMULA_SYNTAX)),
  61     maLbFormulaSyntax(this, ScResId(LB_FORMULA_SYNTAX)),
  62     maFlFormulaSeps(this, ScResId(FL_FORMULA_SEPS)),
  63     maFtSepFuncArg(this, ScResId(FT_FORMULA_SEP_ARG)),
  64     maEdSepFuncArg(this, ScResId(ED_FORMULA_SEP_ARG)),
  65     maFtSepArrayCol(this, ScResId(FT_FORMULA_SEP_ARRAY_C)),
  66     maEdSepArrayCol(this, ScResId(ED_FORMULA_SEP_ARRAY_C)),
  67     maFtSepArrayRow(this, ScResId(FT_FORMULA_SEP_ARRAY_R)),
  68     maEdSepArrayRow(this, ScResId(ED_FORMULA_SEP_ARRAY_R)),
  69     maBtnSepReset(this, ScResId(BTN_FORMULA_SEP_RESET)),
  70
  71     mpOldOptions(NULL),
  72     mpNewOptions(NULL),
  73     mnDecSep(0)
  74 {
  75     FreeResource();
  76
  77     const ScTpCalcItem& rItem = static_cast<const ScTpCalcItem&>(
  78         rCoreAttrs.Get(GetWhich(SID_SCDOCOPTIONS)));
  79     mpOldOptions.reset(new ScDocOptions(rItem.GetDocOptions()));
  80     mpNewOptions.reset(new ScDocOptions(rItem.GetDocOptions()));
  81
  82     Init();
  83 }
  84
  85 ScTpFormulaOptions::~ScTpFormulaOptions()
  86 {
  87 }
  88
  89 void ScTpFormulaOptions::Init()
  90 {
  91     Link aLink = LINK( this, ScTpFormulaOptions, ButtonHdl );
  92     maBtnSepReset.SetClickHdl(aLink);
  93
  94     aLink = LINK( this, ScTpFormulaOptions, SepModifyHdl );
  95     maEdSepFuncArg.SetModifyHdl(aLink);
  96     maEdSepArrayCol.SetModifyHdl(aLink);
  97     maEdSepArrayRow.SetModifyHdl(aLink);
  98
  99     aLink = LINK( this, ScTpFormulaOptions, SepEditOnFocusHdl );
 100     maEdSepFuncArg.SetGetFocusHdl(aLink);
 101     maEdSepArrayCol.SetGetFocusHdl(aLink);
 102     maEdSepArrayRow.SetGetFocusHdl(aLink);
 103
 104     // Get the decimal separator for current locale.
 105     String aSep = mpOldOptions->GetLocaleDataWrapper().getNumDecimalSep();
 106     mnDecSep = aSep.Len() ? aSep.GetChar(0) : sal_Unicode('.');
 107 }
 108
 109 void ScTpFormulaOptions::ResetSeparators()
 110 {
 111     ScDocOptions aOpt;
 112     maEdSepFuncArg.SetText(aOpt.GetFormulaSepArg());
 113     maEdSepArrayCol.SetText(aOpt.GetFormulaSepArrayCol());
 114     maEdSepArrayRow.SetText(aOpt.GetFormulaSepArrayRow());
 115 }
 116
 117 void ScTpFormulaOptions::OnFocusSeparatorInput(Edit* pEdit)
 118 {
 119     if (!pEdit)
 120         return;
 121
 122     // Make sure the entire text is selected.
 123     xub_StrLen nLen = pEdit->GetText().Len();
 124     Selection aSel(0, nLen);
 125     pEdit->SetSelection(aSel);
 126     maOldSepValue = pEdit->GetText();
 127 }
 128
 129 bool ScTpFormulaOptions::IsValidSeparator(const OUString& rSep) const
 130 {
 131     if (rSep.getLength() != 1)
 132         // Must be one-character long.
 133         return false;
 134
 135     if (rSep.compareToAscii("a") >= 0 && rSep.compareToAscii("z") <= 0)
 136         return false;
 137
 138     if (rSep.compareToAscii("A") >= 0 && rSep.compareToAscii("Z") <= 0)
 139         return false;
 140
 141     sal_Unicode c = rSep.getStr()[0];
 142     switch (c)
 143     {
 144         case '+':
 145         case '-':
 146         case '/':
 147         case '*':
 148         case '<':
 149         case '>':
 150         case '[':
 151         case ']':
 152         case '(':
 153         case ')':
 154         case '"':
 155         case '\'':
 156             // Disallowed characters.  Anything else we want to disallow ?
 157             return false;
 158     }
 159
 160     if (c == mnDecSep)
 161         // decimal separator is not allowed.
 162         return false;
 163
 164     return true;
 165 }
 166
 167 bool ScTpFormulaOptions::IsValidSeparatorSet() const
 168 {
 169     // Make sure the column and row separators are different.
 170     String aColStr = maEdSepArrayCol.GetText();
 171     String aRowStr = maEdSepArrayRow.GetText();
 172     if (aColStr == aRowStr)
 173         return false;
 174
 175     return true;
 176 }
 177
 178 IMPL_LINK( ScTpFormulaOptions, ButtonHdl, PushButton*, pBtn )
 179 {
 180     if (pBtn == &maBtnSepReset)
 181         ResetSeparators();
 182
 183     return 0;
 184 }
 185
 186 IMPL_LINK( ScTpFormulaOptions, SepModifyHdl, Edit*, pEdit )
 187 {
 188     if (!pEdit)
 189         return 0;
 190
 191     String aStr = pEdit->GetText();
 192     if (aStr.Len() > 1)
 193     {
 194         // In case the string is more than one character long, only grab the
 195         // first character.
 196         aStr = aStr.Copy(0, 1);
 197         pEdit->SetText(aStr);
 198     }
 199
 200     if ((!IsValidSeparator(aStr) || !IsValidSeparatorSet()) && maOldSepValue.getLength())
 201         // Invalid separator.  Restore the old value.
 202         pEdit->SetText(maOldSepValue);
 203
 204     OnFocusSeparatorInput(pEdit);
 205     return 0;
 206 }
 207
 208 IMPL_LINK( ScTpFormulaOptions, SepEditOnFocusHdl, Edit*, pEdit )
 209 {
 210     OnFocusSeparatorInput(pEdit);
 211     return 0;
 212 }
 213
 214 // static
 215 SfxTabPage* ScTpFormulaOptions::Create(Window* pParent, const SfxItemSet& rCoreSet)
 216 {
 217     return new ScTpFormulaOptions(pParent, rCoreSet);
 218 }
 219
 220 BOOL ScTpFormulaOptions::FillItemSet(SfxItemSet& rCoreSet)
 221 {
 222     ::formula::FormulaGrammar::Grammar eGram = ::formula::FormulaGrammar::GRAM_DEFAULT;
 223     switch (maLbFormulaSyntax.GetSelectEntryPos())
 224     {
 225         case 0:
 226             eGram = ::formula::FormulaGrammar::GRAM_NATIVE;
 227         break;
 228         case 1:
 229             eGram = ::formula::FormulaGrammar::GRAM_NATIVE_XL_A1;
 230         break;
 231         case 2:
 232             eGram = ::formula::FormulaGrammar::GRAM_NATIVE_XL_R1C1;
 233         break;
 234     }
 235
 236     mpNewOptions->SetFormulaSyntax(eGram);
 237
 238     mpNewOptions->SetFormulaSepArg(maEdSepFuncArg.GetText());
 239     mpNewOptions->SetFormulaSepArrayCol(maEdSepArrayCol.GetText());
 240     mpNewOptions->SetFormulaSepArrayRow(maEdSepArrayRow.GetText());
 241
 242     if (*mpNewOptions != *mpOldOptions)
 243     {
 244         rCoreSet.Put(ScTpCalcItem(GetWhich(SID_SCDOCOPTIONS), *mpNewOptions));
 245         return true;
 246     }
 247     else
 248         return false;
 249 }
 250
 251 void ScTpFormulaOptions::Reset(const SfxItemSet& /*rCoreSet*/)
 252 {
 253     ::formula::FormulaGrammar::Grammar eGram = mpNewOptions->GetFormulaSyntax();
 254     switch (eGram)
 255     {
 256         case ::formula::FormulaGrammar::GRAM_NATIVE:
 257             maLbFormulaSyntax.SelectEntryPos(0);
 258         break;
 259         case ::formula::FormulaGrammar::GRAM_NATIVE_XL_A1:
 260             maLbFormulaSyntax.SelectEntryPos(1);
 261         break;
 262         case ::formula::FormulaGrammar::GRAM_NATIVE_XL_R1C1:
 263             maLbFormulaSyntax.SelectEntryPos(2);
 264         break;
 265         default:
 266             maLbFormulaSyntax.SelectEntryPos(0);
 267     }
 268
 269     OUString aSep = mpNewOptions->GetFormulaSepArg();
 270     OUString aSepArrayRow = mpNewOptions->GetFormulaSepArrayRow();
 271     OUString aSepArrayCol = mpNewOptions->GetFormulaSepArrayCol();
 272
 273     if (aSep.getLength() == 1 && aSepArrayRow.getLength() == 1 && aSepArrayCol.getLength() == 1)
 274     {
 275         // Each separator must be one character long.
 276         maEdSepFuncArg.SetText(aSep);
 277         maEdSepArrayCol.SetText(aSepArrayCol);
 278         maEdSepArrayRow.SetText(aSepArrayRow);
 279     }
 280     else
 281         ResetSeparators();
 282 }
 283
 284 int ScTpFormulaOptions::DeactivatePage(SfxItemSet* /*pSet*/)
 285 {
 286     // What's this method for ?
 287     return KEEP_PAGE;
 288 }
 289