90e0834d56
2009-01-21 11:00:00 +0100 npower r266639 : replace ScAddress::CONV_XL_R1C1 with formula::FormulaGrammar::CONV_XL_R1C1 2009-01-21 10:58:33 +0100 npower r266638 : fixup access for changes to compiler.[ch]xx 2009-01-21 10:57:46 +0100 npower r266637 : replace the static with non-static member ( to align with the latest m39 ) changes 2009-01-20 11:53:52 +0100 npower r266562 : CWS-TOOLING: rebase CWS npower11 to trunk@266428 (milestone: DEV300:m39) 2009-01-09 23:31:00 +0100 cloph r266122 : fix typo (missing "="), initialize variables to avoid WaE breakage 2009-01-09 11:57:20 +0100 npower r266071 : wae Mac OSX gcc-4.0.1 (PPC) 2009-01-08 11:09:49 +0100 npower r265986 : wae - Mac OSX gcc-4.0.1 (PPC) 2009-01-07 10:33:20 +0100 npower r265952 : wae Mac OSX gcc-4.0.1 2008-12-18 19:14:10 +0100 npower r265712 : wae for wntmsci12 target 2008-12-17 16:14:54 +0100 npower r265640 : add Outline property for Font, also remove growing list of friend classes for ScCellRangeObj and replace by a single class. 2008-12-17 16:11:02 +0100 npower r265639 : fix path variable for 3.1, also tweak the unix logs 2008-12-11 02:39:58 +0100 hanbo r265233 : fix the vba/vba namespace of constants 2008-11-25 17:05:39 +0100 npower r264317 : namespace changes 2008-11-25 14:12:37 +0100 npower r264308 : revert changes made by mistake when migrating cws 2008-11-25 13:30:59 +0100 npower r264296 : i#93944# namespace changes 2008-11-25 13:29:25 +0100 npower r264293 : i#93944# namespace changes 2008-11-25 13:27:08 +0100 npower r264289 : i#93944# namespace changes 2008-11-24 18:24:17 +0100 npower r264263 : svn migration 2008-11-24 18:22:47 +0100 npower r264262 : not needed anymore 2008-11-24 18:21:23 +0100 npower r264261 : svn migration 2008-11-24 18:18:31 +0100 npower r264260 : svn migration
674 lines
20 KiB
C++
674 lines
20 KiB
C++
/*************************************************************************
|
|
*
|
|
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
|
|
*
|
|
* Copyright 2008 by Sun Microsystems, Inc.
|
|
*
|
|
* OpenOffice.org - a multi-platform office productivity suite
|
|
*
|
|
* $RCSfile: vbaaxis.cxx,v $
|
|
* $Revision: 1.3 $
|
|
*
|
|
* This file is part of OpenOffice.org.
|
|
*
|
|
* OpenOffice.org is free software: you can redistribute it and/or modify
|
|
* it under the terms of the GNU Lesser General Public License version 3
|
|
* only, as published by the Free Software Foundation.
|
|
*
|
|
* OpenOffice.org is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU Lesser General Public License version 3 for more details
|
|
* (a copy is included in the LICENSE file that accompanied this code).
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public License
|
|
* version 3 along with OpenOffice.org. If not, see
|
|
* <http://www.openoffice.org/license.html>
|
|
* for a copy of the LGPLv3 License.
|
|
*
|
|
************************************************************************/
|
|
|
|
#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 rtl::OUString ORIGIN( RTL_CONSTASCII_USTRINGPARAM("Origin") );
|
|
const rtl::OUString AUTOORIGIN( RTL_CONSTASCII_USTRINGPARAM("AutoOrigin") );
|
|
const rtl::OUString VBA_MIN( RTL_CONSTASCII_USTRINGPARAM("Max") );
|
|
const rtl::OUString VBA_MAX( RTL_CONSTASCII_USTRINGPARAM("Min") );
|
|
ScVbaChart*
|
|
ScVbaAxis::getChartPtr() throw( uno::RuntimeException )
|
|
{
|
|
ScVbaChart* pChart = static_cast< ScVbaChart* >( moChartParent.get() );
|
|
if ( !pChart )
|
|
throw uno::RuntimeException( rtl::OUString::createFromAscii("Can't access parent chart impl"), uno::Reference< uno::XInterface >() );
|
|
return pChart;
|
|
}
|
|
|
|
sal_Bool
|
|
ScVbaAxis::isValueAxis() throw( script::BasicErrorException )
|
|
{
|
|
if ( getType() == xlCategory )
|
|
{
|
|
DebugHelper::exception(SbERR_METHOD_FAILED, rtl::OUString());
|
|
}
|
|
return sal_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( sal_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)
|
|
{
|
|
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)
|
|
{
|
|
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 (uno::Exception& e)
|
|
{
|
|
DebugHelper::exception(e);
|
|
}
|
|
return xAxisTitle;
|
|
|
|
}
|
|
|
|
void SAL_CALL
|
|
ScVbaAxis::setDisplayUnit( ::sal_Int32 /*DisplayUnit*/ ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
DebugHelper::exception(SbERR_NOT_IMPLEMENTED, rtl::OUString());
|
|
}
|
|
|
|
::sal_Int32 SAL_CALL
|
|
ScVbaAxis::getDisplayUnit( ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
DebugHelper::exception(SbERR_NOT_IMPLEMENTED, rtl::OUString());
|
|
return -1;
|
|
}
|
|
|
|
void SAL_CALL
|
|
ScVbaAxis::setCrosses( ::sal_Int32 _nCrosses ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
try
|
|
{
|
|
double fNum = 0.0;
|
|
switch (_nCrosses)
|
|
{
|
|
case xlAxisCrossesAutomatic: //Microsoft Excel sets the axis crossing point.
|
|
mxPropertySet->setPropertyValue(AUTOORIGIN, uno::makeAny( sal_True ) );
|
|
bCrossesAreCustomized = sal_False;
|
|
return;
|
|
case xlAxisCrossesMinimum: // The axis crosses at the minimum value.
|
|
mxPropertySet->getPropertyValue(VBA_MIN) >>= fNum;
|
|
setCrossesAt( fNum );
|
|
bCrossesAreCustomized = sal_False;
|
|
break;
|
|
case xlAxisCrossesMaximum: // The axis crosses at the maximum value.
|
|
mxPropertySet->getPropertyValue(VBA_MAX) >>= fNum;
|
|
setCrossesAt(fNum);
|
|
bCrossesAreCustomized = sal_False;
|
|
break;
|
|
default: //xlAxisCrossesCustom
|
|
bCrossesAreCustomized = sal_True;
|
|
break;
|
|
}
|
|
mxPropertySet->setPropertyValue(AUTOORIGIN, uno::makeAny(sal_False) );
|
|
}
|
|
catch (uno::Exception& )
|
|
{
|
|
DebugHelper::exception(SbERR_METHOD_FAILED, rtl::OUString());
|
|
}
|
|
}
|
|
::sal_Int32 SAL_CALL
|
|
ScVbaAxis::getCrosses( ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
sal_Int32 nCrosses = xlAxisCrossesCustom;
|
|
try
|
|
{
|
|
sal_Bool bisAutoOrigin = sal_False;
|
|
mxPropertySet->getPropertyValue(AUTOORIGIN) >>= bisAutoOrigin;
|
|
if (bisAutoOrigin)
|
|
nCrosses = xlAxisCrossesAutomatic;
|
|
else
|
|
{
|
|
if (bCrossesAreCustomized)
|
|
nCrosses = xlAxisCrossesCustom;
|
|
else
|
|
{
|
|
double forigin = 0.0;
|
|
mxPropertySet->getPropertyValue(ORIGIN) >>= forigin;
|
|
//obsolete double fmax = AnyConverter.toDouble(mxPropertySet.getPropertyValue("Max"));
|
|
double fmin = 0.0;
|
|
mxPropertySet->getPropertyValue(VBA_MIN) >>= fmin;
|
|
if (forigin == fmin)
|
|
nCrosses = xlAxisCrossesMinimum;
|
|
else
|
|
nCrosses = xlAxisCrossesMaximum;
|
|
}
|
|
}
|
|
}
|
|
catch (uno::Exception& )
|
|
{
|
|
DebugHelper::exception(SbERR_METHOD_FAILED, rtl::OUString() );
|
|
}
|
|
return nCrosses;
|
|
}
|
|
|
|
void SAL_CALL
|
|
ScVbaAxis::setCrossesAt( double _fCrossesAt ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
try
|
|
{
|
|
// if (getCrosses() == xlAxisCrossesCustom){
|
|
setMaximumScaleIsAuto( sal_False );
|
|
setMinimumScaleIsAuto( sal_False );
|
|
mxPropertySet->setPropertyValue(ORIGIN, uno::makeAny(_fCrossesAt));
|
|
// }
|
|
}
|
|
catch (uno::Exception& e)
|
|
{
|
|
DebugHelper::exception(e);
|
|
}
|
|
}
|
|
|
|
double SAL_CALL
|
|
ScVbaAxis::getCrossesAt( ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
double fCrosses = 0.0;
|
|
try
|
|
{
|
|
mxPropertySet->getPropertyValue(ORIGIN) >>= fCrosses;
|
|
}
|
|
catch (uno::Exception& )
|
|
{
|
|
DebugHelper::exception(SbERR_METHOD_FAILED, rtl::OUString());
|
|
}
|
|
return fCrosses;
|
|
}
|
|
|
|
void SAL_CALL
|
|
ScVbaAxis::setType( ::sal_Int32 _nType ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
mnType = _nType;
|
|
}
|
|
|
|
::sal_Int32 SAL_CALL
|
|
ScVbaAxis::getType( ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
return mnType;
|
|
}
|
|
|
|
void SAL_CALL
|
|
ScVbaAxis::setHasTitle( ::sal_Bool _bHasTitle ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
try
|
|
{
|
|
ScVbaChart* pChart = getChartPtr();
|
|
sal_Int32 nType = getType();
|
|
switch(nType)
|
|
{
|
|
case xlCategory:
|
|
pChart->mxDiagramPropertySet->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("HasXAxisTitle")), uno::makeAny(_bHasTitle));
|
|
break;
|
|
case xlSeriesAxis:
|
|
pChart->mxDiagramPropertySet->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("HasZAxisTitle")), uno::makeAny(_bHasTitle));
|
|
break;
|
|
default: // xlValue:
|
|
pChart->mxDiagramPropertySet->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("HasYAxisTitle")), uno::makeAny(_bHasTitle));
|
|
}
|
|
|
|
}
|
|
catch (uno::Exception& e)
|
|
{
|
|
DebugHelper::exception(e);
|
|
}
|
|
}
|
|
|
|
::sal_Bool SAL_CALL
|
|
ScVbaAxis::getHasTitle( ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
sal_Bool bHasTitle = sal_False;
|
|
try
|
|
{
|
|
ScVbaChart* pChart = getChartPtr();
|
|
int nType = getType();
|
|
switch(nType)
|
|
{
|
|
case xlCategory:
|
|
pChart->mxDiagramPropertySet->getPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("HasXAxisTitle")) ) >>= bHasTitle;
|
|
break;
|
|
case xlSeriesAxis:
|
|
pChart->mxDiagramPropertySet->getPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("HasZAxisTitle")) ) >>= bHasTitle;
|
|
break;
|
|
default: // xlValue:
|
|
pChart->mxDiagramPropertySet->getPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("HasYAxisTitle")) ) >>= bHasTitle;
|
|
}
|
|
}
|
|
catch (uno::Exception& e)
|
|
{
|
|
DebugHelper::exception(e);
|
|
}
|
|
return bHasTitle;
|
|
}
|
|
|
|
void SAL_CALL
|
|
ScVbaAxis::setMinorUnit( double _fMinorUnit ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
try
|
|
{
|
|
if (isValueAxis())
|
|
mxPropertySet->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("StepHelp") ), uno::makeAny(_fMinorUnit));
|
|
}
|
|
catch (uno::Exception& )
|
|
{
|
|
DebugHelper::exception(SbERR_METHOD_FAILED, rtl::OUString());
|
|
}
|
|
}
|
|
|
|
double SAL_CALL
|
|
ScVbaAxis::getMinorUnit( ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
double fMinor = 1.0;
|
|
try
|
|
{
|
|
if (isValueAxis())
|
|
mxPropertySet->getPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("StepHelp"))) >>= fMinor;
|
|
}
|
|
catch (uno::Exception& )
|
|
{
|
|
DebugHelper::exception(SbERR_METHOD_FAILED, rtl::OUString());
|
|
}
|
|
return fMinor;
|
|
}
|
|
|
|
void SAL_CALL
|
|
ScVbaAxis::setMinorUnitIsAuto( ::sal_Bool _bMinorUnitIsAuto ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
try
|
|
{
|
|
if (isValueAxis())
|
|
mxPropertySet->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "AutoStepHelp" ) ), uno::makeAny(_bMinorUnitIsAuto));
|
|
}
|
|
catch (uno::Exception& )
|
|
{
|
|
DebugHelper::exception(SbERR_METHOD_FAILED, rtl::OUString() );
|
|
}
|
|
}
|
|
|
|
::sal_Bool SAL_CALL
|
|
ScVbaAxis::getMinorUnitIsAuto( ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
sal_Bool bIsAuto = sal_False;
|
|
try
|
|
{
|
|
if (isValueAxis())
|
|
{
|
|
mxPropertySet->getPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "AutoStepHelp")) ) >>= bIsAuto;
|
|
}
|
|
}
|
|
catch (uno::Exception& )
|
|
{
|
|
DebugHelper::exception(SbERR_METHOD_FAILED, rtl::OUString());
|
|
}
|
|
return bIsAuto;
|
|
}
|
|
|
|
void SAL_CALL
|
|
ScVbaAxis::setReversePlotOrder( ::sal_Bool /*ReversePlotOrder*/ ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
DebugHelper::exception(SbERR_NOT_IMPLEMENTED, rtl::OUString());
|
|
}
|
|
|
|
::sal_Bool SAL_CALL
|
|
ScVbaAxis::getReversePlotOrder( ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
DebugHelper::exception(SbERR_NOT_IMPLEMENTED, rtl::OUString());
|
|
return sal_False;
|
|
}
|
|
|
|
void SAL_CALL
|
|
ScVbaAxis::setMajorUnit( double _fMajorUnit ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
try
|
|
{
|
|
if (isValueAxis())
|
|
{
|
|
mxPropertySet->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("StepMain")), uno::makeAny(_fMajorUnit));
|
|
}
|
|
}
|
|
catch (uno::Exception& )
|
|
{
|
|
DebugHelper::exception(SbERR_METHOD_FAILED, rtl::OUString());
|
|
}
|
|
}
|
|
|
|
double SAL_CALL
|
|
ScVbaAxis::getMajorUnit( ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
double fMax = 1.0;
|
|
try
|
|
{
|
|
if (isValueAxis())
|
|
mxPropertySet->getPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("StepMain"))) >>= fMax;
|
|
}
|
|
catch (uno::Exception& )
|
|
{
|
|
DebugHelper::exception(SbERR_METHOD_FAILED, rtl::OUString() );
|
|
}
|
|
return fMax;
|
|
}
|
|
|
|
void SAL_CALL
|
|
ScVbaAxis::setMajorUnitIsAuto( ::sal_Bool _bMajorUnitIsAuto ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
try
|
|
{
|
|
if (isValueAxis())
|
|
{
|
|
mxPropertySet->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "AutoStepMain" ) ), uno::makeAny( _bMajorUnitIsAuto ));
|
|
}
|
|
}
|
|
catch (uno::Exception& )
|
|
{
|
|
DebugHelper::exception(SbERR_METHOD_FAILED, rtl::OUString());
|
|
}
|
|
}
|
|
|
|
::sal_Bool SAL_CALL
|
|
ScVbaAxis::getMajorUnitIsAuto( ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
sal_Bool bIsAuto = sal_False;
|
|
try
|
|
{
|
|
if (isValueAxis())
|
|
{
|
|
mxPropertySet->getPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "AutoStepMain"))) >>= bIsAuto;
|
|
}
|
|
}
|
|
catch (uno::Exception& )
|
|
{
|
|
DebugHelper::exception(SbERR_METHOD_FAILED, rtl::OUString());
|
|
}
|
|
return bIsAuto;
|
|
}
|
|
|
|
void SAL_CALL
|
|
ScVbaAxis::setMaximumScale( double _fMaximumScale ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
try
|
|
{
|
|
if ( isValueAxis() )
|
|
{
|
|
mxPropertySet->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "Max" ) ), uno::makeAny(_fMaximumScale));
|
|
}
|
|
}
|
|
catch ( uno::Exception& )
|
|
{
|
|
DebugHelper::exception(SbERR_METHOD_FAILED, rtl::OUString());
|
|
}
|
|
}
|
|
|
|
double SAL_CALL
|
|
ScVbaAxis::getMaximumScale( ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
double fMax = 1.0;
|
|
try
|
|
{
|
|
if (isValueAxis())
|
|
{
|
|
mxPropertySet->getPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "Max" ))) >>= fMax;
|
|
}
|
|
}
|
|
catch (uno::Exception& )
|
|
{
|
|
DebugHelper::exception(SbERR_METHOD_FAILED, rtl::OUString());
|
|
}
|
|
return fMax;
|
|
|
|
}
|
|
|
|
void SAL_CALL
|
|
ScVbaAxis::setMaximumScaleIsAuto( ::sal_Bool _bMaximumScaleIsAuto ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
try
|
|
{
|
|
if ( isValueAxis() )
|
|
mxPropertySet->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "AutoMax" ) ), uno::makeAny( _bMaximumScaleIsAuto ));
|
|
|
|
}
|
|
catch ( uno::Exception& )
|
|
{
|
|
DebugHelper::exception(SbERR_METHOD_FAILED, rtl::OUString());
|
|
}
|
|
}
|
|
|
|
|
|
::sal_Bool SAL_CALL
|
|
ScVbaAxis::getMaximumScaleIsAuto( ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
sal_Bool bIsAuto = sal_False;
|
|
try
|
|
{
|
|
if (isValueAxis())
|
|
mxPropertySet->getPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "AutoMax" )) ) >>= bIsAuto;
|
|
}
|
|
catch ( uno::Exception& )
|
|
{
|
|
DebugHelper::exception( SbERR_METHOD_FAILED, rtl::OUString() );
|
|
}
|
|
return bIsAuto;
|
|
}
|
|
|
|
void SAL_CALL
|
|
ScVbaAxis::setMinimumScale( double _fMinimumScale ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
try
|
|
{
|
|
if (isValueAxis())
|
|
mxPropertySet->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("Min") ), uno::makeAny( _fMinimumScale ) );
|
|
}
|
|
catch ( uno::Exception& )
|
|
{
|
|
DebugHelper::exception(SbERR_METHOD_FAILED, rtl::OUString() );
|
|
}
|
|
}
|
|
|
|
double SAL_CALL
|
|
ScVbaAxis::getMinimumScale( ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
double fMin = 0.0;
|
|
try
|
|
{
|
|
if (isValueAxis())
|
|
mxPropertySet->getPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "Min") )) >>= fMin;
|
|
}
|
|
catch (uno::Exception& e)
|
|
{
|
|
DebugHelper::exception(e);
|
|
}
|
|
return fMin;
|
|
}
|
|
|
|
void SAL_CALL
|
|
ScVbaAxis::setMinimumScaleIsAuto( ::sal_Bool _bMinimumScaleIsAuto ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
try
|
|
{
|
|
if (isValueAxis())
|
|
{
|
|
mxPropertySet->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("AutoMin") ), uno::makeAny(_bMinimumScaleIsAuto));
|
|
}
|
|
}
|
|
catch (uno::Exception& )
|
|
{
|
|
DebugHelper::exception(SbERR_METHOD_FAILED, rtl::OUString());
|
|
}
|
|
}
|
|
|
|
::sal_Bool SAL_CALL
|
|
ScVbaAxis::getMinimumScaleIsAuto( ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
sal_Bool bIsAuto = sal_False;
|
|
try
|
|
{
|
|
if (isValueAxis())
|
|
{
|
|
mxPropertySet->getPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("AutoMin")) ) >>= bIsAuto;
|
|
}
|
|
}
|
|
catch (uno::Exception& )
|
|
{
|
|
DebugHelper::exception(SbERR_METHOD_FAILED, rtl::OUString());
|
|
}
|
|
return bIsAuto;
|
|
}
|
|
|
|
::sal_Int32 SAL_CALL
|
|
ScVbaAxis::getAxisGroup( ) throw (uno::RuntimeException)
|
|
{
|
|
return mnGroup;
|
|
}
|
|
|
|
void SAL_CALL
|
|
ScVbaAxis::setScaleType( ::sal_Int32 _nScaleType ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
try
|
|
{
|
|
if (isValueAxis())
|
|
{
|
|
switch (_nScaleType)
|
|
{
|
|
case xlScaleLinear:
|
|
mxPropertySet->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "Logarithmic" ) ), uno::makeAny( sal_False ) );
|
|
break;
|
|
case xlScaleLogarithmic:
|
|
mxPropertySet->setPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "Logarithmic" ) ), uno::makeAny( sal_True ) );
|
|
break;
|
|
default:
|
|
// According to MS the paramenter is ignored and no Error is thrown
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
catch (uno::Exception& )
|
|
{
|
|
DebugHelper::exception(SbERR_METHOD_FAILED, rtl::OUString() );
|
|
}
|
|
}
|
|
|
|
::sal_Int32 SAL_CALL
|
|
ScVbaAxis::getScaleType( ) throw (script::BasicErrorException, uno::RuntimeException)
|
|
{
|
|
sal_Int32 nScaleType = xlScaleLinear;
|
|
try
|
|
{
|
|
if (isValueAxis())
|
|
{
|
|
sal_Bool bisLogarithmic = sal_False;
|
|
mxPropertySet->getPropertyValue( rtl::OUString( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("Logarithmic"))) ) >>= bisLogarithmic;
|
|
if (bisLogarithmic)
|
|
nScaleType = xlScaleLogarithmic;
|
|
else
|
|
nScaleType = xlScaleLinear;
|
|
}
|
|
}
|
|
catch (uno::Exception& )
|
|
{
|
|
DebugHelper::exception(SbERR_METHOD_FAILED, rtl::OUString());
|
|
}
|
|
return nScaleType;
|
|
}
|
|
|
|
double SAL_CALL
|
|
ScVbaAxis::getHeight( ) throw (css::script::BasicErrorException, css::uno::RuntimeException)
|
|
{
|
|
return oShapeHelper->getHeight();
|
|
}
|
|
|
|
void SAL_CALL ScVbaAxis::setHeight( double height ) throw (css::script::BasicErrorException, css::uno::RuntimeException)
|
|
{
|
|
oShapeHelper->setHeight( height );
|
|
}
|
|
double SAL_CALL ScVbaAxis::getWidth( ) throw (css::script::BasicErrorException, css::uno::RuntimeException)
|
|
{
|
|
return oShapeHelper->getWidth( );
|
|
}
|
|
void SAL_CALL ScVbaAxis::setWidth( double width ) throw (css::script::BasicErrorException, css::uno::RuntimeException)
|
|
{
|
|
oShapeHelper->setWidth( width );
|
|
}
|
|
double SAL_CALL ScVbaAxis::getTop( ) throw (css::script::BasicErrorException, css::uno::RuntimeException)
|
|
{
|
|
return oShapeHelper->getTop( );
|
|
}
|
|
void SAL_CALL ScVbaAxis::setTop( double top ) throw (css::script::BasicErrorException, css::uno::RuntimeException)
|
|
{
|
|
oShapeHelper->setTop( top );
|
|
}
|
|
double SAL_CALL ScVbaAxis::getLeft( ) throw (css::script::BasicErrorException, css::uno::RuntimeException)
|
|
{
|
|
return oShapeHelper->getLeft( );
|
|
}
|
|
void SAL_CALL ScVbaAxis::setLeft( double left ) throw (css::script::BasicErrorException, css::uno::RuntimeException)
|
|
{
|
|
oShapeHelper->setLeft( left );
|
|
}
|
|
|
|
rtl::OUString&
|
|
ScVbaAxis::getServiceImplName()
|
|
{
|
|
static rtl::OUString sImplName( RTL_CONSTASCII_USTRINGPARAM("ScVbaAxis") );
|
|
return sImplName;
|
|
}
|
|
|
|
uno::Sequence< rtl::OUString >
|
|
ScVbaAxis::getServiceNames()
|
|
{
|
|
static uno::Sequence< rtl::OUString > aServiceNames;
|
|
if ( aServiceNames.getLength() == 0 )
|
|
{
|
|
aServiceNames.realloc( 1 );
|
|
aServiceNames[ 0 ] = rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("ooo.vba.excel.Axis" ) );
|
|
}
|
|
return aServiceNames;
|
|
}
|
|
|