INTEGRATION: CWS frmcontrols01 (1.1.2); FILE ADDED

2003/10/30 14:25:14 fs 1.1.2.3: #i21680# Repeat property handled by base class
2003/10/29 07:08:00 fs 1.1.2.2: #i21605# more implementations for the spin button control
2003/10/27 11:26:16 fs 1.1.2.1: #i21605# initial checkin - spin button peer

1 files changed, 399 insertions, 0 deletions

diff --git a/toolkit/source/awt/vclxspinbutton.cxx b/toolkit/source/awt/vclxspinbutton.cxx
new file mode 100644
index 000000000000..1f22297502cc
--- /dev/null
+++ b/toolkit/source/awt/vclxspinbutton.cxx
@@ -0,0 +1,399 @@
+/*************************************************************************
+ *
+ *  $RCSfile: vclxspinbutton.cxx,v $
+ *
+ *  $Revision: 1.2 $
+ *
+ *  last change: $Author: kz $ $Date: 2003-12-11 11:56:28 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library 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 for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (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.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+#ifndef TOOLKIT_AWT_VCLXSPINBUTTON_HXX
+#include "toolkit/awt/vclxspinbutton.hxx"
+#endif
+#ifndef _TOOLKIT_HELPER_PROPERTY_HXX_
+#include "toolkit/helper/property.hxx"
+#endif
+#ifndef _COM_SUN_STAR_AWT_SCROLLBARORIENTATION_HPP_
+#include <com/sun/star/awt/ScrollBarOrientation.hpp>
+#endif
+
+
+#ifndef _TOOLS_DEBUG_HXX
+#include <tools/debug.hxx>
+#endif
+#ifndef _SV_SPIN_HXX
+#include <vcl/spin.hxx>
+#endif
+
+namespace toolkit
+{
+    void                        setButtonLikeFaceColor( Window* _pWindow, const ::com::sun::star::uno::Any& _rColorValue );
+    ::com::sun::star::uno::Any  getButtonLikeFaceColor( const Window* _pWindow );
+}
+
+//........................................................................
+namespace toolkit
+{
+//........................................................................
+
+    using namespace ::com::sun::star::uno;
+    using namespace ::com::sun::star::awt;
+    using namespace ::com::sun::star::lang;
+    using namespace ::com::sun::star::beans;
+
+    //--------------------------------------------------------------------
+    namespace
+    {
+        void lcl_modifyStyle( Window* _pWindow, WinBits _nStyleBits, sal_Bool _bShouldBePresent )
+        {
+            WinBits nStyle = _pWindow->GetStyle();
+            if ( _bShouldBePresent )
+                nStyle |= _nStyleBits;
+            else
+                nStyle &= ~_nStyleBits;
+            _pWindow->SetStyle( nStyle );
+        }
+    }
+
+    //====================================================================
+    //= VCLXSpinButton
+    //====================================================================
+    DBG_NAME( VCLXSpinButton )
+    //--------------------------------------------------------------------
+    VCLXSpinButton::VCLXSpinButton()
+        :maAdjustmentListeners( *this )
+    {
+        DBG_CTOR( VCLXSpinButton, NULL );
+    }
+
+    //--------------------------------------------------------------------
+    VCLXSpinButton::~VCLXSpinButton()
+    {
+        DBG_DTOR( VCLXSpinButton, NULL );
+    }
+
+    //--------------------------------------------------------------------
+    IMPLEMENT_FORWARD_XINTERFACE2( VCLXSpinButton, VCLXWindow, VCLXSpinButton_Base )
+
+    //--------------------------------------------------------------------
+    IMPLEMENT_FORWARD_XTYPEPROVIDER2( VCLXSpinButton, VCLXWindow, VCLXSpinButton_Base )
+
+    //--------------------------------------------------------------------
+    void SAL_CALL VCLXSpinButton::dispose( ) throw(RuntimeException)
+    {
+        {
+            ::vos::OGuard aGuard( GetMutex() );
+
+            EventObject aDisposeEvent;
+            aDisposeEvent.Source = *this;
+            maAdjustmentListeners.disposeAndClear( aDisposeEvent );
+        }
+
+        VCLXWindow::dispose();
+    }
+
+    //--------------------------------------------------------------------
+    void SAL_CALL VCLXSpinButton::addAdjustmentListener( const Reference< XAdjustmentListener >& listener ) throw (RuntimeException)
+    {
+        if ( listener.is() )
+            maAdjustmentListeners.addInterface( listener );
+    }
+
+    //--------------------------------------------------------------------
+    void SAL_CALL VCLXSpinButton::removeAdjustmentListener( const Reference< XAdjustmentListener >& listener ) throw (RuntimeException)
+    {
+        if ( listener.is() )
+            maAdjustmentListeners.removeInterface( listener );
+    }
+
+    namespace
+    {
+        typedef void (SpinButton::*SetSpinButtonValue) (long);
+        typedef long (SpinButton::*GetSpinButtonValue) (void) const;
+
+        //................................................................
+        void lcl_setSpinButtonValue( ::vos::IMutex& _rMutex, Window* _pWindow, SetSpinButtonValue _pSetter, sal_Int32 _nValue )
+        {
+            ::vos::OGuard aGuard( _rMutex );
+
+            SpinButton* pSpinButton = static_cast< SpinButton* >( _pWindow );
+            if ( pSpinButton )
+                (pSpinButton->*_pSetter)( _nValue );
+        }
+
+        //................................................................
+        sal_Int32 lcl_getSpinButtonValue( ::vos::IMutex& _rMutex, const Window* _pWindow, GetSpinButtonValue _pGetter )
+        {
+            ::vos::OGuard aGuard( _rMutex );
+
+            sal_Int32 nValue = 0;
+
+            const SpinButton* pSpinButton = static_cast< const SpinButton* >( _pWindow );
+            if ( pSpinButton )
+                nValue = (pSpinButton->*_pGetter)( );
+            return nValue;
+        }
+    }
+
+    //--------------------------------------------------------------------
+    void SAL_CALL VCLXSpinButton::setValue( sal_Int32 n ) throw (RuntimeException)
+    {
+        lcl_setSpinButtonValue( GetMutex(), GetWindow(), SpinButton::SetValue, n );
+    }
+
+    //--------------------------------------------------------------------
+    void SAL_CALL VCLXSpinButton::setValues( sal_Int32 minValue, sal_Int32 maxValue, sal_Int32 currentValue ) throw (RuntimeException)
+    {
+        ::vos::OGuard aGuard( GetMutex() );
+
+        setMinimum( minValue );
+        setMaximum( maxValue );
+        setValue( currentValue );
+    }
+
+    //--------------------------------------------------------------------
+    sal_Int32 SAL_CALL VCLXSpinButton::getValue(  ) throw (RuntimeException)
+    {
+        return lcl_getSpinButtonValue( GetMutex(), GetWindow(), SpinButton::GetValue );
+    }
+
+    //--------------------------------------------------------------------
+    void SAL_CALL VCLXSpinButton::setMinimum( sal_Int32 minValue ) throw (RuntimeException)
+    {
+        lcl_setSpinButtonValue( GetMutex(), GetWindow(), SpinButton::SetRangeMin, minValue );
+    }
+
+    //--------------------------------------------------------------------
+    void SAL_CALL VCLXSpinButton::setMaximum( sal_Int32 maxValue ) throw (RuntimeException)
+    {
+        lcl_setSpinButtonValue( GetMutex(), GetWindow(), SpinButton::SetRangeMax, maxValue );
+    }
+
+    //--------------------------------------------------------------------
+    sal_Int32 SAL_CALL VCLXSpinButton::getMinimum(  ) throw (RuntimeException)
+    {
+        return lcl_getSpinButtonValue( GetMutex(), GetWindow(), SpinButton::GetRangeMin );
+    }
+
+    //--------------------------------------------------------------------
+    sal_Int32 SAL_CALL VCLXSpinButton::getMaximum(  ) throw (RuntimeException)
+    {
+        return lcl_getSpinButtonValue( GetMutex(), GetWindow(), SpinButton::GetRangeMax );
+    }
+
+    //--------------------------------------------------------------------
+    void SAL_CALL VCLXSpinButton::setSpinIncrement( sal_Int32 spinIncrement ) throw (RuntimeException)
+    {
+        lcl_setSpinButtonValue( GetMutex(), GetWindow(), SpinButton::SetValueStep, spinIncrement );
+    }
+
+    //--------------------------------------------------------------------
+    sal_Int32 SAL_CALL VCLXSpinButton::getSpinIncrement(  ) throw (RuntimeException)
+    {
+        return lcl_getSpinButtonValue( GetMutex(), GetWindow(), SpinButton::GetValueStep );
+    }
+
+    //--------------------------------------------------------------------
+    void SAL_CALL VCLXSpinButton::setOrientation( sal_Int32 orientation ) throw (NoSupportException, RuntimeException)
+    {
+        ::vos::OGuard aGuard( GetMutex() );
+
+        lcl_modifyStyle( GetWindow(), WB_HSCROLL, orientation == ScrollBarOrientation::HORIZONTAL );
+    }
+
+    //--------------------------------------------------------------------
+    sal_Int32 SAL_CALL VCLXSpinButton::getOrientation(  ) throw (RuntimeException)
+    {
+        return  ( 0 != ( GetWindow()->GetStyle() & WB_HSCROLL ) )
+            ?   ScrollBarOrientation::HORIZONTAL
+            :   ScrollBarOrientation::VERTICAL;
+    }
+
+    //--------------------------------------------------------------------
+    void VCLXSpinButton::ProcessWindowEvent( const VclWindowEvent& _rVclWindowEvent )
+    {
+        ::vos::OClearableGuard aGuard( GetMutex() );
+        Reference< XSpinValue > xKeepAlive( this );
+        SpinButton* pSpinButton = static_cast< SpinButton* >( GetWindow() );
+        if ( !pSpinButton )
+            return;
+
+        switch ( _rVclWindowEvent.GetId() )
+        {
+            case VCLEVENT_SPINBUTTON_UP:
+            case VCLEVENT_SPINBUTTON_DOWN:
+                if ( maAdjustmentListeners.getLength() )
+                {
+                    AdjustmentEvent aEvent;
+                    aEvent.Source = *this;
+                    aEvent.Value = pSpinButton->GetValue();
+
+                    aGuard.clear();
+                    maAdjustmentListeners.adjustmentValueChanged( aEvent );
+                }
+                break;
+
+            default:
+                xKeepAlive.clear();
+                aGuard.clear();
+                VCLXWindow::ProcessWindowEvent( _rVclWindowEvent );
+                break;
+        }
+    }
+
+    //--------------------------------------------------------------------
+    void SAL_CALL VCLXSpinButton::setProperty( const ::rtl::OUString& PropertyName, const Any& Value ) throw(RuntimeException)
+    {
+        ::vos::OGuard aGuard( GetMutex() );
+
+        sal_Int32 nValue = 0;
+        sal_Bool  bValue = sal_True;
+        sal_Bool  bIsLongValue = ( Value >>= nValue );
+        sal_Bool  bIsBoolValue = ( Value >>= bValue );
+
+        if ( GetWindow() )
+        {
+            sal_uInt16 nPropertyId = GetPropertyId( PropertyName );
+            switch ( nPropertyId )
+            {
+            case BASEPROPERTY_BACKGROUNDCOLOR:
+                // the default implementation of the base class doesn't work here, since our
+                // interpretation for this property is slightly different
+                setButtonLikeFaceColor( GetWindow(), Value);
+                break;
+
+            case BASEPROPERTY_SPINVALUE:
+                if ( bIsLongValue )
+                    setValue( nValue );
+                break;
+
+            case BASEPROPERTY_SPINVALUE_MIN:
+                if ( bIsLongValue )
+                    setMinimum( nValue );
+                break;
+
+            case BASEPROPERTY_SPINVALUE_MAX:
+                if ( bIsLongValue )
+                    setMaximum( nValue );
+                break;
+
+            case BASEPROPERTY_SPININCREMENT:
+                if ( bIsLongValue )
+                    setSpinIncrement( nValue );
+                break;
+
+            case BASEPROPERTY_ORIENTATION:
+                if ( bIsLongValue )
+                    lcl_modifyStyle( GetWindow(), WB_HSCROLL, nValue == ScrollBarOrientation::HORIZONTAL );
+                break;
+
+            default:
+                VCLXWindow::setProperty( PropertyName, Value );
+            }
+        }
+    }
+
+    //--------------------------------------------------------------------
+    Any SAL_CALL VCLXSpinButton::getProperty( const ::rtl::OUString& PropertyName ) throw(RuntimeException)
+    {
+        ::vos::OGuard aGuard( GetMutex() );
+
+        Any aReturn;
+
+        if ( GetWindow() )
+        {
+            sal_uInt16 nPropertyId = GetPropertyId( PropertyName );
+            switch ( nPropertyId )
+            {
+            case BASEPROPERTY_BACKGROUNDCOLOR:
+                // the default implementation of the base class doesn't work here, since our
+                // interpretation for this property is slightly different
+                aReturn = getButtonLikeFaceColor( GetWindow() );
+                break;
+
+            case BASEPROPERTY_SPINVALUE:
+                aReturn <<= (sal_Int32)getValue( );
+                break;
+
+            case BASEPROPERTY_SPINVALUE_MIN:
+                aReturn <<= (sal_Int32)getMinimum( );
+                break;
+
+            case BASEPROPERTY_SPINVALUE_MAX:
+                aReturn <<= (sal_Int32)getMaximum( );
+                break;
+
+            case BASEPROPERTY_SPININCREMENT:
+                aReturn <<= (sal_Int32)getSpinIncrement( );
+                break;
+
+            case BASEPROPERTY_ORIENTATION:
+                aReturn <<= (sal_Int32)
+                    (   ( 0 != ( GetWindow()->GetStyle() & WB_HSCROLL ) )
+                    ?   ScrollBarOrientation::HORIZONTAL
+                    :   ScrollBarOrientation::VERTICAL
+                    );
+                break;
+
+            default:
+                aReturn = VCLXWindow::getProperty( PropertyName );
+            }
+        }
+        return aReturn;
+    }
+
+//........................................................................
+}   // namespace toolkit
+//........................................................................