2004 lines
60 KiB
C++
2004 lines
60 KiB
C++
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
|
|
/*
|
|
* This file is part of the LibreOffice project.
|
|
*
|
|
* This Source Code Form is subject to the terms of the Mozilla Public
|
|
* License, v. 2.0. If a copy of the MPL was not distributed with this
|
|
* file, You can obtain one at http://mozilla.org/MPL/2.0/.
|
|
*
|
|
* This file incorporates work covered by the following license notice:
|
|
*
|
|
* Licensed to the Apache Software Foundation (ASF) under one or more
|
|
* contributor license agreements. See the NOTICE file distributed
|
|
* with this work for additional information regarding copyright
|
|
* ownership. The ASF licenses this file to you under the Apache
|
|
* License, Version 2.0 (the "License"); you may not use this file
|
|
* except in compliance with the License. You may obtain a copy of
|
|
* the License at http://www.apache.org/licenses/LICENSE-2.0 .
|
|
*/
|
|
|
|
#include <sfx2/dispatch.hxx>
|
|
#include <sfx2/docfile.hxx>
|
|
#include <sfx2/viewfrm.hxx>
|
|
#include <vcl/svapp.hxx>
|
|
#include <vcl/mnemonic.hxx>
|
|
#include <vcl/tabpage.hxx>
|
|
#include <vcl/tabctrl.hxx>
|
|
#include <vcl/lstbox.hxx>
|
|
#include <vcl/group.hxx>
|
|
#include <vcl/wall.hxx>
|
|
#include <vcl/layout.hxx>
|
|
#include <vcl/idle.hxx>
|
|
|
|
#include <svtools/stdctrl.hxx>
|
|
#include <svtools/svmedit.hxx>
|
|
#include <svtools/treelistbox.hxx>
|
|
#include <svl/stritem.hxx>
|
|
#include <svl/zforlist.hxx>
|
|
#include <svl/eitem.hxx>
|
|
|
|
#include <unotools/charclass.hxx>
|
|
#include <tools/diagnose_ex.h>
|
|
|
|
#include "formdlgs.hrc"
|
|
#include "funcpage.hxx"
|
|
#include "formula/formula.hxx"
|
|
#include "formula/IFunctionDescription.hxx"
|
|
#include "formula/FormulaCompiler.hxx"
|
|
#include "formula/token.hxx"
|
|
#include "formula/tokenarray.hxx"
|
|
#include "formula/formdata.hxx"
|
|
#include "formula/formulahelper.hxx"
|
|
#include "structpg.hxx"
|
|
#include "parawin.hxx"
|
|
#include "ModuleHelper.hxx"
|
|
#include "ForResId.hrc"
|
|
#include <com/sun/star/sheet/FormulaToken.hpp>
|
|
#include <com/sun/star/sheet/FormulaLanguage.hpp>
|
|
#include <com/sun/star/sheet/FormulaMapGroup.hpp>
|
|
#include <com/sun/star/sheet/FormulaMapGroupSpecialOffset.hpp>
|
|
#include <com/sun/star/beans/XPropertySet.hpp>
|
|
#include <comphelper/processfactory.hxx>
|
|
#include <comphelper/string.hxx>
|
|
#include <map>
|
|
|
|
#define TOKEN_OPEN 0
|
|
#define TOKEN_CLOSE 1
|
|
#define TOKEN_SEP 2
|
|
namespace formula
|
|
{
|
|
|
|
using namespace ::com::sun::star;
|
|
|
|
class FormulaDlg_Impl
|
|
{
|
|
public:
|
|
::std::pair<RefButton*,RefEdit*>
|
|
RefInputStartBefore( RefEdit* pEdit, RefButton* pButton );
|
|
void RefInputStartAfter( RefEdit* pEdit, RefButton* pButton );
|
|
void RefInputDoneAfter( bool bForced );
|
|
bool CalcValue( const OUString& rStrExp, OUString& rStrResult );
|
|
bool CalcStruct( const OUString& rStrExp);
|
|
void UpdateValues();
|
|
void DeleteArgs();
|
|
sal_Int32 GetFunctionPos(sal_Int32 nPos);
|
|
void ClearAllParas();
|
|
|
|
void MakeTree(StructPage* _pTree,SvTreeListEntry* pParent,FormulaToken* _pToken,long Count);
|
|
void fillTree(StructPage* _pTree);
|
|
void UpdateTokenArray( const OUString& rStrExp);
|
|
OUString RepairFormula(const OUString& aFormula);
|
|
void FillDialog(bool bFlag=true);
|
|
bool EditNextFunc( bool bForward, sal_Int32 nFStart=NOT_FOUND );
|
|
void EditThisFunc(sal_Int32 nFStart);
|
|
|
|
OUString GetPrevFuncExpression( bool bStartFromEnd );
|
|
|
|
void StoreFormEditData(FormEditData* pEditData);
|
|
|
|
void Update();
|
|
void Update(const OUString& _sExp);
|
|
|
|
void SaveArg( sal_uInt16 nEd );
|
|
void UpdateSelection();
|
|
void DoEnter( bool bOk );
|
|
void FillListboxes();
|
|
void FillControls(bool &rbNext, bool &rbPrev);
|
|
|
|
FormulaDlgMode SetMeText(const OUString& _sText, sal_Int32 PrivStart, sal_Int32 PrivEnd, bool bMatrix, bool _bSelect, bool _bUpdate);
|
|
void SetMeText(const OUString& _sText);
|
|
bool CheckMatrix(OUString& aFormula /*IN/OUT*/);
|
|
|
|
void SetEdSelection();
|
|
|
|
bool UpdateParaWin(Selection& _rSelection);
|
|
void UpdateParaWin(const Selection& _rSelection,const OUString& _sRefStr);
|
|
|
|
void SetData(sal_Int32 nFStart, sal_Int32 nNextFStart, sal_Int32 nNextFEnd, sal_Int32& PrivStart, sal_Int32& PrivEnd);
|
|
void PreNotify( NotifyEvent& rNEvt );
|
|
|
|
RefEdit* GetCurrRefEdit();
|
|
|
|
const FormulaHelper& GetFormulaHelper() const { return m_aFormulaHelper;}
|
|
uno::Reference< sheet::XFormulaOpCodeMapper > GetFormulaOpCodeMapper() const;
|
|
|
|
DECL_LINK_TYPED( ModifyHdl, ParaWin&, void );
|
|
DECL_LINK_TYPED( FxHdl, ParaWin&, void );
|
|
|
|
DECL_LINK_TYPED( MatrixHdl, Button*, void );
|
|
DECL_LINK_TYPED( FormulaHdl, Edit&, void);
|
|
DECL_LINK_TYPED( FormulaCursorHdl, EditBox&, void );
|
|
DECL_LINK_TYPED( BtnHdl, Button*, void );
|
|
DECL_LINK_TYPED( DblClkHdl, FuncPage&, void );
|
|
DECL_LINK_TYPED( FuncSelHdl, FuncPage&, void );
|
|
DECL_LINK_TYPED( StructSelHdl, StructPage&, void );
|
|
public:
|
|
mutable uno::Reference< sheet::XFormulaOpCodeMapper> m_xOpCodeMapper;
|
|
uno::Sequence< sheet::FormulaToken > m_aTokenList;
|
|
::std::unique_ptr<FormulaTokenArray> m_pTokenArray;
|
|
mutable uno::Sequence< sheet::FormulaOpCodeMapEntry > m_aSpecialOpCodes;
|
|
mutable const sheet::FormulaOpCodeMapEntry* m_pSpecialOpCodesEnd;
|
|
mutable uno::Sequence< sheet::FormulaToken > m_aSeparatorsOpCodes;
|
|
mutable uno::Sequence< sheet::FormulaOpCodeMapEntry > m_aFunctionOpCodes;
|
|
mutable const sheet::FormulaOpCodeMapEntry* m_pFunctionOpCodesEnd;
|
|
mutable uno::Sequence< sheet::FormulaOpCodeMapEntry > m_aUnaryOpCodes;
|
|
mutable const sheet::FormulaOpCodeMapEntry* m_pUnaryOpCodesEnd;
|
|
mutable uno::Sequence< sheet::FormulaOpCodeMapEntry > m_aBinaryOpCodes;
|
|
mutable const sheet::FormulaOpCodeMapEntry* m_pBinaryOpCodesEnd;
|
|
::std::map<FormulaToken*,sheet::FormulaToken> m_aTokenMap;
|
|
IFormulaEditorHelper* m_pHelper;
|
|
VclPtr<Dialog> m_pParent;
|
|
VclPtr<TabControl> m_pTabCtrl;
|
|
VclPtr<VclVBox> m_pParaWinBox;
|
|
VclPtr<ParaWin> pParaWin;
|
|
VclPtr<FixedText> m_pFtHeadLine;
|
|
VclPtr<FixedText> m_pFtFuncName;
|
|
VclPtr<FixedText> m_pFtFuncDesc;
|
|
|
|
VclPtr<FixedText> m_pFtEditName;
|
|
|
|
VclPtr<FixedText> m_pFtResult;
|
|
VclPtr<Edit> m_pWndResult;
|
|
|
|
VclPtr<FixedText> m_pFtFormula;
|
|
VclPtr<EditBox> m_pMEFormula;
|
|
|
|
VclPtr<CheckBox> m_pBtnMatrix;
|
|
VclPtr<CancelButton> m_pBtnCancel;
|
|
|
|
VclPtr<PushButton> m_pBtnBackward;
|
|
VclPtr<PushButton> m_pBtnForward;
|
|
VclPtr<OKButton> m_pBtnEnd;
|
|
|
|
VclPtr<RefEdit> m_pEdRef;
|
|
VclPtr<RefButton> m_pRefBtn;
|
|
|
|
VclPtr<FixedText> m_pFtFormResult;
|
|
VclPtr<Edit> m_pWndFormResult;
|
|
|
|
VclPtr<RefEdit> pTheRefEdit;
|
|
VclPtr<RefButton> pTheRefButton;
|
|
VclPtr<FuncPage> pFuncPage;
|
|
VclPtr<StructPage> pStructPage;
|
|
OUString aOldFormula;
|
|
bool bStructUpdate;
|
|
VclPtr<MultiLineEdit> pMEdit;
|
|
bool bUserMatrixFlag;
|
|
Idle aIdle;
|
|
|
|
const OUString aTitle1;
|
|
const OUString aTitle2;
|
|
OUString aTxtOk; // behind aBtnEnd
|
|
FormulaHelper m_aFormulaHelper;
|
|
|
|
OString m_aEditHelpId;
|
|
|
|
OString aOldHelp;
|
|
OString aOldUnique;
|
|
OString aActivWinId;
|
|
bool bIsShutDown;
|
|
bool bMakingTree; //in method of constructing tree
|
|
|
|
vcl::Font aFntBold;
|
|
vcl::Font aFntLight;
|
|
sal_uInt16 nEdFocus;
|
|
bool bEditFlag;
|
|
const IFunctionDescription* pFuncDesc;
|
|
sal_Int32 nArgs;
|
|
::std::vector< OUString > m_aArguments;
|
|
Selection aFuncSel;
|
|
|
|
sal_Int32 mnFuncExpStart; ///< current formula position for treeview results
|
|
|
|
FormulaDlg_Impl(Dialog* pParent
|
|
, bool _bSupportFunctionResult
|
|
, bool _bSupportResult
|
|
, bool _bSupportMatrix
|
|
,IFormulaEditorHelper* _pHelper
|
|
,const IFunctionManager* _pFunctionMgr
|
|
,IControlReferenceHandler* _pDlg);
|
|
~FormulaDlg_Impl();
|
|
|
|
};
|
|
|
|
FormulaDlg_Impl::FormulaDlg_Impl(Dialog* pParent
|
|
, bool _bSupportFunctionResult
|
|
, bool _bSupportResult
|
|
, bool _bSupportMatrix
|
|
,IFormulaEditorHelper* _pHelper
|
|
,const IFunctionManager* _pFunctionMgr
|
|
,IControlReferenceHandler* _pDlg)
|
|
:
|
|
m_pSpecialOpCodesEnd(nullptr),
|
|
m_pFunctionOpCodesEnd(nullptr),
|
|
m_pUnaryOpCodesEnd(nullptr),
|
|
m_pBinaryOpCodesEnd(nullptr),
|
|
m_pHelper (_pHelper),
|
|
m_pParent (pParent),
|
|
pTheRefEdit (nullptr),
|
|
pTheRefButton (nullptr),
|
|
pMEdit (nullptr),
|
|
bUserMatrixFlag (false),
|
|
aTitle1 ( ModuleRes( STR_TITLE1 ) ),
|
|
aTitle2 ( ModuleRes( STR_TITLE2 ) ),
|
|
m_aFormulaHelper(_pFunctionMgr),
|
|
bIsShutDown (false),
|
|
bMakingTree (false),
|
|
nEdFocus (0),
|
|
pFuncDesc (nullptr),
|
|
nArgs (0),
|
|
mnFuncExpStart (0)
|
|
{
|
|
pParent->get(m_pParaWinBox, "BOX");
|
|
pParent->get(m_pTabCtrl, "tabs");
|
|
pParent->get(m_pFtHeadLine, "headline");
|
|
pParent->get(m_pFtFuncName, "funcname");
|
|
pParent->get(m_pFtFuncDesc, "funcdesc");
|
|
pParent->get(m_pFtEditName, "editname");
|
|
pParent->get(m_pFtResult, "label2");
|
|
pParent->get(m_pWndResult, "result");
|
|
pParent->get(m_pFtFormula, "formula");
|
|
|
|
//Space for two lines of text
|
|
m_pFtHeadLine->SetText("X\nX\n");
|
|
long nHeight = m_pFtHeadLine->GetOptimalSize().Height();
|
|
m_pFtHeadLine->set_height_request(nHeight);
|
|
m_pFtHeadLine->SetText("");
|
|
|
|
m_pFtFuncName->SetText("X\nX\n");
|
|
nHeight = m_pFtFuncName->GetOptimalSize().Height();
|
|
m_pFtFuncName->set_height_request(nHeight);
|
|
m_pFtFuncDesc->set_height_request(nHeight);
|
|
m_pFtFuncName->SetText("");
|
|
|
|
pParent->get(m_pMEFormula, "ed_formula");
|
|
Size aSize(pParent->LogicToPixel(Size(203, 43), MAP_APPFONT));
|
|
m_pMEFormula->set_height_request(aSize.Height());
|
|
m_pMEFormula->set_width_request(aSize.Width());
|
|
pParent->get(m_pBtnMatrix, "array");
|
|
pParent->get(m_pBtnCancel, "cancel");
|
|
pParent->get(m_pBtnBackward, "back");
|
|
pParent->get(m_pBtnForward, "next");
|
|
pParent->get(m_pBtnEnd, "ok");
|
|
aTxtOk = m_pBtnEnd->GetText();
|
|
pParent->get(m_pFtFormResult, "label1");
|
|
pParent->get(m_pWndFormResult, "formula_result");
|
|
pParent->get(m_pEdRef, "ED_REF");
|
|
m_pEdRef->SetReferences(_pDlg, m_pFtEditName);
|
|
pParent->get(m_pRefBtn, "RB_REF");
|
|
m_pRefBtn->SetReferences(_pDlg, m_pEdRef);
|
|
|
|
pParaWin = VclPtr<ParaWin>::Create(m_pParaWinBox, _pDlg);
|
|
pParaWin->Show();
|
|
m_pParaWinBox->Hide();
|
|
m_pFtEditName->Hide();
|
|
m_pEdRef->Hide();
|
|
m_pRefBtn->Hide();
|
|
|
|
pMEdit = m_pMEFormula->GetEdit();
|
|
|
|
m_pMEFormula->SetAccessibleName(m_pFtFormula->GetText());
|
|
pMEdit->SetAccessibleName(m_pFtFormula->GetText());
|
|
|
|
m_aEditHelpId = pMEdit->GetHelpId();
|
|
pMEdit->SetUniqueId( m_aEditHelpId );
|
|
|
|
bEditFlag=false;
|
|
bStructUpdate=true;
|
|
pParaWin->SetArgModifiedHdl(LINK( this, FormulaDlg_Impl, ModifyHdl ) );
|
|
pParaWin->SetFxHdl(LINK( this, FormulaDlg_Impl, FxHdl ) );
|
|
|
|
pFuncPage= VclPtr<FuncPage>::Create( m_pTabCtrl,_pFunctionMgr);
|
|
pStructPage= VclPtr<StructPage>::Create( m_pTabCtrl);
|
|
pFuncPage->Hide();
|
|
pStructPage->Hide();
|
|
m_pTabCtrl->SetTabPage( TP_FUNCTION, pFuncPage);
|
|
m_pTabCtrl->SetTabPage( TP_STRUCT, pStructPage);
|
|
|
|
aOldHelp = pParent->GetHelpId(); // HelpId from resource always for "Page 1"
|
|
aOldUnique = pParent->GetUniqueId();
|
|
|
|
m_pFtResult->Show( _bSupportResult );
|
|
m_pWndResult->Show( _bSupportResult );
|
|
|
|
m_pFtFormResult->Show( _bSupportFunctionResult );
|
|
m_pWndFormResult->Show( _bSupportFunctionResult );
|
|
|
|
if ( _bSupportMatrix )
|
|
m_pBtnMatrix->SetClickHdl(LINK( this, FormulaDlg_Impl, MatrixHdl ) );
|
|
else
|
|
m_pBtnMatrix->Hide();
|
|
|
|
m_pBtnCancel ->SetClickHdl( LINK( this, FormulaDlg_Impl, BtnHdl ) );
|
|
m_pBtnEnd ->SetClickHdl( LINK( this, FormulaDlg_Impl, BtnHdl ) );
|
|
m_pBtnForward ->SetClickHdl( LINK( this, FormulaDlg_Impl, BtnHdl ) );
|
|
m_pBtnBackward->SetClickHdl( LINK( this, FormulaDlg_Impl, BtnHdl ) );
|
|
|
|
pFuncPage->SetDoubleClickHdl( LINK( this, FormulaDlg_Impl, DblClkHdl ) );
|
|
pFuncPage->SetSelectHdl( LINK( this, FormulaDlg_Impl, FuncSelHdl) );
|
|
pStructPage->SetSelectionHdl( LINK( this, FormulaDlg_Impl, StructSelHdl ) );
|
|
pMEdit->SetModifyHdl( LINK( this, FormulaDlg_Impl, FormulaHdl ) );
|
|
m_pMEFormula->SetSelChangedHdl( LINK( this, FormulaDlg_Impl, FormulaCursorHdl ) );
|
|
|
|
aFntLight = m_pFtFormula->GetFont();
|
|
aFntLight.SetTransparent( true );
|
|
aFntBold = aFntLight;
|
|
aFntBold.SetWeight( WEIGHT_BOLD );
|
|
|
|
pParaWin->SetArgumentFonts(aFntBold,aFntLight);
|
|
|
|
// function description for choosing a function is no longer in a different color
|
|
|
|
m_pFtHeadLine->SetFont(aFntBold);
|
|
m_pFtFuncName->SetFont(aFntLight);
|
|
m_pFtFuncDesc->SetFont(aFntLight);
|
|
}
|
|
|
|
FormulaDlg_Impl::~FormulaDlg_Impl()
|
|
{
|
|
if(aIdle.IsActive())
|
|
{
|
|
aIdle.SetIdleHdl(Link<Idle *, void>());
|
|
aIdle.Stop();
|
|
}// if(aIdle.IsActive())
|
|
bIsShutDown=true;// Set it in order to PreNotify not to save GetFocus.
|
|
|
|
m_pTabCtrl->RemovePage(TP_FUNCTION);
|
|
m_pTabCtrl->RemovePage(TP_STRUCT);
|
|
|
|
pStructPage.disposeAndClear();
|
|
pFuncPage.disposeAndClear();
|
|
pParaWin.disposeAndClear();
|
|
DeleteArgs();
|
|
}
|
|
|
|
void FormulaDlg_Impl::StoreFormEditData(FormEditData* pData)
|
|
{
|
|
if (pData) // it won't be destroyed via Close
|
|
{
|
|
pData->SetFStart(pMEdit->GetSelection().Min());
|
|
pData->SetSelection(pMEdit->GetSelection());
|
|
|
|
if(m_pTabCtrl->GetCurPageId()==TP_FUNCTION)
|
|
pData->SetMode( (sal_uInt16) FORMULA_FORMDLG_FORMULA );
|
|
else
|
|
pData->SetMode( (sal_uInt16) FORMULA_FORMDLG_EDIT );
|
|
pData->SetUndoStr(pMEdit->GetText());
|
|
pData->SetMatrixFlag(m_pBtnMatrix->IsChecked());
|
|
}
|
|
}
|
|
|
|
|
|
void FormulaDlg_Impl::PreNotify( NotifyEvent& rNEvt )
|
|
{
|
|
MouseNotifyEvent nSwitch=rNEvt.GetType();
|
|
if(nSwitch==MouseNotifyEvent::GETFOCUS && !bIsShutDown)
|
|
{
|
|
vcl::Window* pWin=rNEvt.GetWindow();
|
|
if(pWin!=nullptr)
|
|
{
|
|
aActivWinId = pWin->GetUniqueId();
|
|
if(aActivWinId.isEmpty())
|
|
{
|
|
vcl::Window* pParent=pWin->GetParent();
|
|
while(pParent!=nullptr)
|
|
{
|
|
aActivWinId=pParent->GetUniqueId();
|
|
|
|
if(!aActivWinId.isEmpty()) break;
|
|
|
|
pParent=pParent->GetParent();
|
|
}
|
|
}
|
|
if(!aActivWinId.isEmpty())
|
|
{
|
|
|
|
FormEditData* pData = m_pHelper->getFormEditData();
|
|
|
|
if (pData && !aIdle.IsActive()) // won't be destroyed via Close
|
|
{
|
|
pData->SetUniqueId(aActivWinId);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
uno::Reference< sheet::XFormulaOpCodeMapper > FormulaDlg_Impl::GetFormulaOpCodeMapper() const
|
|
{
|
|
if ( !m_xOpCodeMapper.is() )
|
|
{
|
|
m_xOpCodeMapper = m_pHelper->getFormulaOpCodeMapper();
|
|
m_aFunctionOpCodes = m_xOpCodeMapper->getAvailableMappings(sheet::FormulaLanguage::ODFF,sheet::FormulaMapGroup::FUNCTIONS);
|
|
m_pFunctionOpCodesEnd = m_aFunctionOpCodes.getConstArray() + m_aFunctionOpCodes.getLength();
|
|
|
|
m_aUnaryOpCodes = m_xOpCodeMapper->getAvailableMappings(sheet::FormulaLanguage::ODFF,sheet::FormulaMapGroup::UNARY_OPERATORS);
|
|
m_pUnaryOpCodesEnd = m_aUnaryOpCodes.getConstArray() + m_aUnaryOpCodes.getLength();
|
|
|
|
m_aBinaryOpCodes = m_xOpCodeMapper->getAvailableMappings(sheet::FormulaLanguage::ODFF,sheet::FormulaMapGroup::BINARY_OPERATORS);
|
|
m_pBinaryOpCodesEnd = m_aBinaryOpCodes.getConstArray() + m_aBinaryOpCodes.getLength();
|
|
|
|
uno::Sequence< OUString > aArgs(3);
|
|
aArgs[TOKEN_OPEN] = "(";
|
|
aArgs[TOKEN_CLOSE] = ")";
|
|
aArgs[TOKEN_SEP] = ";";
|
|
m_aSeparatorsOpCodes = m_xOpCodeMapper->getMappings(aArgs,sheet::FormulaLanguage::ODFF);
|
|
|
|
m_aSpecialOpCodes = m_xOpCodeMapper->getAvailableMappings(sheet::FormulaLanguage::ODFF,sheet::FormulaMapGroup::SPECIAL);
|
|
m_pSpecialOpCodesEnd = m_aSpecialOpCodes.getConstArray() + m_aSpecialOpCodes.getLength();
|
|
} // if ( !m_xOpCodeMapper.is() )
|
|
return m_xOpCodeMapper;
|
|
}
|
|
|
|
void FormulaDlg_Impl::DeleteArgs()
|
|
{
|
|
::std::vector< OUString>().swap(m_aArguments);
|
|
nArgs = 0;
|
|
}
|
|
|
|
sal_Int32 FormulaDlg_Impl::GetFunctionPos(sal_Int32 nPos)
|
|
{
|
|
if ( !m_aTokenList.hasElements() )
|
|
return SAL_MAX_INT32;
|
|
|
|
const sal_Unicode sep = m_pHelper->getFunctionManager()->getSingleToken(IFunctionManager::eSep);
|
|
|
|
sal_Int32 nFuncPos = SAL_MAX_INT32;
|
|
OUString aFormString = m_aFormulaHelper.GetCharClass()->uppercase(pMEdit->GetText());
|
|
|
|
const uno::Reference< sheet::XFormulaParser > xParser(m_pHelper->getFormulaParser());
|
|
const table::CellAddress aRefPos(m_pHelper->getReferencePosition());
|
|
|
|
const sheet::FormulaToken* pIter = m_aTokenList.getConstArray();
|
|
const sheet::FormulaToken* pEnd = pIter + m_aTokenList.getLength();
|
|
try
|
|
{
|
|
bool bFlag = false;
|
|
sal_Int32 nTokPos = 1;
|
|
sal_Int32 nOldTokPos = 1;
|
|
sal_Int32 nPrevFuncPos = 1;
|
|
short nBracketCount = 0;
|
|
while ( pIter != pEnd )
|
|
{
|
|
const sal_Int32 eOp = pIter->OpCode;
|
|
uno::Sequence<sheet::FormulaToken> aArgs(1);
|
|
aArgs[0] = *pIter;
|
|
const OUString aString = xParser->printFormula(aArgs, aRefPos);
|
|
const sheet::FormulaToken* pNextToken = pIter + 1;
|
|
|
|
if( !bUserMatrixFlag && FormulaCompiler::IsMatrixFunction((OpCode)eOp) )
|
|
{
|
|
m_pBtnMatrix->Check();
|
|
}
|
|
|
|
if( eOp == m_aSpecialOpCodes[sheet::FormulaMapGroupSpecialOffset::PUSH].Token.OpCode ||
|
|
eOp == m_aSpecialOpCodes[sheet::FormulaMapGroupSpecialOffset::SPACES].Token.OpCode )
|
|
{
|
|
const sal_Int32 n1 = nTokPos < 0 ? -1 : aFormString.indexOf(sep, nTokPos);
|
|
const sal_Int32 n2 = nTokPos < 0 ? -1 : aFormString.indexOf(')',nTokPos);
|
|
sal_Int32 nXXX = nTokPos;
|
|
if( n1 < n2 && n1 != -1 )
|
|
{
|
|
nTokPos=n1;
|
|
}
|
|
else
|
|
{
|
|
nTokPos=n2;
|
|
}
|
|
if( pNextToken != pEnd )
|
|
{
|
|
aArgs[0] = *pNextToken;
|
|
const OUString a2String = xParser->printFormula(aArgs, aRefPos);
|
|
const sal_Int32 n3 = nXXX < 0 ? -1 : aFormString.indexOf(a2String, nXXX);
|
|
if (n3 < nTokPos && n3 != -1)
|
|
nTokPos = n3;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
nTokPos = nTokPos + aString.getLength();
|
|
}
|
|
|
|
if( eOp == m_aSeparatorsOpCodes[TOKEN_OPEN].OpCode )
|
|
{
|
|
nBracketCount++;
|
|
bFlag = true;
|
|
}
|
|
else if( eOp == m_aSeparatorsOpCodes[TOKEN_CLOSE].OpCode )
|
|
{
|
|
nBracketCount--;
|
|
bFlag = false;
|
|
nFuncPos = nPrevFuncPos;
|
|
}
|
|
bool bIsFunction = ::std::find_if(m_aFunctionOpCodes.getConstArray(),
|
|
m_pFunctionOpCodesEnd,
|
|
[&eOp](const sheet::FormulaOpCodeMapEntry& aEntry) { return aEntry.Token.OpCode == eOp; } ) != m_pFunctionOpCodesEnd;
|
|
|
|
if( bIsFunction && m_aSpecialOpCodes[sheet::FormulaMapGroupSpecialOffset::SPACES].Token.OpCode != eOp )
|
|
{
|
|
nPrevFuncPos = nFuncPos;
|
|
nFuncPos = nOldTokPos;
|
|
}
|
|
|
|
if( nOldTokPos <= nPos && nPos < nTokPos )
|
|
{
|
|
if( !bIsFunction )
|
|
{
|
|
if( nBracketCount < 1 )
|
|
{
|
|
nFuncPos = pMEdit->GetText().getLength();
|
|
}
|
|
else if( !bFlag )
|
|
{
|
|
nFuncPos = nPrevFuncPos;
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
|
|
pIter = pNextToken;
|
|
nOldTokPos = nTokPos;
|
|
} // while ( pIter != pEnd )
|
|
}
|
|
catch ( const uno::Exception& e )
|
|
{
|
|
(void)e;
|
|
SAL_WARN("formula.ui", "FormulaDlg_Impl::GetFunctionPos exception! " << e.Message);
|
|
}
|
|
|
|
return nFuncPos;
|
|
}
|
|
|
|
bool FormulaDlg_Impl::CalcValue( const OUString& rStrExp, OUString& rStrResult )
|
|
{
|
|
bool bResult = true;
|
|
|
|
if ( !rStrExp.isEmpty() )
|
|
{
|
|
// Only calculate the value when there isn't any more keyboard input:
|
|
|
|
if ( !Application::AnyInput( VclInputFlags::KEYBOARD ) )
|
|
{
|
|
bResult = m_pHelper->calculateValue(rStrExp,rStrResult);
|
|
}
|
|
else
|
|
bResult = false;
|
|
}
|
|
|
|
return bResult;
|
|
}
|
|
|
|
void FormulaDlg_Impl::UpdateValues()
|
|
{
|
|
OUString aStrResult;
|
|
if ( CalcValue( pFuncDesc->getFormula( m_aArguments ), aStrResult ) )
|
|
m_pWndResult->SetText( aStrResult );
|
|
|
|
if (bMakingTree) return;
|
|
|
|
aStrResult.clear();
|
|
if ( CalcValue(m_pHelper->getCurrentFormula(), aStrResult ) )
|
|
m_pWndFormResult->SetText( aStrResult );
|
|
else
|
|
{
|
|
aStrResult.clear();
|
|
m_pWndFormResult->SetText( aStrResult );
|
|
}
|
|
CalcStruct(pMEdit->GetText());
|
|
}
|
|
|
|
bool FormulaDlg_Impl::CalcStruct( const OUString& rStrExp)
|
|
{
|
|
bool bResult = true;
|
|
sal_Int32 nLength = rStrExp.getLength();
|
|
|
|
if ( !rStrExp.isEmpty() && aOldFormula!=rStrExp && bStructUpdate)
|
|
{
|
|
// Only calculate the value when there isn't any more keyboard input:
|
|
|
|
if ( !Application::AnyInput( VclInputFlags::KEYBOARD ) )
|
|
{
|
|
pStructPage->ClearStruct();
|
|
|
|
OUString aString=rStrExp;
|
|
if(rStrExp[nLength-1] == '(')
|
|
{
|
|
aString = aString.copy(0, nLength-1);
|
|
}
|
|
|
|
aString = comphelper::string::remove(aString, '\n');
|
|
OUString aStrResult;
|
|
|
|
if ( CalcValue(aString, aStrResult ) )
|
|
m_pWndFormResult->SetText( aStrResult );
|
|
|
|
UpdateTokenArray(aString);
|
|
fillTree(pStructPage);
|
|
|
|
aOldFormula = rStrExp;
|
|
if(rStrExp[nLength-1] == '(')
|
|
UpdateTokenArray(rStrExp);
|
|
}
|
|
else
|
|
bResult = false;
|
|
}
|
|
return bResult;
|
|
}
|
|
|
|
|
|
void FormulaDlg_Impl::MakeTree(StructPage* _pTree,SvTreeListEntry* pParent,FormulaToken* _pToken,long Count)
|
|
{
|
|
if( _pToken != nullptr && Count > 0 )
|
|
{
|
|
long nParas = _pToken->GetParamCount();
|
|
OpCode eOp = _pToken->GetOpCode();
|
|
|
|
// #i101512# for output, the original token is needed
|
|
FormulaToken* pOrigToken = (_pToken->GetType() == svFAP) ? _pToken->GetFAPOrigToken() : _pToken;
|
|
uno::Sequence<sheet::FormulaToken> aArgs(1);
|
|
::std::map<FormulaToken*,sheet::FormulaToken>::const_iterator itr = m_aTokenMap.find(pOrigToken);
|
|
if (itr == m_aTokenMap.end())
|
|
return;
|
|
|
|
aArgs[0] = itr->second;
|
|
try
|
|
{
|
|
const table::CellAddress aRefPos(m_pHelper->getReferencePosition());
|
|
const OUString aResult = m_pHelper->getFormulaParser()->printFormula(aArgs, aRefPos);
|
|
|
|
if ( nParas > 0 )
|
|
{
|
|
SvTreeListEntry* pEntry;
|
|
|
|
bool bCalcSubformula = false;
|
|
OUString aTest=_pTree->GetEntryText(pParent);
|
|
|
|
if(aTest==aResult &&
|
|
(eOp==ocAdd || eOp==ocMul ||
|
|
eOp==ocAmpersand))
|
|
{
|
|
pEntry=pParent;
|
|
}
|
|
else
|
|
{
|
|
if(eOp==ocBad)
|
|
{
|
|
pEntry=_pTree->InsertEntry(aResult,pParent,STRUCT_ERROR,0,_pToken);
|
|
}
|
|
|
|
else if ( eOp<ocAdd || eOp>ocNegSub ) // not ideal coding
|
|
{
|
|
bCalcSubformula = true;
|
|
pEntry=_pTree->InsertEntry(aResult,pParent,STRUCT_FOLDER,0,_pToken);
|
|
}
|
|
else
|
|
{
|
|
pEntry=_pTree->InsertEntry(aResult,pParent,STRUCT_FOLDER,0,_pToken);
|
|
}
|
|
}
|
|
|
|
MakeTree(_pTree,pEntry,m_pTokenArray->PrevRPN(),nParas);
|
|
|
|
if (bCalcSubformula)
|
|
{
|
|
OUString aFormula;
|
|
|
|
if (!bMakingTree)
|
|
{
|
|
// gets the last subformula result
|
|
bMakingTree = true;
|
|
aFormula = GetPrevFuncExpression( true);
|
|
}
|
|
else
|
|
{
|
|
// gets subsequent subformula results (from the back)
|
|
aFormula = GetPrevFuncExpression( false);
|
|
}
|
|
|
|
OUString aStr;
|
|
if (CalcValue( aFormula, aStr))
|
|
m_pWndResult->SetText( aStr );
|
|
aStr = m_pWndResult->GetText();
|
|
pStructPage->GetTlbStruct()->SetEntryText( pEntry, aResult + " = " + aStr);
|
|
}
|
|
|
|
--Count;
|
|
m_pTokenArray->NextRPN();
|
|
MakeTree(_pTree,pParent,m_pTokenArray->PrevRPN(),Count);
|
|
}
|
|
else
|
|
{
|
|
if(eOp==ocBad)
|
|
{
|
|
_pTree->InsertEntry(aResult,pParent,STRUCT_ERROR,0,_pToken);
|
|
}
|
|
else if (eOp==ocPush)
|
|
{
|
|
OUString aCellResult;
|
|
OUString aEquals(" = ");
|
|
if (CalcValue( "=" + aResult, aCellResult) && aCellResult != aResult) // cell is a formula, print subformula
|
|
_pTree->InsertEntry(aResult + aEquals + aCellResult,pParent,STRUCT_END,0,_pToken);
|
|
else
|
|
_pTree->InsertEntry(aResult,pParent,STRUCT_END,0,_pToken);
|
|
}
|
|
else
|
|
{
|
|
_pTree->InsertEntry(aResult,pParent,STRUCT_END,0,_pToken);
|
|
}
|
|
--Count;
|
|
MakeTree(_pTree,pParent,m_pTokenArray->PrevRPN(),Count);
|
|
}
|
|
}
|
|
catch(const uno::Exception&)
|
|
{
|
|
DBG_UNHANDLED_EXCEPTION();
|
|
}
|
|
}
|
|
}
|
|
|
|
void FormulaDlg_Impl::fillTree(StructPage* _pTree)
|
|
{
|
|
GetFormulaOpCodeMapper();
|
|
FormulaToken* pToken = m_pTokenArray->LastRPN();
|
|
|
|
if( pToken != nullptr)
|
|
{
|
|
MakeTree(_pTree,nullptr,pToken,1);
|
|
bMakingTree = false;
|
|
}
|
|
}
|
|
void FormulaDlg_Impl::UpdateTokenArray( const OUString& rStrExp)
|
|
{
|
|
m_aTokenMap.clear();
|
|
m_aTokenList.realloc(0);
|
|
try
|
|
{
|
|
const table::CellAddress aRefPos(m_pHelper->getReferencePosition());
|
|
m_aTokenList = m_pHelper->getFormulaParser()->parseFormula(rStrExp, aRefPos);
|
|
}
|
|
catch(const uno::Exception&)
|
|
{
|
|
DBG_UNHANDLED_EXCEPTION();
|
|
}
|
|
GetFormulaOpCodeMapper(); // just to get it initialized
|
|
m_pTokenArray = m_pHelper->convertToTokenArray(m_aTokenList);
|
|
const sal_Int32 nLen = static_cast<sal_Int32>(m_pTokenArray->GetLen());
|
|
FormulaToken** pTokens = m_pTokenArray->GetArray();
|
|
if ( pTokens && nLen == m_aTokenList.getLength() )
|
|
{
|
|
for (sal_Int32 nPos=0; nPos<nLen; nPos++)
|
|
{
|
|
m_aTokenMap.insert(::std::map<FormulaToken*,sheet::FormulaToken>::value_type(pTokens[nPos],m_aTokenList[nPos]));
|
|
}
|
|
} // if ( pTokens && nLen == m_aTokenList.getLength() )
|
|
|
|
FormulaCompiler aCompiler(*m_pTokenArray.get());
|
|
// #i101512# Disable special handling of jump commands.
|
|
aCompiler.EnableJumpCommandReorder(false);
|
|
aCompiler.EnableStopOnError(false);
|
|
aCompiler.CompileTokenArray();
|
|
}
|
|
|
|
void FormulaDlg_Impl::FillDialog(bool bFlag)
|
|
{
|
|
bool bNext=true, bPrev=true;
|
|
if(bFlag)
|
|
FillControls(bNext, bPrev);
|
|
FillListboxes();
|
|
if(bFlag)
|
|
{
|
|
m_pBtnBackward->Enable(bPrev);
|
|
m_pBtnForward->Enable(bNext);
|
|
}
|
|
|
|
OUString aStrResult;
|
|
|
|
if ( CalcValue(m_pHelper->getCurrentFormula(), aStrResult ) )
|
|
m_pWndFormResult->SetText( aStrResult );
|
|
else
|
|
{
|
|
aStrResult.clear();
|
|
m_pWndFormResult->SetText( aStrResult );
|
|
}
|
|
}
|
|
|
|
|
|
void FormulaDlg_Impl::FillListboxes()
|
|
{
|
|
// Switch between the "Pages"
|
|
FormEditData* pData = m_pHelper->getFormEditData();
|
|
OUString aNewTitle;
|
|
// 1. Page: select function
|
|
if ( pFuncDesc && pFuncDesc->getCategory() )
|
|
{
|
|
// We'll never have more than int32 max categories so this is safe ...
|
|
if( pFuncPage->GetCategory() != static_cast<sal_Int32>(pFuncDesc->getCategory()->getNumber() + 1) )
|
|
pFuncPage->SetCategory(pFuncDesc->getCategory()->getNumber() + 1);
|
|
|
|
sal_Int32 nPos=pFuncPage->GetFuncPos(pFuncDesc);
|
|
|
|
pFuncPage->SetFunction(nPos);
|
|
}
|
|
else if ( pData )
|
|
{
|
|
pFuncPage->SetCategory( pData->GetCatSel() );
|
|
pFuncPage->SetFunction( pData->GetFuncSel() );
|
|
}
|
|
FuncSelHdl(*pFuncPage);
|
|
|
|
m_pHelper->setDispatcherLock( true );// Activate Modal-Mode
|
|
|
|
aNewTitle = aTitle1;
|
|
|
|
// HelpId for 1. page is the one from the resource
|
|
m_pParent->SetHelpId( aOldHelp );
|
|
m_pParent->SetUniqueId( aOldUnique );
|
|
}
|
|
|
|
void FormulaDlg_Impl::FillControls(bool &rbNext, bool &rbPrev)
|
|
{
|
|
// Switch between the "Pages"
|
|
FormEditData* pData = m_pHelper->getFormEditData();
|
|
if (!pData )
|
|
return;
|
|
|
|
// 2. Page or Edit: show selected function
|
|
|
|
sal_Int32 nFStart = pData->GetFStart();
|
|
OUString aFormula = m_pHelper->getCurrentFormula() + " )";
|
|
sal_Int32 nNextFStart = nFStart;
|
|
sal_Int32 nNextFEnd = 0;
|
|
|
|
DeleteArgs();
|
|
const IFunctionDescription* pOldFuncDesc = pFuncDesc;
|
|
|
|
if ( m_aFormulaHelper.GetNextFunc( aFormula, false,
|
|
nNextFStart, &nNextFEnd, &pFuncDesc, &m_aArguments ) )
|
|
{
|
|
const bool bTestFlag = (pOldFuncDesc != pFuncDesc);
|
|
if(bTestFlag)
|
|
{
|
|
m_pFtHeadLine->Hide();
|
|
m_pFtFuncName->Hide();
|
|
m_pFtFuncDesc->Hide();
|
|
pParaWin->SetFunctionDesc(pFuncDesc);
|
|
m_pFtEditName->SetText( pFuncDesc->getFunctionName() );
|
|
m_pFtEditName->Show();
|
|
m_pParaWinBox->Show();
|
|
const OString aHelpId = pFuncDesc->getHelpId();
|
|
if ( !aHelpId.isEmpty() )
|
|
pMEdit->SetHelpId(aHelpId);
|
|
}
|
|
|
|
sal_Int32 nOldStart, nOldEnd;
|
|
m_pHelper->getSelection( nOldStart, nOldEnd );
|
|
if ( nOldStart != nNextFStart || nOldEnd != nNextFEnd )
|
|
{
|
|
m_pHelper->setSelection( nNextFStart, nNextFEnd );
|
|
}
|
|
aFuncSel.Min() = nNextFStart;
|
|
aFuncSel.Max() = nNextFEnd;
|
|
|
|
if(!bEditFlag)
|
|
pMEdit->SetText(m_pHelper->getCurrentFormula());
|
|
sal_Int32 PrivStart, PrivEnd;
|
|
m_pHelper->getSelection( PrivStart, PrivEnd);
|
|
if(!bEditFlag)
|
|
pMEdit->SetSelection( Selection(PrivStart, PrivEnd));
|
|
|
|
nArgs = pFuncDesc->getSuppressedArgumentCount();
|
|
sal_uInt16 nOffset = pData->GetOffset();
|
|
nEdFocus = pData->GetEdFocus();
|
|
|
|
// Concatenate the Edit's for Focus-Control
|
|
|
|
if(bTestFlag)
|
|
pParaWin->SetArgumentOffset(nOffset);
|
|
sal_uInt16 nActiv=0;
|
|
sal_Int32 nArgPos = m_aFormulaHelper.GetArgStart( aFormula, nFStart, 0 );
|
|
sal_Int32 nEditPos = pMEdit->GetSelection().Min();
|
|
bool bFlag = false;
|
|
|
|
for(sal_Int32 i=0;i<nArgs;i++)
|
|
{
|
|
sal_Int32 nLength = m_aArguments[i].getLength()+1;
|
|
pParaWin->SetArgument(i,m_aArguments[i]);
|
|
if(nArgPos<=nEditPos && nEditPos<nArgPos+nLength)
|
|
{
|
|
nActiv=i;
|
|
bFlag=true;
|
|
}
|
|
nArgPos = nArgPos + nLength;
|
|
}
|
|
pParaWin->UpdateParas();
|
|
|
|
if(bFlag)
|
|
{
|
|
pParaWin->SetActiveLine(nActiv);
|
|
}
|
|
|
|
UpdateValues();
|
|
}
|
|
else
|
|
{
|
|
m_pFtEditName->SetText("");
|
|
pMEdit->SetHelpId( m_aEditHelpId );
|
|
}
|
|
// Test, ob vorne/hinten noch mehr Funktionen sind
|
|
|
|
sal_Int32 nTempStart = m_aFormulaHelper.GetArgStart( aFormula, nFStart, 0 );
|
|
rbNext = m_aFormulaHelper.GetNextFunc( aFormula, false, nTempStart );
|
|
nTempStart = pMEdit->GetSelection().Min();
|
|
pData->SetFStart(nTempStart);
|
|
rbPrev = m_aFormulaHelper.GetNextFunc( aFormula, true, nTempStart );
|
|
}
|
|
|
|
|
|
void FormulaDlg_Impl::ClearAllParas()
|
|
{
|
|
DeleteArgs();
|
|
pFuncDesc = nullptr;
|
|
pParaWin->ClearAll();
|
|
m_pWndResult->SetText(OUString());
|
|
m_pFtFuncName->SetText(OUString());
|
|
FuncSelHdl(*pFuncPage);
|
|
|
|
if (pFuncPage->IsVisible())
|
|
{
|
|
m_pFtEditName->Hide();
|
|
m_pParaWinBox->Hide();
|
|
|
|
m_pBtnForward->Enable(); //@new
|
|
m_pFtHeadLine->Show();
|
|
m_pFtFuncName->Show();
|
|
m_pFtFuncDesc->Show();
|
|
}
|
|
}
|
|
OUString FormulaDlg_Impl::RepairFormula(const OUString& aFormula)
|
|
{
|
|
OUString aResult('=');
|
|
try
|
|
{
|
|
UpdateTokenArray(aFormula);
|
|
|
|
if ( m_aTokenList.getLength() )
|
|
{
|
|
const table::CellAddress aRefPos(m_pHelper->getReferencePosition());
|
|
const OUString sFormula(m_pHelper->getFormulaParser()->printFormula(m_aTokenList, aRefPos));
|
|
if ( sFormula.isEmpty() || sFormula[0] != '=' )
|
|
aResult += sFormula;
|
|
else
|
|
aResult = sFormula;
|
|
|
|
}
|
|
}
|
|
catch ( const uno::Exception& e )
|
|
{
|
|
(void)e;
|
|
SAL_WARN("formula.ui", "FormulaDlg_Impl::RepairFormula exception! " << e.Message);
|
|
}
|
|
return aResult;
|
|
}
|
|
|
|
void FormulaDlg_Impl::DoEnter(bool bOk)
|
|
{
|
|
// Accept input to the document or cancel
|
|
if ( bOk)
|
|
{
|
|
// remove dummy arguments
|
|
OUString aInputFormula = m_pHelper->getCurrentFormula();
|
|
OUString aString = RepairFormula(pMEdit->GetText());
|
|
m_pHelper->setSelection(0, aInputFormula.getLength());
|
|
m_pHelper->setCurrentFormula(aString);
|
|
}
|
|
|
|
m_pHelper->switchBack();
|
|
|
|
m_pHelper->dispatch(bOk,m_pBtnMatrix->IsChecked());
|
|
// Clear data
|
|
m_pHelper->deleteFormData();
|
|
|
|
// Close dialog
|
|
m_pHelper->doClose(bOk);
|
|
}
|
|
|
|
|
|
IMPL_LINK_TYPED( FormulaDlg_Impl, BtnHdl, Button*, pBtn, void )
|
|
{
|
|
if ( pBtn == m_pBtnCancel )
|
|
{
|
|
DoEnter(false); // closes the Dialog
|
|
}
|
|
else if ( pBtn == m_pBtnEnd )
|
|
{
|
|
DoEnter(true); // closes the Dialog
|
|
}
|
|
else if ( pBtn == m_pBtnForward )
|
|
{
|
|
const IFunctionDescription* pDesc =pFuncPage->GetFuncDesc( pFuncPage->GetFunction() );
|
|
|
|
if(pDesc==pFuncDesc || !pFuncPage->IsVisible())
|
|
EditNextFunc( true );
|
|
else
|
|
{
|
|
DblClkHdl(*pFuncPage); //new
|
|
m_pBtnForward->Enable(false); //new
|
|
}
|
|
}
|
|
else if ( pBtn == m_pBtnBackward )
|
|
{
|
|
bEditFlag=false;
|
|
m_pBtnForward->Enable();
|
|
EditNextFunc( false );
|
|
m_pMEFormula->Invalidate();
|
|
m_pMEFormula->Update();
|
|
}
|
|
}
|
|
|
|
|
|
|
|
|
|
// Functions for 1. Page
|
|
|
|
|
|
|
|
|
|
// Handler for Listboxes
|
|
|
|
IMPL_LINK_NOARG_TYPED(FormulaDlg_Impl, DblClkHdl, FuncPage&, void)
|
|
{
|
|
sal_Int32 nFunc = pFuncPage->GetFunction();
|
|
|
|
// ex-UpdateLRUList
|
|
const IFunctionDescription* pDesc = pFuncPage->GetFuncDesc(nFunc);
|
|
m_pHelper->insertEntryToLRUList(pDesc);
|
|
|
|
OUString aFuncName = pFuncPage->GetSelFunctionName() + "()";
|
|
m_pHelper->setCurrentFormula(aFuncName);
|
|
pMEdit->ReplaceSelected(aFuncName);
|
|
|
|
Selection aSel=pMEdit->GetSelection();
|
|
aSel.Max()=aSel.Max()-1;
|
|
pMEdit->SetSelection(aSel);
|
|
|
|
FormulaHdl(*pMEdit);
|
|
|
|
aSel.Min()=aSel.Max();
|
|
pMEdit->SetSelection(aSel);
|
|
|
|
if(nArgs==0)
|
|
{
|
|
BtnHdl(m_pBtnBackward);
|
|
}
|
|
|
|
pParaWin->SetEdFocus(0);
|
|
m_pBtnForward->Enable(false); //@New
|
|
}
|
|
|
|
|
|
|
|
// Functions for right Page
|
|
|
|
void FormulaDlg_Impl::SetData(sal_Int32 nFStart, sal_Int32 nNextFStart, sal_Int32 nNextFEnd, sal_Int32& PrivStart, sal_Int32& PrivEnd)
|
|
{
|
|
sal_Int32 nFEnd;
|
|
|
|
// Notice and set new selection
|
|
m_pHelper->getSelection( nFStart, nFEnd );
|
|
m_pHelper->setSelection( nNextFStart, nNextFEnd );
|
|
if(!bEditFlag)
|
|
pMEdit->SetText(m_pHelper->getCurrentFormula());
|
|
|
|
|
|
m_pHelper->getSelection( PrivStart, PrivEnd);
|
|
if(!bEditFlag)
|
|
{
|
|
pMEdit->SetSelection( Selection(PrivStart, PrivEnd));
|
|
m_pMEFormula->UpdateOldSel();
|
|
}
|
|
|
|
FormEditData* pData = m_pHelper->getFormEditData();
|
|
pData->SetFStart( nNextFStart );
|
|
pData->SetOffset( 0 );
|
|
pData->SetEdFocus( 0 );
|
|
|
|
FillDialog();
|
|
}
|
|
|
|
void FormulaDlg_Impl::EditThisFunc(sal_Int32 nFStart)
|
|
{
|
|
FormEditData* pData = m_pHelper->getFormEditData();
|
|
if (!pData) return;
|
|
|
|
OUString aFormula = m_pHelper->getCurrentFormula();
|
|
|
|
if(nFStart==NOT_FOUND)
|
|
{
|
|
nFStart = pData->GetFStart();
|
|
}
|
|
else
|
|
{
|
|
pData->SetFStart(nFStart);
|
|
}
|
|
|
|
sal_Int32 nNextFStart = nFStart;
|
|
sal_Int32 nNextFEnd = 0;
|
|
|
|
bool bFound;
|
|
|
|
bFound = m_aFormulaHelper.GetNextFunc( aFormula, false, nNextFStart, &nNextFEnd);
|
|
if ( bFound )
|
|
{
|
|
sal_Int32 PrivStart, PrivEnd;
|
|
SetData(nFStart, nNextFStart, nNextFEnd, PrivStart, PrivEnd);
|
|
m_pHelper->showReference(aFormula.copy(PrivStart, PrivEnd-PrivStart));
|
|
}
|
|
else
|
|
{
|
|
ClearAllParas();
|
|
}
|
|
}
|
|
|
|
bool FormulaDlg_Impl::EditNextFunc( bool bForward, sal_Int32 nFStart )
|
|
{
|
|
FormEditData* pData = m_pHelper->getFormEditData();
|
|
if (!pData)
|
|
return false;
|
|
|
|
OUString aFormula = m_pHelper->getCurrentFormula();
|
|
|
|
if(nFStart==NOT_FOUND)
|
|
{
|
|
nFStart = pData->GetFStart();
|
|
}
|
|
else
|
|
{
|
|
pData->SetFStart(nFStart);
|
|
}
|
|
|
|
sal_Int32 nNextFStart = 0;
|
|
sal_Int32 nNextFEnd = 0;
|
|
|
|
bool bFound;
|
|
if ( bForward )
|
|
{
|
|
nNextFStart = m_aFormulaHelper.GetArgStart( aFormula, nFStart, 0 );
|
|
bFound = m_aFormulaHelper.GetNextFunc( aFormula, false, nNextFStart, &nNextFEnd);
|
|
}
|
|
else
|
|
{
|
|
nNextFStart = nFStart;
|
|
bFound = m_aFormulaHelper.GetNextFunc( aFormula, true, nNextFStart, &nNextFEnd);
|
|
}
|
|
|
|
if ( bFound )
|
|
{
|
|
sal_Int32 PrivStart, PrivEnd;
|
|
SetData(nFStart, nNextFStart, nNextFEnd, PrivStart, PrivEnd);
|
|
}
|
|
|
|
return bFound;
|
|
}
|
|
|
|
OUString FormulaDlg_Impl::GetPrevFuncExpression( bool bStartFromEnd )
|
|
{
|
|
OUString aExpression;
|
|
|
|
OUString aFormula( m_pHelper->getCurrentFormula());
|
|
if (aFormula.isEmpty())
|
|
return aExpression;
|
|
|
|
if (bStartFromEnd || mnFuncExpStart >= aFormula.getLength())
|
|
mnFuncExpStart = aFormula.getLength() - 1;
|
|
|
|
sal_Int32 nFStart = mnFuncExpStart;
|
|
sal_Int32 nFEnd = 0;
|
|
if (m_aFormulaHelper.GetNextFunc( aFormula, true, nFStart, &nFEnd))
|
|
{
|
|
aExpression = aFormula.copy( nFStart, nFEnd - nFStart); // nFEnd is exclusive
|
|
mnFuncExpStart = nFStart;
|
|
}
|
|
|
|
return aExpression;
|
|
}
|
|
|
|
void FormulaDlg_Impl::SaveArg( sal_uInt16 nEd )
|
|
{
|
|
if (nEd<nArgs)
|
|
{
|
|
for(sal_uInt16 i=0; i<=nEd; i++)
|
|
{
|
|
if ( m_aArguments[i].isEmpty() )
|
|
m_aArguments[i] = " ";
|
|
}
|
|
if(!pParaWin->GetArgument(nEd).isEmpty())
|
|
m_aArguments[nEd] = pParaWin->GetArgument(nEd);
|
|
|
|
sal_uInt16 nClearPos=nEd+1;
|
|
for(sal_Int32 i=nEd+1; i<nArgs; i++)
|
|
{
|
|
if( !pParaWin->GetArgument(i).isEmpty() )
|
|
{
|
|
nClearPos=i+1;
|
|
}
|
|
}
|
|
|
|
for(sal_Int32 i=nClearPos; i<nArgs; i++)
|
|
{
|
|
m_aArguments[i].clear();
|
|
}
|
|
}
|
|
}
|
|
|
|
IMPL_LINK_TYPED( FormulaDlg_Impl, FxHdl, ParaWin&, rPtr, void )
|
|
{
|
|
if(&rPtr==pParaWin)
|
|
{
|
|
m_pBtnForward->Enable(); //@ In order to be able to input another function.
|
|
m_pTabCtrl->SetCurPageId(TP_FUNCTION);
|
|
|
|
OUString aUndoStr = m_pHelper->getCurrentFormula(); // it will be added before a ";"
|
|
FormEditData* pData = m_pHelper->getFormEditData();
|
|
if (!pData) return;
|
|
|
|
sal_uInt16 nArgNo = pParaWin->GetActiveLine();
|
|
nEdFocus=nArgNo;
|
|
|
|
SaveArg(nArgNo);
|
|
UpdateSelection();
|
|
|
|
sal_Int32 nFormulaStrPos = pData->GetFStart();
|
|
|
|
OUString aFormula = m_pHelper->getCurrentFormula();
|
|
sal_Int32 n1 = m_aFormulaHelper.GetArgStart( aFormula, nFormulaStrPos, nEdFocus+pData->GetOffset() );
|
|
|
|
pData->SetEdFocus( nEdFocus );
|
|
pData->SaveValues();
|
|
pData->SetMode( (sal_uInt16) FORMULA_FORMDLG_FORMULA );
|
|
pData->SetFStart( n1 );
|
|
pData->SetUndoStr( aUndoStr );
|
|
ClearAllParas();
|
|
|
|
FillDialog(false);
|
|
pFuncPage->SetFocus(); //There Parawin is not visible anymore
|
|
}
|
|
}
|
|
|
|
IMPL_LINK_TYPED( FormulaDlg_Impl, ModifyHdl, ParaWin&, rPtr, void )
|
|
{
|
|
if(&rPtr==pParaWin)
|
|
{
|
|
SaveArg(pParaWin->GetActiveLine());
|
|
UpdateValues();
|
|
|
|
UpdateSelection();
|
|
CalcStruct(pMEdit->GetText());
|
|
}
|
|
}
|
|
|
|
IMPL_LINK_NOARG_TYPED(FormulaDlg_Impl, FormulaHdl, Edit&, void)
|
|
{
|
|
|
|
FormEditData* pData = m_pHelper->getFormEditData();
|
|
if (!pData) return;
|
|
|
|
bEditFlag=true;
|
|
OUString aInputFormula=m_pHelper->getCurrentFormula();
|
|
OUString aString=pMEdit->GetText();
|
|
|
|
Selection aSel = pMEdit->GetSelection();
|
|
sal_Int32 nTest = 0;
|
|
|
|
if(aString.isEmpty()) //in case everything was cleared
|
|
{
|
|
aString += "=";
|
|
pMEdit->SetText(aString);
|
|
aSel .Min() = 1;
|
|
aSel .Max() = 1;
|
|
pMEdit->SetSelection(aSel);
|
|
}
|
|
else if(aString[nTest]!='=') //in case it's replaced;
|
|
{
|
|
aString = "=" + aString;
|
|
pMEdit->SetText(aString);
|
|
aSel .Min() += 1;
|
|
aSel .Max() += 1;
|
|
pMEdit->SetSelection(aSel);
|
|
}
|
|
|
|
|
|
m_pHelper->setSelection(0, aInputFormula.getLength());
|
|
m_pHelper->setCurrentFormula(aString);
|
|
m_pHelper->setSelection(aSel.Min(), aSel.Max());
|
|
|
|
sal_Int32 nPos = aSel.Min()-1;
|
|
|
|
OUString aStrResult;
|
|
|
|
if ( CalcValue(m_pHelper->getCurrentFormula(), aStrResult ) )
|
|
m_pWndFormResult->SetText( aStrResult );
|
|
else
|
|
{
|
|
aStrResult.clear();
|
|
m_pWndFormResult->SetText( aStrResult );
|
|
}
|
|
CalcStruct(aString);
|
|
|
|
nPos=GetFunctionPos(nPos);
|
|
|
|
if(nPos<aSel.Min()-1)
|
|
{
|
|
sal_Int32 nPos1 = aString.indexOf('(',nPos);
|
|
EditNextFunc( false, nPos1);
|
|
}
|
|
else
|
|
{
|
|
ClearAllParas();
|
|
}
|
|
|
|
m_pHelper->setSelection(aSel.Min(), aSel.Max());
|
|
bEditFlag=false;
|
|
}
|
|
|
|
IMPL_LINK_NOARG_TYPED(FormulaDlg_Impl, FormulaCursorHdl, EditBox&, void)
|
|
{
|
|
FormEditData* pData = m_pHelper->getFormEditData();
|
|
if (!pData) return;
|
|
|
|
bEditFlag=true;
|
|
|
|
OUString aString=pMEdit->GetText();
|
|
|
|
Selection aSel =pMEdit->GetSelection();
|
|
m_pHelper->setSelection(aSel.Min(), aSel.Max());
|
|
|
|
if(aSel.Min()==0)
|
|
{
|
|
aSel.Min()=1;
|
|
pMEdit->SetSelection(aSel);
|
|
}
|
|
|
|
if(aSel.Min() != aString.getLength())
|
|
{
|
|
sal_Int32 nPos = aSel.Min();
|
|
|
|
sal_Int32 nFStart=GetFunctionPos(nPos - 1);
|
|
|
|
if(nFStart<nPos)
|
|
{
|
|
sal_Int32 nPos1 = m_aFormulaHelper.GetFunctionEnd(aString,nFStart);
|
|
|
|
if(nPos1>nPos)
|
|
{
|
|
EditThisFunc(nFStart);
|
|
}
|
|
else
|
|
{
|
|
sal_Int32 n = nPos;
|
|
short nCount=1;
|
|
while(n>0)
|
|
{
|
|
if(aString[n]==')')
|
|
nCount++;
|
|
else if(aString[n]=='(')
|
|
nCount--;
|
|
if(nCount==0) break;
|
|
n--;
|
|
}
|
|
if(nCount==0)
|
|
{
|
|
nFStart=m_aFormulaHelper.GetFunctionStart(aString, n, true);
|
|
EditThisFunc(nFStart);
|
|
}
|
|
else
|
|
{
|
|
ClearAllParas();
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{
|
|
ClearAllParas();
|
|
}
|
|
}
|
|
m_pHelper->setSelection(aSel.Min(), aSel.Max());
|
|
|
|
bEditFlag=false;
|
|
}
|
|
|
|
void FormulaDlg_Impl::UpdateSelection()
|
|
{
|
|
m_pHelper->setSelection(aFuncSel.Min(), aFuncSel.Max());
|
|
m_pHelper->setCurrentFormula( pFuncDesc->getFormula( m_aArguments ) );
|
|
pMEdit->SetText(m_pHelper->getCurrentFormula());
|
|
sal_Int32 PrivStart, PrivEnd;
|
|
m_pHelper->getSelection( PrivStart, PrivEnd);
|
|
aFuncSel.Min() = PrivStart;
|
|
aFuncSel.Max() = PrivEnd;
|
|
|
|
nArgs = pFuncDesc->getSuppressedArgumentCount();
|
|
|
|
OUString aFormula=pMEdit->GetText();
|
|
sal_Int32 nArgPos=m_aFormulaHelper.GetArgStart( aFormula,PrivStart,0);
|
|
|
|
sal_uInt16 nPos=pParaWin->GetActiveLine();
|
|
if (nPos >= m_aArguments.size())
|
|
{
|
|
SAL_WARN("formula.ui","FormulaDlg_Impl::UpdateSelection - shot in foot: nPos " <<
|
|
nPos << " >= m_aArguments.size() " << m_aArguments.size() <<
|
|
" for aFormula '" << aFormula << "'");
|
|
nPos = m_aArguments.size();
|
|
if (nPos)
|
|
--nPos;
|
|
}
|
|
|
|
for(sal_uInt16 i=0;i<nPos;i++)
|
|
{
|
|
nArgPos += (m_aArguments[i].getLength() + 1);
|
|
}
|
|
sal_Int32 nLength = (nPos < m_aArguments.size()) ? m_aArguments[nPos].getLength() : 0;
|
|
|
|
Selection aSel(nArgPos,nArgPos+nLength);
|
|
m_pHelper->setSelection((sal_uInt16)nArgPos,(sal_uInt16)(nArgPos+nLength));
|
|
pMEdit->SetSelection(aSel);
|
|
m_pMEFormula->UpdateOldSel();
|
|
}
|
|
|
|
::std::pair<RefButton*,RefEdit*> FormulaDlg_Impl::RefInputStartBefore( RefEdit* pEdit, RefButton* pButton )
|
|
{
|
|
//because its initially hidden, give it its optimal
|
|
//size so clicking the refbutton has an initial
|
|
//size to work work when retro-fitting this to .ui
|
|
m_pEdRef->SetSizePixel(m_pEdRef->GetOptimalSize());
|
|
m_pEdRef->Show();
|
|
pTheRefEdit = pEdit;
|
|
pTheRefButton = pButton;
|
|
|
|
if( pTheRefEdit )
|
|
{
|
|
m_pEdRef->SetRefString( pTheRefEdit->GetText() );
|
|
m_pEdRef->SetSelection( pTheRefEdit->GetSelection() );
|
|
m_pEdRef->SetHelpId( pTheRefEdit->GetHelpId() );
|
|
m_pEdRef->SetUniqueId( pTheRefEdit->GetUniqueId() );
|
|
}
|
|
|
|
m_pRefBtn->Show( pButton != nullptr );
|
|
|
|
::std::pair<RefButton*,RefEdit*> aPair;
|
|
aPair.first = pButton ? m_pRefBtn.get() : nullptr;
|
|
aPair.second = m_pEdRef;
|
|
return aPair;
|
|
}
|
|
void FormulaDlg_Impl::RefInputStartAfter( RefEdit* /*pEdit*/, RefButton* /*pButton*/ )
|
|
{
|
|
m_pRefBtn->SetEndImage();
|
|
|
|
if( pTheRefEdit )
|
|
{
|
|
OUString aStr = aTitle2 + " " + m_pFtEditName->GetText() + "( ";
|
|
|
|
if( pParaWin->GetActiveLine() > 0 )
|
|
aStr += "...; ";
|
|
aStr += pParaWin->GetActiveArgName();
|
|
if( pParaWin->GetActiveLine() + 1 < nArgs )
|
|
aStr += "; ...";
|
|
aStr += " )";
|
|
|
|
m_pParent->SetText( MnemonicGenerator::EraseAllMnemonicChars( aStr ) );
|
|
}
|
|
}
|
|
void FormulaDlg_Impl::RefInputDoneAfter( bool bForced )
|
|
{
|
|
m_pRefBtn->SetStartImage();
|
|
if( bForced || !m_pRefBtn->IsVisible() )
|
|
{
|
|
m_pEdRef->Hide();
|
|
m_pRefBtn->Hide();
|
|
if( pTheRefEdit )
|
|
{
|
|
pTheRefEdit->SetRefString( m_pEdRef->GetText() );
|
|
pTheRefEdit->GrabFocus();
|
|
|
|
if( pTheRefButton )
|
|
pTheRefButton->SetStartImage();
|
|
|
|
sal_uInt16 nPrivActiv = pParaWin->GetActiveLine();
|
|
pParaWin->SetArgument( nPrivActiv, m_pEdRef->GetText() );
|
|
ModifyHdl( *pParaWin );
|
|
pTheRefEdit = nullptr;
|
|
}
|
|
m_pParent->SetText( aTitle1 );
|
|
}
|
|
}
|
|
RefEdit* FormulaDlg_Impl::GetCurrRefEdit()
|
|
{
|
|
return m_pEdRef->IsVisible() ? m_pEdRef.get() : pParaWin->GetActiveEdit();
|
|
}
|
|
void FormulaDlg_Impl::Update()
|
|
{
|
|
FormEditData* pData = m_pHelper->getFormEditData();
|
|
const OUString sExpression = pMEdit->GetText();
|
|
aOldFormula.clear();
|
|
UpdateTokenArray(sExpression);
|
|
FormulaCursorHdl(*m_pMEFormula);
|
|
CalcStruct(sExpression);
|
|
if(pData->GetMode() == FORMULA_FORMDLG_FORMULA)
|
|
m_pTabCtrl->SetCurPageId(TP_FUNCTION);
|
|
else
|
|
m_pTabCtrl->SetCurPageId(TP_STRUCT);
|
|
m_pBtnMatrix->Check(pData->GetMatrixFlag());
|
|
}
|
|
void FormulaDlg_Impl::Update(const OUString& _sExp)
|
|
{
|
|
CalcStruct(_sExp);
|
|
FillDialog();
|
|
FuncSelHdl(*pFuncPage);
|
|
}
|
|
void FormulaDlg_Impl::SetMeText(const OUString& _sText)
|
|
{
|
|
FormEditData* pData = m_pHelper->getFormEditData();
|
|
pMEdit->SetText(_sText);
|
|
pMEdit->SetSelection( pData->GetSelection());
|
|
m_pMEFormula->UpdateOldSel();
|
|
}
|
|
FormulaDlgMode FormulaDlg_Impl::SetMeText(const OUString& _sText, sal_Int32 PrivStart, sal_Int32 PrivEnd, bool bMatrix, bool _bSelect, bool _bUpdate)
|
|
{
|
|
FormulaDlgMode eMode = FORMULA_FORMDLG_FORMULA;
|
|
if(!bEditFlag)
|
|
pMEdit->SetText(_sText);
|
|
|
|
if ( _bSelect || !bEditFlag )
|
|
pMEdit->SetSelection( Selection(PrivStart, PrivEnd));
|
|
if ( _bUpdate )
|
|
{
|
|
m_pMEFormula->UpdateOldSel();
|
|
pMEdit->Invalidate();
|
|
m_pHelper->showReference(pMEdit->GetSelected());
|
|
eMode = FORMULA_FORMDLG_EDIT;
|
|
|
|
m_pBtnMatrix->Check( bMatrix );
|
|
} // if ( _bUpdate )
|
|
return eMode;
|
|
}
|
|
bool FormulaDlg_Impl::CheckMatrix(OUString& aFormula)
|
|
{
|
|
pMEdit->GrabFocus();
|
|
sal_Int32 nLen = aFormula.getLength();
|
|
bool bMatrix = nLen > 3 // Matrix-Formula
|
|
&& aFormula[0] == '{'
|
|
&& aFormula[1] == '='
|
|
&& aFormula[nLen-1] == '}';
|
|
if ( bMatrix )
|
|
{
|
|
aFormula = aFormula.copy( 1, aFormula.getLength()-2 );
|
|
m_pBtnMatrix->Check( bMatrix );
|
|
m_pBtnMatrix->Disable();
|
|
} // if ( bMatrix )
|
|
|
|
m_pTabCtrl->SetCurPageId(TP_STRUCT);
|
|
return bMatrix;
|
|
}
|
|
IMPL_LINK_NOARG_TYPED(FormulaDlg_Impl, StructSelHdl, StructPage&, void)
|
|
{
|
|
bStructUpdate=false;
|
|
if(pStructPage->IsVisible())
|
|
m_pBtnForward->Enable(false); //@New
|
|
bStructUpdate=true;
|
|
}
|
|
IMPL_LINK_NOARG_TYPED(FormulaDlg_Impl, MatrixHdl, Button*, void)
|
|
{
|
|
bUserMatrixFlag=true;
|
|
}
|
|
|
|
IMPL_LINK_NOARG_TYPED(FormulaDlg_Impl, FuncSelHdl, FuncPage&, void)
|
|
{
|
|
if ( (pFuncPage->GetFunctionEntryCount() > 0)
|
|
&& (pFuncPage->GetFunction() != LISTBOX_ENTRY_NOTFOUND) )
|
|
{
|
|
const IFunctionDescription* pDesc =pFuncPage->GetFuncDesc( pFuncPage->GetFunction() );
|
|
|
|
if(pDesc!=pFuncDesc) m_pBtnForward->Enable(); //new
|
|
|
|
if (pDesc)
|
|
{
|
|
pDesc->initArgumentInfo(); // full argument info is needed
|
|
|
|
OUString aSig = pDesc->getSignature();
|
|
m_pFtHeadLine->SetText( pDesc->getFunctionName() );
|
|
m_pFtFuncName->SetText( aSig );
|
|
m_pFtFuncDesc->SetText( pDesc->getDescription() );
|
|
}
|
|
}
|
|
else
|
|
{
|
|
m_pFtHeadLine->SetText( OUString() );
|
|
m_pFtFuncName->SetText( OUString() );
|
|
m_pFtFuncDesc->SetText( OUString() );
|
|
}
|
|
}
|
|
|
|
void FormulaDlg_Impl::UpdateParaWin(const Selection& _rSelection, const OUString& _sRefStr)
|
|
{
|
|
Selection theSel = _rSelection;
|
|
m_pEdRef->ReplaceSelected( _sRefStr );
|
|
theSel.Max() = theSel.Min() + _sRefStr.getLength();
|
|
m_pEdRef->SetSelection( theSel );
|
|
|
|
|
|
// Manual Update of the results' fields:
|
|
|
|
sal_uInt16 nPrivActiv = pParaWin->GetActiveLine();
|
|
pParaWin->SetArgument(nPrivActiv,m_pEdRef->GetText());
|
|
pParaWin->UpdateParas();
|
|
|
|
Edit* pEd = GetCurrRefEdit();
|
|
if( pEd != nullptr )
|
|
pEd->SetSelection( theSel );
|
|
|
|
pParaWin->SetRefMode(false);
|
|
}
|
|
bool FormulaDlg_Impl::UpdateParaWin(Selection& _rSelection)
|
|
{
|
|
pParaWin->SetRefMode(true);
|
|
|
|
OUString aStrEd;
|
|
Edit* pEd = GetCurrRefEdit();
|
|
if(pEd!=nullptr && pTheRefEdit==nullptr)
|
|
{
|
|
_rSelection=pEd->GetSelection();
|
|
_rSelection.Justify();
|
|
aStrEd=pEd->GetText();
|
|
m_pEdRef->SetRefString(aStrEd);
|
|
m_pEdRef->SetSelection( _rSelection );
|
|
}
|
|
else
|
|
{
|
|
_rSelection=m_pEdRef->GetSelection();
|
|
_rSelection.Justify();
|
|
aStrEd= m_pEdRef->GetText();
|
|
}
|
|
return pTheRefEdit == nullptr;
|
|
}
|
|
|
|
void FormulaDlg_Impl::SetEdSelection()
|
|
{
|
|
Edit* pEd = GetCurrRefEdit()/*aScParaWin.GetActiveEdit()*/;
|
|
if( pEd )
|
|
{
|
|
Selection theSel = m_pEdRef->GetSelection();
|
|
// Edit may have the focus -> call ModifyHdl in addition
|
|
// to what's happening in GetFocus
|
|
pEd->GetModifyHdl().Call(*pEd);
|
|
pEd->GrabFocus();
|
|
pEd->SetSelection(theSel);
|
|
} // if( pEd )
|
|
}
|
|
|
|
FormulaModalDialog::FormulaModalDialog( vcl::Window* pParent
|
|
, bool _bSupportFunctionResult
|
|
, bool _bSupportResult
|
|
, bool _bSupportMatrix
|
|
, IFunctionManager* _pFunctionMgr
|
|
, IControlReferenceHandler* _pDlg )
|
|
: ModalDialog(pParent, "FormulaDialog", "formula/ui/formuladialog.ui")
|
|
, m_pImpl(new FormulaDlg_Impl(this,_bSupportFunctionResult,
|
|
_bSupportResult, _bSupportMatrix,
|
|
this, _pFunctionMgr, _pDlg))
|
|
{
|
|
SetText(m_pImpl->aTitle1);
|
|
}
|
|
|
|
FormulaModalDialog::~FormulaModalDialog() { disposeOnce(); }
|
|
|
|
void FormulaModalDialog::dispose()
|
|
{
|
|
m_pImpl.reset();
|
|
ModalDialog::dispose();
|
|
}
|
|
|
|
void FormulaModalDialog::Update(const OUString& _sExp)
|
|
{
|
|
m_pImpl->Update(_sExp);
|
|
}
|
|
|
|
void FormulaModalDialog::SetMeText(const OUString& _sText)
|
|
{
|
|
m_pImpl->SetMeText(_sText);
|
|
}
|
|
|
|
bool FormulaModalDialog::CheckMatrix(OUString& aFormula)
|
|
{
|
|
return m_pImpl->CheckMatrix(aFormula);
|
|
}
|
|
|
|
void FormulaModalDialog::Update()
|
|
{
|
|
m_pImpl->Update();
|
|
}
|
|
|
|
::std::pair<RefButton*,RefEdit*> FormulaModalDialog::RefInputStartBefore( RefEdit* pEdit, RefButton* pButton )
|
|
{
|
|
return m_pImpl->RefInputStartBefore( pEdit, pButton );
|
|
}
|
|
|
|
void FormulaModalDialog::RefInputStartAfter( RefEdit* pEdit, RefButton* pButton )
|
|
{
|
|
m_pImpl->RefInputStartAfter( pEdit, pButton );
|
|
}
|
|
void FormulaModalDialog::RefInputDoneAfter( bool bForced )
|
|
{
|
|
m_pImpl->RefInputDoneAfter( bForced );
|
|
}
|
|
|
|
void FormulaModalDialog::SetFocusWin(vcl::Window *pWin,const OString& nUniqueId)
|
|
{
|
|
if(pWin->GetUniqueId()==nUniqueId)
|
|
{
|
|
pWin->GrabFocus();
|
|
}
|
|
else
|
|
{
|
|
sal_uInt16 nCount=pWin->GetChildCount();
|
|
|
|
for(sal_uInt16 i=0;i<nCount;i++)
|
|
{
|
|
vcl::Window* pChild=pWin->GetChild(i);
|
|
SetFocusWin(pChild,nUniqueId);
|
|
}
|
|
}
|
|
}
|
|
|
|
bool FormulaModalDialog::PreNotify( NotifyEvent& rNEvt )
|
|
{
|
|
if (m_pImpl)
|
|
m_pImpl->PreNotify( rNEvt );
|
|
|
|
return ModalDialog::PreNotify(rNEvt);
|
|
}
|
|
|
|
void FormulaModalDialog::StoreFormEditData(FormEditData* pData)
|
|
{
|
|
m_pImpl->StoreFormEditData(pData);
|
|
}
|
|
|
|
|
|
// Initialisation / General functions for Dialog
|
|
|
|
FormulaDlg::FormulaDlg( SfxBindings* pB, SfxChildWindow* pCW,
|
|
vcl::Window* pParent
|
|
, bool _bSupportFunctionResult
|
|
, bool _bSupportResult
|
|
, bool _bSupportMatrix
|
|
, IFunctionManager* _pFunctionMgr, IControlReferenceHandler* _pDlg ) :
|
|
SfxModelessDialog( pB, pCW, pParent, "FormulaDialog", "formula/ui/formuladialog.ui" ),
|
|
m_pImpl( new FormulaDlg_Impl(this, _bSupportFunctionResult
|
|
, _bSupportResult
|
|
, _bSupportMatrix
|
|
, this, _pFunctionMgr, _pDlg))
|
|
{
|
|
//undo SfxModelessDialog HelpId clear hack
|
|
reverseUniqueHelpIdHack(*this);
|
|
SetText(m_pImpl->aTitle1);
|
|
}
|
|
|
|
FormulaDlg::~FormulaDlg() {disposeOnce();}
|
|
|
|
void FormulaDlg::dispose()
|
|
{
|
|
m_pImpl.reset();
|
|
SfxModelessDialog::dispose();
|
|
}
|
|
|
|
void FormulaDlg::Update(const OUString& _sExp)
|
|
{
|
|
m_pImpl->Update(_sExp);
|
|
}
|
|
|
|
|
|
void FormulaDlg::SetMeText(const OUString& _sText)
|
|
{
|
|
m_pImpl->SetMeText(_sText);
|
|
}
|
|
|
|
FormulaDlgMode FormulaDlg::SetMeText(const OUString& _sText, sal_Int32 PrivStart, sal_Int32 PrivEnd, bool bMatrix, bool _bSelect, bool _bUpdate)
|
|
{
|
|
return m_pImpl->SetMeText(_sText,PrivStart, PrivEnd,bMatrix,_bSelect,_bUpdate);
|
|
}
|
|
|
|
bool FormulaDlg::CheckMatrix(OUString& aFormula)
|
|
{
|
|
return m_pImpl->CheckMatrix(aFormula);
|
|
}
|
|
|
|
OUString FormulaDlg::GetMeText() const
|
|
{
|
|
return m_pImpl->pMEdit->GetText();
|
|
}
|
|
|
|
void FormulaDlg::Update()
|
|
{
|
|
m_pImpl->Update();
|
|
m_pImpl->aIdle.SetPriority(SchedulerPriority::LOWER);
|
|
m_pImpl->aIdle.SetIdleHdl(LINK( this, FormulaDlg, UpdateFocusHdl));
|
|
m_pImpl->aIdle.Start();
|
|
}
|
|
|
|
void FormulaDlg::DoEnter(bool _bOk)
|
|
{
|
|
m_pImpl->DoEnter(_bOk);
|
|
}
|
|
::std::pair<RefButton*,RefEdit*> FormulaDlg::RefInputStartBefore( RefEdit* pEdit, RefButton* pButton )
|
|
{
|
|
return m_pImpl->RefInputStartBefore( pEdit, pButton );
|
|
}
|
|
void FormulaDlg::RefInputStartAfter( RefEdit* pEdit, RefButton* pButton )
|
|
{
|
|
m_pImpl->RefInputStartAfter( pEdit, pButton );
|
|
}
|
|
void FormulaDlg::RefInputDoneAfter( bool bForced )
|
|
{
|
|
m_pImpl->RefInputDoneAfter( bForced );
|
|
}
|
|
|
|
void FormulaDlg::SetFocusWin(vcl::Window *pWin,const OString& nUniqueId)
|
|
{
|
|
if(pWin->GetUniqueId()==nUniqueId)
|
|
{
|
|
pWin->GrabFocus();
|
|
}
|
|
else
|
|
{
|
|
sal_uInt16 nCount=pWin->GetChildCount();
|
|
|
|
for(sal_uInt16 i=0;i<nCount;i++)
|
|
{
|
|
vcl::Window* pChild=pWin->GetChild(i);
|
|
SetFocusWin(pChild,nUniqueId);
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
bool FormulaDlg::PreNotify( NotifyEvent& rNEvt )
|
|
{
|
|
if (m_pImpl)
|
|
m_pImpl->PreNotify( rNEvt );
|
|
return SfxModelessDialog::PreNotify(rNEvt);
|
|
}
|
|
|
|
void FormulaDlg::disableOk()
|
|
{
|
|
m_pImpl->m_pBtnEnd->Disable();
|
|
}
|
|
|
|
void FormulaDlg::StoreFormEditData(FormEditData* pData)
|
|
{
|
|
m_pImpl->StoreFormEditData(pData);
|
|
}
|
|
|
|
|
|
const IFunctionDescription* FormulaDlg::getCurrentFunctionDescription() const
|
|
{
|
|
SAL_WARN_IF( (m_pImpl->pFuncDesc && m_pImpl->pFuncDesc->getSuppressedArgumentCount() != m_pImpl->nArgs),
|
|
"formula.ui", "FormulaDlg::getCurrentFunctionDescription: getSuppressedArgumentCount " <<
|
|
m_pImpl->pFuncDesc->getSuppressedArgumentCount() << " != nArgs " << m_pImpl->nArgs << " for " <<
|
|
m_pImpl->pFuncDesc->getFunctionName());
|
|
return m_pImpl->pFuncDesc;
|
|
}
|
|
|
|
void FormulaDlg::UpdateParaWin(const Selection& _rSelection,const OUString& _sRefStr)
|
|
{
|
|
m_pImpl->UpdateParaWin(_rSelection,_sRefStr);
|
|
}
|
|
bool FormulaDlg::UpdateParaWin(Selection& _rSelection)
|
|
{
|
|
return m_pImpl->UpdateParaWin(_rSelection);
|
|
}
|
|
|
|
RefEdit* FormulaDlg::GetActiveEdit()
|
|
{
|
|
return m_pImpl->pParaWin->GetActiveEdit();
|
|
}
|
|
|
|
const FormulaHelper& FormulaDlg::GetFormulaHelper() const
|
|
{
|
|
return m_pImpl->GetFormulaHelper();
|
|
}
|
|
|
|
void FormulaDlg::SetEdSelection()
|
|
{
|
|
m_pImpl->SetEdSelection();
|
|
}
|
|
IMPL_LINK_NOARG_TYPED(FormulaDlg, UpdateFocusHdl, Idle *, void)
|
|
{
|
|
FormEditData* pData = m_pImpl->m_pHelper->getFormEditData();
|
|
|
|
if (pData) // won't be destroyed via Close
|
|
{
|
|
m_pImpl->m_pHelper->setReferenceInput(pData);
|
|
OString nUniqueId(pData->GetUniqueId());
|
|
SetFocusWin(this,nUniqueId);
|
|
}
|
|
}
|
|
|
|
|
|
void FormEditData::SaveValues()
|
|
{
|
|
FormEditData* pTemp = new FormEditData(*this);
|
|
|
|
Reset();
|
|
pParent = pTemp;
|
|
}
|
|
|
|
void FormEditData::Reset()
|
|
{
|
|
pParent = nullptr;
|
|
nMode = 0;
|
|
nFStart = 0;
|
|
nCatSel = 1; //! oder 0 (zuletzt benutzte)
|
|
nFuncSel = 0;
|
|
nOffset = 0;
|
|
nEdFocus = 0;
|
|
bMatrix = false;
|
|
aUniqueId=OString();
|
|
aSelection.Min()=0;
|
|
aSelection.Max()=0;
|
|
aUndoStr.clear();
|
|
}
|
|
|
|
const FormEditData& FormEditData::operator=( const FormEditData& r )
|
|
{
|
|
pParent = r.pParent;
|
|
nMode = r.nMode;
|
|
nFStart = r.nFStart;
|
|
nCatSel = r.nCatSel;
|
|
nFuncSel = r.nFuncSel;
|
|
nOffset = r.nOffset;
|
|
nEdFocus = r.nEdFocus;
|
|
aUndoStr = r.aUndoStr;
|
|
bMatrix = r.bMatrix ;
|
|
aUniqueId = r.aUniqueId;
|
|
aSelection = r.aSelection;
|
|
return *this;
|
|
}
|
|
|
|
FormEditData::FormEditData()
|
|
{
|
|
Reset();
|
|
}
|
|
|
|
FormEditData::~FormEditData()
|
|
{
|
|
delete pParent;
|
|
}
|
|
|
|
FormEditData::FormEditData( const FormEditData& r )
|
|
{
|
|
*this = r;
|
|
}
|
|
|
|
|
|
} // formula
|
|
|
|
|
|
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|