toolkit/source/controls/unocontrolbase.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: unocontrolbase.cxx,v $
  10  * $Revision: 1.10 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30
  31 // MARKER(update_precomp.py): autogen include statement, do not remove
  32 #include "precompiled_toolkit.hxx"
  33 #include <com/sun/star/awt/XLayoutConstrains.hpp>
  34 #include <com/sun/star/awt/XTextLayoutConstrains.hpp>
  35
  36 #include <toolkit/controls/unocontrolbase.hxx>
  37 #include <toolkit/helper/property.hxx>
  38
  39 #include <tools/debug.hxx>
  40
  41 //      ----------------------------------------------------
  42 //      class UnoControlBase
  43 //      ----------------------------------------------------
  44
  45 sal_Bool UnoControlBase::ImplHasProperty( sal_uInt16 nPropId )
  46 {
  47     ::rtl::OUString aPropName( GetPropertyName( nPropId ) );
  48     return ImplHasProperty( aPropName );
  49 }
  50
  51 sal_Bool UnoControlBase::ImplHasProperty( const ::rtl::OUString& aPropertyName )
  52 {
  53     ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet >  xPSet( mxModel, ::com::sun::star::uno::UNO_QUERY );
  54     if ( !xPSet.is() )
  55         return sal_False;
  56     ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySetInfo >  xInfo = xPSet->getPropertySetInfo();
  57     if ( !xInfo.is() )
  58         return sal_False;
  59
  60     return xInfo->hasPropertyByName( aPropertyName );
  61 }
  62
  63 void UnoControlBase::ImplSetPropertyValues( const ::com::sun::star::uno::Sequence< ::rtl::OUString >& aPropertyNames, const ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Any >& aValues, sal_Bool bUpdateThis )
  64 {
  65     ::com::sun::star::uno::Reference< ::com::sun::star::beans::XMultiPropertySet > xMPS( mxModel, ::com::sun::star::uno::UNO_QUERY );
  66     if ( !mxModel.is() )
  67         return;
  68
  69     DBG_ASSERT( xMPS.is(), "UnoControlBase::ImplSetPropertyValues: no multi property set interface!" );
  70     if ( xMPS.is() )
  71     {
  72         if ( !bUpdateThis )
  73             ImplLockPropertyChangeNotifications( aPropertyNames, true );
  74
  75         try
  76         {
  77             xMPS->setPropertyValues( aPropertyNames, aValues );
  78         }
  79         catch( const ::com::sun::star::uno::Exception& )
  80         {
  81             if ( !bUpdateThis )
  82                 ImplLockPropertyChangeNotifications( aPropertyNames, false );
  83         }
  84         if ( !bUpdateThis )
  85             ImplLockPropertyChangeNotifications( aPropertyNames, false );
  86     }
  87     else
  88     {
  89         int dummy = 0;
  90         (void)dummy;
  91     }
  92 }
  93
  94 void UnoControlBase::ImplSetPropertyValue( const ::rtl::OUString& aPropertyName, const ::com::sun::star::uno::Any& aValue, sal_Bool bUpdateThis )
  95 {
  96     // Model ggf. schon abgemeldet, aber ein Event schlaegt noch zu...
  97     if ( mxModel.is() )
  98     {
  99         ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet >  xPSet( mxModel, ::com::sun::star::uno::UNO_QUERY );
 100         if ( !bUpdateThis )
 101             ImplLockPropertyChangeNotification( aPropertyName, true );
 102
 103         try
 104         {
 105             xPSet->setPropertyValue( aPropertyName, aValue );
 106         }
 107         catch( const com::sun::star::uno::Exception& )
 108         {
 109             if ( !bUpdateThis )
 110                 ImplLockPropertyChangeNotification( aPropertyName, false );
 111             throw;
 112         }
 113         if ( !bUpdateThis )
 114             ImplLockPropertyChangeNotification( aPropertyName, false );
 115     }
 116 }
 117
 118 ::com::sun::star::uno::Any UnoControlBase::ImplGetPropertyValue( const ::rtl::OUString& aPropertyName )
 119 {
 120     ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet >  xPSet( mxModel, ::com::sun::star::uno::UNO_QUERY );
 121     if ( xPSet.is() )
 122         return xPSet->getPropertyValue( aPropertyName );
 123     else
 124         return ::com::sun::star::uno::Any();
 125 }
 126
 127 sal_Bool UnoControlBase::ImplGetPropertyValue_BOOL( sal_uInt16 nProp )
 128 {
 129     sal_Bool b = sal_False;
 130     if ( mxModel.is() )
 131     {
 132         ::com::sun::star::uno::Any aVal = ImplGetPropertyValue( GetPropertyName( nProp ) );
 133         aVal >>= b;
 134     }
 135     return b;
 136 }
 137
 138 sal_Int16 UnoControlBase::ImplGetPropertyValue_INT16( sal_uInt16 nProp )
 139 {
 140     sal_Int16 n = 0;
 141     if ( mxModel.is() )
 142     {
 143         ::com::sun::star::uno::Any aVal = ImplGetPropertyValue( GetPropertyName( nProp ) );
 144         aVal >>= n;
 145     }
 146     return n;
 147 }
 148
 149 sal_uInt16 UnoControlBase::ImplGetPropertyValue_UINT16( sal_uInt16 nProp )
 150 {
 151     sal_uInt16 n = 0;
 152     if ( mxModel.is() )
 153     {
 154         ::com::sun::star::uno::Any aVal = ImplGetPropertyValue( GetPropertyName( nProp ) );
 155         aVal >>= n;
 156     }
 157     return n;
 158 }
 159
 160 sal_Int32 UnoControlBase::ImplGetPropertyValue_INT32( sal_uInt16 nProp )
 161 {
 162     sal_Int32 n = 0;
 163     if ( mxModel.is() )
 164     {
 165         ::com::sun::star::uno::Any aVal = ImplGetPropertyValue( GetPropertyName( nProp ) );
 166         aVal >>= n;
 167     }
 168     return n;
 169 }
 170
 171 sal_uInt32 UnoControlBase::ImplGetPropertyValue_UINT32( sal_uInt16 nProp )
 172 {
 173     sal_uInt32 n = 0;
 174     if ( mxModel.is() )
 175     {
 176         ::com::sun::star::uno::Any aVal = ImplGetPropertyValue( GetPropertyName( nProp ) );
 177         aVal >>= n;
 178     }
 179     return n;
 180 }
 181
 182 double UnoControlBase::ImplGetPropertyValue_DOUBLE( sal_uInt16 nProp )
 183 {
 184     double n = 0;
 185     if ( mxModel.is() )
 186     {
 187         ::com::sun::star::uno::Any aVal = ImplGetPropertyValue( GetPropertyName( nProp ) );
 188         aVal >>= n;
 189     }
 190     return n;
 191 }
 192
 193 ::rtl::OUString UnoControlBase::ImplGetPropertyValue_UString( sal_uInt16 nProp )
 194 {
 195     ::rtl::OUString aStr;
 196     if ( mxModel.is() )
 197     {
 198         ::com::sun::star::uno::Any aVal = ImplGetPropertyValue( GetPropertyName( nProp ) );
 199         aVal >>= aStr;
 200     }
 201     return aStr;
 202 }
 203
 204 ::com::sun::star::awt::Size UnoControlBase::Impl_getMinimumSize()
 205 {
 206     ::com::sun::star::awt::Size aSz;
 207     ::com::sun::star::uno::Reference< ::com::sun::star::awt::XWindowPeer >  xP = ImplGetCompatiblePeer( sal_True );
 208     DBG_ASSERT( xP.is(), "Layout: No Peer!" );
 209     if ( xP.is() )
 210     {
 211         ::com::sun::star::uno::Reference< ::com::sun::star::awt::XLayoutConstrains >  xL( xP, ::com::sun::star::uno::UNO_QUERY );
 212         if ( xL.is() )
 213             aSz = xL->getMinimumSize();
 214
 215         if ( !getPeer().is() || ( getPeer() != xP ) )
 216             xP->dispose();
 217     }
 218     return aSz;
 219 }
 220
 221 ::com::sun::star::awt::Size UnoControlBase::Impl_getPreferredSize()
 222 {
 223     ::com::sun::star::awt::Size aSz;
 224     ::com::sun::star::uno::Reference< ::com::sun::star::awt::XWindowPeer >  xP = ImplGetCompatiblePeer( sal_True );
 225     DBG_ASSERT( xP.is(), "Layout: No Peer!" );
 226     if ( xP.is() )
 227     {
 228         ::com::sun::star::uno::Reference< ::com::sun::star::awt::XLayoutConstrains >  xL( xP, ::com::sun::star::uno::UNO_QUERY );
 229         if ( xL.is() )
 230             aSz = xL->getPreferredSize();
 231
 232         if ( !getPeer().is() || ( getPeer() != xP ) )
 233             xP->dispose();
 234     }
 235     return aSz;
 236 }
 237
 238 ::com::sun::star::awt::Size UnoControlBase::Impl_calcAdjustedSize( const ::com::sun::star::awt::Size& rNewSize )
 239 {
 240     ::com::sun::star::awt::Size aSz;
 241     ::com::sun::star::uno::Reference< ::com::sun::star::awt::XWindowPeer >  xP = ImplGetCompatiblePeer( sal_True );
 242     DBG_ASSERT( xP.is(), "Layout: No Peer!" );
 243     if ( xP.is() )
 244     {
 245         ::com::sun::star::uno::Reference< ::com::sun::star::awt::XLayoutConstrains > xL( xP, ::com::sun::star::uno::UNO_QUERY );
 246         if ( xL.is() )
 247             aSz = xL->calcAdjustedSize( rNewSize );
 248
 249         if ( !getPeer().is() || ( getPeer() != xP ) )
 250             xP->dispose();
 251     }
 252     return aSz;
 253 }
 254
 255 ::com::sun::star::awt::Size UnoControlBase::Impl_getMinimumSize( sal_Int16 nCols, sal_Int16 nLines )
 256 {
 257     ::com::sun::star::awt::Size aSz;
 258     ::com::sun::star::uno::Reference< ::com::sun::star::awt::XWindowPeer >  xP = ImplGetCompatiblePeer( sal_True );
 259     DBG_ASSERT( xP.is(), "Layout: No Peer!" );
 260     if ( xP.is() )
 261     {
 262         ::com::sun::star::uno::Reference< ::com::sun::star::awt::XTextLayoutConstrains >  xL( xP, ::com::sun::star::uno::UNO_QUERY );
 263         if ( xL.is() )
 264             aSz = xL->getMinimumSize( nCols, nLines );
 265
 266         if ( !getPeer().is() || ( getPeer() != xP ) )
 267             xP->dispose();
 268     }
 269     return aSz;
 270 }
 271
 272 void UnoControlBase::Impl_getColumnsAndLines( sal_Int16& nCols, sal_Int16& nLines )
 273 {
 274     ::com::sun::star::uno::Reference< ::com::sun::star::awt::XWindowPeer >  xP = ImplGetCompatiblePeer( sal_True );
 275     DBG_ASSERT( xP.is(), "Layout: No Peer!" );
 276     if ( xP.is() )
 277     {
 278         ::com::sun::star::uno::Reference< ::com::sun::star::awt::XTextLayoutConstrains >  xL( xP, ::com::sun::star::uno::UNO_QUERY );
 279         if ( xL.is() )
 280             xL->getColumnsAndLines( nCols, nLines );
 281
 282         if ( !getPeer().is() || ( getPeer() != xP ) )
 283             xP->dispose();
 284     }
 285 }
 286
 287
 288