5a602ed852
Change-Id: Ifdf0ebba617432f49e2c14c8a52c495dc1c6a36a Reviewed-on: https://gerrit.libreoffice.org/c/core/+/167853 Reviewed-by: Noel Grandin <noel.grandin@collabora.co.uk> Tested-by: Jenkins
158 lines
5.6 KiB
C++
158 lines
5.6 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 "vbaformatcondition.hxx"
|
|
#include "vbaformatconditions.hxx"
|
|
#include <unonames.hxx>
|
|
#include <ooo/vba/excel/XlFormatConditionType.hpp>
|
|
#include <basic/sberrors.hxx>
|
|
#include <utility>
|
|
|
|
using namespace ::ooo::vba;
|
|
using namespace ::com::sun::star;
|
|
|
|
/// @throws css::script::BasicErrorException
|
|
static ScVbaFormatConditions*
|
|
lcl_getScVbaFormatConditionsPtr( const uno::Reference< excel::XFormatConditions >& xFormatConditions )
|
|
{
|
|
ScVbaFormatConditions* pFormatConditions = static_cast< ScVbaFormatConditions* >( xFormatConditions.get() );
|
|
if ( !pFormatConditions )
|
|
DebugHelper::basicexception(ERRCODE_BASIC_METHOD_FAILED, {} );
|
|
return pFormatConditions;
|
|
}
|
|
|
|
ScVbaFormatCondition::ScVbaFormatCondition( const uno::Reference< XHelperInterface >& xParent,
|
|
const uno::Reference< uno::XComponentContext > & xContext,
|
|
const uno::Reference< sheet::XSheetConditionalEntry >& _xSheetConditionalEntry,
|
|
uno::Reference< excel::XStyle > _xStyle,
|
|
uno::Reference< excel::XFormatConditions > _xFormatConditions,
|
|
uno::Reference< css::beans::XPropertySet > _xPropertySet )
|
|
: ScVbaFormatCondition_BASE( xParent, xContext,
|
|
uno::Reference< sheet::XSheetCondition >( _xSheetConditionalEntry, css::uno::UNO_QUERY_THROW ) ),
|
|
moFormatConditions(std::move( _xFormatConditions )), mxStyle(std::move( _xStyle )), mxParentRangePropertySet(std::move( _xPropertySet ))
|
|
{
|
|
mxSheetConditionalEntries = lcl_getScVbaFormatConditionsPtr( moFormatConditions )->getSheetConditionalEntries();
|
|
|
|
msStyleName = mxStyle->getName();
|
|
}
|
|
|
|
void SAL_CALL
|
|
ScVbaFormatCondition::Delete( )
|
|
{
|
|
ScVbaFormatConditions* pFormatConditions = lcl_getScVbaFormatConditionsPtr( moFormatConditions );
|
|
pFormatConditions->removeFormatCondition(msStyleName, true);
|
|
notifyRange();
|
|
}
|
|
|
|
void SAL_CALL
|
|
ScVbaFormatCondition::Modify( ::sal_Int32 _nType, const uno::Any& _aOperator, const uno::Any& _aFormula1, const uno::Any& _aFormula2 )
|
|
{
|
|
try
|
|
{
|
|
ScVbaFormatConditions* pFormatConditions = lcl_getScVbaFormatConditionsPtr( moFormatConditions );
|
|
pFormatConditions->removeFormatCondition(msStyleName, false);
|
|
pFormatConditions->Add(_nType, _aOperator, _aFormula1, _aFormula2, mxStyle);
|
|
}
|
|
catch (const uno::Exception&)
|
|
{
|
|
DebugHelper::basicexception(ERRCODE_BASIC_METHOD_FAILED, {} );
|
|
}
|
|
}
|
|
|
|
uno::Reference< excel::XInterior > SAL_CALL
|
|
ScVbaFormatCondition::Interior( )
|
|
{
|
|
return mxStyle->Interior();
|
|
}
|
|
|
|
uno::Reference< excel::XFont > SAL_CALL
|
|
ScVbaFormatCondition::Font( )
|
|
{
|
|
return mxStyle->Font();
|
|
}
|
|
uno::Any SAL_CALL
|
|
ScVbaFormatCondition::Borders( const uno::Any& Index )
|
|
{ return mxStyle->Borders( Index );
|
|
}
|
|
|
|
sheet::ConditionOperator
|
|
ScVbaFormatCondition::retrieveAPIType(sal_Int32 _nVBAType, const uno::Reference< sheet::XSheetCondition >& _xSheetCondition )
|
|
{
|
|
sheet::ConditionOperator aAPIType = sheet::ConditionOperator_NONE;
|
|
switch (_nVBAType)
|
|
{
|
|
case excel::XlFormatConditionType::xlExpression:
|
|
aAPIType = sheet::ConditionOperator_FORMULA;
|
|
break;
|
|
case excel::XlFormatConditionType::xlCellValue:
|
|
if ( _xSheetCondition.is() && (_xSheetCondition->getOperator() == sheet::ConditionOperator_FORMULA ) )
|
|
aAPIType = sheet::ConditionOperator_NONE;
|
|
break;
|
|
default:
|
|
DebugHelper::basicexception(ERRCODE_BASIC_METHOD_FAILED, {} );
|
|
}
|
|
return aAPIType;
|
|
}
|
|
|
|
::sal_Int32 SAL_CALL
|
|
ScVbaFormatCondition::Type( )
|
|
{
|
|
sal_Int32 nReturnType = 0;
|
|
if ( mxSheetCondition->getOperator() == sheet::ConditionOperator_FORMULA)
|
|
nReturnType = excel::XlFormatConditionType::xlExpression;
|
|
else
|
|
nReturnType = excel::XlFormatConditionType::xlCellValue;
|
|
return nReturnType;
|
|
}
|
|
|
|
::sal_Int32 SAL_CALL
|
|
ScVbaFormatCondition::Operator( )
|
|
{
|
|
return ScVbaFormatCondition_BASE::Operator( true );
|
|
}
|
|
|
|
void
|
|
ScVbaFormatCondition::notifyRange()
|
|
{
|
|
try
|
|
{
|
|
mxParentRangePropertySet->setPropertyValue(SC_UNONAME_CONDFMT, uno::Any( mxSheetConditionalEntries));
|
|
}
|
|
catch (uno::Exception& )
|
|
{
|
|
DebugHelper::basicexception(ERRCODE_BASIC_METHOD_FAILED, {} );
|
|
}
|
|
}
|
|
|
|
OUString
|
|
ScVbaFormatCondition::getServiceImplName()
|
|
{
|
|
return u"ScVbaFormatCondition"_ustr;
|
|
}
|
|
|
|
uno::Sequence< OUString >
|
|
ScVbaFormatCondition::getServiceNames()
|
|
{
|
|
static uno::Sequence< OUString > const aServiceNames
|
|
{
|
|
u"ooo.vba.excel.FormatCondition"_ustr
|
|
};
|
|
return aServiceNames;
|
|
}
|
|
|
|
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|