c450b136f8
2004/03/24 10:00:35 fs 1.2.36.2: RESYNC: (1.2-1.3); FILE MERGED 2004/02/02 07:46:07 fs 1.2.36.1: #i24415#
684 lines
27 KiB
C++
684 lines
27 KiB
C++
/*************************************************************************
|
|
*
|
|
* $RCSfile: cellbindinghelper.cxx,v $
|
|
*
|
|
* $Revision: 1.5 $
|
|
*
|
|
* last change: $Author: hr $ $Date: 2004-04-13 11:22:25 $
|
|
*
|
|
* 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 EXPRESS 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 EXTENSIONS_PROPCTRLR_CELLBINDINGHELPER_HXX
|
|
#include "cellbindinghelper.hxx"
|
|
#endif
|
|
|
|
#ifndef _COM_SUN_STAR_FORM_BINDING_XBINDABLEVALUE_HPP_
|
|
#include <com/sun/star/form/binding/XBindableValue.hpp>
|
|
#endif
|
|
#ifndef _COM_SUN_STAR_FORM_BINDING_XLISTENTRYSINK_HPP_
|
|
#include <com/sun/star/form/binding/XListEntrySink.hpp>
|
|
#endif
|
|
#ifndef _COM_SUN_STAR_FORM_FORMCOMPONENTTYPE_HPP_
|
|
#include <com/sun/star/form/FormComponentType.hpp>
|
|
#endif
|
|
#ifndef _COM_SUN_STAR_FORM_XGRIDCOLUMNFACTORY_HPP_
|
|
#include <com/sun/star/form/XGridColumnFactory.hpp>
|
|
#endif
|
|
#ifndef _COM_SUN_STAR_FRAME_XMODEL_HPP_
|
|
#include <com/sun/star/frame/XModel.hpp>
|
|
#endif
|
|
#ifndef _COM_SUN_STAR_CONTAINER_XCHILD_HPP_
|
|
#include <com/sun/star/container/XChild.hpp>
|
|
#endif
|
|
#ifndef _COM_SUN_STAR_CONTAINER_XNAMED_HPP_
|
|
#include <com/sun/star/container/XNamed.hpp>
|
|
#endif
|
|
#ifndef _COM_SUN_STAR_DRAWING_XDRAWPAGESUPPLIER_HPP_
|
|
#include <com/sun/star/drawing/XDrawPageSupplier.hpp>
|
|
#endif
|
|
#ifndef _COM_SUN_STAR_TABLE_XCELLRANGE_HPP_
|
|
#include <com/sun/star/table/XCellRange.hpp>
|
|
#endif
|
|
#ifndef _COM_SUN_STAR_FORM_XFORMSSUPPLIER_HPP_
|
|
#include <com/sun/star/form/XFormsSupplier.hpp>
|
|
#endif
|
|
#ifndef _COM_SUN_STAR_FORM_XFORM_HPP_
|
|
#include <com/sun/star/form/XForm.hpp>
|
|
#endif
|
|
#ifndef _COM_SUN_STAR_LANG_XSERVICEINFO_HPP_
|
|
#include <com/sun/star/lang/XServiceInfo.hpp>
|
|
#endif
|
|
#ifndef _COM_SUN_STAR_LANG_XMULTISERVICEFACTORY_HPP_
|
|
#include <com/sun/star/lang/XMultiServiceFactory.hpp>
|
|
#endif
|
|
#ifndef _COM_SUN_STAR_BEANS_NAMEDVALUE_HPP_
|
|
#include <com/sun/star/beans/NamedValue.hpp>
|
|
#endif
|
|
#ifndef _UNOTOOLS_TRANSLITERATIONWRAPPER_HXX
|
|
#include <unotools/transliterationwrapper.hxx>
|
|
#endif
|
|
|
|
#ifndef _OSL_DIAGNOSE_H_
|
|
#include <osl/diagnose.h>
|
|
#endif
|
|
|
|
#ifndef _EXTENSIONS_FORMSCTRLR_FORMSTRINGS_HXX_
|
|
#include "formstrings.hxx"
|
|
#endif
|
|
|
|
#include <functional>
|
|
#include <algorithm>
|
|
|
|
//............................................................................
|
|
namespace pcr
|
|
{
|
|
//............................................................................
|
|
|
|
using namespace ::com::sun::star::uno;
|
|
using namespace ::com::sun::star::beans;
|
|
using namespace ::com::sun::star::frame;
|
|
using namespace ::com::sun::star::sheet;
|
|
using namespace ::com::sun::star::container;
|
|
using namespace ::com::sun::star::drawing;
|
|
using namespace ::com::sun::star::table;
|
|
using namespace ::com::sun::star::form;
|
|
using namespace ::com::sun::star::lang;
|
|
using namespace ::com::sun::star::i18n;
|
|
using namespace ::com::sun::star::form::binding;
|
|
|
|
namespace
|
|
{
|
|
#if (_MSC_VER < 1300)
|
|
using ::com::sun::star::uno::Reference;
|
|
using ::com::sun::star::uno::XInterface;
|
|
using ::com::sun::star::uno::UNO_QUERY;
|
|
using ::com::sun::star::frame::XModel;
|
|
using ::com::sun::star::drawing::XDrawPage;
|
|
using ::com::sun::star::container::XChild;
|
|
#endif // _MSC_VER < 1300
|
|
|
|
//....................................................................
|
|
|
|
#if (_MSC_VER < 1300)
|
|
using ::com::sun::star::uno::Reference;
|
|
using ::com::sun::star::uno::XInterface;
|
|
using ::com::sun::star::uno::UNO_QUERY;
|
|
using ::com::sun::star::frame::XModel;
|
|
using ::com::sun::star::drawing::XDrawPage;
|
|
using ::com::sun::star::container::XChild;
|
|
#endif // _MSC_VER < 1300
|
|
|
|
template< class TYPE >
|
|
Reference< TYPE > getTypedModelNode( const Reference< XInterface >& _rxModelNode )
|
|
{
|
|
Reference< TYPE > xTypedNode( _rxModelNode, UNO_QUERY );
|
|
if ( xTypedNode.is() )
|
|
return xTypedNode;
|
|
else
|
|
{
|
|
Reference< XChild > xChild( _rxModelNode, UNO_QUERY );
|
|
if ( xChild.is() )
|
|
return getTypedModelNode< TYPE >( xChild->getParent() );
|
|
else
|
|
return NULL;
|
|
}
|
|
}
|
|
|
|
//....................................................................
|
|
Reference< XModel > getDocument( const Reference< XInterface >& _rxModelNode )
|
|
{
|
|
return getTypedModelNode< XModel >( _rxModelNode );
|
|
}
|
|
|
|
//....................................................................
|
|
Reference< XDrawPage > getDrawPage( const Reference< XInterface >& _rxModelNode )
|
|
{
|
|
return getTypedModelNode< XDrawPage >( _rxModelNode );
|
|
}
|
|
|
|
//....................................................................
|
|
struct StringCompare : public ::std::unary_function< ::rtl::OUString, bool >
|
|
{
|
|
private:
|
|
::rtl::OUString m_sReference;
|
|
|
|
public:
|
|
StringCompare( const ::rtl::OUString& _rReference ) : m_sReference( _rReference ) { }
|
|
|
|
inline bool operator()( const ::rtl::OUString& _rCompare )
|
|
{
|
|
return ( _rCompare == m_sReference ) ? true : false;
|
|
}
|
|
};
|
|
//....................................................................
|
|
bool isAsciiLetter( sal_Unicode _c )
|
|
{
|
|
return ( _c >= 'A' && _c <= 'Z' )
|
|
|| ( _c >= 'a' && _c <= 'z' );
|
|
}
|
|
|
|
//....................................................................
|
|
sal_Unicode toUpperAscii( sal_Unicode _c )
|
|
{
|
|
sal_Unicode nUpper( _c );
|
|
if ( _c >= 'a' && _c <= 'z' )
|
|
nUpper += 'A' - 'a';
|
|
return nUpper;
|
|
}
|
|
}
|
|
|
|
//========================================================================
|
|
//= CellBindingHelper
|
|
//========================================================================
|
|
//------------------------------------------------------------------------
|
|
CellBindingHelper::CellBindingHelper( const Reference< XPropertySet >& _rxControlModel )
|
|
:m_xControlModel( _rxControlModel )
|
|
{
|
|
OSL_ENSURE( m_xControlModel.is(), "CellBindingHelper::CellBindingHelper: invalid control model!" );
|
|
|
|
m_xDocument = m_xDocument.query( getDocument( m_xControlModel ) );
|
|
OSL_ENSURE( m_xDocument.is(), "CellBindingHelper::CellBindingHelper: Did not find the spreadsheet document!" );
|
|
|
|
OSL_ENSURE( isSpreadsheetDocumentWhichSupplies( SERVICE_ADDRESS_CONVERSION ),
|
|
"CellBindingHelper::CellBindingHelper: the document cannot convert address representations!" );
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
sal_Bool CellBindingHelper::livesInSpreadsheetDocument( const Reference< XPropertySet >& _rxControlModel )
|
|
{
|
|
Reference< XSpreadsheetDocument > xDocument( getDocument( _rxControlModel ), UNO_QUERY );
|
|
return xDocument.is();
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
sal_Int16 CellBindingHelper::getControlSheetIndex( ) const
|
|
{
|
|
sal_Int16 nSheetIndex = -1;
|
|
// every sheet has a draw page, and every draw page has a forms collection.
|
|
// Our control, OTOH, belongs to a forms collection. Match these ...
|
|
try
|
|
{
|
|
// for determining the draw page, we need the forms collection which
|
|
// the object belongs to. This is the first object up the hierarchy which is
|
|
// *no* XForm
|
|
Reference< XChild > xCheck( m_xControlModel, UNO_QUERY );
|
|
Reference< XForm > xParentAsForm( xCheck->getParent(), UNO_QUERY );
|
|
Reference< XGridColumnFactory > xParentAsGrid( xCheck->getParent(), UNO_QUERY );
|
|
while ( ( xParentAsForm.is() || xParentAsGrid.is() ) && xCheck.is() )
|
|
{
|
|
xCheck = xCheck.query( xCheck->getParent() );
|
|
xParentAsForm = xParentAsForm.query( xCheck->getParent() );
|
|
xParentAsGrid = xParentAsGrid.query( xCheck->getParent() );
|
|
}
|
|
Reference< XInterface > xFormsCollection( xCheck.is() ? xCheck->getParent() : NULL );
|
|
|
|
// now iterate through the sheets
|
|
Reference< XIndexAccess > xSheets( m_xDocument->getSheets(), UNO_QUERY );
|
|
if ( xSheets.is() && xFormsCollection.is() )
|
|
{
|
|
for ( sal_Int32 i = 0; i < xSheets->getCount(); ++i )
|
|
{
|
|
Reference< XDrawPageSupplier > xSuppPage;
|
|
xSheets->getByIndex( i ) >>= xSuppPage;
|
|
|
|
Reference< XFormsSupplier > xSuppForms;
|
|
if ( xSuppPage.is() )
|
|
xSuppForms = xSuppForms.query( xSuppPage->getDrawPage() );
|
|
|
|
OSL_ENSURE( xSuppForms.is(), "CellBindingHelper::getControlSheetIndex: could not determine the forms supplier!" );
|
|
|
|
if ( xSuppForms.is() && ( xSuppForms->getForms() == xFormsCollection ) )
|
|
{ // found it
|
|
nSheetIndex = (sal_Int16)i;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
catch( const Exception& )
|
|
{
|
|
OSL_ENSURE( sal_False, "CellBindingHelper::getControlSheetIndex: caught an exception!" );
|
|
}
|
|
|
|
return nSheetIndex;
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
bool CellBindingHelper::convertStringAddress( const ::rtl::OUString& _rAddressDescription, CellAddress& /* [out] */ _rAddress ) const
|
|
{
|
|
Any aAddress;
|
|
return doConvertAddressRepresentations(
|
|
PROPERTY_UI_REPRESENTATION,
|
|
makeAny( _rAddressDescription ),
|
|
PROPERTY_ADDRESS,
|
|
aAddress,
|
|
false
|
|
)
|
|
&& ( aAddress >>= _rAddress );
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
bool CellBindingHelper::doConvertAddressRepresentations( const ::rtl::OUString& _rInputProperty, const Any& _rInputValue,
|
|
const ::rtl::OUString& _rOutputProperty, Any& _rOutputValue, bool _bIsRange ) const SAL_THROW(())
|
|
{
|
|
bool bSuccess = false;
|
|
|
|
Reference< XPropertySet > xConverter(
|
|
createDocumentDependentInstance(
|
|
_bIsRange ? SERVICE_RANGEADDRESS_CONVERSION : SERVICE_ADDRESS_CONVERSION,
|
|
::rtl::OUString(),
|
|
Any()
|
|
),
|
|
UNO_QUERY
|
|
);
|
|
OSL_ENSURE( xConverter.is(), "CellBindingHelper::doConvertAddressRepresentations: could not get a converter service!" );
|
|
if ( xConverter.is() )
|
|
{
|
|
try
|
|
{
|
|
xConverter->setPropertyValue( PROPERTY_REFERENCE_SHEET, makeAny( (sal_Int32)getControlSheetIndex() ) );
|
|
xConverter->setPropertyValue( _rInputProperty, _rInputValue );
|
|
_rOutputValue = xConverter->getPropertyValue( _rOutputProperty );
|
|
bSuccess = true;
|
|
}
|
|
catch( const Exception& )
|
|
{
|
|
OSL_ENSURE( sal_False, "CellBindingHelper::doConvertAddressRepresentations: caught an exception!" );
|
|
}
|
|
}
|
|
|
|
return bSuccess;
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
bool CellBindingHelper::convertStringAddress( const ::rtl::OUString& _rAddressDescription,
|
|
CellRangeAddress& /* [out] */ _rAddress ) const
|
|
{
|
|
Any aAddress;
|
|
return doConvertAddressRepresentations(
|
|
PROPERTY_UI_REPRESENTATION,
|
|
makeAny( _rAddressDescription ),
|
|
PROPERTY_ADDRESS,
|
|
aAddress,
|
|
true
|
|
)
|
|
&& ( aAddress >>= _rAddress );
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
Reference< XValueBinding > CellBindingHelper::createCellBindingFromAddress( const CellAddress& _rAddress, bool _bSupportIntegerExchange ) const
|
|
{
|
|
Reference< XValueBinding > xBinding( createDocumentDependentInstance(
|
|
_bSupportIntegerExchange ? SERVICE_SHEET_CELL_INT_BINDING : SERVICE_SHEET_CELL_BINDING,
|
|
PROPERTY_BOUND_CELL,
|
|
makeAny( _rAddress )
|
|
), UNO_QUERY );
|
|
|
|
return xBinding;
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
Reference< XValueBinding > CellBindingHelper::createCellBindingFromStringAddress( const ::rtl::OUString& _rAddress, bool _bSupportIntegerExchange ) const
|
|
{
|
|
Reference< XValueBinding > xBinding;
|
|
if ( !m_xDocument.is() )
|
|
// very bad ...
|
|
return xBinding;
|
|
|
|
// get the UNO representation of the address
|
|
CellAddress aAddress;
|
|
if ( !_rAddress.getLength() || !convertStringAddress( _rAddress, aAddress ) )
|
|
return xBinding;
|
|
|
|
return createCellBindingFromAddress( aAddress, _bSupportIntegerExchange );
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
Reference< XListEntrySource > CellBindingHelper::createCellListSourceFromStringAddress( const ::rtl::OUString& _rAddress ) const
|
|
{
|
|
Reference< XListEntrySource > xSource;
|
|
|
|
CellRangeAddress aRangeAddress;
|
|
if ( !_rAddress.getLength() || !convertStringAddress( _rAddress, aRangeAddress ) )
|
|
return xSource;
|
|
|
|
// create a range object for this address
|
|
xSource = xSource.query( createDocumentDependentInstance(
|
|
SERVICE_SHEET_CELLRANGE_LISTSOURCE,
|
|
PROPERTY_LIST_CELL_RANGE,
|
|
makeAny( aRangeAddress )
|
|
) );
|
|
|
|
return xSource;
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
Reference< XInterface > CellBindingHelper::createDocumentDependentInstance( const ::rtl::OUString& _rService, const ::rtl::OUString& _rArgumentName,
|
|
const Any& _rArgumentValue ) const
|
|
{
|
|
Reference< XInterface > xReturn;
|
|
|
|
Reference< XMultiServiceFactory > xDocumentFactory( m_xDocument, UNO_QUERY );
|
|
OSL_ENSURE( xDocumentFactory.is(), "CellBindingHelper::createDocumentDependentInstance: no document service factory!" );
|
|
if ( xDocumentFactory.is() )
|
|
{
|
|
try
|
|
{
|
|
if ( _rArgumentName.getLength() )
|
|
{
|
|
NamedValue aArg;
|
|
aArg.Name = _rArgumentName;
|
|
aArg.Value = _rArgumentValue;
|
|
|
|
Sequence< Any > aArgs( 1 );
|
|
aArgs[ 0 ] <<= aArg;
|
|
|
|
xReturn = xDocumentFactory->createInstanceWithArguments( _rService, aArgs );
|
|
}
|
|
else
|
|
{
|
|
xReturn = xDocumentFactory->createInstance( _rService );
|
|
}
|
|
}
|
|
catch ( const Exception& )
|
|
{
|
|
OSL_ENSURE( sal_False, "CellBindingHelper::createDocumentDependentInstance: could not create the binding at the document!" );
|
|
}
|
|
}
|
|
return xReturn;
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
bool CellBindingHelper::getAddressFromCellBinding(
|
|
const Reference< XValueBinding >& _rxBinding, CellAddress& _rAddress ) const
|
|
{
|
|
OSL_PRECOND( !_rxBinding.is() || isCellBinding( _rxBinding ), "CellBindingHelper::getAddressFromCellBinding: this is no cell binding!" );
|
|
|
|
bool bReturn = false;
|
|
if ( !m_xDocument.is() )
|
|
// very bad ...
|
|
return bReturn;
|
|
|
|
try
|
|
{
|
|
Reference< XPropertySet > xBindingProps( _rxBinding, UNO_QUERY );
|
|
OSL_ENSURE( xBindingProps.is() || !_rxBinding.is(), "CellBindingHelper::getAddressFromCellBinding: no property set for the binding!" );
|
|
if ( xBindingProps.is() )
|
|
{
|
|
CellAddress aAddress;
|
|
bReturn = (bool)( xBindingProps->getPropertyValue( PROPERTY_BOUND_CELL ) >>= _rAddress );
|
|
}
|
|
}
|
|
catch( const Exception& )
|
|
{
|
|
OSL_ENSURE( sal_False, "CellBindingHelper::getAddressFromCellBinding: caught an exception!" );
|
|
}
|
|
|
|
return bReturn;
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
::rtl::OUString CellBindingHelper::getStringAddressFromCellBinding( const Reference< XValueBinding >& _rxBinding ) const
|
|
{
|
|
CellAddress aAddress;
|
|
::rtl::OUString sAddress;
|
|
if ( getAddressFromCellBinding( _rxBinding, aAddress ) )
|
|
{
|
|
Any aStringAddress;
|
|
doConvertAddressRepresentations( PROPERTY_ADDRESS, makeAny( aAddress ),
|
|
PROPERTY_UI_REPRESENTATION, aStringAddress, false );
|
|
|
|
aStringAddress >>= sAddress;
|
|
}
|
|
|
|
return sAddress;
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
::rtl::OUString CellBindingHelper::getStringAddressFromCellListSource( const Reference< XListEntrySource >& _rxSource ) const
|
|
{
|
|
OSL_PRECOND( !_rxSource.is() || isCellRangeListSource( _rxSource ), "CellBindingHelper::getStringAddressFromCellListSource: this is no cell list source!" );
|
|
|
|
::rtl::OUString sAddress;
|
|
if ( !m_xDocument.is() )
|
|
// very bad ...
|
|
return sAddress;
|
|
|
|
try
|
|
{
|
|
Reference< XPropertySet > xSourceProps( _rxSource, UNO_QUERY );
|
|
OSL_ENSURE( xSourceProps.is() || !_rxSource.is(), "CellBindingHelper::getStringAddressFromCellListSource: no property set for the list source!" );
|
|
if ( xSourceProps.is() )
|
|
{
|
|
CellRangeAddress aRangeAddress;
|
|
xSourceProps->getPropertyValue( PROPERTY_LIST_CELL_RANGE ) >>= aRangeAddress;
|
|
|
|
Any aStringAddress;
|
|
doConvertAddressRepresentations( PROPERTY_ADDRESS, makeAny( aRangeAddress ),
|
|
PROPERTY_UI_REPRESENTATION, aStringAddress, true );
|
|
aStringAddress >>= sAddress;
|
|
}
|
|
}
|
|
catch( const Exception& )
|
|
{
|
|
OSL_ENSURE( sal_False, "CellBindingHelper::getStringAddressFromCellListSource: caught an exception!" );
|
|
}
|
|
|
|
return sAddress;
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
bool CellBindingHelper::isSpreadsheetDocumentWhichSupplies( const ::rtl::OUString& _rService ) const
|
|
{
|
|
bool bYesItIs = false;
|
|
|
|
Reference< XServiceInfo > xSI( m_xDocument, UNO_QUERY );
|
|
if ( xSI.is() && xSI->supportsService( SERVICE_SPREADSHEET_DOCUMENT ) )
|
|
{
|
|
Reference< XMultiServiceFactory > xDocumentFactory( m_xDocument, UNO_QUERY );
|
|
OSL_ENSURE( xDocumentFactory.is(), "CellBindingHelper::isSpreadsheetDocumentWhichSupplies: spreadsheet document, but no factory?" );
|
|
|
|
Sequence< ::rtl::OUString > aAvailableServices;
|
|
if ( xDocumentFactory.is() )
|
|
aAvailableServices = xDocumentFactory->getAvailableServiceNames( );
|
|
|
|
const ::rtl::OUString* pFound = ::std::find_if(
|
|
aAvailableServices.getConstArray(),
|
|
aAvailableServices.getConstArray() + aAvailableServices.getLength(),
|
|
StringCompare( _rService )
|
|
);
|
|
if ( pFound - aAvailableServices.getConstArray() < aAvailableServices.getLength() )
|
|
{
|
|
bYesItIs = true;
|
|
}
|
|
}
|
|
|
|
return bYesItIs;
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
bool CellBindingHelper::isListCellRangeAllowed( ) const
|
|
{
|
|
bool bAllow( false );
|
|
|
|
Reference< XListEntrySink > xSink( m_xControlModel, UNO_QUERY );
|
|
if ( xSink.is() )
|
|
{
|
|
bAllow = isSpreadsheetDocumentWhichSupplies( SERVICE_SHEET_CELLRANGE_LISTSOURCE );
|
|
}
|
|
|
|
return bAllow;
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
bool CellBindingHelper::isCellIntegerBindingAllowed( ) const
|
|
{
|
|
bool bAllow( true );
|
|
|
|
// first, we only offer this for controls which allow bindings in general
|
|
Reference< XBindableValue > xBindable( m_xControlModel, UNO_QUERY );
|
|
if ( !xBindable.is() )
|
|
bAllow = false;
|
|
|
|
// then, we must live in a spreadsheet document which can provide the special
|
|
// service needed for exchanging integer values
|
|
if ( bAllow )
|
|
bAllow = isSpreadsheetDocumentWhichSupplies( SERVICE_SHEET_CELL_INT_BINDING );
|
|
|
|
// then, we only offer this for list boxes
|
|
if ( bAllow )
|
|
{
|
|
try
|
|
{
|
|
sal_Int16 nClassId = FormComponentType::CONTROL;
|
|
m_xControlModel->getPropertyValue( PROPERTY_CLASSID ) >>= nClassId;
|
|
if ( FormComponentType::LISTBOX != nClassId )
|
|
bAllow = false;
|
|
}
|
|
catch( const Exception& )
|
|
{
|
|
OSL_ENSURE( sal_False, "CellBindingHelper::isCellIntegerBindingAllowed: caught an exception!" );
|
|
// are there really control models which survive isCellBindingAllowed, but don't have a ClassId
|
|
// property?
|
|
bAllow = false;
|
|
}
|
|
}
|
|
|
|
return bAllow;
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
bool CellBindingHelper::isCellBindingAllowed( ) const
|
|
{
|
|
bool bAllow( false );
|
|
|
|
Reference< XBindableValue > xBindable( m_xControlModel, UNO_QUERY );
|
|
if ( xBindable.is() )
|
|
{
|
|
// the control can potentially be bound to an external value
|
|
// Does it live within a Calc document, and is able to supply CellBindings?
|
|
bAllow = isSpreadsheetDocumentWhichSupplies( SERVICE_SHEET_CELL_BINDING );
|
|
}
|
|
|
|
return bAllow;
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
bool CellBindingHelper::isCellBinding( const Reference< XValueBinding >& _rxBinding ) const
|
|
{
|
|
return doesComponentSupport( _rxBinding.get(), SERVICE_SHEET_CELL_BINDING );
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
bool CellBindingHelper::isCellIntegerBinding( const Reference< XValueBinding >& _rxBinding ) const
|
|
{
|
|
return doesComponentSupport( _rxBinding.get(), SERVICE_SHEET_CELL_INT_BINDING );
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
bool CellBindingHelper::isCellRangeListSource( const Reference< XListEntrySource >& _rxSource ) const
|
|
{
|
|
return doesComponentSupport( _rxSource.get(), SERVICE_SHEET_CELLRANGE_LISTSOURCE );
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
bool CellBindingHelper::doesComponentSupport( const Reference< XInterface >& _rxComponent, const ::rtl::OUString& _rService ) const
|
|
{
|
|
bool bDoes = false;
|
|
Reference< XServiceInfo > xSI( _rxComponent, UNO_QUERY );
|
|
bDoes = xSI.is() && xSI->supportsService( _rService );
|
|
return bDoes;
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
Reference< XValueBinding > CellBindingHelper::getCurrentBinding( ) const
|
|
{
|
|
Reference< XValueBinding > xBinding;
|
|
Reference< XBindableValue > xBindable( m_xControlModel, UNO_QUERY );
|
|
if ( xBindable.is() )
|
|
xBinding = xBindable->getValueBinding();
|
|
return xBinding;
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
Reference< XListEntrySource > CellBindingHelper::getCurrentListSource( ) const
|
|
{
|
|
Reference< XListEntrySource > xSource;
|
|
Reference< XListEntrySink > xSink( m_xControlModel, UNO_QUERY );
|
|
if ( xSink.is() )
|
|
xSource = xSink->getListEntrySource();
|
|
return xSource;
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
void CellBindingHelper::setBinding( const Reference< XValueBinding >& _rxBinding )
|
|
{
|
|
Reference< XBindableValue > xBindable( m_xControlModel, UNO_QUERY );
|
|
OSL_PRECOND( xBindable.is(), "CellBindingHelper::setBinding: the object is not bindable!" );
|
|
if ( xBindable.is() )
|
|
xBindable->setValueBinding( _rxBinding );
|
|
}
|
|
|
|
//------------------------------------------------------------------------
|
|
void CellBindingHelper::setListSource( const Reference< XListEntrySource >& _rxSource )
|
|
{
|
|
Reference< XListEntrySink > xSink( m_xControlModel, UNO_QUERY );
|
|
OSL_PRECOND( xSink.is(), "CellBindingHelper::setListSource: the object is no list entry sink!" );
|
|
if ( xSink.is() )
|
|
xSink->setListEntrySource( _rxSource );
|
|
}
|
|
|
|
//............................................................................
|
|
} // namespace pcr
|
|
//............................................................................
|