office-gobmx/sc/source/ui/vba/vbaformatcondition.cxx
Noel Grandin 5a602ed852 loplugin:ostr in sc/.../vba
Change-Id: Ifdf0ebba617432f49e2c14c8a52c495dc1c6a36a
Reviewed-on: https://gerrit.libreoffice.org/c/core/+/167853
Reviewed-by: Noel Grandin <noel.grandin@collabora.co.uk>
Tested-by: Jenkins
2024-05-20 14:40:36 +02:00

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: */