1*e6ed5fbcSAndrew Rist /**************************************************************
2cdf0e10cSrcweir *
3*e6ed5fbcSAndrew Rist * Licensed to the Apache Software Foundation (ASF) under one
4*e6ed5fbcSAndrew Rist * or more contributor license agreements. See the NOTICE file
5*e6ed5fbcSAndrew Rist * distributed with this work for additional information
6*e6ed5fbcSAndrew Rist * regarding copyright ownership. The ASF licenses this file
7*e6ed5fbcSAndrew Rist * to you under the Apache License, Version 2.0 (the
8*e6ed5fbcSAndrew Rist * "License"); you may not use this file except in compliance
9*e6ed5fbcSAndrew Rist * with the License. You may obtain a copy of the License at
10*e6ed5fbcSAndrew Rist *
11*e6ed5fbcSAndrew Rist * http://www.apache.org/licenses/LICENSE-2.0
12*e6ed5fbcSAndrew Rist *
13*e6ed5fbcSAndrew Rist * Unless required by applicable law or agreed to in writing,
14*e6ed5fbcSAndrew Rist * software distributed under the License is distributed on an
15*e6ed5fbcSAndrew Rist * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16*e6ed5fbcSAndrew Rist * KIND, either express or implied. See the License for the
17*e6ed5fbcSAndrew Rist * specific language governing permissions and limitations
18*e6ed5fbcSAndrew Rist * under the License.
19*e6ed5fbcSAndrew Rist *
20*e6ed5fbcSAndrew Rist *************************************************************/
21*e6ed5fbcSAndrew Rist
22*e6ed5fbcSAndrew Rist
23cdf0e10cSrcweir #include "vbaspinbutton.hxx"
24cdf0e10cSrcweir #include <vector>
25cdf0e10cSrcweir
26cdf0e10cSrcweir using namespace com::sun::star;
27cdf0e10cSrcweir using namespace ooo::vba;
28cdf0e10cSrcweir
29cdf0e10cSrcweir
30cdf0e10cSrcweir const static rtl::OUString ORIENTATION( RTL_CONSTASCII_USTRINGPARAM("Orientation") );
31cdf0e10cSrcweir const static rtl::OUString SPINVALUE( RTL_CONSTASCII_USTRINGPARAM("SpinValue") );
32cdf0e10cSrcweir const static rtl::OUString SPINMAX( RTL_CONSTASCII_USTRINGPARAM("SpinValueMax") );
33cdf0e10cSrcweir const static rtl::OUString SPINMIN( RTL_CONSTASCII_USTRINGPARAM("SpinValueMin") );
34cdf0e10cSrcweir
ScVbaSpinButton(const css::uno::Reference<ov::XHelperInterface> & xParent,const uno::Reference<uno::XComponentContext> & xContext,const uno::Reference<uno::XInterface> & xControl,const uno::Reference<frame::XModel> & xModel,AbstractGeometryAttributes * pGeomHelper)35cdf0e10cSrcweir ScVbaSpinButton::ScVbaSpinButton( const css::uno::Reference< ov::XHelperInterface >& xParent, const uno::Reference< uno::XComponentContext >& xContext, const uno::Reference< uno::XInterface >& xControl, const uno::Reference< frame::XModel >& xModel, AbstractGeometryAttributes* pGeomHelper ) : SpinButtonImpl_BASE( xParent, xContext, xControl, xModel, pGeomHelper )
36cdf0e10cSrcweir {
37cdf0e10cSrcweir }
38cdf0e10cSrcweir
39cdf0e10cSrcweir // Attributes
40cdf0e10cSrcweir uno::Any SAL_CALL
getValue()41cdf0e10cSrcweir ScVbaSpinButton::getValue() throw (css::uno::RuntimeException)
42cdf0e10cSrcweir {
43cdf0e10cSrcweir return m_xProps->getPropertyValue( SPINVALUE );
44cdf0e10cSrcweir }
45cdf0e10cSrcweir
46cdf0e10cSrcweir void SAL_CALL
setValue(const uno::Any & _value)47cdf0e10cSrcweir ScVbaSpinButton::setValue( const uno::Any& _value ) throw (::com::sun::star::uno::RuntimeException)
48cdf0e10cSrcweir {
49cdf0e10cSrcweir m_xProps->setPropertyValue( SPINVALUE, _value );
50cdf0e10cSrcweir }
51cdf0e10cSrcweir
52cdf0e10cSrcweir ::sal_Int32 SAL_CALL
getMax()53cdf0e10cSrcweir ScVbaSpinButton::getMax() throw (uno::RuntimeException)
54cdf0e10cSrcweir {
55cdf0e10cSrcweir sal_Int32 nMax = 0;
56cdf0e10cSrcweir m_xProps->getPropertyValue( SPINMAX ) >>= nMax;
57cdf0e10cSrcweir return nMax;
58cdf0e10cSrcweir }
59cdf0e10cSrcweir
60cdf0e10cSrcweir void SAL_CALL
setMax(sal_Int32 nVal)61cdf0e10cSrcweir ScVbaSpinButton::setMax( sal_Int32 nVal ) throw (uno::RuntimeException)
62cdf0e10cSrcweir {
63cdf0e10cSrcweir m_xProps->setPropertyValue( SPINMAX, uno::makeAny( nVal ) );
64cdf0e10cSrcweir }
65cdf0e10cSrcweir
66cdf0e10cSrcweir ::sal_Int32 SAL_CALL
getMin()67cdf0e10cSrcweir ScVbaSpinButton::getMin() throw (uno::RuntimeException)
68cdf0e10cSrcweir {
69cdf0e10cSrcweir sal_Int32 nVal = 0;
70cdf0e10cSrcweir m_xProps->getPropertyValue( SPINMIN ) >>= nVal;
71cdf0e10cSrcweir return nVal;
72cdf0e10cSrcweir }
73cdf0e10cSrcweir
74cdf0e10cSrcweir void SAL_CALL
setMin(sal_Int32 nVal)75cdf0e10cSrcweir ScVbaSpinButton::setMin( sal_Int32 nVal ) throw (uno::RuntimeException)
76cdf0e10cSrcweir {
77cdf0e10cSrcweir m_xProps->setPropertyValue( SPINMIN, uno::makeAny( nVal ) );
78cdf0e10cSrcweir }
79cdf0e10cSrcweir
80cdf0e10cSrcweir rtl::OUString&
getServiceImplName()81cdf0e10cSrcweir ScVbaSpinButton::getServiceImplName()
82cdf0e10cSrcweir {
83cdf0e10cSrcweir static rtl::OUString sImplName( RTL_CONSTASCII_USTRINGPARAM("ScVbaSpinButton") );
84cdf0e10cSrcweir return sImplName;
85cdf0e10cSrcweir }
86cdf0e10cSrcweir
87cdf0e10cSrcweir uno::Sequence< rtl::OUString >
getServiceNames()88cdf0e10cSrcweir ScVbaSpinButton::getServiceNames()
89cdf0e10cSrcweir {
90cdf0e10cSrcweir static uno::Sequence< rtl::OUString > aServiceNames;
91cdf0e10cSrcweir if ( aServiceNames.getLength() == 0 )
92cdf0e10cSrcweir {
93cdf0e10cSrcweir aServiceNames.realloc( 1 );
94cdf0e10cSrcweir aServiceNames[ 0 ] = rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("ooo.vba.msforms.Frame" ) );
95cdf0e10cSrcweir }
96cdf0e10cSrcweir return aServiceNames;
97cdf0e10cSrcweir }
98