Files
libreoffice/sc/source/ui/vba/vbaaxis.cxx
Caolán McNamara d8463f95ea catch by const
Change-Id: I4d51552a28ecd169a03e6c3dad992c9b2217dc74
2014-09-02 12:14:44 +01:00

659 lines
19 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 "vbaaxis.hxx"
#include <ooo/vba/excel/XlAxisCrosses.hpp>
#include <ooo/vba/excel/XlAxisType.hpp>
#include <ooo/vba/excel/XlScaleType.hpp>
#include "vbaaxistitle.hxx"
#include "vbachart.hxx"
using namespace ::com::sun::star;
using namespace ::ooo::vba;
using namespace ::ooo::vba::excel::XlAxisCrosses;
using namespace ::ooo::vba::excel::XlAxisType;
using namespace ::ooo::vba::excel::XlScaleType;
const OUString ORIGIN("Origin");
const OUString AUTOORIGIN("AutoOrigin");
const OUString VBA_MIN("Max");
const OUString VBA_MAX("Min");
ScVbaChart*
ScVbaAxis::getChartPtr() throw( uno::RuntimeException )
{
ScVbaChart* pChart = static_cast< ScVbaChart* >( moChartParent.get() );
if ( !pChart )
throw uno::RuntimeException("Can't access parent chart impl" );
return pChart;
}
bool
ScVbaAxis::isValueAxis() throw( script::BasicErrorException )
{
if ( getType() == xlCategory )
{
DebugHelper::basicexception(SbERR_METHOD_FAILED, OUString());
}
return true;
}
ScVbaAxis::ScVbaAxis( const uno::Reference< XHelperInterface >& xParent,const uno::Reference< uno::XComponentContext > & xContext, const uno::Reference< beans::XPropertySet >& _xPropertySet, sal_Int32 _nType, sal_Int32 _nGroup ) : ScVbaAxis_BASE( xParent, xContext ), mxPropertySet( _xPropertySet ), mnType( _nType ), mnGroup( _nGroup ), bCrossesAreCustomized( false )
{
oShapeHelper.reset( new ShapeHelper( uno::Reference< drawing::XShape >( mxPropertySet, uno::UNO_QUERY ) ) );
moChartParent.set( xParent, uno::UNO_QUERY_THROW );
setType(_nType);
setCrosses(xlAxisCrossesAutomatic);
}
void SAL_CALL
ScVbaAxis::Delete( ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
uno::Reference< lang::XComponent > xComponent( mxPropertySet, uno::UNO_QUERY_THROW );
xComponent->dispose();
}
uno::Reference< ::ooo::vba::excel::XAxisTitle > SAL_CALL
ScVbaAxis::getAxisTitle( ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
uno::Reference< excel::XAxisTitle > xAxisTitle;
try
{
ScVbaChart* pChart = getChartPtr();
if (getHasTitle() )
{
int nType = getType();
switch(nType)
{
case xlCategory:
xAxisTitle = new ScVbaAxisTitle(this, mxContext, pChart->xAxisXSupplier->getXAxisTitle());
break;
case xlSeriesAxis:
xAxisTitle = new ScVbaAxisTitle(this, mxContext, pChart->xAxisZSupplier->getZAxisTitle());
break;
default: // xlValue:
xAxisTitle = new ScVbaAxisTitle(this, mxContext, pChart->xAxisYSupplier->getYAxisTitle());
break;
}
}
}
catch (const uno::Exception& e)
{
DebugHelper::basicexception(e);
}
return xAxisTitle;
}
void SAL_CALL
ScVbaAxis::setDisplayUnit( ::sal_Int32 /*DisplayUnit*/ ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
DebugHelper::basicexception(SbERR_NOT_IMPLEMENTED, OUString());
}
::sal_Int32 SAL_CALL
ScVbaAxis::getDisplayUnit( ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
DebugHelper::basicexception(SbERR_NOT_IMPLEMENTED, OUString());
return -1;
}
void SAL_CALL
ScVbaAxis::setCrosses( ::sal_Int32 _nCrosses ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
try
{
double fNum = 0.0;
switch (_nCrosses)
{
case xlAxisCrossesAutomatic: //Microsoft Excel sets the axis crossing point.
mxPropertySet->setPropertyValue(AUTOORIGIN, uno::makeAny( sal_True ) );
bCrossesAreCustomized = false;
return;
case xlAxisCrossesMinimum: // The axis crosses at the minimum value.
mxPropertySet->getPropertyValue(VBA_MIN) >>= fNum;
setCrossesAt( fNum );
bCrossesAreCustomized = false;
break;
case xlAxisCrossesMaximum: // The axis crosses at the maximum value.
mxPropertySet->getPropertyValue(VBA_MAX) >>= fNum;
setCrossesAt(fNum);
bCrossesAreCustomized = false;
break;
default: //xlAxisCrossesCustom
bCrossesAreCustomized = true;
break;
}
mxPropertySet->setPropertyValue(AUTOORIGIN, uno::makeAny(false) );
}
catch (const uno::Exception&)
{
DebugHelper::basicexception(SbERR_METHOD_FAILED, OUString());
}
}
::sal_Int32 SAL_CALL
ScVbaAxis::getCrosses( ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
sal_Int32 nCrosses = xlAxisCrossesCustom;
try
{
bool bisAutoOrigin = false;
mxPropertySet->getPropertyValue(AUTOORIGIN) >>= bisAutoOrigin;
if (bisAutoOrigin)
nCrosses = xlAxisCrossesAutomatic;
else
{
if (bCrossesAreCustomized)
nCrosses = xlAxisCrossesCustom;
else
{
double forigin = 0.0;
mxPropertySet->getPropertyValue(ORIGIN) >>= forigin;
double fmin = 0.0;
mxPropertySet->getPropertyValue(VBA_MIN) >>= fmin;
if (forigin == fmin)
nCrosses = xlAxisCrossesMinimum;
else
nCrosses = xlAxisCrossesMaximum;
}
}
}
catch (uno::Exception& )
{
DebugHelper::basicexception(SbERR_METHOD_FAILED, OUString() );
}
return nCrosses;
}
void SAL_CALL
ScVbaAxis::setCrossesAt( double _fCrossesAt ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
try
{
setMaximumScaleIsAuto( false );
setMinimumScaleIsAuto( false );
mxPropertySet->setPropertyValue(ORIGIN, uno::makeAny(_fCrossesAt));
}
catch (const uno::Exception& e)
{
DebugHelper::basicexception(e);
}
}
double SAL_CALL
ScVbaAxis::getCrossesAt( ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
double fCrosses = 0.0;
try
{
mxPropertySet->getPropertyValue(ORIGIN) >>= fCrosses;
}
catch (uno::Exception& )
{
DebugHelper::basicexception(SbERR_METHOD_FAILED, OUString());
}
return fCrosses;
}
void SAL_CALL
ScVbaAxis::setType( ::sal_Int32 _nType ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
mnType = _nType;
}
::sal_Int32 SAL_CALL
ScVbaAxis::getType( ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
return mnType;
}
void SAL_CALL
ScVbaAxis::setHasTitle( sal_Bool _bHasTitle ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
try
{
ScVbaChart* pChart = getChartPtr();
sal_Int32 nType = getType();
switch(nType)
{
case xlCategory:
pChart->mxDiagramPropertySet->setPropertyValue("HasXAxisTitle", uno::makeAny(_bHasTitle));
break;
case xlSeriesAxis:
pChart->mxDiagramPropertySet->setPropertyValue("HasZAxisTitle", uno::makeAny(_bHasTitle));
break;
default: // xlValue:
pChart->mxDiagramPropertySet->setPropertyValue("HasYAxisTitle", uno::makeAny(_bHasTitle));
}
}
catch (const uno::Exception& e)
{
DebugHelper::basicexception(e);
}
}
sal_Bool SAL_CALL
ScVbaAxis::getHasTitle( ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
bool bHasTitle = false;
try
{
ScVbaChart* pChart = getChartPtr();
int nType = getType();
switch(nType)
{
case xlCategory:
pChart->mxDiagramPropertySet->getPropertyValue("HasXAxisTitle") >>= bHasTitle;
break;
case xlSeriesAxis:
pChart->mxDiagramPropertySet->getPropertyValue("HasZAxisTitle") >>= bHasTitle;
break;
default: // xlValue:
pChart->mxDiagramPropertySet->getPropertyValue("HasYAxisTitle") >>= bHasTitle;
}
}
catch (const uno::Exception& e)
{
DebugHelper::basicexception(e);
}
return bHasTitle;
}
void SAL_CALL
ScVbaAxis::setMinorUnit( double _fMinorUnit ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
try
{
if (isValueAxis())
mxPropertySet->setPropertyValue("StepHelp", uno::makeAny(_fMinorUnit));
}
catch (uno::Exception& )
{
DebugHelper::basicexception(SbERR_METHOD_FAILED, OUString());
}
}
double SAL_CALL
ScVbaAxis::getMinorUnit( ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
double fMinor = 1.0;
try
{
if (isValueAxis())
mxPropertySet->getPropertyValue("StepHelp") >>= fMinor;
}
catch (uno::Exception& )
{
DebugHelper::basicexception(SbERR_METHOD_FAILED, OUString());
}
return fMinor;
}
void SAL_CALL
ScVbaAxis::setMinorUnitIsAuto( sal_Bool _bMinorUnitIsAuto ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
try
{
if (isValueAxis())
mxPropertySet->setPropertyValue("AutoStepHelp", uno::makeAny(_bMinorUnitIsAuto));
}
catch (uno::Exception& )
{
DebugHelper::basicexception(SbERR_METHOD_FAILED, OUString() );
}
}
sal_Bool SAL_CALL
ScVbaAxis::getMinorUnitIsAuto( ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
bool bIsAuto = false;
try
{
if (isValueAxis())
{
mxPropertySet->getPropertyValue("AutoStepHelp") >>= bIsAuto;
}
}
catch (const uno::Exception&)
{
DebugHelper::basicexception(SbERR_METHOD_FAILED, OUString());
}
return bIsAuto;
}
void SAL_CALL
ScVbaAxis::setReversePlotOrder( sal_Bool /*ReversePlotOrder*/ ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
DebugHelper::basicexception(SbERR_NOT_IMPLEMENTED, OUString());
}
sal_Bool SAL_CALL
ScVbaAxis::getReversePlotOrder( ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
DebugHelper::basicexception(SbERR_NOT_IMPLEMENTED, OUString());
return false;
}
void SAL_CALL
ScVbaAxis::setMajorUnit( double _fMajorUnit ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
try
{
if (isValueAxis())
{
mxPropertySet->setPropertyValue("StepMain", uno::makeAny(_fMajorUnit));
}
}
catch (const uno::Exception&)
{
DebugHelper::basicexception(SbERR_METHOD_FAILED, OUString());
}
}
double SAL_CALL
ScVbaAxis::getMajorUnit( ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
double fMax = 1.0;
try
{
if (isValueAxis())
mxPropertySet->getPropertyValue("StepMain") >>= fMax;
}
catch (const uno::Exception&)
{
DebugHelper::basicexception(SbERR_METHOD_FAILED, OUString() );
}
return fMax;
}
void SAL_CALL
ScVbaAxis::setMajorUnitIsAuto( sal_Bool _bMajorUnitIsAuto ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
try
{
if (isValueAxis())
{
mxPropertySet->setPropertyValue("AutoStepMain", uno::makeAny( _bMajorUnitIsAuto ));
}
}
catch (const uno::Exception&)
{
DebugHelper::basicexception(SbERR_METHOD_FAILED, OUString());
}
}
sal_Bool SAL_CALL
ScVbaAxis::getMajorUnitIsAuto( ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
bool bIsAuto = false;
try
{
if (isValueAxis())
{
mxPropertySet->getPropertyValue("AutoStepMain") >>= bIsAuto;
}
}
catch (const uno::Exception&)
{
DebugHelper::basicexception(SbERR_METHOD_FAILED, OUString());
}
return bIsAuto;
}
void SAL_CALL
ScVbaAxis::setMaximumScale( double _fMaximumScale ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
try
{
if ( isValueAxis() )
{
mxPropertySet->setPropertyValue("Max", uno::makeAny(_fMaximumScale));
}
}
catch (const uno::Exception&)
{
DebugHelper::basicexception(SbERR_METHOD_FAILED, OUString());
}
}
double SAL_CALL
ScVbaAxis::getMaximumScale( ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
double fMax = 1.0;
try
{
if (isValueAxis())
{
mxPropertySet->getPropertyValue("Max") >>= fMax;
}
}
catch (const uno::Exception&)
{
DebugHelper::basicexception(SbERR_METHOD_FAILED, OUString());
}
return fMax;
}
void SAL_CALL
ScVbaAxis::setMaximumScaleIsAuto( sal_Bool _bMaximumScaleIsAuto ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
try
{
if ( isValueAxis() )
mxPropertySet->setPropertyValue("AutoMax", uno::makeAny( _bMaximumScaleIsAuto ));
}
catch (const uno::Exception&)
{
DebugHelper::basicexception(SbERR_METHOD_FAILED, OUString());
}
}
sal_Bool SAL_CALL
ScVbaAxis::getMaximumScaleIsAuto( ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
bool bIsAuto = false;
try
{
if (isValueAxis())
mxPropertySet->getPropertyValue("AutoMax") >>= bIsAuto;
}
catch (const uno::Exception&)
{
DebugHelper::basicexception( SbERR_METHOD_FAILED, OUString() );
}
return bIsAuto;
}
void SAL_CALL
ScVbaAxis::setMinimumScale( double _fMinimumScale ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
try
{
if (isValueAxis())
mxPropertySet->setPropertyValue("Min", uno::makeAny( _fMinimumScale ) );
}
catch ( uno::Exception& )
{
DebugHelper::basicexception(SbERR_METHOD_FAILED, OUString() );
}
}
double SAL_CALL
ScVbaAxis::getMinimumScale( ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
double fMin = 0.0;
try
{
if (isValueAxis())
mxPropertySet->getPropertyValue("Min") >>= fMin;
}
catch (const uno::Exception& e)
{
DebugHelper::basicexception(e);
}
return fMin;
}
void SAL_CALL
ScVbaAxis::setMinimumScaleIsAuto( sal_Bool _bMinimumScaleIsAuto ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
try
{
if (isValueAxis())
{
mxPropertySet->setPropertyValue("AutoMin", uno::makeAny(_bMinimumScaleIsAuto));
}
}
catch (const uno::Exception&)
{
DebugHelper::basicexception(SbERR_METHOD_FAILED, OUString());
}
}
sal_Bool SAL_CALL
ScVbaAxis::getMinimumScaleIsAuto( ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
bool bIsAuto = false;
try
{
if (isValueAxis())
{
mxPropertySet->getPropertyValue("AutoMin") >>= bIsAuto;
}
}
catch (const uno::Exception&)
{
DebugHelper::basicexception(SbERR_METHOD_FAILED, OUString());
}
return bIsAuto;
}
::sal_Int32 SAL_CALL
ScVbaAxis::getAxisGroup( ) throw (uno::RuntimeException, std::exception)
{
return mnGroup;
}
void SAL_CALL
ScVbaAxis::setScaleType( ::sal_Int32 _nScaleType ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
try
{
if (isValueAxis())
{
switch (_nScaleType)
{
case xlScaleLinear:
mxPropertySet->setPropertyValue("Logarithmic", uno::makeAny( sal_False ) );
break;
case xlScaleLogarithmic:
mxPropertySet->setPropertyValue("Logarithmic", uno::makeAny( sal_True ) );
break;
default:
// According to MS the paramenter is ignored and no Error is thrown
break;
}
}
}
catch (const uno::Exception&)
{
DebugHelper::basicexception(SbERR_METHOD_FAILED, OUString());
}
}
::sal_Int32 SAL_CALL
ScVbaAxis::getScaleType( ) throw (script::BasicErrorException, uno::RuntimeException, std::exception)
{
sal_Int32 nScaleType = xlScaleLinear;
try
{
if (isValueAxis())
{
bool bisLogarithmic = false;
mxPropertySet->getPropertyValue( OUString( OUString("Logarithmic")) ) >>= bisLogarithmic;
if (bisLogarithmic)
nScaleType = xlScaleLogarithmic;
else
nScaleType = xlScaleLinear;
}
}
catch (const uno::Exception&)
{
DebugHelper::basicexception(SbERR_METHOD_FAILED, OUString());
}
return nScaleType;
}
double SAL_CALL
ScVbaAxis::getHeight( ) throw (css::script::BasicErrorException, css::uno::RuntimeException, std::exception)
{
return oShapeHelper->getHeight();
}
void SAL_CALL ScVbaAxis::setHeight( double height ) throw (css::script::BasicErrorException, css::uno::RuntimeException, std::exception)
{
oShapeHelper->setHeight( height );
}
double SAL_CALL ScVbaAxis::getWidth( ) throw (css::script::BasicErrorException, css::uno::RuntimeException, std::exception)
{
return oShapeHelper->getWidth( );
}
void SAL_CALL ScVbaAxis::setWidth( double width ) throw (css::script::BasicErrorException, css::uno::RuntimeException, std::exception)
{
oShapeHelper->setWidth( width );
}
double SAL_CALL ScVbaAxis::getTop( ) throw (css::script::BasicErrorException, css::uno::RuntimeException, std::exception)
{
return oShapeHelper->getTop( );
}
void SAL_CALL ScVbaAxis::setTop( double top ) throw (css::script::BasicErrorException, css::uno::RuntimeException, std::exception)
{
oShapeHelper->setTop( top );
}
double SAL_CALL ScVbaAxis::getLeft( ) throw (css::script::BasicErrorException, css::uno::RuntimeException, std::exception)
{
return oShapeHelper->getLeft( );
}
void SAL_CALL ScVbaAxis::setLeft( double left ) throw (css::script::BasicErrorException, css::uno::RuntimeException, std::exception)
{
oShapeHelper->setLeft( left );
}
OUString
ScVbaAxis::getServiceImplName()
{
return OUString("ScVbaAxis");
}
uno::Sequence< OUString >
ScVbaAxis::getServiceNames()
{
static uno::Sequence< OUString > aServiceNames;
if ( aServiceNames.getLength() == 0 )
{
aServiceNames.realloc( 1 );
aServiceNames[ 0 ] = "ooo.vba.excel.Axis";
}
return aServiceNames;
}
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */