summaryrefslogtreecommitdiff
path: root/forms/source/component
diff options
context:
space:
mode:
authorMichael Stahl <mstahl@redhat.com>2012-01-28 20:52:45 +0100
committerMichael Stahl <mstahl@redhat.com>2012-01-28 20:52:45 +0100
commit2e626373db2412ac22e8c5c27a60d11cd29e875b (patch)
tree9e9f67205cd5b72f1031721273e1534a3a1e5b0f /forms/source/component
parentf7ee7bbd5174b084f018c2ec94d8c70c98ee04da (diff)
replace obsolete "master" branch with README that points at new repoHEADmaster-deletedmaster
Diffstat (limited to 'forms/source/component')
-rw-r--r--forms/source/component/BaseListBox.hxx45
-rw-r--r--forms/source/component/Button.cxx781
-rw-r--r--forms/source/component/Button.hxx212
-rw-r--r--forms/source/component/CheckBox.cxx275
-rw-r--r--forms/source/component/CheckBox.hxx93
-rw-r--r--forms/source/component/Columns.cxx602
-rw-r--r--forms/source/component/Columns.hxx223
-rw-r--r--forms/source/component/ComboBox.cxx916
-rw-r--r--forms/source/component/ComboBox.hxx180
-rw-r--r--forms/source/component/Currency.cxx270
-rw-r--r--forms/source/component/Currency.hxx103
-rw-r--r--forms/source/component/DatabaseForm.cxx4162
-rw-r--r--forms/source/component/DatabaseForm.hxx569
-rw-r--r--forms/source/component/Date.cxx365
-rw-r--r--forms/source/component/Date.hxx135
-rw-r--r--forms/source/component/Edit.cxx761
-rw-r--r--forms/source/component/Edit.hxx189
-rw-r--r--forms/source/component/EditBase.cxx361
-rw-r--r--forms/source/component/EditBase.hxx115
-rw-r--r--forms/source/component/EventThread.cxx242
-rw-r--r--forms/source/component/EventThread.hxx128
-rw-r--r--forms/source/component/File.cxx306
-rw-r--r--forms/source/component/File.hxx105
-rw-r--r--forms/source/component/Filter.cxx933
-rw-r--r--forms/source/component/Filter.hxx161
-rw-r--r--forms/source/component/FixedText.cxx138
-rw-r--r--forms/source/component/FixedText.hxx73
-rw-r--r--forms/source/component/FormComponent.cxx3070
-rw-r--r--forms/source/component/FormattedField.cxx1257
-rw-r--r--forms/source/component/FormattedField.hxx200
-rw-r--r--forms/source/component/FormattedFieldWrapper.cxx400
-rw-r--r--forms/source/component/FormattedFieldWrapper.hxx101
-rw-r--r--forms/source/component/FormsCollection.cxx188
-rw-r--r--forms/source/component/FormsCollection.hxx102
-rw-r--r--forms/source/component/Grid.cxx1165
-rw-r--r--forms/source/component/Grid.hxx221
-rw-r--r--forms/source/component/GroupBox.cxx175
-rw-r--r--forms/source/component/GroupBox.hxx86
-rw-r--r--forms/source/component/GroupManager.cxx533
-rw-r--r--forms/source/component/GroupManager.hxx234
-rw-r--r--forms/source/component/Hidden.cxx190
-rw-r--r--forms/source/component/Hidden.hxx86
-rw-r--r--forms/source/component/ImageButton.cxx275
-rw-r--r--forms/source/component/ImageButton.hxx109
-rw-r--r--forms/source/component/ImageControl.cxx1021
-rw-r--r--forms/source/component/ImageControl.hxx212
-rw-r--r--forms/source/component/ListBox.cxx1862
-rw-r--r--forms/source/component/ListBox.hxx288
-rw-r--r--forms/source/component/Numeric.cxx224
-rw-r--r--forms/source/component/Numeric.hxx101
-rw-r--r--forms/source/component/Pattern.cxx264
-rw-r--r--forms/source/component/Pattern.hxx110
-rw-r--r--forms/source/component/RadioButton.cxx438
-rw-r--r--forms/source/component/RadioButton.hxx115
-rw-r--r--forms/source/component/Time.cxx367
-rw-r--r--forms/source/component/Time.hxx135
-rw-r--r--forms/source/component/cachedrowset.cxx205
-rw-r--r--forms/source/component/cachedrowset.hxx100
-rw-r--r--forms/source/component/clickableimage.cxx927
-rw-r--r--forms/source/component/clickableimage.hxx297
-rw-r--r--forms/source/component/cloneable.cxx70
-rw-r--r--forms/source/component/entrylisthelper.cxx324
-rw-r--r--forms/source/component/entrylisthelper.hxx201
-rw-r--r--forms/source/component/errorbroadcaster.cxx115
-rw-r--r--forms/source/component/errorbroadcaster.hxx76
-rw-r--r--forms/source/component/findpos.cxx60
-rw-r--r--forms/source/component/findpos.hxx48
-rw-r--r--forms/source/component/formcontrolfont.cxx552
-rw-r--r--forms/source/component/imgprod.cxx582
-rw-r--r--forms/source/component/imgprod.hxx113
-rw-r--r--forms/source/component/navigationbar.cxx512
-rw-r--r--forms/source/component/navigationbar.hxx140
-rw-r--r--forms/source/component/propertybaghelper.cxx360
-rw-r--r--forms/source/component/refvaluecomponent.cxx303
-rw-r--r--forms/source/component/refvaluecomponent.hxx111
-rw-r--r--forms/source/component/scrollbar.cxx322
-rw-r--r--forms/source/component/scrollbar.hxx104
-rw-r--r--forms/source/component/spinbutton.cxx278
-rw-r--r--forms/source/component/spinbutton.hxx104
79 files changed, 0 insertions, 31876 deletions
diff --git a/forms/source/component/BaseListBox.hxx b/forms/source/component/BaseListBox.hxx
deleted file mode 100644
index 184acbad2..000000000
--- a/forms/source/component/BaseListBox.hxx
+++ /dev/null
@@ -1,45 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FORMS_BASELISTBOX_HXX_
-#define _FORMS_BASELISTBOX_HXX_
-
-//.........................................................................
-namespace frm
-{
-
-const sal_uInt16 ENTRY_NOT_FOUND = 0xFFFF;
-const sal_uInt16 BOUNDCOLUMN = 0x0001;
-
-//.........................................................................
-}
-//.........................................................................
-
-#endif // _FORMS_BASELISTBOX_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Button.cxx b/forms/source/component/Button.cxx
deleted file mode 100644
index 44cc3474c..000000000
--- a/forms/source/component/Button.cxx
+++ /dev/null
@@ -1,781 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-
-#include "Button.hxx"
-
-#include <com/sun/star/awt/XVclWindowPeer.hpp>
-
-#include <comphelper/streamsection.hxx>
-#include <comphelper/basicio.hxx>
-#include <tools/diagnose_ex.h>
-#include <tools/debug.hxx>
-#include <tools/urlobj.hxx>
-#include <vcl/svapp.hxx>
-#include <osl/mutex.hxx>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::sdb;
-using namespace ::com::sun::star::sdbc;
-using namespace ::com::sun::star::sdbcx;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::io;
-using namespace ::com::sun::star::lang;
-using namespace ::com::sun::star::util;
-using ::com::sun::star::frame::XDispatchProviderInterceptor;
-
-//==================================================================
-//= OButtonModel
-//==================================================================
-DBG_NAME(OButtonModel)
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OButtonModel_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new OButtonModel(_rxFactory));
-}
-
-//------------------------------------------------------------------
-OButtonModel::OButtonModel(const Reference<XMultiServiceFactory>& _rxFactory)
- :OClickableImageBaseModel( _rxFactory, VCL_CONTROLMODEL_COMMANDBUTTON, FRM_SUN_CONTROL_COMMANDBUTTON )
- // use the old control name for compatibility reasons
- ,m_aResetHelper( *this, m_aMutex )
- ,m_eDefaultState( STATE_NOCHECK )
-{
- DBG_CTOR( OButtonModel, NULL );
- m_nClassId = FormComponentType::COMMANDBUTTON;
-}
-
-//------------------------------------------------------------------
-Any SAL_CALL OButtonModel::queryAggregation( const Type& _type ) throw(RuntimeException)
-{
- Any aReturn = OClickableImageBaseModel::queryAggregation( _type );
- if ( !aReturn.hasValue() )
- aReturn = OButtonModel_Base::queryInterface( _type );
- return aReturn;
-}
-
-//------------------------------------------------------------------
-Sequence< Type > OButtonModel::_getTypes()
-{
- return ::comphelper::concatSequences(
- OClickableImageBaseModel::_getTypes(),
- OButtonModel_Base::getTypes()
- );
-}
-
-//------------------------------------------------------------------
-OButtonModel::OButtonModel( const OButtonModel* _pOriginal, const Reference<XMultiServiceFactory>& _rxFactory )
- :OClickableImageBaseModel( _pOriginal, _rxFactory )
- ,m_aResetHelper( *this, m_aMutex )
- ,m_eDefaultState( _pOriginal->m_eDefaultState )
-{
- DBG_CTOR( OButtonModel, NULL );
- m_nClassId = FormComponentType::COMMANDBUTTON;
-
- implInitializeImageURL();
-}
-
-//------------------------------------------------------------------------------
-OButtonModel::~OButtonModel()
-{
- DBG_DTOR(OButtonModel, NULL);
-}
-
-//------------------------------------------------------------------------------
-void OButtonModel::describeFixedProperties( Sequence< Property >& _rProps ) const
-{
- BEGIN_DESCRIBE_PROPERTIES( 6, OClickableImageBaseModel )
- DECL_PROP1( BUTTONTYPE, FormButtonType, BOUND );
- DECL_PROP1( DEFAULT_STATE, sal_Int16, BOUND );
- DECL_PROP1( DISPATCHURLINTERNAL, sal_Bool, BOUND );
- DECL_PROP1( TARGET_URL, ::rtl::OUString, BOUND );
- DECL_PROP1( TARGET_FRAME, ::rtl::OUString, BOUND );
- DECL_PROP1( TABINDEX, sal_Int16, BOUND );
- END_DESCRIBE_PROPERTIES();
-}
-
-//------------------------------------------------------------------------------
-IMPLEMENT_DEFAULT_CLONING( OButtonModel )
-
-// XServiceInfo
-//------------------------------------------------------------------------------
-StringSequence OButtonModel::getSupportedServiceNames() throw()
-{
- StringSequence aSupported = OClickableImageBaseModel::getSupportedServiceNames();
- aSupported.realloc( aSupported.getLength() + 1 );
-
- ::rtl::OUString* pArray = aSupported.getArray();
- pArray[ aSupported.getLength() - 1 ] = FRM_SUN_COMPONENT_COMMANDBUTTON;
-
- return aSupported;
-}
-
-//------------------------------------------------------------------------------
-::rtl::OUString OButtonModel::getServiceName() throw ( ::com::sun::star::uno::RuntimeException)
-{
- return FRM_COMPONENT_COMMANDBUTTON; // old (non-sun) name for compatibility !
-}
-
-//------------------------------------------------------------------------------
-void OButtonModel::write(const Reference<XObjectOutputStream>& _rxOutStream) throw (::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException)
-{
- OClickableImageBaseModel::write(_rxOutStream);
-
- _rxOutStream->writeShort(0x0003); // Version
-
- {
- OStreamSection aSection( _rxOutStream.get() );
- // this will allow readers to skip unknown bytes in their dtor
-
- _rxOutStream->writeShort( (sal_uInt16)m_eButtonType );
-
- ::rtl::OUString sTmp = INetURLObject::decode( m_sTargetURL, '%', INetURLObject::DECODE_UNAMBIGUOUS);
- _rxOutStream << sTmp;
- _rxOutStream << m_sTargetFrame;
- writeHelpTextCompatibly(_rxOutStream);
- _rxOutStream << isDispatchUrlInternal();
- }
-}
-
-//------------------------------------------------------------------------------
-void OButtonModel::read(const Reference<XObjectInputStream>& _rxInStream) throw (::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException)
-{
- OClickableImageBaseModel::read(_rxInStream);
-
- sal_uInt16 nVersion = _rxInStream->readShort(); // Version
- switch (nVersion)
- {
- case 0x0001:
- {
- m_eButtonType = (FormButtonType)_rxInStream->readShort();
-
- _rxInStream >> m_sTargetURL;
- _rxInStream >> m_sTargetFrame;
- }
- break;
-
- case 0x0002:
- {
- m_eButtonType = (FormButtonType)_rxInStream->readShort();
-
- _rxInStream >> m_sTargetURL;
- _rxInStream >> m_sTargetFrame;
- readHelpTextCompatibly(_rxInStream);
- }
- break;
-
- case 0x0003:
- {
- OStreamSection aSection( _rxInStream.get() );
- // this will skip any unknown bytes in it's dtor
-
- // button type
- m_eButtonType = (FormButtonType)_rxInStream->readShort();
-
- // URL
- _rxInStream >> m_sTargetURL;
-
- // target frame
- _rxInStream >> m_sTargetFrame;
-
- // help text
- readHelpTextCompatibly(_rxInStream);
-
- // DispatchInternal
- sal_Bool bDispath;
- _rxInStream >> bDispath;
- setDispatchUrlInternal(bDispath);
- }
- break;
-
- default:
- OSL_FAIL("OButtonModel::read : unknown version !");
- m_eButtonType = FormButtonType_PUSH;
- m_sTargetURL = ::rtl::OUString();
- m_sTargetFrame = ::rtl::OUString();
- break;
- }
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OButtonModel::disposing()
-{
- m_aResetHelper.disposing();
- OClickableImageBaseModel::disposing();
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OButtonModel::reset() throw (RuntimeException)
-{
- if ( !m_aResetHelper.approveReset() )
- return;
-
- impl_resetNoBroadcast_nothrow();
-
- m_aResetHelper.notifyResetted();
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OButtonModel::addResetListener( const Reference< XResetListener >& _listener ) throw (RuntimeException)
-{
- m_aResetHelper.addResetListener( _listener );
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OButtonModel::removeResetListener( const Reference< XResetListener >& _listener ) throw (RuntimeException)
-{
- m_aResetHelper.removeResetListener( _listener );
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OButtonModel::getFastPropertyValue( Any& _rValue, sal_Int32 _nHandle ) const
-{
- switch ( _nHandle )
- {
- case PROPERTY_ID_DEFAULT_STATE:
- _rValue <<= (sal_Int16)m_eDefaultState;
- break;
-
- default:
- OClickableImageBaseModel::getFastPropertyValue( _rValue, _nHandle );
- break;
- }
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OButtonModel::setFastPropertyValue_NoBroadcast( sal_Int32 _nHandle, const Any& _rValue ) throw (Exception)
-{
- switch ( _nHandle )
- {
- case PROPERTY_ID_DEFAULT_STATE:
- {
- sal_Int16 nDefaultState( (sal_Int16)STATE_NOCHECK );
- OSL_VERIFY( _rValue >>= nDefaultState );
- m_eDefaultState = (ToggleState)nDefaultState;
- impl_resetNoBroadcast_nothrow();
- }
- break;
-
- default:
- OClickableImageBaseModel::setFastPropertyValue_NoBroadcast( _nHandle, _rValue );
- break;
- }
-}
-
-//--------------------------------------------------------------------
-sal_Bool SAL_CALL OButtonModel::convertFastPropertyValue( Any& _rConvertedValue, Any& _rOldValue, sal_Int32 _nHandle, const Any& _rValue ) throw (IllegalArgumentException)
-{
- sal_Bool bModified = sal_False;
- switch ( _nHandle )
- {
- case PROPERTY_ID_DEFAULT_STATE:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, (sal_Int16)m_eDefaultState );
- break;
-
- default:
- bModified = OClickableImageBaseModel::convertFastPropertyValue( _rConvertedValue, _rOldValue, _nHandle, _rValue );
- break;
- }
- return bModified;
-}
-
-//--------------------------------------------------------------------
-Any OButtonModel::getPropertyDefaultByHandle( sal_Int32 _nHandle ) const
-{
- Any aDefault;
- switch ( _nHandle )
- {
- case PROPERTY_ID_DEFAULT_STATE:
- aDefault <<= (sal_Int16)STATE_NOCHECK;
- break;
-
- default:
- aDefault = OClickableImageBaseModel::getPropertyDefaultByHandle( _nHandle );
- break;
- }
- return aDefault;
-}
-
-//--------------------------------------------------------------------
-void OButtonModel::impl_resetNoBroadcast_nothrow()
-{
- try
- {
- setPropertyValue( PROPERTY_STATE, getPropertyValue( PROPERTY_DEFAULT_STATE ) );
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
-}
-
-//==================================================================
-// OButtonControl
-//==================================================================
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OButtonControl_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new OButtonControl(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> OButtonControl::_getTypes()
-{
- return ::comphelper::concatSequences(
- OButtonControl_BASE::getTypes(),
- OClickableImageBaseControl::_getTypes(),
- OFormNavigationHelper::getTypes()
- );
-}
-
-//------------------------------------------------------------------------------
-StringSequence OButtonControl::getSupportedServiceNames() throw()
-{
- StringSequence aSupported = OClickableImageBaseControl::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 1);
-
- ::rtl::OUString*pArray = aSupported.getArray();
- pArray[aSupported.getLength()-1] = FRM_SUN_CONTROL_COMMANDBUTTON;
- return aSupported;
-}
-
-//------------------------------------------------------------------------------
-OButtonControl::OButtonControl(const Reference<XMultiServiceFactory>& _rxFactory)
- :OClickableImageBaseControl(_rxFactory, VCL_CONTROL_COMMANDBUTTON)
- ,OFormNavigationHelper( _rxFactory )
- ,m_nClickEvent( 0 )
- ,m_nTargetUrlFeatureId( -1 )
- ,m_bEnabledByPropertyValue( sal_False )
-{
- increment(m_refCount);
- {
- // als ActionListener anmelden
- Reference<XButton> xButton;
- query_aggregation( m_xAggregate, xButton);
- if (xButton.is())
- xButton->addActionListener(this);
- }
- // Refcount bei 1 fuer Listener
- decrement(m_refCount);
-}
-
-//------------------------------------------------------------------------------
-OButtonControl::~OButtonControl()
-{
- if (m_nClickEvent)
- Application::RemoveUserEvent(m_nClickEvent);
-}
-
-// UNO Anbindung
-//------------------------------------------------------------------------------
-Any SAL_CALL OButtonControl::queryAggregation(const Type& _rType) throw (RuntimeException)
-{
- // if asked for the XTypeProvider, don't let OButtonControl_BASE do this
- Any aReturn;
- if ( !_rType.equals( ::getCppuType( static_cast< Reference< XTypeProvider >* >( NULL ) ) ) )
- aReturn = OButtonControl_BASE::queryInterface( _rType );
-
- if ( !aReturn.hasValue() )
- aReturn = OClickableImageBaseControl::queryAggregation( _rType );
-
- if ( !aReturn.hasValue() )
- aReturn = OFormNavigationHelper::queryInterface( _rType );
-
- return aReturn;
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OButtonControl::disposing()
-{
- startOrStopModelPropertyListening( false );
-
- OClickableImageBaseControl::disposing();
- OFormNavigationHelper::dispose();
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OButtonControl::disposing( const EventObject& _rSource ) throw( RuntimeException )
-{
- OControl::disposing( _rSource );
- OFormNavigationHelper::disposing( _rSource );
-}
-
-// ActionListener
-//------------------------------------------------------------------------------
-void OButtonControl::actionPerformed(const ActionEvent& /*rEvent*/) throw ( ::com::sun::star::uno::RuntimeException)
-{
- // Asynchron fuer starutil::URL-Button
- sal_uLong n = Application::PostUserEvent( LINK(this, OButtonControl,OnClick) );
- {
- ::osl::MutexGuard aGuard( m_aMutex );
- m_nClickEvent = n;
- }
-}
-
-//------------------------------------------------------------------------------
-IMPL_LINK( OButtonControl, OnClick, void*, EMPTYARG )
-{
- ::osl::ClearableMutexGuard aGuard( m_aMutex );
- m_nClickEvent = 0;
-
- if (m_aApproveActionListeners.getLength())
- {
- // if there are listeners, start the action in an own thread, to not allow
- // them to block us here (we're in the application's main thread)
- getImageProducerThread()->addEvent();
- }
- else
- {
- // Sonst nicht. Dann darf man aber auf keinen Fal die Listener
- // benachrichtigen, auch dann nicht, wenn er spaeter hinzukommt.
- aGuard.clear();
-
- // recognize the button type
- Reference<XPropertySet> xSet(getModel(), UNO_QUERY);
- if (!xSet.is())
- return 0L;
-
- if (FormButtonType_PUSH == *(FormButtonType*)xSet->getPropertyValue(PROPERTY_BUTTONTYPE).getValue())
- {
- // notify the action listeners for a push button
- ::cppu::OInterfaceIteratorHelper aIter(m_aActionListeners);
- ActionEvent aEvt(static_cast<XWeak*>(this), m_aActionCommand);
- while(aIter.hasMoreElements() )
- {
- // catch exceptions
- // and catch them on a per-listener basis - if one listener fails, the others still need
- // to get notified
- try
- {
- static_cast< XActionListener* >( aIter.next() )->actionPerformed(aEvt);
- }
-#ifdef DBG_UTIL
- catch( const RuntimeException& )
- {
- // silent this
- }
-#endif
- catch( const Exception& )
- {
- OSL_FAIL( "OButtonControl::OnClick: caught a exception other than RuntimeException!" );
- }
- }
- }
- else
- actionPerformed_Impl( sal_False, ::com::sun::star::awt::MouseEvent() );
- }
- return 0L;
-}
-
-//------------------------------------------------------------------------------
-void OButtonControl::actionPerformed_Impl( sal_Bool _bNotifyListener, const ::com::sun::star::awt::MouseEvent& _rEvt )
-{
- {
- sal_Int16 nFeatureId = -1;
- {
- ::osl::MutexGuard aGuard( m_aMutex );
- nFeatureId = m_nTargetUrlFeatureId;
- }
-
- if ( nFeatureId != -1 )
- {
- if ( !approveAction() )
- return;
-
- SolarMutexGuard aGuard;
- dispatch( nFeatureId );
- return;
- }
- }
-
- OClickableImageBaseControl::actionPerformed_Impl( _bNotifyListener, _rEvt );
-}
-
-// XButton
-//------------------------------------------------------------------------------
-void OButtonControl::setLabel(const ::rtl::OUString& Label) throw( RuntimeException )
-{
- Reference<XButton> xButton;
- query_aggregation( m_xAggregate, xButton );
- if (xButton.is())
- xButton->setLabel(Label);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OButtonControl::setActionCommand(const ::rtl::OUString& _rCommand) throw( RuntimeException )
-{
- {
- ::osl::MutexGuard aGuard( m_aMutex );
- m_aActionCommand = _rCommand;
- }
-
- Reference<XButton> xButton;
- query_aggregation( m_xAggregate, xButton);
- if (xButton.is())
- xButton->setActionCommand(_rCommand);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OButtonControl::addActionListener(const Reference<XActionListener>& _rxListener) throw( RuntimeException )
-{
- m_aActionListeners.addInterface(_rxListener);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OButtonControl::removeActionListener(const Reference<XActionListener>& _rxListener) throw( RuntimeException )
-{
- m_aActionListeners.removeInterface(_rxListener);
-}
-
-//------------------------------------------------------------------------------
-class DoPropertyListening
-{
-private:
- Reference< XPropertySet > m_xProps;
- Reference< XPropertyChangeListener > m_xListener;
- bool m_bStartListening;
-
-public:
- DoPropertyListening(
- const Reference< XInterface >& _rxComponent,
- const Reference< XPropertyChangeListener >& _rxListener,
- bool _bStart
- );
-
- void handleListening( const ::rtl::OUString& _rPropertyName );
-};
-
-//..............................................................................
-DoPropertyListening::DoPropertyListening(
- const Reference< XInterface >& _rxComponent, const Reference< XPropertyChangeListener >& _rxListener,
- bool _bStart )
- :m_xProps( _rxComponent, UNO_QUERY )
- ,m_xListener( _rxListener )
- ,m_bStartListening( _bStart )
-{
- DBG_ASSERT( m_xProps.is() || !_rxComponent.is(), "DoPropertyListening::DoPropertyListening: valid component, but no property set!" );
- DBG_ASSERT( m_xListener.is(), "DoPropertyListening::DoPropertyListening: invalid listener!" );
-}
-
-//..............................................................................
-void DoPropertyListening::handleListening( const ::rtl::OUString& _rPropertyName )
-{
- if ( m_xProps.is() )
- {
- if ( m_bStartListening )
- m_xProps->addPropertyChangeListener( _rPropertyName, m_xListener );
- else
- m_xProps->removePropertyChangeListener( _rPropertyName, m_xListener );
- }
-}
-
-//------------------------------------------------------------------------------
-void OButtonControl::startOrStopModelPropertyListening( bool _bStart )
-{
- DoPropertyListening aListeningHandler( getModel(), this, _bStart );
- aListeningHandler.handleListening( PROPERTY_TARGET_URL );
- aListeningHandler.handleListening( PROPERTY_BUTTONTYPE );
- aListeningHandler.handleListening( PROPERTY_ENABLED );
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL OButtonControl::setModel( const Reference< XControlModel >& _rxModel ) throw ( RuntimeException )
-{
- startOrStopModelPropertyListening( false );
- sal_Bool bResult = OClickableImageBaseControl::setModel( _rxModel );
- startOrStopModelPropertyListening( true );
-
- m_bEnabledByPropertyValue = sal_True;
- Reference< XPropertySet > xModelProps( _rxModel, UNO_QUERY );
- if ( xModelProps.is() )
- xModelProps->getPropertyValue( PROPERTY_ENABLED ) >>= m_bEnabledByPropertyValue;
-
- modelFeatureUrlPotentiallyChanged( );
-
- return bResult;
-}
-
-//------------------------------------------------------------------------------
-void OButtonControl::modelFeatureUrlPotentiallyChanged( )
-{
- sal_Int16 nOldUrlFeatureId = m_nTargetUrlFeatureId;
-
- // doe we have another TargetURL now? If so, we need to update our dispatches
- m_nTargetUrlFeatureId = getModelUrlFeatureId( );
- if ( nOldUrlFeatureId != m_nTargetUrlFeatureId )
- {
- invalidateSupportedFeaturesSet();
- if ( !isDesignMode() )
- updateDispatches( );
- }
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OButtonControl::propertyChange( const PropertyChangeEvent& _rEvent ) throw ( RuntimeException )
-{
- if ( _rEvent.PropertyName.equals( PROPERTY_TARGET_URL )
- || _rEvent.PropertyName.equals( PROPERTY_BUTTONTYPE )
- )
- {
- modelFeatureUrlPotentiallyChanged( );
- }
- else if ( _rEvent.PropertyName.equals( PROPERTY_ENABLED ) )
- {
- _rEvent.NewValue >>= m_bEnabledByPropertyValue;
- }
-}
-
-//------------------------------------------------------------------------------
-namespace
-{
- bool isFormControllerURL( const ::rtl::OUString& _rURL )
- {
- const sal_Int32 nPrefixLen = URL_CONTROLLER_PREFIX.length;
- return ( _rURL.getLength() > nPrefixLen )
- && ( _rURL.compareToAscii( URL_CONTROLLER_PREFIX, nPrefixLen ) == 0 );
- }
-}
-
-//------------------------------------------------------------------------------
-sal_Int16 OButtonControl::getModelUrlFeatureId( ) const
-{
- sal_Int16 nFeatureId = -1;
-
- // some URL related properties of the model
- ::rtl::OUString sUrl;
- FormButtonType eButtonType = FormButtonType_PUSH;
-
- Reference< XPropertySet > xModelProps( const_cast< OButtonControl* >( this )->getModel(), UNO_QUERY );
- if ( xModelProps.is() )
- {
- xModelProps->getPropertyValue( PROPERTY_TARGET_URL ) >>= sUrl;
- xModelProps->getPropertyValue( PROPERTY_BUTTONTYPE ) >>= eButtonType;
- }
-
- // are we an URL button?
- if ( eButtonType == FormButtonType_URL )
- {
- // is it a feature URL?
- if ( isFormControllerURL( sUrl ) )
- {
- OFormNavigationMapper aMapper( m_aContext.getLegacyServiceFactory() );
- nFeatureId = aMapper.getFeatureId( sUrl );
- }
- }
-
- return nFeatureId;
-}
-
-//------------------------------------------------------------------
-void SAL_CALL OButtonControl::setDesignMode( sal_Bool _bOn ) throw( RuntimeException )
-{
- OClickableImageBaseControl::setDesignMode( _bOn );
-
- if ( _bOn )
- disconnectDispatchers();
- else
- connectDispatchers();
- // this will connect if not already connected and just update else
-}
-
-//------------------------------------------------------------------------------
-void OButtonControl::getSupportedFeatures( ::std::vector< sal_Int16 >& /* [out] */ _rFeatureIds )
-{
- if ( -1 != m_nTargetUrlFeatureId )
- _rFeatureIds.push_back( m_nTargetUrlFeatureId );
-}
-
-//------------------------------------------------------------------
-void OButtonControl::featureStateChanged( sal_Int16 _nFeatureId, sal_Bool _bEnabled )
-{
- if ( _nFeatureId == m_nTargetUrlFeatureId )
- {
- // enable or disable our peer, according to the new state
- Reference< XVclWindowPeer > xPeer( getPeer(), UNO_QUERY );
- if ( xPeer.is() )
- xPeer->setProperty( PROPERTY_ENABLED, makeAny( m_bEnabledByPropertyValue ? _bEnabled : sal_False ) );
- // if we're disabled according to our model's property, then
- // we don't care for the feature state, but *are* disabled.
- // If the model's property states that we're enabled, then we *do*
- // care for the feature state
- }
-
- // base class
- OFormNavigationHelper::featureStateChanged( _nFeatureId, _bEnabled );
-}
-
-//------------------------------------------------------------------
-void OButtonControl::allFeatureStatesChanged( )
-{
- if ( -1 != m_nTargetUrlFeatureId )
- // we have only one supported feature, so simulate it has changed ...
- featureStateChanged( m_nTargetUrlFeatureId, isEnabled( m_nTargetUrlFeatureId ) );
-
- // base class
- OFormNavigationHelper::allFeatureStatesChanged( );
-}
-
-//------------------------------------------------------------------
-bool OButtonControl::isEnabled( sal_Int16 _nFeatureId ) const
-{
- if ( const_cast< OButtonControl* >( this )->isDesignMode() )
- // TODO: the model property?
- return true;
-
- return OFormNavigationHelper::isEnabled( _nFeatureId );
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OButtonControl::registerDispatchProviderInterceptor( const Reference< XDispatchProviderInterceptor >& _rxInterceptor ) throw (RuntimeException)
-{
- OClickableImageBaseControl::registerDispatchProviderInterceptor( _rxInterceptor );
- OFormNavigationHelper::registerDispatchProviderInterceptor( _rxInterceptor );
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OButtonControl::releaseDispatchProviderInterceptor( const Reference< XDispatchProviderInterceptor >& _rxInterceptor ) throw (RuntimeException)
-{
- OClickableImageBaseControl::releaseDispatchProviderInterceptor( _rxInterceptor );
- OFormNavigationHelper::releaseDispatchProviderInterceptor( _rxInterceptor );
-}
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Button.hxx b/forms/source/component/Button.hxx
deleted file mode 100644
index b7a547637..000000000
--- a/forms/source/component/Button.hxx
+++ /dev/null
@@ -1,212 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FRM_BUTTON_HXX_
-#define _FRM_BUTTON_HXX_
-
-#include "clickableimage.hxx"
-#include "togglestate.hxx"
-#include "formnavigation.hxx"
-#include "resettable.hxx"
-
-#include <com/sun/star/awt/MouseEvent.hpp>
-#include <com/sun/star/lang/EventObject.hpp>
-#include <com/sun/star/awt/ActionEvent.hpp>
-#include <com/sun/star/awt/XActionListener.hpp>
-#include <com/sun/star/awt/XButton.hpp>
-#include <com/sun/star/form/XReset.hpp>
-#include <com/sun/star/beans/PropertyChangeEvent.hpp>
-
-#include <cppuhelper/implbase1.hxx>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
-//==================================================================
-// OButtonModel
-//==================================================================
-typedef ::cppu::ImplHelper1 < ::com::sun::star::form::XReset
- > OButtonModel_Base;
-class OButtonModel :public OClickableImageBaseModel
- ,public OButtonModel_Base
-{
-public:
- DECLARE_DEFAULT_LEAF_XTOR( OButtonModel );
-
- // UNO
- DECLARE_UNO3_AGG_DEFAULTS( OButtonModel, OClickableImageBaseModel );
- virtual ::com::sun::star::uno::Any SAL_CALL queryAggregation( const ::com::sun::star::uno::Type& _rType ) throw(::com::sun::star::uno::RuntimeException);
-
- ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
-// ::com::sun::star::lang::XServiceInfo
- IMPLEMENTATION_NAME(OButtonModel);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw();
-
-// ::com::sun::star::io::XPersistObject
- virtual ::rtl::OUString SAL_CALL getServiceName() throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL write(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectOutputStream>& _rxOutStream) throw (::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL read(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectInputStream>& _rxInStream) throw (::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
-
- // XReset
- virtual void SAL_CALL reset( ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL addResetListener( const ::com::sun::star::uno::Reference< ::com::sun::star::form::XResetListener >& aListener ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeResetListener( const ::com::sun::star::uno::Reference< ::com::sun::star::form::XResetListener >& aListener ) throw (::com::sun::star::uno::RuntimeException);
-
- // OControlModel's property handling
- virtual void describeFixedProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
-
- // XPropertySet and friends
- virtual void SAL_CALL getFastPropertyValue(::com::sun::star::uno::Any& rValue, sal_Int32 nHandle) const;
- virtual void SAL_CALL setFastPropertyValue_NoBroadcast( sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue )
- throw (::com::sun::star::uno::Exception);
- virtual sal_Bool SAL_CALL convertFastPropertyValue(
- ::com::sun::star::uno::Any& _rConvertedValue, ::com::sun::star::uno::Any& _rOldValue, sal_Int32 _nHandle, const ::com::sun::star::uno::Any& _rValue )
- throw (::com::sun::star::lang::IllegalArgumentException);
- virtual ::com::sun::star::uno::Any getPropertyDefaultByHandle( sal_Int32 nHandle ) const;
-
- // OComponentHelper
- virtual void SAL_CALL disposing();
-
-protected:
- DECLARE_XCLONEABLE();
-
-private:
- void impl_resetNoBroadcast_nothrow();
-
- using ::cppu::OPropertySetHelper::getFastPropertyValue;
-
-private:
- ResetHelper m_aResetHelper;
-
- // <properties>
- ToggleState m_eDefaultState; // the default check state
- // </properties>
-protected:
- using OClickableImageBaseModel::disposing;
-};
-
-//==================================================================
-// OButtonControl
-//==================================================================
-typedef ::cppu::ImplHelper3 < ::com::sun::star::awt::XButton
- , ::com::sun::star::awt::XActionListener
- , ::com::sun::star::beans::XPropertyChangeListener
- > OButtonControl_BASE;
-
-class OButtonControl :public OButtonControl_BASE
- ,public OClickableImageBaseControl
- ,public OFormNavigationHelper
-{
-private:
- sal_uLong m_nClickEvent;
- sal_Int16 m_nTargetUrlFeatureId;
- /// caches the value of the "Enabled" property of our model
- sal_Bool m_bEnabledByPropertyValue;
-
-protected:
-
- // UNO Anbindung
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
-public:
- OButtonControl(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory);
- virtual ~OButtonControl();
-
- // XServiceInfo
- IMPLEMENTATION_NAME(OButtonControl);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw();
-
- // UNO Anbindung
- DECLARE_UNO3_AGG_DEFAULTS(OButtonControl, OClickableImageBaseControl);
- virtual ::com::sun::star::uno::Any SAL_CALL queryAggregation(const ::com::sun::star::uno::Type& _rType) throw(::com::sun::star::uno::RuntimeException);
-
- // XActionListener
- virtual void SAL_CALL actionPerformed(const ::com::sun::star::awt::ActionEvent& rEvent) throw ( ::com::sun::star::uno::RuntimeException);
-
- // XButton
- virtual void SAL_CALL addActionListener(const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XActionListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeActionListener(const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XActionListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setLabel(const ::rtl::OUString& Label) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setActionCommand(const ::rtl::OUString& _rCommand) throw(::com::sun::star::uno::RuntimeException);
-
- // OComponentHelper
- virtual void SAL_CALL disposing();
-
- // XPropertyChangeListener
- virtual void SAL_CALL propertyChange( const ::com::sun::star::beans::PropertyChangeEvent& evt ) throw(::com::sun::star::uno::RuntimeException);
-
- // XEventListener
- virtual void SAL_CALL disposing(const ::com::sun::star::lang::EventObject& _rSource) throw(::com::sun::star::uno::RuntimeException);
-
- // XControl
- virtual sal_Bool SAL_CALL setModel( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControlModel >& _rxModel ) throw ( ::com::sun::star::uno::RuntimeException );
- void SAL_CALL setDesignMode(sal_Bool bOn) throw (::com::sun::star::uno::RuntimeException);
-
-protected:
- // OFormNavigationHelper overriables
- virtual void getSupportedFeatures( ::std::vector< sal_Int16 >& /* [out] */ _rFeatureIds );
- virtual void featureStateChanged( sal_Int16 _nFeatureId, sal_Bool _bEnabled );
- virtual void allFeatureStatesChanged( );
- virtual bool isEnabled( sal_Int16 _nFeatureId ) const;
-
- // XDispatchProviderInterception disambiguaiton
- virtual void SAL_CALL registerDispatchProviderInterceptor( const ::com::sun::star::uno::Reference< ::com::sun::star::frame::XDispatchProviderInterceptor >& Interceptor ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL releaseDispatchProviderInterceptor( const ::com::sun::star::uno::Reference< ::com::sun::star::frame::XDispatchProviderInterceptor >& Interceptor ) throw (::com::sun::star::uno::RuntimeException);
-
- // OImageControl overridables
- virtual void actionPerformed_Impl( sal_Bool bNotifyListener, const ::com::sun::star::awt::MouseEvent& _rEvt );
-
-private:
- DECL_LINK( OnClick, void* );
-
- /** to be called whenever the feature URL represented by our model has potentially changed
- */
- void modelFeatureUrlPotentiallyChanged( );
-
- /** retrieves the feature id (see OFormNavigationHelper) of the TargetURL of
- the model.
- */
- sal_Int16 getModelUrlFeatureId( ) const;
-
- /** starts or stops listening for changes in model properties we're interested in
- */
- void startOrStopModelPropertyListening( bool _bStart );
-};
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-#endif // _FRM_BUTTON_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/CheckBox.cxx b/forms/source/component/CheckBox.cxx
deleted file mode 100644
index 45964f2b2..000000000
--- a/forms/source/component/CheckBox.cxx
+++ /dev/null
@@ -1,275 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "CheckBox.hxx"
-#include "property.hxx"
-#include "property.hrc"
-#include "services.hxx"
-#include <tools/debug.hxx>
-#include <comphelper/basicio.hxx>
-
-//.........................................................................
-namespace frm
-{
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::sdb;
-using namespace ::com::sun::star::sdbc;
-using namespace ::com::sun::star::sdbcx;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::io;
-using namespace ::com::sun::star::lang;
-using namespace ::com::sun::star::util;
-using namespace ::com::sun::star::form::binding;
-
-//==================================================================
-//= OCheckBoxControl
-//==================================================================
-
-//------------------------------------------------------------------
-OCheckBoxControl::OCheckBoxControl(const Reference<XMultiServiceFactory>& _rxFactory)
- :OBoundControl(_rxFactory, VCL_CONTROL_CHECKBOX)
-{
-}
-
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OCheckBoxControl_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory) throw (RuntimeException)
-{
- return *(new OCheckBoxControl(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-StringSequence SAL_CALL OCheckBoxControl::getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException)
-{
- StringSequence aSupported = OBoundControl::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 1);
-
- ::rtl::OUString* pArray = aSupported.getArray();
- pArray[aSupported.getLength()-1] = FRM_SUN_CONTROL_CHECKBOX;
- return aSupported;
-}
-
-//==================================================================
-//= OCheckBoxModel
-//==================================================================
-
-//==================================================================
-InterfaceRef SAL_CALL OCheckBoxModel_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory) throw (RuntimeException)
-{
- return *(new OCheckBoxModel(_rxFactory));
-}
-
-//------------------------------------------------------------------
-DBG_NAME( OCheckBoxModel )
-//------------------------------------------------------------------
-OCheckBoxModel::OCheckBoxModel(const Reference<XMultiServiceFactory>& _rxFactory)
- :OReferenceValueComponent( _rxFactory, VCL_CONTROLMODEL_CHECKBOX, FRM_SUN_CONTROL_CHECKBOX, sal_True )
- // use the old control name for compytibility reasons
-{
- DBG_CTOR( OCheckBoxModel, NULL );
-
- m_nClassId = FormComponentType::CHECKBOX;
- initValueProperty( PROPERTY_STATE, PROPERTY_ID_STATE );
-}
-
-//------------------------------------------------------------------
-OCheckBoxModel::OCheckBoxModel( const OCheckBoxModel* _pOriginal, const Reference<XMultiServiceFactory>& _rxFactory )
- :OReferenceValueComponent( _pOriginal, _rxFactory )
-{
- DBG_CTOR( OCheckBoxModel, NULL );
-}
-
-//------------------------------------------------------------------------------
-OCheckBoxModel::~OCheckBoxModel()
-{
- DBG_DTOR( OCheckBoxModel, NULL );
-}
-
-//------------------------------------------------------------------------------
-IMPLEMENT_DEFAULT_CLONING( OCheckBoxModel )
-
-// XServiceInfo
-//------------------------------------------------------------------------------
-StringSequence SAL_CALL OCheckBoxModel::getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException)
-{
- StringSequence aSupported = OReferenceValueComponent::getSupportedServiceNames();
-
- sal_Int32 nOldLen = aSupported.getLength();
- aSupported.realloc( nOldLen + 8 );
- ::rtl::OUString* pStoreTo = aSupported.getArray() + nOldLen;
-
- *pStoreTo++ = BINDABLE_CONTROL_MODEL;
- *pStoreTo++ = DATA_AWARE_CONTROL_MODEL;
- *pStoreTo++ = VALIDATABLE_CONTROL_MODEL;
-
- *pStoreTo++ = BINDABLE_DATA_AWARE_CONTROL_MODEL;
- *pStoreTo++ = VALIDATABLE_BINDABLE_CONTROL_MODEL;
-
- *pStoreTo++ = FRM_SUN_COMPONENT_CHECKBOX;
- *pStoreTo++ = FRM_SUN_COMPONENT_DATABASE_CHECKBOX;
- *pStoreTo++ = BINDABLE_DATABASE_CHECK_BOX;
-
- return aSupported;
-}
-
-//------------------------------------------------------------------------------
-void OCheckBoxModel::describeFixedProperties( Sequence< Property >& _rProps ) const
-{
- BEGIN_DESCRIBE_PROPERTIES( 1, OReferenceValueComponent )
- DECL_PROP1(TABINDEX, sal_Int16, BOUND);
- END_DESCRIBE_PROPERTIES();
-}
-
-//------------------------------------------------------------------------------
-::rtl::OUString SAL_CALL OCheckBoxModel::getServiceName() throw(RuntimeException)
-{
- return FRM_COMPONENT_CHECKBOX; // old (non-sun) name for compatibility !
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OCheckBoxModel::write(const Reference<stario::XObjectOutputStream>& _rxOutStream)
- throw(stario::IOException, RuntimeException)
-{
- OReferenceValueComponent::write(_rxOutStream);
-
- // Version
- _rxOutStream->writeShort(0x0003);
- // Properties
- _rxOutStream << getReferenceValue();
- _rxOutStream << (sal_Int16)getDefaultChecked();
- writeHelpTextCompatibly(_rxOutStream);
- // from version 0x0003 : common properties
- writeCommonProperties(_rxOutStream);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OCheckBoxModel::read(const Reference<stario::XObjectInputStream>& _rxInStream) throw(stario::IOException, RuntimeException)
-{
- OReferenceValueComponent::read(_rxInStream);
- osl::MutexGuard aGuard(m_aMutex);
-
- // Version
- sal_uInt16 nVersion = _rxInStream->readShort();
-
- ::rtl::OUString sReferenceValue;
- sal_Int16 nDefaultChecked( 0 );
- switch ( nVersion )
- {
- case 0x0001:
- _rxInStream >> sReferenceValue;
- nDefaultChecked = _rxInStream->readShort();
- break;
- case 0x0002:
- _rxInStream >> sReferenceValue;
- _rxInStream >> nDefaultChecked;
- readHelpTextCompatibly( _rxInStream );
- break;
- case 0x0003:
- _rxInStream >> sReferenceValue;
- _rxInStream >> nDefaultChecked;
- readHelpTextCompatibly(_rxInStream);
- readCommonProperties(_rxInStream);
- break;
- default:
- OSL_FAIL("OCheckBoxModel::read : unknown version !");
- defaultCommonProperties();
- break;
- }
- setReferenceValue( sReferenceValue );
- setDefaultChecked( static_cast< ToggleState >( nDefaultChecked ) );
-
- // Nach dem Lesen die Defaultwerte anzeigen
- if ( getControlSource().getLength() )
- // (not if we don't have a control source - the "State" property acts like it is persistent, then
- resetNoBroadcast();
-}
-
-//------------------------------------------------------------------------------
-Any OCheckBoxModel::translateDbColumnToControlValue()
-{
- Any aValue;
-
- //////////////////////////////////////////////////////////////////
- // Wert an ControlModel setzen
- sal_Bool bValue = m_xColumn->getBoolean();
- if ( m_xColumn->wasNull() )
- {
- sal_Bool bTriState = sal_True;
- if ( m_xAggregateSet.is() )
- m_xAggregateSet->getPropertyValue( PROPERTY_TRISTATE ) >>= bTriState;
- aValue <<= (sal_Int16)( bTriState ? STATE_DONTKNOW : getDefaultChecked() );
- }
- else
- aValue <<= (sal_Int16)( bValue ? STATE_CHECK : STATE_NOCHECK );
-
- return aValue;
-}
-
-//-----------------------------------------------------------------------------
-sal_Bool OCheckBoxModel::commitControlValueToDbColumn( bool /*_bPostReset*/ )
-{
- OSL_PRECOND( m_xColumnUpdate.is(), "OCheckBoxModel::commitControlValueToDbColumn: not bound!" );
- if ( m_xColumnUpdate.is() )
- {
- Any aControlValue( m_xAggregateSet->getPropertyValue( PROPERTY_STATE ) );
- try
- {
- sal_Int16 nValue = STATE_DONTKNOW;
- aControlValue >>= nValue;
- switch (nValue)
- {
- case STATE_DONTKNOW:
- m_xColumnUpdate->updateNull();
- break;
- case STATE_CHECK:
- m_xColumnUpdate->updateBoolean( sal_True );
- break;
- case STATE_NOCHECK:
- m_xColumnUpdate->updateBoolean( sal_False );
- break;
- default:
- OSL_FAIL("OCheckBoxModel::commitControlValueToDbColumn: invalid value !");
- }
- }
- catch(Exception&)
- {
- OSL_FAIL("OCheckBoxModel::commitControlValueToDbColumn: could not commit !");
- }
- }
- return sal_True;
-}
-
-//.........................................................................
-}
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/CheckBox.hxx b/forms/source/component/CheckBox.hxx
deleted file mode 100644
index 6ae342c40..000000000
--- a/forms/source/component/CheckBox.hxx
+++ /dev/null
@@ -1,93 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FORMS_CHECKBOX_HXX_
-#define _FORMS_CHECKBOX_HXX_
-
-#include "refvaluecomponent.hxx"
-
-//.........................................................................
-namespace frm
-{
-
-//==================================================================
-//= OCheckBoxModel
-//==================================================================
-class OCheckBoxModel :public OReferenceValueComponent
-{
-protected:
- sal_Int16 getState(const ::com::sun::star::uno::Any& rValue);
-
-public:
- DECLARE_DEFAULT_LEAF_XTOR( OCheckBoxModel );
-
- // XServiceInfo
- IMPLEMENTATION_NAME(OCheckBoxModel);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException);
-
- // XPersistObject
- virtual ::rtl::OUString SAL_CALL getServiceName() throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL
- write(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectOutputStream>& _rxOutStream) throw(::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL
- read(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectInputStream>& _rxInStream) throw(::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
-
- // OControlModel's property handling
- virtual void describeFixedProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
-
-protected:
- DECLARE_XCLONEABLE();
-
- // OBoundControlModel overridables
- virtual ::com::sun::star::uno::Any
- translateDbColumnToControlValue( );
- virtual sal_Bool commitControlValueToDbColumn( bool _bPostReset );
-};
-
-//==================================================================
-//= OCheckBoxControl
-//==================================================================
-class OCheckBoxControl : public OBoundControl
-{
-public:
- OCheckBoxControl(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory);
-
- // XServiceInfo
- IMPLEMENTATION_NAME(OCheckBoxControl);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException);
-};
-
-//.........................................................................
-}
-//.........................................................................
-
-#endif // _FORMS_CHECKBOX_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Columns.cxx b/forms/source/component/Columns.cxx
deleted file mode 100644
index c30c0a06e..000000000
--- a/forms/source/component/Columns.cxx
+++ /dev/null
@@ -1,602 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "Columns.hxx"
-#include "property.hrc"
-#include "property.hxx"
-#include "componenttools.hxx"
-#include "ids.hxx"
-#include "findpos.hxx"
-#include <com/sun/star/io/XPersistObject.hpp>
-#include <com/sun/star/io/XObjectOutputStream.hpp>
-#include <com/sun/star/io/XObjectInputStream.hpp>
-#include <com/sun/star/io/XMarkableStream.hpp>
-#include <com/sun/star/form/XFormComponent.hpp>
-#include <com/sun/star/lang/XServiceInfo.hpp>
-#include <com/sun/star/form/binding/XBindableValue.hpp>
-#include <com/sun/star/beans/XPropertyContainer.hpp>
-#include <com/sun/star/text/XText.hpp>
-#include <comphelper/sequence.hxx>
-#include <comphelper/property.hxx>
-#include <comphelper/basicio.hxx>
-#include <comphelper/types.hxx>
-#include <comphelper/servicehelper.hxx>
-#include "services.hxx"
-#include "frm_resource.hrc"
-#include <tools/debug.hxx>
-#include <rtl/memory.h>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::io;
-using namespace ::com::sun::star::lang;
-using namespace ::com::sun::star::util;
-using namespace ::com::sun::star::text;
-using namespace ::com::sun::star::form::binding;
-
-const sal_uInt16 WIDTH = 0x0001;
-const sal_uInt16 ALIGN = 0x0002;
-const sal_uInt16 OLD_HIDDEN = 0x0004;
-const sal_uInt16 COMPATIBLE_HIDDEN = 0x0008;
-
-//------------------------------------------------------------------------------
-const StringSequence& getColumnTypes()
-{
- static StringSequence aColumnTypes(10);
- if (!aColumnTypes.getConstArray()[0].getLength())
- {
- ::rtl::OUString* pNames = aColumnTypes.getArray();
- pNames[TYPE_CHECKBOX] = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "CheckBox" ) );
- pNames[TYPE_COMBOBOX] = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "ComboBox" ) );
- pNames[TYPE_CURRENCYFIELD] = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "CurrencyField" ) );
- pNames[TYPE_DATEFIELD] = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "DateField" ) );
- pNames[TYPE_FORMATTEDFIELD] = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "FormattedField" ) );
- pNames[TYPE_LISTBOX] = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "ListBox" ) );
- pNames[TYPE_NUMERICFIELD] = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "NumericField" ) );
- pNames[TYPE_PATTERNFIELD] = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "PatternField" ) );
- pNames[TYPE_TEXTFIELD] = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "TextField" ) );
- pNames[TYPE_TIMEFIELD] = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "TimeField" ) );
- }
- return aColumnTypes;
-}
-
-//------------------------------------------------------------------------------
-sal_Int32 getColumnTypeByModelName(const ::rtl::OUString& aModelName)
-{
- const ::rtl::OUString aModelPrefix (RTL_CONSTASCII_USTRINGPARAM("com.sun.star.form.component.") );
- const ::rtl::OUString aCompatibleModelPrefix (RTL_CONSTASCII_USTRINGPARAM("stardiv.one.form.component.") );
-
- sal_Int32 nTypeId = -1;
- if (aModelName == FRM_COMPONENT_EDIT)
- nTypeId = TYPE_TEXTFIELD;
- else
- {
- sal_Int32 nPrefixPos = aModelName.indexOf(aModelPrefix);
-#ifdef DBG_UTIL
- sal_Int32 nCompatiblePrefixPos = aModelName.indexOf(aCompatibleModelPrefix);
-#endif
- DBG_ASSERT( (nPrefixPos != -1) || (nCompatiblePrefixPos != -1),
- "::getColumnTypeByModelName() : wrong servivce !");
-
- ::rtl::OUString aColumnType = (nPrefixPos != -1)
- ? aModelName.copy(aModelPrefix.getLength())
- : aModelName.copy(aCompatibleModelPrefix.getLength());
-
- const StringSequence& rColumnTypes = getColumnTypes();
- nTypeId = ::detail::findPos(aColumnType, rColumnTypes);
- }
- return nTypeId;
-}
-
-/*************************************************************************/
-
-namespace
-{
- class theOGridColumnImplementationId : public rtl::Static< UnoTunnelIdInit, theOGridColumnImplementationId > {};
-}
-
-const Sequence<sal_Int8>& OGridColumn::getUnoTunnelImplementationId()
-{
- return theOGridColumnImplementationId::get().getSeq();
-}
-
-//------------------------------------------------------------------
-sal_Int64 SAL_CALL OGridColumn::getSomething( const Sequence<sal_Int8>& _rIdentifier) throw(RuntimeException)
-{
- sal_Int64 nReturn(0);
-
- if ( (_rIdentifier.getLength() == 16)
- && (0 == rtl_compareMemory( getUnoTunnelImplementationId().getConstArray(), _rIdentifier.getConstArray(), 16 ))
- )
- {
- nReturn = reinterpret_cast<sal_Int64>(this);
- }
- else
- {
- Reference< XUnoTunnel > xAggTunnel;
- if ( query_aggregation( m_xAggregate, xAggTunnel ) )
- return xAggTunnel->getSomething( _rIdentifier );
- }
- return nReturn;
-}
-
-//------------------------------------------------------------------
-Sequence<sal_Int8> SAL_CALL OGridColumn::getImplementationId() throw(RuntimeException)
-{
- return OImplementationIds::getImplementationId(getTypes());
-}
-
-//------------------------------------------------------------------
-Sequence<Type> SAL_CALL OGridColumn::getTypes() throw(RuntimeException)
-{
- TypeBag aTypes( OGridColumn_BASE::getTypes() );
- // erase the types which we do not support
- aTypes.removeType( XFormComponent::static_type() );
- aTypes.removeType( XServiceInfo::static_type() );
- aTypes.removeType( XBindableValue::static_type() );
- aTypes.removeType( XPropertyContainer::static_type() );
-
- // but re-add their base class(es)
- aTypes.addType( XChild::static_type() );
-
- Reference< XTypeProvider > xProv;
- if ( query_aggregation( m_xAggregate, xProv ))
- aTypes.addTypes( xProv->getTypes() );
-
- aTypes.removeType( XTextRange::static_type() );
- aTypes.removeType( XSimpleText::static_type() );
- aTypes.removeType( XText::static_type() );
-
- return aTypes.getTypes();
-}
-
-//------------------------------------------------------------------
-Any SAL_CALL OGridColumn::queryAggregation( const Type& _rType ) throw (RuntimeException)
-{
- Any aReturn;
- // some functionality at our aggregate cannot be reasonably fullfilled here.
- if ( _rType.equals(::getCppuType(static_cast< Reference< XFormComponent >* >(NULL)))
- || _rType.equals(::getCppuType(static_cast< Reference< XServiceInfo >* >(NULL)))
- || _rType.equals(::getCppuType(static_cast< Reference< XBindableValue >* >(NULL)))
- || _rType.equals(::getCppuType(static_cast< Reference< XPropertyContainer >* >(NULL)))
- || comphelper::isAssignableFrom(::getCppuType(static_cast< Reference< XTextRange >* >(NULL)),_rType)
- )
- return aReturn;
-
- aReturn = OGridColumn_BASE::queryAggregation(_rType);
- if (!aReturn.hasValue())
- {
- aReturn = OPropertySetAggregationHelper::queryInterface(_rType);
- if (!aReturn.hasValue() && m_xAggregate.is())
- aReturn = m_xAggregate->queryAggregation(_rType);
- }
-
- return aReturn;
-}
-
-DBG_NAME(OGridColumn);
-//------------------------------------------------------------------------------
-OGridColumn::OGridColumn( const comphelper::ComponentContext& _rContext, const ::rtl::OUString& _sModelName )
- :OGridColumn_BASE(m_aMutex)
- ,OPropertySetAggregationHelper(OGridColumn_BASE::rBHelper)
- ,m_aHidden( makeAny( sal_False ) )
- ,m_aContext( _rContext )
- ,m_aModelName(_sModelName)
-{
- DBG_CTOR(OGridColumn,NULL);
-
- // Anlegen des UnoControlModels
- if ( m_aModelName.getLength() ) // is there a to-be-aggregated model?
- {
- increment( m_refCount );
-
- {
- m_xAggregate.set( m_aContext.createComponent( m_aModelName ), UNO_QUERY );
- setAggregation( m_xAggregate );
- }
-
- if ( m_xAggregate.is() )
- { // don't omit those brackets - they ensure that the following temporary is properly deleted
- m_xAggregate->setDelegator( static_cast< ::cppu::OWeakObject* >( this ) );
- }
-
- // Refcount wieder bei NULL
- decrement( m_refCount );
- }
-}
-
-//------------------------------------------------------------------------------
-OGridColumn::OGridColumn( const OGridColumn* _pOriginal )
- :OGridColumn_BASE( m_aMutex )
- ,OPropertySetAggregationHelper( OGridColumn_BASE::rBHelper )
- ,m_aContext( _pOriginal->m_aContext )
-{
- DBG_CTOR(OGridColumn,NULL);
-
- m_aWidth = _pOriginal->m_aWidth;
- m_aAlign = _pOriginal->m_aAlign;
- m_aHidden = _pOriginal->m_aHidden;
- m_aModelName = _pOriginal->m_aModelName;
- m_aLabel = _pOriginal->m_aLabel;
-
- increment( m_refCount );
- {
- {
- m_xAggregate = createAggregateClone( _pOriginal );
- setAggregation( m_xAggregate );
- }
-
- if ( m_xAggregate.is() )
- { // don't omit this brackets - they ensure that the following temporary is properly deleted
- m_xAggregate->setDelegator( static_cast< ::cppu::OWeakObject* >( this ) );
- }
- }
- decrement( m_refCount );
-}
-
-//------------------------------------------------------------------------------
-OGridColumn::~OGridColumn()
-{
- if (!OGridColumn_BASE::rBHelper.bDisposed)
- {
- acquire();
- dispose();
- }
-
- // freigeben der Agg
- if (m_xAggregate.is())
- {
- InterfaceRef xIface;
- m_xAggregate->setDelegator(xIface);
- }
-
- DBG_DTOR(OGridColumn,NULL);
-}
-
-// XEventListener
-//------------------------------------------------------------------------------
-void SAL_CALL OGridColumn::disposing(const EventObject& _rSource) throw(RuntimeException)
-{
- OPropertySetAggregationHelper::disposing(_rSource);
-
- Reference<XEventListener> xEvtLstner;
- if (query_aggregation(m_xAggregate, xEvtLstner))
- xEvtLstner->disposing(_rSource);
-}
-
-// OGridColumn_BASE
-//-----------------------------------------------------------------------------
-void OGridColumn::disposing()
-{
- OGridColumn_BASE::disposing();
- OPropertySetAggregationHelper::disposing();
-
- Reference<XComponent> xComp;
- if (query_aggregation(m_xAggregate, xComp))
- xComp->dispose();
-}
-
-//------------------------------------------------------------------------------
-void OGridColumn::clearAggregateProperties( Sequence< Property >& _rProps, sal_Bool bAllowDropDown )
-{
- // some properties are not to be exposed to the outer world
- ::std::set< ::rtl::OUString > aForbiddenProperties;
- aForbiddenProperties.insert( PROPERTY_ALIGN );
- aForbiddenProperties.insert( PROPERTY_AUTOCOMPLETE );
- aForbiddenProperties.insert( PROPERTY_BACKGROUNDCOLOR );
- aForbiddenProperties.insert( PROPERTY_BORDER );
- aForbiddenProperties.insert( PROPERTY_BORDERCOLOR );
- aForbiddenProperties.insert( PROPERTY_ECHO_CHAR );
- aForbiddenProperties.insert( PROPERTY_FILLCOLOR );
- aForbiddenProperties.insert( PROPERTY_FONT );
- aForbiddenProperties.insert( PROPERTY_FONT_NAME );
- aForbiddenProperties.insert( PROPERTY_FONT_STYLENAME );
- aForbiddenProperties.insert( PROPERTY_FONT_FAMILY );
- aForbiddenProperties.insert( PROPERTY_FONT_CHARSET );
- aForbiddenProperties.insert( PROPERTY_FONT_HEIGHT );
- aForbiddenProperties.insert( PROPERTY_FONT_WEIGHT );
- aForbiddenProperties.insert( PROPERTY_FONT_SLANT );
- aForbiddenProperties.insert( PROPERTY_FONT_UNDERLINE );
- aForbiddenProperties.insert( PROPERTY_FONT_STRIKEOUT );
- aForbiddenProperties.insert( PROPERTY_FONT_WORDLINEMODE );
- aForbiddenProperties.insert( PROPERTY_TEXTLINECOLOR );
- aForbiddenProperties.insert( PROPERTY_FONTEMPHASISMARK );
- aForbiddenProperties.insert( PROPERTY_FONTRELIEF );
- aForbiddenProperties.insert( PROPERTY_HARDLINEBREAKS );
- aForbiddenProperties.insert( PROPERTY_HSCROLL );
- aForbiddenProperties.insert( PROPERTY_LABEL );
- aForbiddenProperties.insert( PROPERTY_LINECOLOR );
- aForbiddenProperties.insert( PROPERTY_MULTISELECTION );
- aForbiddenProperties.insert( PROPERTY_PRINTABLE );
- aForbiddenProperties.insert( PROPERTY_TABINDEX );
- aForbiddenProperties.insert( PROPERTY_TABSTOP );
- aForbiddenProperties.insert( PROPERTY_TEXTCOLOR );
- aForbiddenProperties.insert( PROPERTY_VSCROLL );
- aForbiddenProperties.insert( PROPERTY_CONTROLLABEL );
- aForbiddenProperties.insert( PROPERTY_RICH_TEXT );
- aForbiddenProperties.insert( PROPERTY_VERTICAL_ALIGN );
- aForbiddenProperties.insert( PROPERTY_IMAGE_URL );
- aForbiddenProperties.insert( PROPERTY_IMAGE_POSITION );
- aForbiddenProperties.insert( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "EnableVisible" ) ) );
- if ( !bAllowDropDown )
- aForbiddenProperties.insert( PROPERTY_DROPDOWN );
-
- Sequence< Property > aNewProps( _rProps.getLength() );
- Property* pNewProps = aNewProps.getArray();
-
- const Property* pProps = _rProps.getConstArray();
- const Property* pPropsEnd = pProps + _rProps.getLength();
- for ( ; pProps != pPropsEnd; ++pProps )
- {
- if ( aForbiddenProperties.find( pProps->Name ) == aForbiddenProperties.end() )
- *pNewProps++ = *pProps;
- }
-
- aNewProps.realloc( pNewProps - aNewProps.getArray() );
- _rProps = aNewProps;
-}
-
-//------------------------------------------------------------------------------
-void OGridColumn::setOwnProperties(Sequence<Property>& aDescriptor)
-{
- aDescriptor.realloc(5);
- Property* pProperties = aDescriptor.getArray();
- DECL_PROP1(LABEL, ::rtl::OUString, BOUND);
- DECL_PROP3(WIDTH, sal_Int32, BOUND, MAYBEVOID, MAYBEDEFAULT);
- DECL_PROP3(ALIGN, sal_Int16, BOUND, MAYBEVOID, MAYBEDEFAULT);
- DECL_BOOL_PROP2(HIDDEN, BOUND, MAYBEDEFAULT);
- DECL_PROP1(COLUMNSERVICENAME, ::rtl::OUString, READONLY);
-}
-
-// Reference<XPropertySet>
-//------------------------------------------------------------------------------
-void OGridColumn::getFastPropertyValue(Any& rValue, sal_Int32 nHandle ) const
-{
- switch (nHandle)
- {
- case PROPERTY_ID_COLUMNSERVICENAME:
- rValue <<= m_aModelName;
- break;
- case PROPERTY_ID_LABEL:
- rValue <<= m_aLabel;
- break;
- case PROPERTY_ID_WIDTH:
- rValue = m_aWidth;
- break;
- case PROPERTY_ID_ALIGN:
- rValue = m_aAlign;
- break;
- case PROPERTY_ID_HIDDEN:
- rValue = m_aHidden;
- break;
- default:
- OPropertySetAggregationHelper::getFastPropertyValue(rValue, nHandle);
- }
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OGridColumn::convertFastPropertyValue( Any& rConvertedValue, Any& rOldValue,
- sal_Int32 nHandle, const Any& rValue )throw( IllegalArgumentException )
-{
- sal_Bool bModified(sal_False);
- switch (nHandle)
- {
- case PROPERTY_ID_LABEL:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_aLabel);
- break;
- case PROPERTY_ID_WIDTH:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_aWidth, ::getCppuType((const sal_Int32*)NULL));
- break;
- case PROPERTY_ID_ALIGN:
- bModified = tryPropertyValue( rConvertedValue, rOldValue, rValue, m_aAlign, ::getCppuType( (const sal_Int32*)NULL ) );
- // strange enough, css.awt.TextAlign is a 32-bit integer, while the Align property (both here for grid controls
- // and for ordinary toolkit controls) is a 16-bit integer. So, allow for 32 bit, but normalize it to 16 bit
- if ( bModified )
- {
- sal_Int32 nAlign( 0 );
- if ( rConvertedValue >>= nAlign )
- rConvertedValue <<= (sal_Int16)nAlign;
- }
- break;
- case PROPERTY_ID_HIDDEN:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, getBOOL(m_aHidden));
- break;
- }
- return bModified;
-}
-
-//------------------------------------------------------------------------------
-void OGridColumn::setFastPropertyValue_NoBroadcast( sal_Int32 nHandle, const Any& rValue ) throw (::com::sun::star::uno::Exception)
-{
- switch (nHandle)
- {
- case PROPERTY_ID_LABEL:
- DBG_ASSERT(rValue.getValueType().getTypeClass() == TypeClass_STRING, "invalid type" );
- rValue >>= m_aLabel;
- break;
- case PROPERTY_ID_WIDTH:
- m_aWidth = rValue;
- break;
- case PROPERTY_ID_ALIGN:
- m_aAlign = rValue;
- break;
- case PROPERTY_ID_HIDDEN:
- m_aHidden = rValue;
- break;
- }
-}
-
-
-// XPropertyState
-//------------------------------------------------------------------------------
-Any OGridColumn::getPropertyDefaultByHandle( sal_Int32 nHandle ) const
-{
- switch (nHandle)
- {
- case PROPERTY_ID_WIDTH:
- case PROPERTY_ID_ALIGN:
- return Any();
- case PROPERTY_ID_HIDDEN:
- return makeAny((sal_Bool)sal_False);
- default:
- return OPropertySetAggregationHelper::getPropertyDefaultByHandle(nHandle);
- }
-}
-
-// XCloneable
-//------------------------------------------------------------------------------
-Reference< XCloneable > SAL_CALL OGridColumn::createClone( ) throw (RuntimeException)
-{
- OGridColumn* pNewColumn = createCloneColumn();
- return pNewColumn;
-}
-
-//XPersistObject
-//------------------------------------------------------------------------------
-void SAL_CALL OGridColumn::write(const Reference<XObjectOutputStream>& _rxOutStream)
-{
- // 1. Schreiben des UnoControls
- Reference<XMarkableStream> xMark(_rxOutStream, UNO_QUERY);
- sal_Int32 nMark = xMark->createMark();
-
- sal_Int32 nLen = 0;
- _rxOutStream->writeLong(nLen);
-
- Reference<XPersistObject> xPersist;
- if (query_aggregation(m_xAggregate, xPersist))
- xPersist->write(_rxOutStream);
-
- // feststellen der Laenge
- nLen = xMark->offsetToMark(nMark) - 4;
- xMark->jumpToMark(nMark);
- _rxOutStream->writeLong(nLen);
- xMark->jumpToFurthest();
- xMark->deleteMark(nMark);
-
- // 2. Schreiben einer VersionsNummer
- _rxOutStream->writeShort(0x0002);
-
- sal_uInt16 nAnyMask = 0;
- if (m_aWidth.getValueType().getTypeClass() == TypeClass_LONG)
- nAnyMask |= WIDTH;
-
- if (m_aAlign.getValueTypeClass() == TypeClass_SHORT)
- nAnyMask |= ALIGN;
-
- nAnyMask |= COMPATIBLE_HIDDEN;
-
- _rxOutStream->writeShort(nAnyMask);
-
- if (nAnyMask & WIDTH)
- _rxOutStream->writeLong(getINT32(m_aWidth));
- if (nAnyMask & ALIGN)
- _rxOutStream->writeShort(getINT16(m_aAlign));
-
- // Name
- _rxOutStream << m_aLabel;
-
- // the new place for the hidden flag : after m_aLabel, so older office version read the correct label, too
- if (nAnyMask & COMPATIBLE_HIDDEN)
- _rxOutStream->writeBoolean(getBOOL(m_aHidden));
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OGridColumn::read(const Reference<XObjectInputStream>& _rxInStream)
-{
- // 1. Lesen des UnoControls
- sal_Int32 nLen = _rxInStream->readLong();
- if (nLen)
- {
- Reference<XMarkableStream> xMark(_rxInStream, UNO_QUERY);
- sal_Int32 nMark = xMark->createMark();
- Reference<XPersistObject> xPersist;
- if (query_aggregation(m_xAggregate, xPersist))
- xPersist->read(_rxInStream);
-
- xMark->jumpToMark(nMark);
- _rxInStream->skipBytes(nLen);
- xMark->deleteMark(nMark);
- }
-
- // 2. Lesen des Versionsnummer
- sal_uInt16 nVersion = _rxInStream->readShort(); (void)nVersion;
- sal_uInt16 nAnyMask = _rxInStream->readShort();
-
- if (nAnyMask & WIDTH)
- {
- sal_Int32 nValue = _rxInStream->readLong();
- m_aWidth <<= (sal_Int32)nValue;
- }
-
- if (nAnyMask & ALIGN)
- {
- sal_Int16 nValue = _rxInStream->readShort();
- m_aAlign <<= nValue;
- }
- if (nAnyMask & OLD_HIDDEN)
- {
- sal_Bool bValue = _rxInStream->readBoolean();
- m_aHidden <<= (sal_Bool)bValue;
- }
-
- // Name
- _rxInStream >> m_aLabel;
-
- if (nAnyMask & COMPATIBLE_HIDDEN)
- {
- sal_Bool bValue = _rxInStream->readBoolean();
- m_aHidden <<= (sal_Bool)bValue;
- }
-}
-
-//------------------------------------------------------------------------------
-IMPL_COLUMN(TextFieldColumn, FRM_SUN_COMPONENT_TEXTFIELD, sal_False);
-IMPL_COLUMN(PatternFieldColumn, FRM_SUN_COMPONENT_PATTERNFIELD, sal_False);
-IMPL_COLUMN(DateFieldColumn, FRM_SUN_COMPONENT_DATEFIELD, sal_True);
-IMPL_COLUMN(TimeFieldColumn, FRM_SUN_COMPONENT_TIMEFIELD, sal_False);
-IMPL_COLUMN(NumericFieldColumn, FRM_SUN_COMPONENT_NUMERICFIELD, sal_False);
-IMPL_COLUMN(CurrencyFieldColumn, FRM_SUN_COMPONENT_CURRENCYFIELD, sal_False);
-IMPL_COLUMN(CheckBoxColumn, FRM_SUN_COMPONENT_CHECKBOX, sal_False);
-IMPL_COLUMN(ComboBoxColumn, FRM_SUN_COMPONENT_COMBOBOX, sal_False);
-IMPL_COLUMN(ListBoxColumn, FRM_SUN_COMPONENT_LISTBOX, sal_False);
-IMPL_COLUMN(FormattedFieldColumn, FRM_SUN_COMPONENT_FORMATTEDFIELD, sal_False);
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Columns.hxx b/forms/source/component/Columns.hxx
deleted file mode 100644
index 76c526cdc..000000000
--- a/forms/source/component/Columns.hxx
+++ /dev/null
@@ -1,223 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FRM_COLUMNS_HXX
-#define _FRM_COLUMNS_HXX
-
-#include "cloneable.hxx"
-#include "frm_strings.hxx"
-
-/** === begin UNO includes === **/
-#include <com/sun/star/io/XObjectInputStream.hpp>
-#include <com/sun/star/io/XObjectOutputStream.hpp>
-#include <com/sun/star/lang/XUnoTunnel.hpp>
-#include <com/sun/star/util/XCloneable.hpp>
-/** === end UNO includes === **/
-
-#include <comphelper/broadcasthelper.hxx>
-#include <comphelper/componentcontext.hxx>
-#include <comphelper/propagg.hxx>
-#include <comphelper/proparrhlp.hxx>
-#include <comphelper/uno3.hxx>
-#include <cppuhelper/compbase2.hxx>
-#include <cppuhelper/component.hxx>
-
-using namespace comphelper;
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
-//==================================================================
-// OGridColumn
-//==================================================================
-typedef ::cppu::WeakAggComponentImplHelper2 < ::com::sun::star::lang::XUnoTunnel
- , ::com::sun::star::util::XCloneable > OGridColumn_BASE;
-class OGridColumn :public ::comphelper::OBaseMutex
- ,public OGridColumn_BASE
- ,public OPropertySetAggregationHelper
- ,public OCloneableAggregation
-{
-protected:
-// [properties]
- ::com::sun::star::uno::Any m_aWidth; // column width
- ::com::sun::star::uno::Any m_aAlign; // column alignment
- ::com::sun::star::uno::Any m_aHidden; // column hidden?
-// [properties]
-
- ::comphelper::ComponentContext m_aContext;
- ::rtl::OUString m_aModelName;
-
-// [properties]
- ::rtl::OUString m_aLabel; // Name der Spalte
-// [properties]
-
-public:
- OGridColumn(const ::comphelper::ComponentContext& _rContext, const ::rtl::OUString& _sModelName = ::rtl::OUString());
- OGridColumn(const OGridColumn* _pOriginal );
- virtual ~OGridColumn();
-
- // UNO Anbindung
- DECLARE_UNO3_AGG_DEFAULTS(OGridControlModel, OGridColumn_BASE);
- virtual ::com::sun::star::uno::Any SAL_CALL queryAggregation( const ::com::sun::star::uno::Type& _rType ) throw (::com::sun::star::uno::RuntimeException);
-
- static const ::com::sun::star::uno::Sequence<sal_Int8>& getUnoTunnelImplementationId();
- // XUnoTunnel
- virtual sal_Int64 SAL_CALL getSomething( const ::com::sun::star::uno::Sequence<sal_Int8>& _rIdentifier) throw(::com::sun::star::uno::RuntimeException);
-
- // XTypeProvider
- virtual ::com::sun::star::uno::Sequence<sal_Int8> SAL_CALL getImplementationId() throw(::com::sun::star::uno::RuntimeException);
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> SAL_CALL getTypes() throw(::com::sun::star::uno::RuntimeException);
-
- // OComponentHelper
- virtual void SAL_CALL disposing();
-
- // XEventListener
- virtual void SAL_CALL disposing(const ::com::sun::star::lang::EventObject& _rSource) throw(::com::sun::star::uno::RuntimeException);
-
- // XPersistObject
- virtual void SAL_CALL write(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectOutputStream>& _rxOutStream);
- virtual void SAL_CALL read(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectInputStream>& _rxInStream);
-
- // XPropertySet
- virtual ::cppu::IPropertyArrayHelper& SAL_CALL getInfoHelper() = 0;
- virtual void SAL_CALL getFastPropertyValue(::com::sun::star::uno::Any& rValue, sal_Int32 nHandle ) const;
- virtual sal_Bool SAL_CALL convertFastPropertyValue(::com::sun::star::uno::Any& rConvertedValue, ::com::sun::star::uno::Any& rOldValue,
- sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue )
- throw(::com::sun::star::lang::IllegalArgumentException);
- virtual void SAL_CALL setFastPropertyValue_NoBroadcast(sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue) throw (::com::sun::star::uno::Exception);
-
- using OPropertySetAggregationHelper::getFastPropertyValue;
-
- // ::com::sun::star::beans::XPropertyState
- virtual ::com::sun::star::uno::Any getPropertyDefaultByHandle( sal_Int32 nHandle ) const;
-
- // XCloneable
- virtual ::com::sun::star::uno::Reference< ::com::sun::star::util::XCloneable > SAL_CALL createClone( ) throw (::com::sun::star::uno::RuntimeException);
-
- const ::rtl::OUString& getModelName() const { return m_aModelName; }
-
-protected:
- static void clearAggregateProperties(::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property>& seqProps, sal_Bool bAllowDropDown);
- static void setOwnProperties(::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property>& seqProps);
-
- virtual OGridColumn* createCloneColumn() const = 0;
-};
-
-#define DECL_COLUMN(ClassName) \
-class ClassName \
- :public OGridColumn \
- ,public OAggregationArrayUsageHelper< ClassName > \
-{ \
-public: \
- ClassName(const ::comphelper::ComponentContext& _rContext ); \
- ClassName(const ClassName* _pCloneFrom); \
- \
- virtual ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySetInfo> SAL_CALL getPropertySetInfo() throw(::com::sun::star::uno::RuntimeException); \
- virtual ::cppu::IPropertyArrayHelper& SAL_CALL getInfoHelper(); \
- \
- virtual void fillProperties( \
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps, \
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rAggregateProps \
- ) const; \
- \
- virtual OGridColumn* createCloneColumn() const; \
-};
-
-
-#define IMPL_COLUMN(ClassName, Model, bAllowDropDown) \
- ClassName::ClassName( const ::comphelper::ComponentContext& _rContext ) \
- :OGridColumn(_rContext, Model) \
-{ \
-} \
-ClassName::ClassName( const ClassName* _pCloneFrom ) \
- :OGridColumn( _pCloneFrom ) \
-{ \
-} \
-::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySetInfo> ClassName::getPropertySetInfo() throw(::com::sun::star::uno::RuntimeException) \
-{ \
- ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySetInfo> xInfo( createPropertySetInfo( getInfoHelper() ) ); \
- return xInfo; \
-} \
-::cppu::IPropertyArrayHelper& ClassName::getInfoHelper() \
-{ \
- return *const_cast<ClassName*>(this)->getArrayHelper(); \
-} \
-void ClassName::fillProperties( \
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps, \
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rAggregateProps \
- ) const \
-{ \
- if (m_xAggregateSet.is()) \
- { \
- _rAggregateProps = m_xAggregateSet->getPropertySetInfo()->getProperties(); \
- clearAggregateProperties(_rAggregateProps, bAllowDropDown); \
- setOwnProperties(_rProps); \
- } \
-} \
-OGridColumn* ClassName::createCloneColumn() const \
-{ \
- return new ClassName( this ); \
-} \
- \
-// column type ids
-#define TYPE_CHECKBOX 0
-#define TYPE_COMBOBOX 1
-#define TYPE_CURRENCYFIELD 2
-#define TYPE_DATEFIELD 3
-#define TYPE_FORMATTEDFIELD 4
-#define TYPE_LISTBOX 5
-#define TYPE_NUMERICFIELD 6
-#define TYPE_PATTERNFIELD 7
-#define TYPE_TEXTFIELD 8
-#define TYPE_TIMEFIELD 9
-
-// liste aller bekannten columns
-const StringSequence& getColumnTypes();
-sal_Int32 getColumnTypeByModelName(const ::rtl::OUString& aModelName);
-
-// Columns
-DECL_COLUMN(TextFieldColumn)
-DECL_COLUMN(PatternFieldColumn)
-DECL_COLUMN(DateFieldColumn)
-DECL_COLUMN(TimeFieldColumn)
-DECL_COLUMN(NumericFieldColumn)
-DECL_COLUMN(CurrencyFieldColumn)
-DECL_COLUMN(CheckBoxColumn)
-DECL_COLUMN(ComboBoxColumn)
-DECL_COLUMN(ListBoxColumn)
-DECL_COLUMN(FormattedFieldColumn)
-
-#endif // _FRM_COLUMNS_HXX
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/ComboBox.cxx b/forms/source/component/ComboBox.cxx
deleted file mode 100644
index a944de753..000000000
--- a/forms/source/component/ComboBox.cxx
+++ /dev/null
@@ -1,916 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-
-#include "ComboBox.hxx"
-#include "property.hxx"
-#include "property.hrc"
-#include "services.hxx"
-
-#include "frm_resource.hxx"
-#include "frm_resource.hrc"
-#include "BaseListBox.hxx"
-
-/** === begin UNO includes === **/
-#include <com/sun/star/sdb/SQLErrorEvent.hpp>
-#include <com/sun/star/sdbc/XRowSet.hpp>
-#include <com/sun/star/sdbc/DataType.hpp>
-#include <com/sun/star/container/XIndexAccess.hpp>
-#include <com/sun/star/sdb/XSQLQueryComposerFactory.hpp>
-#include <com/sun/star/sdb/XQueriesSupplier.hpp>
-#include <com/sun/star/util/NumberFormat.hpp>
-#include <com/sun/star/sdbc/XConnection.hpp>
-#include <com/sun/star/sdb/SQLContext.hpp>
-#include <com/sun/star/sdb/CommandType.hpp>
-/** === end UNO includes === **/
-
-#include <comphelper/numbers.hxx>
-#include <comphelper/basicio.hxx>
-#include <connectivity/dbtools.hxx>
-#include <connectivity/dbconversion.hxx>
-#include <cppuhelper/queryinterface.hxx>
-#include <rtl/ustrbuf.hxx>
-#include <tools/debug.hxx>
-#include <tools/diagnose_ex.h>
-#include <unotools/sharedunocomponent.hxx>
-
-#include <limits.h>
-
-using namespace dbtools;
-
-//.........................................................................
-namespace frm
-{
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::sdb;
-using namespace ::com::sun::star::sdbc;
-using namespace ::com::sun::star::sdbcx;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::io;
-using namespace ::com::sun::star::lang;
-using namespace ::com::sun::star::util;
-using namespace ::com::sun::star::form::binding;
-
-//========================================================================
-// class OComboBoxModel
-//========================================================================
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OComboBoxModel_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory) throw (RuntimeException)
-{
- return (*new OComboBoxModel(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> OComboBoxModel::_getTypes()
-{
- return ::comphelper::concatSequences(
- OBoundControlModel::_getTypes(),
- OEntryListHelper::getTypes(),
- OErrorBroadcaster::getTypes()
- );
-}
-
-// XServiceInfo
-//------------------------------------------------------------------------------
-StringSequence SAL_CALL OComboBoxModel::getSupportedServiceNames() throw(RuntimeException)
-{
- StringSequence aSupported = OBoundControlModel::getSupportedServiceNames();
-
- sal_Int32 nOldLen = aSupported.getLength();
- aSupported.realloc( nOldLen + 8 );
- ::rtl::OUString* pStoreTo = aSupported.getArray() + nOldLen;
-
- *pStoreTo++ = BINDABLE_CONTROL_MODEL;
- *pStoreTo++ = DATA_AWARE_CONTROL_MODEL;
- *pStoreTo++ = VALIDATABLE_CONTROL_MODEL;
-
- *pStoreTo++ = BINDABLE_DATA_AWARE_CONTROL_MODEL;
- *pStoreTo++ = VALIDATABLE_BINDABLE_CONTROL_MODEL;
-
- *pStoreTo++ = FRM_SUN_COMPONENT_COMBOBOX;
- *pStoreTo++ = FRM_SUN_COMPONENT_DATABASE_COMBOBOX;
- *pStoreTo++ = BINDABLE_DATABASE_COMBO_BOX;
-
- return aSupported;
-}
-
-//------------------------------------------------------------------------------
-Any SAL_CALL OComboBoxModel::queryAggregation(const Type& _rType) throw (RuntimeException)
-{
- Any aReturn = OBoundControlModel::queryAggregation( _rType );
- if ( !aReturn.hasValue() )
- aReturn = OEntryListHelper::queryInterface( _rType );
- if ( !aReturn.hasValue() )
- aReturn = OErrorBroadcaster::queryInterface( _rType );
- return aReturn;
-}
-
-//------------------------------------------------------------------
-DBG_NAME( OComboBoxModel )
-//------------------------------------------------------------------
-OComboBoxModel::OComboBoxModel(const Reference<XMultiServiceFactory>& _rxFactory)
- :OBoundControlModel( _rxFactory, VCL_CONTROLMODEL_COMBOBOX, FRM_SUN_CONTROL_COMBOBOX, sal_True, sal_True, sal_True )
- // use the old control name for compytibility reasons
- ,OEntryListHelper( (OControlModel&)*this )
- ,OErrorBroadcaster( OComponentHelper::rBHelper )
- ,m_aListRowSet( getContext() )
- ,m_eListSourceType(ListSourceType_TABLE)
- ,m_bEmptyIsNull(sal_True)
-{
- DBG_CTOR( OComboBoxModel, NULL );
-
- m_nClassId = FormComponentType::COMBOBOX;
- initValueProperty( PROPERTY_TEXT, PROPERTY_ID_TEXT );
-}
-
-//------------------------------------------------------------------
-OComboBoxModel::OComboBoxModel( const OComboBoxModel* _pOriginal, const Reference<XMultiServiceFactory>& _rxFactory )
- :OBoundControlModel( _pOriginal, _rxFactory )
- ,OEntryListHelper( *_pOriginal, (OControlModel&)*this )
- ,OErrorBroadcaster( OComponentHelper::rBHelper )
- ,m_aListRowSet( getContext() )
- ,m_aListSource( _pOriginal->m_aListSource )
- ,m_aDefaultText( _pOriginal->m_aDefaultText )
- ,m_eListSourceType( _pOriginal->m_eListSourceType )
- ,m_bEmptyIsNull( _pOriginal->m_bEmptyIsNull )
-{
- DBG_CTOR( OComboBoxModel, NULL );
-}
-
-//------------------------------------------------------------------
-OComboBoxModel::~OComboBoxModel()
-{
- if (!OComponentHelper::rBHelper.bDisposed)
- {
- acquire();
- dispose();
- }
-
- DBG_DTOR( OComboBoxModel, NULL );
-}
-
-// XCloneable
-//------------------------------------------------------------------------------
-IMPLEMENT_DEFAULT_CLONING( OComboBoxModel )
-
-//------------------------------------------------------------------------------
-void OComboBoxModel::disposing()
-{
- OBoundControlModel::disposing();
- OEntryListHelper::disposing();
- OErrorBroadcaster::disposing();
- m_xFormatter = NULL;
-}
-
-//------------------------------------------------------------------------------
-void OComboBoxModel::getFastPropertyValue(Any& _rValue, sal_Int32 _nHandle) const
-{
- switch (_nHandle)
- {
- case PROPERTY_ID_LISTSOURCETYPE:
- _rValue <<= m_eListSourceType;
- break;
-
- case PROPERTY_ID_LISTSOURCE:
- _rValue <<= m_aListSource;
- break;
-
- case PROPERTY_ID_EMPTY_IS_NULL:
- _rValue <<= m_bEmptyIsNull;
- break;
-
- case PROPERTY_ID_DEFAULT_TEXT:
- _rValue <<= m_aDefaultText;
- break;
-
- case PROPERTY_ID_STRINGITEMLIST:
- _rValue <<= getStringItemList();
- break;
-
- default:
- OBoundControlModel::getFastPropertyValue(_rValue, _nHandle);
- }
-}
-
-//------------------------------------------------------------------------------
-void OComboBoxModel::setFastPropertyValue_NoBroadcast(sal_Int32 _nHandle, const Any& _rValue)
- throw (Exception)
-{
- switch (_nHandle)
- {
- case PROPERTY_ID_LISTSOURCETYPE :
- DBG_ASSERT(_rValue.getValueType().equals(::getCppuType(reinterpret_cast<ListSourceType*>(NULL))),
- "OComboBoxModel::setFastPropertyValue_NoBroadcast : invalid type !" );
- _rValue >>= m_eListSourceType;
- break;
-
- case PROPERTY_ID_LISTSOURCE :
- DBG_ASSERT(_rValue.getValueType().getTypeClass() == TypeClass_STRING,
- "OComboBoxModel::setFastPropertyValue_NoBroadcast : invalid type !" );
- _rValue >>= m_aListSource;
- // die ListSource hat sich geaendert -> neu laden
- if (ListSourceType_VALUELIST != m_eListSourceType)
- {
- if ( m_xCursor.is() && !hasField() && !hasExternalListSource() )
- // combo box is already connected to a database, and no external list source
- // data source changed -> refresh
- loadData( false );
- }
- break;
-
- case PROPERTY_ID_EMPTY_IS_NULL :
- DBG_ASSERT(_rValue.getValueType().getTypeClass() == TypeClass_BOOLEAN,
- "OComboBoxModel::setFastPropertyValue_NoBroadcast : invalid type !" );
- _rValue >>= m_bEmptyIsNull;
- break;
-
- case PROPERTY_ID_DEFAULT_TEXT :
- DBG_ASSERT(_rValue.getValueType().getTypeClass() == TypeClass_STRING,
- "OComboBoxModel::setFastPropertyValue_NoBroadcast : invalid type !" );
- _rValue >>= m_aDefaultText;
- resetNoBroadcast();
- break;
-
- case PROPERTY_ID_STRINGITEMLIST:
- {
- ControlModelLock aLock( *this );
- setNewStringItemList( _rValue, aLock );
- // TODO: this is bogus. setNewStringItemList expects a guard which has the *only*
- // lock to the mutex, but setFastPropertyValue_NoBroadcast is already called with
- // a lock - so we effectively has two locks here, of which setNewStringItemList can
- // only control one.
- }
- break;
-
- default:
- OBoundControlModel::setFastPropertyValue_NoBroadcast(_nHandle, _rValue);
- }
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OComboBoxModel::convertFastPropertyValue(
- Any& _rConvertedValue, Any& _rOldValue, sal_Int32 _nHandle, const Any& _rValue)
- throw (IllegalArgumentException)
-{
- sal_Bool bModified(sal_False);
- switch (_nHandle)
- {
- case PROPERTY_ID_LISTSOURCETYPE :
- bModified = tryPropertyValueEnum(_rConvertedValue, _rOldValue, _rValue, m_eListSourceType);
- break;
-
- case PROPERTY_ID_LISTSOURCE :
- bModified = tryPropertyValue(_rConvertedValue, _rOldValue, _rValue, m_aListSource);
- break;
-
- case PROPERTY_ID_EMPTY_IS_NULL :
- bModified = tryPropertyValue(_rConvertedValue, _rOldValue, _rValue, m_bEmptyIsNull);
- break;
-
- case PROPERTY_ID_DEFAULT_TEXT :
- bModified = tryPropertyValue(_rConvertedValue, _rOldValue, _rValue, m_aDefaultText);
- break;
-
- case PROPERTY_ID_STRINGITEMLIST:
- bModified = convertNewListSourceProperty( _rConvertedValue, _rOldValue, _rValue );
- break;
-
- default:
- bModified = OBoundControlModel::convertFastPropertyValue(_rConvertedValue, _rOldValue, _nHandle, _rValue);
- break;
- }
- return bModified;
-}
-
-//------------------------------------------------------------------------------
-void OComboBoxModel::describeFixedProperties( Sequence< Property >& _rProps ) const
-{
- BEGIN_DESCRIBE_PROPERTIES( 6, OBoundControlModel )
- DECL_PROP1(TABINDEX, sal_Int16, BOUND);
- DECL_PROP1(LISTSOURCETYPE, ListSourceType, BOUND);
- DECL_PROP1(LISTSOURCE, ::rtl::OUString, BOUND);
- DECL_BOOL_PROP1(EMPTY_IS_NULL, BOUND);
- DECL_PROP1(DEFAULT_TEXT, ::rtl::OUString, BOUND);
- DECL_PROP1(STRINGITEMLIST, Sequence< ::rtl::OUString >,BOUND);
- END_DESCRIBE_PROPERTIES();
-}
-
-//------------------------------------------------------------------------------
-void OComboBoxModel::describeAggregateProperties( Sequence< Property >& _rAggregateProps ) const
-{
- OBoundControlModel::describeAggregateProperties( _rAggregateProps );
-
- // superseded properties:
- RemoveProperty( _rAggregateProps, PROPERTY_STRINGITEMLIST );
-}
-
-//------------------------------------------------------------------------------
-::rtl::OUString SAL_CALL OComboBoxModel::getServiceName() throw(RuntimeException)
-{
- return FRM_COMPONENT_COMBOBOX; // old (non-sun) name for compatibility !
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OComboBoxModel::write(const Reference<stario::XObjectOutputStream>& _rxOutStream)
- throw(stario::IOException, RuntimeException)
-{
- OBoundControlModel::write(_rxOutStream);
-
- // Version
- // Version 0x0002: EmptyIsNull
- // Version 0x0003: ListSource->Seq
- // Version 0x0004: DefaultText
- // Version 0x0005: HelpText
- _rxOutStream->writeShort(0x0006);
-
- // Maskierung fuer any
- sal_uInt16 nAnyMask = 0;
- if (m_aBoundColumn.getValueType().getTypeClass() == TypeClass_SHORT)
- nAnyMask |= BOUNDCOLUMN;
- _rxOutStream << nAnyMask;
-
- StringSequence aListSourceSeq(&m_aListSource, 1);
- _rxOutStream << aListSourceSeq;
- _rxOutStream << (sal_Int16)m_eListSourceType;
-
- if ((nAnyMask & BOUNDCOLUMN) == BOUNDCOLUMN)
- {
- sal_Int16 nBoundColumn = 0;
- m_aBoundColumn >>= nBoundColumn;
- _rxOutStream << nBoundColumn;
- }
-
- _rxOutStream << (sal_Bool)m_bEmptyIsNull;
- _rxOutStream << m_aDefaultText;
- writeHelpTextCompatibly(_rxOutStream);
-
- // from version 0x0006 : common properties
- writeCommonProperties(_rxOutStream);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OComboBoxModel::read(const Reference<stario::XObjectInputStream>& _rxInStream) throw(stario::IOException, RuntimeException)
-{
- OBoundControlModel::read(_rxInStream);
- ControlModelLock aLock( *this );
-
- // since we are "overwriting" the StringItemList of our aggregate (means we have
- // an own place to store the value, instead of relying on our aggregate storing it),
- // we need to respect what the aggregate just read for the StringItemList property.
- try
- {
- if ( m_xAggregateSet.is() )
- setNewStringItemList( m_xAggregateSet->getPropertyValue( PROPERTY_STRINGITEMLIST ), aLock );
- }
- catch( const Exception& )
- {
- OSL_FAIL( "OComboBoxModel::read: caught an exception while examining the aggregate's string item list!" );
- }
-
- // Version
- sal_uInt16 nVersion = _rxInStream->readShort();
- DBG_ASSERT(nVersion > 0, "OComboBoxModel::read : version 0 ? this should never have been written !");
-
- if (nVersion > 0x0006)
- {
- OSL_FAIL("OComboBoxModel::read : invalid (means unknown) version !");
- m_aListSource = ::rtl::OUString();
- m_aBoundColumn <<= (sal_Int16)0;
- m_aDefaultText = ::rtl::OUString();
- m_eListSourceType = ListSourceType_TABLE;
- m_bEmptyIsNull = sal_True;
- defaultCommonProperties();
- return;
- }
-
- // Maskierung fuer any
- sal_uInt16 nAnyMask;
- _rxInStream >> nAnyMask;
-
- // ListSource
- if (nVersion < 0x0003)
- {
- ::rtl::OUString sListSource;
- _rxInStream >> m_aListSource;
- }
- else // nVersion == 4
- {
- m_aListSource = ::rtl::OUString();
- StringSequence aListSource;
- _rxInStream >> aListSource;
- const ::rtl::OUString* pToken = aListSource.getConstArray();
- sal_Int32 nLen = aListSource.getLength();
- for (sal_Int32 i = 0; i < nLen; ++i, ++pToken)
- m_aListSource += *pToken;
- }
-
- sal_Int16 nListSourceType;
- _rxInStream >> nListSourceType;
- m_eListSourceType = (ListSourceType)nListSourceType;
-
- if ((nAnyMask & BOUNDCOLUMN) == BOUNDCOLUMN)
- {
- sal_Int16 nValue;
- _rxInStream >> nValue;
- m_aBoundColumn <<= nValue;
- }
-
- if (nVersion > 0x0001)
- {
- sal_Bool bNull;
- _rxInStream >> bNull;
- m_bEmptyIsNull = bNull;
- }
-
- if (nVersion > 0x0003) // nVersion == 4
- _rxInStream >> m_aDefaultText;
-
- // Stringliste muss geleert werden, wenn eine Listenquelle gesetzt ist
- // dieses kann der Fall sein wenn im alive modus gespeichert wird
- if ( m_aListSource.getLength()
- && !hasExternalListSource()
- )
- {
- setFastPropertyValue( PROPERTY_ID_STRINGITEMLIST, makeAny( StringSequence() ) );
- }
-
- if (nVersion > 0x0004)
- readHelpTextCompatibly(_rxInStream);
-
- if (nVersion > 0x0005)
- readCommonProperties(_rxInStream);
-
- // Nach dem Lesen die Defaultwerte anzeigen
- if ( getControlSource().getLength() )
- {
- // (not if we don't have a control source - the "State" property acts like it is persistent, then
- resetNoBroadcast();
- }
-}
-
-//------------------------------------------------------------------------------
-void OComboBoxModel::loadData( bool _bForce )
-{
- DBG_ASSERT(m_eListSourceType != ListSourceType_VALUELIST, "OComboBoxModel::loadData : do not call for a value list !");
- DBG_ASSERT( !hasExternalListSource(), "OComboBoxModel::loadData: cannot load from DB when I have an external list source!" );
-
- if ( hasExternalListSource() )
- return;
-
- // Connection holen
- Reference<XRowSet> xForm(m_xCursor, UNO_QUERY);
- if (!xForm.is())
- return;
- Reference<XConnection> xConnection = getConnection(xForm);
- if (!xConnection.is())
- return;
-
- Reference<XServiceInfo> xServiceInfo(xConnection, UNO_QUERY);
- if (!xServiceInfo.is() || !xServiceInfo->supportsService(SRV_SDB_CONNECTION))
- {
- OSL_FAIL("OComboBoxModel::loadData : invalid connection !");
- return;
- }
-
- if (!m_aListSource.getLength() || m_eListSourceType == ListSourceType_VALUELIST)
- return;
-
- ::utl::SharedUNOComponent< XResultSet > xListCursor;
- try
- {
- m_aListRowSet.setConnection( xConnection );
-
- bool bExecuteRowSet( false );
- switch (m_eListSourceType)
- {
- case ListSourceType_TABLEFIELDS:
- // don't work with a statement here, the fields will be collected below
- break;
- case ListSourceType_TABLE:
- {
- // does the bound field belong to the table ?
- // if we use an alias for the bound field, we won't find it
- // in that case we use the first field of the table
-
- Reference<XNameAccess> xFieldsByName = getTableFields(xConnection, m_aListSource);
- Reference<XIndexAccess> xFieldsByIndex(xFieldsByName, UNO_QUERY);
-
- ::rtl::OUString aFieldName;
- if ( xFieldsByName.is() && xFieldsByName->hasByName( getControlSource() ) )
- {
- aFieldName = getControlSource();
- }
- else
- {
- // otherwise look for the alias
- Reference<XPropertySet> xFormProp(xForm,UNO_QUERY);
- Reference< XColumnsSupplier > xSupplyFields;
- xFormProp->getPropertyValue(::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("SingleSelectQueryComposer"))) >>= xSupplyFields;
-
- // search the field
- DBG_ASSERT(xSupplyFields.is(), "OComboBoxModel::loadData : invalid query composer !");
-
- Reference< XNameAccess > xFieldNames = xSupplyFields->getColumns();
- if ( xFieldNames->hasByName( getControlSource() ) )
- {
- Reference< XPropertySet > xComposerFieldAsSet;
- xFieldNames->getByName( getControlSource() ) >>= xComposerFieldAsSet;
- if (hasProperty(PROPERTY_FIELDSOURCE, xComposerFieldAsSet))
- xComposerFieldAsSet->getPropertyValue(PROPERTY_FIELDSOURCE) >>= aFieldName;
- }
- }
-
- if (!aFieldName.getLength())
- break;
-
- Reference<XDatabaseMetaData> xMeta = xConnection->getMetaData();
- OSL_ENSURE(xMeta.is(),"No database meta data!");
- if ( xMeta.is() )
- {
- ::rtl::OUString aQuote = xMeta->getIdentifierQuoteString();
-
- ::rtl::OUString sCatalog, sSchema, sTable;
- qualifiedNameComponents( xMeta, m_aListSource, sCatalog, sSchema, sTable, eInDataManipulation );
-
- ::rtl::OUStringBuffer aStatement;
- aStatement.appendAscii( "SELECT DISTINCT " );
- aStatement.append ( quoteName( aQuote, aFieldName ) );
- aStatement.appendAscii( " FROM " );
- aStatement.append ( composeTableNameForSelect( xConnection, sCatalog, sSchema, sTable ) );
-
- m_aListRowSet.setEscapeProcessing( sal_False );
- m_aListRowSet.setCommand( aStatement.makeStringAndClear() );
- bExecuteRowSet = true;
- }
- } break;
- case ListSourceType_QUERY:
- {
- m_aListRowSet.setCommandFromQuery( m_aListSource );
- bExecuteRowSet = true;
- }
- break;
-
- default:
- {
- m_aListRowSet.setEscapeProcessing( ListSourceType_SQLPASSTHROUGH != m_eListSourceType );
- m_aListRowSet.setCommand( m_aListSource );
- bExecuteRowSet = true;
- }
- }
-
- if ( bExecuteRowSet )
- {
- if ( !_bForce && !m_aListRowSet.isDirty() )
- {
- // if none of the settings of the row set changed, compared to the last
- // invocation of loadData, then don't re-fill the list. Instead, assume
- // the list entries are the same.
- return;
- }
- xListCursor.reset( m_aListRowSet.execute() );
- }
- }
- catch(SQLException& eSQL)
- {
- onError(eSQL, FRM_RES_STRING(RID_BASELISTBOX_ERROR_FILLLIST));
- return;
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- return;
- }
-
- ::std::vector< ::rtl::OUString > aStringList;
- aStringList.reserve(16);
- try
- {
- OSL_ENSURE( xListCursor.is() || ( ListSourceType_TABLEFIELDS == m_eListSourceType ),
- "OComboBoxModel::loadData: logic error!" );
- if ( !xListCursor.is() && ( ListSourceType_TABLEFIELDS != m_eListSourceType ) )
- return;
-
- switch (m_eListSourceType)
- {
- case ListSourceType_SQL:
- case ListSourceType_SQLPASSTHROUGH:
- case ListSourceType_TABLE:
- case ListSourceType_QUERY:
- {
- // die XDatabaseVAriant der ersten Spalte
- Reference<XColumnsSupplier> xSupplyCols(xListCursor, UNO_QUERY);
- DBG_ASSERT(xSupplyCols.is(), "OComboBoxModel::loadData : cursor supports the row set service but is no column supplier?!");
- Reference<XIndexAccess> xColumns;
- if (xSupplyCols.is())
- {
- xColumns = Reference<XIndexAccess>(xSupplyCols->getColumns(), UNO_QUERY);
- DBG_ASSERT(xColumns.is(), "OComboBoxModel::loadData : no columns supplied by the row set !");
- }
- Reference< XPropertySet > xDataField;
- if ( xColumns.is() )
- xColumns->getByIndex(0) >>= xDataField;
- if ( !xDataField.is() )
- return;
-
- ::dbtools::FormattedColumnValue aValueFormatter( getContext(), xForm, xDataField );
-
- // Listen fuellen
- sal_Int16 i = 0;
- // per definitionem the list cursor is positioned _before_ the first row at the moment
- while (xListCursor->next() && (i++<SHRT_MAX)) // max anzahl eintraege
- {
- aStringList.push_back( aValueFormatter.getFormattedValue() );
- }
- }
- break;
- case ListSourceType_TABLEFIELDS:
- {
- Reference<XNameAccess> xFieldNames = getTableFields(xConnection, m_aListSource);
- if (xFieldNames.is())
- {
- StringSequence seqNames = xFieldNames->getElementNames();
- sal_Int32 nFieldsCount = seqNames.getLength();
- const ::rtl::OUString* pustrNames = seqNames.getConstArray();
-
- for (sal_Int32 k=0; k<nFieldsCount; ++k)
- aStringList.push_back(pustrNames[k]);
- }
- }
- break;
- default:
- OSL_FAIL( "OComboBoxModel::loadData: unreachable!" );
- break;
- }
- }
- catch(SQLException& eSQL)
- {
- onError(eSQL, FRM_RES_STRING(RID_BASELISTBOX_ERROR_FILLLIST));
- return;
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- return;
- }
-
- // String-Sequence fuer ListBox erzeugen
- StringSequence aStringSeq(aStringList.size());
- ::rtl::OUString* pStringAry = aStringSeq.getArray();
- for (sal_Int32 i = 0; i<aStringSeq.getLength(); ++i)
- pStringAry[i] = aStringList[i];
-
- // String-Sequence an ListBox setzen
- setFastPropertyValue( PROPERTY_ID_STRINGITEMLIST, makeAny( aStringSeq ) );
-}
-
-//------------------------------------------------------------------------------
-void OComboBoxModel::onConnectedDbColumn( const Reference< XInterface >& _rxForm )
-{
- Reference<XPropertySet> xField = getField();
- if ( xField.is() )
- m_pValueFormatter.reset( new ::dbtools::FormattedColumnValue( getContext(), Reference< XRowSet >( _rxForm, UNO_QUERY ), xField ) );
- getPropertyValue( PROPERTY_STRINGITEMLIST ) >>= m_aDesignModeStringItems;
-
- // Daten nur laden, wenn eine Listenquelle angegeben wurde
- if ( m_aListSource.getLength() && m_xCursor.is() && !hasExternalListSource() )
- loadData( false );
-}
-
-//------------------------------------------------------------------------------
-void OComboBoxModel::onDisconnectedDbColumn()
-{
- m_pValueFormatter.reset();
-
- // reset the string item list
- if ( !hasExternalListSource() )
- setFastPropertyValue( PROPERTY_ID_STRINGITEMLIST, makeAny( m_aDesignModeStringItems ) );
-
- m_aListRowSet.dispose();
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OComboBoxModel::reloaded( const EventObject& aEvent ) throw(RuntimeException)
-{
- OBoundControlModel::reloaded(aEvent);
-
- // reload data if we have a list source
- if ( m_aListSource.getLength() && m_xCursor.is() && !hasExternalListSource() )
- loadData( false );
-}
-
-//------------------------------------------------------------------------------
-void OComboBoxModel::resetNoBroadcast()
-{
- OBoundControlModel::resetNoBroadcast();
- m_aLastKnownValue.clear();
-}
-
-//-----------------------------------------------------------------------------
-sal_Bool OComboBoxModel::commitControlValueToDbColumn( bool _bPostReset )
-{
- Any aNewValue( m_xAggregateFastSet->getFastPropertyValue( getValuePropertyAggHandle() ) );
-
- ::rtl::OUString sNewValue;
- aNewValue >>= sNewValue;
-
- bool bModified = ( aNewValue != m_aLastKnownValue );
- if ( bModified )
- {
- if ( !aNewValue.hasValue()
- || ( !sNewValue.getLength() // an empty string
- && m_bEmptyIsNull // which should be interpreted as NULL
- )
- )
- {
- m_xColumnUpdate->updateNull();
- }
- else
- {
- try
- {
- OSL_PRECOND( m_pValueFormatter.get(), "OComboBoxModel::commitControlValueToDbColumn: no value formatter!" );
- if ( m_pValueFormatter.get() )
- {
- if ( !m_pValueFormatter->setFormattedValue( sNewValue ) )
- return sal_False;
- }
- else
- m_xColumnUpdate->updateString( sNewValue );
- }
- catch ( const Exception& )
- {
- return sal_False;
- }
- }
-
- m_aLastKnownValue = aNewValue;
- }
-
- // add the new value to the list
- sal_Bool bAddToList = bModified && !_bPostReset;
- // (only if this is not the "commit" triggered by a "reset")
-
- if ( bAddToList )
- {
- StringSequence aStringItemList;
- if ( getPropertyValue( PROPERTY_STRINGITEMLIST ) >>= aStringItemList )
- {
- const ::rtl::OUString* pStringItems = aStringItemList.getConstArray();
- sal_Int32 i;
- for (i=0; i<aStringItemList.getLength(); ++i, ++pStringItems)
- {
- if ( pStringItems->equals( sNewValue ) )
- break;
- }
-
- // not found -> add
- if (i >= aStringItemList.getLength())
- {
- sal_Int32 nOldLen = aStringItemList.getLength();
- aStringItemList.realloc( nOldLen + 1 );
- aStringItemList.getArray()[ nOldLen ] = sNewValue;
-
- setFastPropertyValue( PROPERTY_ID_STRINGITEMLIST, makeAny( aStringItemList ) );
- }
- }
- }
-
- return sal_True;
-}
-
-// XPropertiesChangeListener
-//------------------------------------------------------------------------------
-Any OComboBoxModel::translateDbColumnToControlValue()
-{
- OSL_PRECOND( m_pValueFormatter.get(), "OComboBoxModel::translateDbColumnToControlValue: no value formatter!" );
- if ( m_pValueFormatter.get() )
- {
- ::rtl::OUString sValue( m_pValueFormatter->getFormattedValue() );
- if ( !sValue.getLength()
- && m_pValueFormatter->getColumn().is()
- && m_pValueFormatter->getColumn()->wasNull()
- )
- {
- m_aLastKnownValue.clear();
- }
- else
- {
-
- m_aLastKnownValue <<= sValue;
- }
- }
- else
- m_aLastKnownValue.clear();
-
- return m_aLastKnownValue.hasValue() ? m_aLastKnownValue : makeAny( ::rtl::OUString() );
- // (m_aLastKnownValue is alllowed to be VOID, the control value isn't)
-}
-
-//------------------------------------------------------------------------------
-Any OComboBoxModel::getDefaultForReset() const
-{
- return makeAny( m_aDefaultText );
-}
-
-//--------------------------------------------------------------------
-void OComboBoxModel::stringItemListChanged( ControlModelLock& /*_rInstanceLock*/ )
-{
- if ( m_xAggregateSet.is() )
- m_xAggregateSet->setPropertyValue( PROPERTY_STRINGITEMLIST, makeAny( getStringItemList() ) );
-}
-
-//--------------------------------------------------------------------
-void OComboBoxModel::connectedExternalListSource( )
-{
- // TODO?
-}
-
-//--------------------------------------------------------------------
-void OComboBoxModel::disconnectedExternalListSource( )
-{
- // TODO?
-}
-
-//--------------------------------------------------------------------
-void OComboBoxModel::refreshInternalEntryList()
-{
- DBG_ASSERT( !hasExternalListSource(), "OComboBoxModel::refreshInternalEntryList: invalid call!" );
-
- if ( !hasExternalListSource( )
- && ( m_eListSourceType != ListSourceType_VALUELIST )
- && ( m_xCursor.is() )
- )
- {
- loadData( true );
- }
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OComboBoxModel::disposing( const EventObject& _rSource ) throw ( RuntimeException )
-{
- if ( !OEntryListHelper::handleDisposing( _rSource ) )
- OBoundControlModel::disposing( _rSource );
-}
-
-//========================================================================
-//= OComboBoxControl
-//========================================================================
-
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OComboBoxControl_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory) throw (RuntimeException)
-{
- return *(new OComboBoxControl(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-OComboBoxControl::OComboBoxControl(const Reference<XMultiServiceFactory>& _rxFactory)
- :OBoundControl(_rxFactory, VCL_CONTROL_COMBOBOX)
-{
-}
-
-//------------------------------------------------------------------------------
-StringSequence SAL_CALL OComboBoxControl::getSupportedServiceNames() throw(RuntimeException)
-{
- StringSequence aSupported = OBoundControl::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 1);
-
- ::rtl::OUString* pArray = aSupported.getArray();
- pArray[aSupported.getLength()-1] = FRM_SUN_CONTROL_COMBOBOX;
- return aSupported;
-}
-
-//.........................................................................
-}
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/ComboBox.hxx b/forms/source/component/ComboBox.hxx
deleted file mode 100644
index 3f88658ce..000000000
--- a/forms/source/component/ComboBox.hxx
+++ /dev/null
@@ -1,180 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FORMS_COMBOBOX_HXX_
-#define _FORMS_COMBOBOX_HXX_
-
-#include "FormComponent.hxx"
-#include "errorbroadcaster.hxx"
-#include "entrylisthelper.hxx"
-#include "cachedrowset.hxx"
-
-/** === begin UNO includes === **/
-#include <com/sun/star/util/XNumberFormatter.hpp>
-#include <com/sun/star/sdb/XSQLErrorBroadcaster.hpp>
-#include <com/sun/star/form/ListSourceType.hpp>
-#include <com/sun/star/awt/XItemListener.hpp>
-#include <com/sun/star/awt/XFocusListener.hpp>
-/** === end UNO includes === **/
-
-#include <connectivity/formattedcolumnvalue.hxx>
-
-#include <cppuhelper/interfacecontainer.hxx>
-
-#include <vcl/timer.hxx>
-
-#include <tools/date.hxx>
-
-//.........................................................................
-namespace frm
-{
-
-//==================================================================
-// OComboBoxModel
-//==================================================================
-class OComboBoxModel
- :public OBoundControlModel
- ,public OEntryListHelper
- ,public OErrorBroadcaster
-{
- CachedRowSet m_aListRowSet; // the row set to fill the list
- ::com::sun::star::uno::Any m_aBoundColumn; // obsolet
- ::rtl::OUString m_aListSource; //
- ::rtl::OUString m_aDefaultText; // DefaultText
- ::com::sun::star::uno::Any m_aLastKnownValue;
-
- StringSequence m_aDesignModeStringItems;
- // upon loading, in some cases we reset fill our string item list ourself. We don't want
- // to lose the user's items then, so we remember them here.
-
-
- ::com::sun::star::uno::Reference< ::com::sun::star::util::XNumberFormatter> m_xFormatter;
-
- ::com::sun::star::form::ListSourceType m_eListSourceType; // type der list source
- sal_Bool m_bEmptyIsNull; // LeerString wird als NULL interpretiert
-
- ::std::auto_ptr< ::dbtools::FormattedColumnValue >
- m_pValueFormatter;
-
-
-
-protected:
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
-public:
- DECLARE_DEFAULT_LEAF_XTOR( OComboBoxModel );
-
- virtual void SAL_CALL disposing();
-
- // OPropertySetHelper
- virtual void SAL_CALL getFastPropertyValue(::com::sun::star::uno::Any& rValue, sal_Int32 nHandle) const;
- virtual void SAL_CALL setFastPropertyValue_NoBroadcast( sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue )
- throw (::com::sun::star::uno::Exception);
- virtual sal_Bool SAL_CALL convertFastPropertyValue(
- ::com::sun::star::uno::Any& _rConvertedValue, ::com::sun::star::uno::Any& _rOldValue, sal_Int32 _nHandle, const ::com::sun::star::uno::Any& _rValue )
- throw (::com::sun::star::lang::IllegalArgumentException);
-
- // XLoadListener
- virtual void SAL_CALL reloaded( const ::com::sun::star::lang::EventObject& aEvent ) throw(::com::sun::star::uno::RuntimeException);
-
- // XServiceInfo
- IMPLEMENTATION_NAME(OComboBoxModel);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException);
-
- // UNO
- DECLARE_UNO3_AGG_DEFAULTS(OComboBoxModel, OBoundControlModel);
- virtual ::com::sun::star::uno::Any SAL_CALL queryAggregation( const ::com::sun::star::uno::Type& _rType ) throw (::com::sun::star::uno::RuntimeException);
-
- // XPersistObject
- virtual ::rtl::OUString SAL_CALL getServiceName() throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL
- write(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectOutputStream>& _rxOutStream) throw(::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL
- read(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectInputStream>& _rxInStream) throw(::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
-
- // OControlModel's property handling
- virtual void describeFixedProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
- virtual void describeAggregateProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rAggregateProps
- ) const;
-
- // XEventListener
- virtual void SAL_CALL disposing(const ::com::sun::star::lang::EventObject& Source) throw (::com::sun::star::uno::RuntimeException);
-
- // prevent method hiding
- using OBoundControlModel::getFastPropertyValue;
-
-protected:
- // OBoundControlModel overridables
- virtual ::com::sun::star::uno::Any
- translateDbColumnToControlValue( );
- virtual sal_Bool commitControlValueToDbColumn( bool _bPostReset );
-
- virtual void onConnectedDbColumn( const ::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >& _rxForm );
- virtual void onDisconnectedDbColumn();
-
- virtual ::com::sun::star::uno::Any
- getDefaultForReset() const;
-
- virtual void resetNoBroadcast();
-
- // OEntryListHelper overriables
- virtual void stringItemListChanged( ControlModelLock& _rInstanceLock );
- virtual void connectedExternalListSource( );
- virtual void disconnectedExternalListSource( );
- virtual void refreshInternalEntryList();
-
-protected:
- void loadData( bool _bForce );
-
- DECLARE_XCLONEABLE();
-};
-
-//==================================================================
-// OComboBoxControl
-//==================================================================
-
-class OComboBoxControl : public OBoundControl
-{
-public:
- OComboBoxControl(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory);
-
- // XServiceInfo
- IMPLEMENTATION_NAME(OComboBoxControl);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException);
-};
-
-//.........................................................................
-}
-//.........................................................................
-
-#endif // _FORMS_COMBOBOX_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Currency.cxx b/forms/source/component/Currency.cxx
deleted file mode 100644
index 5f7d1db97..000000000
--- a/forms/source/component/Currency.cxx
+++ /dev/null
@@ -1,270 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "Currency.hxx"
-#include <tools/debug.hxx>
-#include <unotools/localedatawrapper.hxx>
-#include <vcl/svapp.hxx>
-#include <unotools/syslocale.hxx>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::sdb;
-using namespace ::com::sun::star::sdbc;
-using namespace ::com::sun::star::sdbcx;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::io;
-using namespace ::com::sun::star::lang;
-using namespace ::com::sun::star::util;
-
-//==================================================================
-// OCurrencyControl
-//==================================================================
-//------------------------------------------------------------------
-OCurrencyControl::OCurrencyControl(const Reference<XMultiServiceFactory>& _rxFactory)
- :OBoundControl(_rxFactory, VCL_CONTROL_CURRENCYFIELD)
-{
-}
-
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OCurrencyControl_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new OCurrencyControl(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> OCurrencyControl::_getTypes()
-{
- return OBoundControl::_getTypes();
-}
-
-//------------------------------------------------------------------------------
-StringSequence SAL_CALL OCurrencyControl::getSupportedServiceNames() throw()
-{
- StringSequence aSupported = OBoundControl::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 1);
-
- ::rtl::OUString*pArray = aSupported.getArray();
- pArray[aSupported.getLength()-1] = FRM_SUN_CONTROL_CURRENCYFIELD;
- return aSupported;
-}
-
-//==================================================================
-// OCurrencyModel
-//==================================================================
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OCurrencyModel_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new OCurrencyModel(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> OCurrencyModel::_getTypes()
-{
- return OEditBaseModel::_getTypes();
-}
-
-//------------------------------------------------------------------
-void OCurrencyModel::implConstruct()
-{
- if (m_xAggregateSet.is())
- {
- try
- {
- // get the system international informations
- const SvtSysLocale aSysLocale;
- const LocaleDataWrapper& aLocaleInfo = aSysLocale.GetLocaleData();
-
- ::rtl::OUString sCurrencySymbol;
- sal_Bool bPrependCurrencySymbol;
- switch ( aLocaleInfo.getCurrPositiveFormat() )
- {
- case 0: // $1
- sCurrencySymbol = String(aLocaleInfo.getCurrSymbol());
- bPrependCurrencySymbol = sal_True;
- break;
- case 1: // 1$
- sCurrencySymbol = String(aLocaleInfo.getCurrSymbol());
- bPrependCurrencySymbol = sal_False;
- break;
- case 2: // $ 1
- sCurrencySymbol = ::rtl::OUString(String(aLocaleInfo.getCurrSymbol())) + ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(" ") );
- bPrependCurrencySymbol = sal_True;
- break;
- case 3: // 1 $
- sCurrencySymbol = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(" ") ) + ::rtl::OUString(String(aLocaleInfo.getCurrSymbol()));
- bPrependCurrencySymbol = sal_False;
- break;
- }
- if (sCurrencySymbol.getLength())
- {
- m_xAggregateSet->setPropertyValue(PROPERTY_CURRENCYSYMBOL, makeAny(sCurrencySymbol));
- m_xAggregateSet->setPropertyValue(PROPERTY_CURRSYM_POSITION, makeAny(bPrependCurrencySymbol));
- }
- }
- catch(Exception&)
- {
- OSL_FAIL( "OCurrencyModel::implConstruct: caught an exception while initializing the aggregate!" );
- }
- }
-}
-
-//------------------------------------------------------------------
-DBG_NAME( OCurrencyModel )
-//------------------------------------------------------------------
-OCurrencyModel::OCurrencyModel(const Reference<XMultiServiceFactory>& _rxFactory)
- :OEditBaseModel( _rxFactory, VCL_CONTROLMODEL_CURRENCYFIELD, FRM_SUN_CONTROL_CURRENCYFIELD, sal_False, sal_True )
- // use the old control name for compytibility reasons
-{
- DBG_CTOR( OCurrencyModel, NULL );
-
- m_nClassId = FormComponentType::CURRENCYFIELD;
- initValueProperty( PROPERTY_VALUE, PROPERTY_ID_VALUE );
-
- implConstruct();
-}
-
-//------------------------------------------------------------------
-OCurrencyModel::OCurrencyModel( const OCurrencyModel* _pOriginal, const Reference<XMultiServiceFactory>& _rxFactory )
- :OEditBaseModel( _pOriginal, _rxFactory )
-{
- DBG_CTOR( OCurrencyModel, NULL );
- implConstruct();
-}
-
-//------------------------------------------------------------------
-OCurrencyModel::~OCurrencyModel()
-{
- DBG_DTOR( OCurrencyModel, NULL );
-}
-
-// XCloneable
-//------------------------------------------------------------------------------
-IMPLEMENT_DEFAULT_CLONING( OCurrencyModel )
-
-// XServiceInfo
-//------------------------------------------------------------------------------
-StringSequence SAL_CALL OCurrencyModel::getSupportedServiceNames() throw()
-{
- StringSequence aSupported = OBoundControlModel::getSupportedServiceNames();
-
- sal_Int32 nOldLen = aSupported.getLength();
- aSupported.realloc( nOldLen + 4 );
- ::rtl::OUString* pStoreTo = aSupported.getArray() + nOldLen;
-
- *pStoreTo++ = DATA_AWARE_CONTROL_MODEL;
- *pStoreTo++ = VALIDATABLE_CONTROL_MODEL;
-
- *pStoreTo++ = FRM_SUN_COMPONENT_CURRENCYFIELD;
- *pStoreTo++ = FRM_SUN_COMPONENT_DATABASE_CURRENCYFIELD;
-
- return aSupported;
-}
-
-//------------------------------------------------------------------------------
-void OCurrencyModel::describeFixedProperties( Sequence< Property >& _rProps ) const
-{
- BEGIN_DESCRIBE_PROPERTIES( 2, OEditBaseModel )
- // Value auf transient setzen
-// ModifyPropertyAttributes(_rAggregateProps, PROPERTY_VALUE, PropertyAttribute::TRANSIENT, 0);
-
- DECL_PROP3(DEFAULT_VALUE, double, BOUND, MAYBEDEFAULT, MAYBEVOID);
- DECL_PROP1(TABINDEX, sal_Int16, BOUND);
- END_DESCRIBE_PROPERTIES();
-}
-
-//------------------------------------------------------------------------------
-::rtl::OUString SAL_CALL OCurrencyModel::getServiceName() throw ( ::com::sun::star::uno::RuntimeException)
-{
- return FRM_COMPONENT_CURRENCYFIELD; // old (non-sun) name for compatibility !
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OCurrencyModel::commitControlValueToDbColumn( bool /*_bPostReset*/ )
-{
- Any aControlValue( m_xAggregateFastSet->getFastPropertyValue( getValuePropertyAggHandle() ) );
- if ( !compare( aControlValue, m_aSaveValue ) )
- {
- if ( aControlValue.getValueType().getTypeClass() == TypeClass_VOID )
- m_xColumnUpdate->updateNull();
- else
- {
- try
- {
- m_xColumnUpdate->updateDouble( getDouble( aControlValue ) );
- }
- catch(Exception&)
- {
- return sal_False;
- }
- }
- m_aSaveValue = aControlValue;
- }
- return sal_True;
-}
-
-//------------------------------------------------------------------------------
-Any OCurrencyModel::translateDbColumnToControlValue()
-{
- m_aSaveValue <<= m_xColumn->getDouble();
- if ( m_xColumn->wasNull() )
- m_aSaveValue.clear();
- return m_aSaveValue;
-}
-
-// XReset
-//------------------------------------------------------------------------------
-Any OCurrencyModel::getDefaultForReset() const
-{
- Any aValue;
- if ( m_aDefault.getValueType().getTypeClass() == TypeClass_DOUBLE )
- aValue = m_aDefault;
-
- return aValue;
-}
-
-//------------------------------------------------------------------------------
-void OCurrencyModel::resetNoBroadcast()
-{
- OEditBaseModel::resetNoBroadcast();
- m_aSaveValue.clear();
-}
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Currency.hxx b/forms/source/component/Currency.hxx
deleted file mode 100644
index 49f19d98d..000000000
--- a/forms/source/component/Currency.hxx
+++ /dev/null
@@ -1,103 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FORMS_CURRENCY_HXX_
-#define _FORMS_CURRENCY_HXX_
-
-#include "EditBase.hxx"
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
-//==================================================================
-//= OCurrencyModel
-//==================================================================
-class OCurrencyModel
- :public OEditBaseModel
-{
- ::com::sun::star::uno::Any m_aSaveValue;
-
-protected:
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
-public:
- DECLARE_DEFAULT_LEAF_XTOR( OCurrencyModel );
-
- // ::com::sun::star::lang::XServiceInfo
- IMPLEMENTATION_NAME(OCurrencyModel);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw();
-
- // ::com::sun::star::io::XPersistObject
- virtual ::rtl::OUString SAL_CALL getServiceName() throw ( ::com::sun ::star::uno::RuntimeException);
-
- // OControlModel's property handling
- virtual void describeFixedProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
-
-protected:
- // OBoundControlModel overridables
- virtual ::com::sun::star::uno::Any
- translateDbColumnToControlValue( );
- virtual sal_Bool commitControlValueToDbColumn( bool _bPostReset );
-
- virtual ::com::sun::star::uno::Any
- getDefaultForReset() const;
-
- virtual void resetNoBroadcast();
-
-protected:
- DECLARE_XCLONEABLE();
-
- void implConstruct();
-};
-
-//==================================================================
-//= OCurrencyControl
-//==================================================================
-class OCurrencyControl: public OBoundControl
-{
-protected:
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
-public:
- OCurrencyControl(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory);
- // ::com::sun::star::lang::XServiceInfo
- IMPLEMENTATION_NAME(OCurrencyControl);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw();
-};
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-#endif // _FORMS_CURRENCY_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/DatabaseForm.cxx b/forms/source/component/DatabaseForm.cxx
deleted file mode 100644
index 7ad4bf53d..000000000
--- a/forms/source/component/DatabaseForm.cxx
+++ /dev/null
@@ -1,4162 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-
-#include "componenttools.hxx"
-#include "DatabaseForm.hxx"
-#include "EventThread.hxx"
-#include "frm_module.hxx"
-#include "frm_resource.hrc"
-#include "frm_resource.hxx"
-#include "GroupManager.hxx"
-#include "property.hrc"
-#include "property.hxx"
-#include "services.hxx"
-
-#include <com/sun/star/awt/XControlContainer.hpp>
-#include <com/sun/star/awt/XTextComponent.hpp>
-#include <com/sun/star/form/DataSelectionType.hpp>
-#include <com/sun/star/form/FormComponentType.hpp>
-#include <com/sun/star/form/TabulatorCycle.hpp>
-#include <com/sun/star/frame/FrameSearchFlag.hpp>
-#include <com/sun/star/frame/XDispatch.hpp>
-#include <com/sun/star/frame/XDispatchProvider.hpp>
-#include <com/sun/star/frame/XModel.hpp>
-#include <com/sun/star/io/XObjectInputStream.hpp>
-#include <com/sun/star/io/XObjectOutputStream.hpp>
-#include <com/sun/star/sdb/CommandType.hpp>
-#include <com/sun/star/sdb/RowSetVetoException.hpp>
-#include <com/sun/star/sdb/SQLContext.hpp>
-#include <com/sun/star/sdb/XColumnUpdate.hpp>
-#include <com/sun/star/sdbc/DataType.hpp>
-#include <com/sun/star/sdbc/ResultSetConcurrency.hpp>
-#include <com/sun/star/sdbc/ResultSetType.hpp>
-#include <com/sun/star/sdbc/XRowSet.hpp>
-#include <com/sun/star/sdbcx/Privilege.hpp>
-#include <com/sun/star/sdbcx/XColumnsSupplier.hpp>
-#include <com/sun/star/util/XCancellable.hpp>
-#include <com/sun/star/util/XURLTransformer.hpp>
-#include <com/sun/star/util/XModifiable2.hpp>
-
-#include <comphelper/basicio.hxx>
-#include <comphelper/container.hxx>
-#include <comphelper/enumhelper.hxx>
-#include <comphelper/extract.hxx>
-#include <comphelper/seqstream.hxx>
-#include <comphelper/sequence.hxx>
-#include <comphelper/stl_types.hxx>
-#include <comphelper/uno3.hxx>
-#include <connectivity/dbtools.hxx>
-#include <cppuhelper/exc_hlp.hxx>
-#include <cppuhelper/implbase2.hxx>
-#include <rtl/math.hxx>
-#include <rtl/tencinfo.h>
-#include <svl/inetstrm.hxx>
-#include <svl/inettype.hxx>
-#include <tools/debug.hxx>
-#include <tools/diagnose_ex.h>
-#include <tools/fsys.hxx>
-#include <tools/inetmsg.hxx>
-#include <tools/urlobj.hxx>
-#include <unotools/ucblockbytes.hxx>
-#include <unotools/ucbstreamhelper.hxx>
-#include <vcl/svapp.hxx>
-#include <vcl/timer.hxx>
-#include <osl/mutex.hxx>
-
-#include <ctype.h>
-#include <boost/unordered_map.hpp>
-
-// compatiblity: DatabaseCursorType is dead, but for compatiblity reasons we still have to write it ...
-namespace com {
-namespace sun {
-namespace star {
-namespace data {
-
-enum DatabaseCursorType
-{
- DatabaseCursorType_FORWARD = 0,
- DatabaseCursorType_SNAPSHOT = 1,
- DatabaseCursorType_KEYSET = 2,
- DatabaseCursorType_DYNAMIC = 3,
- DatabaseCursorType_MAKE_FIXED_SIZE = SAL_MAX_ENUM
-};
-
-} } } }
-
-using namespace ::dbtools;
-using namespace ::comphelper;
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::sdb;
-using namespace ::com::sun::star::sdbc;
-using namespace ::com::sun::star::sdbcx;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::task;
-using namespace ::com::sun::star::frame;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::io;
-using namespace ::com::sun::star::lang;
-using namespace ::com::sun::star::data;
-using namespace ::com::sun::star::util;
-
-//--------------------------------------------------------------------------
-extern "C" void SAL_CALL createRegistryInfo_ODatabaseForm()
-{
- static ::frm::OMultiInstanceAutoRegistration< ::frm::ODatabaseForm > aAutoRegistration;
-}
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
-//==================================================================
-//= DocumentModifyGuard
-//==================================================================
-class DocumentModifyGuard
-{
-public:
- DocumentModifyGuard( const Reference< XInterface >& _rxFormComponent )
- :m_xDocumentModify( getXModel( _rxFormComponent ), UNO_QUERY )
- {
- impl_changeModifiableFlag_nothrow( false );
- }
- ~DocumentModifyGuard()
- {
- impl_changeModifiableFlag_nothrow( true );
- }
-
-private:
- void impl_changeModifiableFlag_nothrow( const bool _enable )
- {
- try
- {
- if ( m_xDocumentModify.is() )
- _enable ? m_xDocumentModify->enableSetModified() : m_xDocumentModify->disableSetModified();
- }
- catch(const Exception&)
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- }
-
-private:
- Reference< XModifiable2 > m_xDocumentModify;
-};
-
-//==================================================================
-//= OFormSubmitResetThread
-//=-----------------------------------------------------------------
-//= submitting and resetting html-forms asynchronously
-//==================================================================
-
-//------------------------------------------------------------------
-class OFormSubmitResetThread: public OComponentEventThread
-{
-protected:
-
- // duplicate an event with respect to it's type
- virtual EventObject *cloneEvent( const EventObject *pEvt ) const;
-
- // process an event. while processing the mutex isn't locked, and pCompImpl
- // is made sure to remain valid
- virtual void processEvent( ::cppu::OComponentHelper* _pCompImpl,
- const EventObject* _pEvt,
- const Reference<XControl>& _rControl,
- sal_Bool _bSubmit);
-
-public:
-
- OFormSubmitResetThread(ODatabaseForm* pControl) : OComponentEventThread(pControl) { }
-};
-
-//------------------------------------------------------------------
-EventObject* OFormSubmitResetThread::cloneEvent(
- const EventObject *pEvt ) const
-{
- return new ::com::sun::star::awt::MouseEvent( *(::com::sun::star::awt::MouseEvent *)pEvt );
-}
-
-//------------------------------------------------------------------
-void OFormSubmitResetThread::processEvent(
- ::cppu::OComponentHelper* pCompImpl,
- const EventObject *_pEvt,
- const Reference<XControl>& _rControl,
- sal_Bool _bSubmit)
-{
- if (_bSubmit)
- ((ODatabaseForm *)pCompImpl)->submit_impl(_rControl, *static_cast<const ::com::sun::star::awt::MouseEvent*>(_pEvt), true);
- else
- ((ODatabaseForm *)pCompImpl)->reset_impl(true);
-}
-
-//==================================================================
-//= ODatabaseForm
-//==================================================================
-
-//------------------------------------------------------------------
-Reference< XInterface > SAL_CALL ODatabaseForm::Create( const Reference< XMultiServiceFactory >& _rxFactory )
-{
- return *( new ODatabaseForm( _rxFactory ) );
-}
-
-//------------------------------------------------------------------------------
-Sequence<sal_Int8> SAL_CALL ODatabaseForm::getImplementationId() throw(RuntimeException)
-{
- return OImplementationIds::getImplementationId(getTypes());
-}
-
-//------------------------------------------------------------------
-Sequence<Type> SAL_CALL ODatabaseForm::getTypes() throw(RuntimeException)
-{
- // ask the aggregate
- Sequence<Type> aAggregateTypes;
- Reference<XTypeProvider> xAggregateTypes;
- if (query_aggregation(m_xAggregate, xAggregateTypes))
- aAggregateTypes = xAggregateTypes->getTypes();
-
- Sequence< Type > aRet = concatSequences(
- aAggregateTypes, ODatabaseForm_BASE1::getTypes(), OFormComponents::getTypes()
- );
- aRet = concatSequences( aRet, ODatabaseForm_BASE2::getTypes(), ODatabaseForm_BASE3::getTypes() );
- return concatSequences( aRet, OPropertySetAggregationHelper::getTypes() );
-}
-
-//------------------------------------------------------------------
-Any SAL_CALL ODatabaseForm::queryAggregation(const Type& _rType) throw(RuntimeException)
-{
- Any aReturn = ODatabaseForm_BASE1::queryInterface(_rType);
- // our own interfaces
- if (!aReturn.hasValue())
- {
- aReturn = ODatabaseForm_BASE2::queryInterface(_rType);
- // property set related interfaces
- if (!aReturn.hasValue())
- {
- aReturn = OPropertySetAggregationHelper::queryInterface(_rType);
-
- // form component collection related interfaces
- if (!aReturn.hasValue())
- {
- aReturn = OFormComponents::queryAggregation(_rType);
-
- // interfaces already present in the aggregate which we want to reroute
- // only available if we could create the aggregate
- if (!aReturn.hasValue() && m_xAggregateAsRowSet.is())
- aReturn = ODatabaseForm_BASE3::queryInterface(_rType);
-
- // aggregate interfaces
- // (ask the aggregated object _after_ the OComponentHelper (base of OFormComponents),
- // so calls to the XComponent interface reach us and not the aggreagtion)
- if (!aReturn.hasValue() && m_xAggregate.is())
- aReturn = m_xAggregate->queryAggregation(_rType);
- }
- }
- }
-
- return aReturn;
-}
-
-DBG_NAME(ODatabaseForm);
-//------------------------------------------------------------------
-ODatabaseForm::ODatabaseForm(const Reference<XMultiServiceFactory>& _rxFactory)
- :OFormComponents(_rxFactory)
- ,OPropertySetAggregationHelper(OComponentHelper::rBHelper)
- ,OPropertyChangeListener(m_aMutex)
- ,m_aLoadListeners(m_aMutex)
- ,m_aRowSetApproveListeners(m_aMutex)
- ,m_aRowSetListeners(m_aMutex)
- ,m_aSubmitListeners(m_aMutex)
- ,m_aErrorListeners(m_aMutex)
- ,m_aResetListeners( *this, m_aMutex )
- ,m_aPropertyBagHelper( *this )
- ,m_pAggregatePropertyMultiplexer(NULL)
- ,m_pGroupManager( NULL )
- ,m_aParameterManager( m_aMutex, _rxFactory )
- ,m_aFilterManager( _rxFactory )
- ,m_pLoadTimer(NULL)
- ,m_pThread(NULL)
- ,m_nResetsPending(0)
- ,m_nPrivileges(0)
- ,m_bInsertOnly( sal_False )
- ,m_eSubmitMethod(FormSubmitMethod_GET)
- ,m_eSubmitEncoding(FormSubmitEncoding_URL)
- ,m_eNavigation(NavigationBarMode_CURRENT)
- ,m_bAllowInsert(sal_True)
- ,m_bAllowUpdate(sal_True)
- ,m_bAllowDelete(sal_True)
- ,m_bLoaded(sal_False)
- ,m_bSubForm(sal_False)
- ,m_bForwardingConnection(sal_False)
- ,m_bSharingConnection( sal_False )
-{
- DBG_CTOR( ODatabaseForm, NULL );
- impl_construct();
-}
-
-//------------------------------------------------------------------
-ODatabaseForm::ODatabaseForm( const ODatabaseForm& _cloneSource )
- :OFormComponents( _cloneSource )
- ,OPropertySetAggregationHelper( OComponentHelper::rBHelper )
- ,OPropertyChangeListener( m_aMutex )
- ,ODatabaseForm_BASE1()
- ,ODatabaseForm_BASE2()
- ,ODatabaseForm_BASE3()
- ,IPropertyBagHelperContext()
- ,m_aLoadListeners( m_aMutex )
- ,m_aRowSetApproveListeners( m_aMutex )
- ,m_aRowSetListeners( m_aMutex )
- ,m_aSubmitListeners( m_aMutex )
- ,m_aErrorListeners( m_aMutex )
- ,m_aResetListeners( *this, m_aMutex )
- ,m_aPropertyBagHelper( *this )
- ,m_pAggregatePropertyMultiplexer( NULL )
- ,m_pGroupManager( NULL )
- ,m_aParameterManager( m_aMutex, _cloneSource.m_xServiceFactory )
- ,m_aFilterManager( _cloneSource.m_xServiceFactory )
- ,m_pLoadTimer( NULL )
- ,m_pThread( NULL )
- ,m_nResetsPending( 0 )
- ,m_nPrivileges( 0 )
- ,m_bInsertOnly( _cloneSource.m_bInsertOnly )
- ,m_aControlBorderColorFocus( _cloneSource.m_aControlBorderColorFocus )
- ,m_aControlBorderColorMouse( _cloneSource.m_aControlBorderColorMouse )
- ,m_aControlBorderColorInvalid( _cloneSource.m_aControlBorderColorInvalid )
- ,m_aDynamicControlBorder( _cloneSource.m_aDynamicControlBorder )
- ,m_sName( _cloneSource.m_sName )
- ,m_aTargetURL( _cloneSource.m_aTargetURL )
- ,m_aTargetFrame( _cloneSource.m_aTargetFrame )
- ,m_eSubmitMethod( _cloneSource.m_eSubmitMethod )
- ,m_eSubmitEncoding( _cloneSource.m_eSubmitEncoding )
- ,m_eNavigation( _cloneSource.m_eNavigation )
- ,m_bAllowInsert( _cloneSource.m_bAllowInsert )
- ,m_bAllowUpdate( _cloneSource.m_bAllowUpdate )
- ,m_bAllowDelete( _cloneSource.m_bAllowDelete )
- ,m_bLoaded( sal_False )
- ,m_bSubForm( sal_False )
- ,m_bForwardingConnection( sal_False )
- ,m_bSharingConnection( sal_False )
-{
- DBG_CTOR( ODatabaseForm, NULL );
-
- impl_construct();
-
- osl_incrementInterlockedCount( &m_refCount );
- {
- // our aggregated rowset itself is not cloneable, so simply copy the properties
- ::comphelper::copyProperties( _cloneSource.m_xAggregateSet, m_xAggregateSet );
-
- // also care for the dynamic properties: If the clone source has properties which we do not have,
- // then add them
- try
- {
- Reference< XPropertySet > xSourceProps( const_cast< ODatabaseForm& >( _cloneSource ).queryAggregation(
- XPropertySet::static_type() ), UNO_QUERY_THROW );
- Reference< XPropertySetInfo > xSourcePSI( xSourceProps->getPropertySetInfo(), UNO_SET_THROW );
- Reference< XPropertyState > xSourcePropState( xSourceProps, UNO_QUERY );
-
- Reference< XPropertySetInfo > xDestPSI( getPropertySetInfo(), UNO_QUERY_THROW );
-
- Sequence< Property > aSourceProperties( xSourcePSI->getProperties() );
- for ( const Property* pSourceProperty = aSourceProperties.getConstArray();
- pSourceProperty != aSourceProperties.getConstArray() + aSourceProperties.getLength();
- ++pSourceProperty
- )
- {
- if ( xDestPSI->hasPropertyByName( pSourceProperty->Name ) )
- continue;
-
- // the initial value passed to XPropertyContainer is also used as default, usually. So, try
- // to retrieve the default of the source property
- Any aInitialValue;
- if ( xSourcePropState.is() )
- {
- aInitialValue = xSourcePropState->getPropertyDefault( pSourceProperty->Name );
- }
- else
- {
- aInitialValue = xSourceProps->getPropertyValue( pSourceProperty->Name );
- }
- addProperty( pSourceProperty->Name, pSourceProperty->Attributes, aInitialValue );
- setPropertyValue( pSourceProperty->Name, xSourceProps->getPropertyValue( pSourceProperty->Name ) );
- }
- }
- catch(const Exception&)
- {
- throw WrappedTargetException(
- ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "Could not clone the given database form." ) ),
- *const_cast< ODatabaseForm* >( &_cloneSource ),
- ::cppu::getCaughtException()
- );
- }
- }
- osl_decrementInterlockedCount( &m_refCount );
-}
-
-//------------------------------------------------------------------
-void ODatabaseForm::impl_construct()
-{
- // aggregate a row set
- increment(m_refCount);
- {
- m_xAggregate = Reference< XAggregation >( m_xServiceFactory->createInstance( SRV_SDB_ROWSET ), UNO_QUERY_THROW );
- m_xAggregateAsRowSet.set( m_xAggregate, UNO_QUERY_THROW );
- setAggregation( m_xAggregate );
- }
-
- // listen for the properties, important for Parameters
- if ( m_xAggregateSet.is() )
- {
- m_pAggregatePropertyMultiplexer = new OPropertyChangeMultiplexer(this, m_xAggregateSet, sal_False);
- m_pAggregatePropertyMultiplexer->acquire();
- m_pAggregatePropertyMultiplexer->addProperty(PROPERTY_COMMAND);
- m_pAggregatePropertyMultiplexer->addProperty(PROPERTY_ACTIVE_CONNECTION);
- }
-
- {
- Reference< XWarningsSupplier > xRowSetWarnings( m_xAggregate, UNO_QUERY );
- m_aWarnings.setExternalWarnings( xRowSetWarnings );
- }
-
- if ( m_xAggregate.is() )
- {
- m_xAggregate->setDelegator( static_cast< XWeak* >( this ) );
- }
-
- {
- m_aFilterManager.initialize( m_xAggregateSet );
- m_aParameterManager.initialize( this, m_xAggregate );
-
- declareForwardedProperty( PROPERTY_ID_ACTIVE_CONNECTION );
- }
- decrement( m_refCount );
-
- m_pGroupManager = new OGroupManager( this );
- m_pGroupManager->acquire();
-}
-
-//------------------------------------------------------------------
-ODatabaseForm::~ODatabaseForm()
-{
- DBG_DTOR(ODatabaseForm,NULL);
-
- m_pGroupManager->release();
- m_pGroupManager = NULL;
-
- if (m_xAggregate.is())
- m_xAggregate->setDelegator( NULL );
-
- m_aWarnings.setExternalWarnings( NULL );
-
- if (m_pAggregatePropertyMultiplexer)
- {
- m_pAggregatePropertyMultiplexer->dispose();
- m_pAggregatePropertyMultiplexer->release();
- m_pAggregatePropertyMultiplexer = NULL;
- }
-}
-
-//==============================================================================
-// html tools
-//------------------------------------------------------------------------
-::rtl::OUString ODatabaseForm::GetDataURLEncoded(const Reference<XControl>& SubmitButton, const ::com::sun::star::awt::MouseEvent& MouseEvt)
-{
- return GetDataEncoded(true,SubmitButton,MouseEvt);
-}
-// -----------------------------------------------------------------------------
-::rtl::OUString ODatabaseForm::GetDataEncoded(bool _bURLEncoded,const Reference<XControl>& SubmitButton, const ::com::sun::star::awt::MouseEvent& MouseEvt)
-{
- // Liste von successful Controls fuellen
- HtmlSuccessfulObjList aSuccObjList;
- FillSuccessfulList( aSuccObjList, SubmitButton, MouseEvt );
-
-
- // Liste zu ::rtl::OUString zusammensetzen
- ::rtl::OUStringBuffer aResult;
- ::rtl::OUString aName;
- ::rtl::OUString aValue;
-
- for ( HtmlSuccessfulObjListIterator pSuccObj = aSuccObjList.begin();
- pSuccObj < aSuccObjList.end();
- ++pSuccObj
- )
- {
- aName = pSuccObj->aName;
- aValue = pSuccObj->aValue;
- if( pSuccObj->nRepresentation == SUCCESSFUL_REPRESENT_FILE && aValue.getLength() )
- {
- // Bei File-URLs wird der Dateiname und keine URL uebertragen,
- // weil Netscape dies so macht.
- INetURLObject aURL;
- aURL.SetSmartProtocol(INET_PROT_FILE);
- aURL.SetSmartURL(aValue);
- if( INET_PROT_FILE == aURL.GetProtocol() )
- aValue = INetURLObject::decode(aURL.PathToFileName(), '%', INetURLObject::DECODE_UNAMBIGUOUS);
- }
- Encode( aName );
- Encode( aValue );
-
- aResult.append(aName);
- aResult.append(sal_Unicode('='));
- aResult.append(aValue);
-
- if (pSuccObj < aSuccObjList.end() - 1)
- {
- if ( _bURLEncoded )
- aResult.append(sal_Unicode('&'));
- else
- aResult.appendAscii("\r\n");
- }
- }
-
-
- aSuccObjList.clear();
-
- return aResult.makeStringAndClear();
-}
-
-//==============================================================================
-// html tools
-//------------------------------------------------------------------------
-::rtl::OUString ODatabaseForm::GetDataTextEncoded(const Reference<XControl>& SubmitButton, const ::com::sun::star::awt::MouseEvent& MouseEvt)
-{
- return GetDataEncoded(false,SubmitButton,MouseEvt);
-}
-
-//------------------------------------------------------------------------
-Sequence<sal_Int8> ODatabaseForm::GetDataMultiPartEncoded(const Reference<XControl>& SubmitButton, const ::com::sun::star::awt::MouseEvent& MouseEvt, ::rtl::OUString& rContentType)
-{
-
- // Parent erzeugen
- INetMIMEMessage aParent;
- aParent.EnableAttachChild( INETMSG_MULTIPART_FORM_DATA );
-
-
- // Liste von successful Controls fuellen
- HtmlSuccessfulObjList aSuccObjList;
- FillSuccessfulList( aSuccObjList, SubmitButton, MouseEvt );
-
-
- // Liste zu ::rtl::OUString zusammensetzen
- ::rtl::OUString aResult;
- for ( HtmlSuccessfulObjListIterator pSuccObj = aSuccObjList.begin();
- pSuccObj < aSuccObjList.end();
- ++pSuccObj
- )
- {
- if( pSuccObj->nRepresentation == SUCCESSFUL_REPRESENT_TEXT )
- InsertTextPart( aParent, pSuccObj->aName, pSuccObj->aValue );
- else if( pSuccObj->nRepresentation == SUCCESSFUL_REPRESENT_FILE )
- InsertFilePart( aParent, pSuccObj->aName, pSuccObj->aValue );
- }
-
-
- // Liste loeschen
- aSuccObjList.clear();
-
- // Fuer Parent MessageStream erzeugen
- INetMIMEMessageStream aMessStream;
- aMessStream.SetSourceMessage( &aParent );
- aMessStream.GenerateHeader( sal_False );
-
- // MessageStream in SvStream kopieren
- SvMemoryStream aMemStream;
- char* pBuf = new char[1025];
- int nRead;
- while( (nRead = aMessStream.Read(pBuf, 1024)) > 0 )
- aMemStream.Write( pBuf, nRead );
- delete[] pBuf;
-
- aMemStream.Flush();
- aMemStream.Seek( 0 );
- void* pData = (void*)aMemStream.GetData();
- sal_Int32 nLen = aMemStream.Seek(STREAM_SEEK_TO_END);
-
- rContentType = UniString(aParent.GetContentType());
- return Sequence<sal_Int8>((sal_Int8*)pData, nLen);
-}
-
-//------------------------------------------------------------------------
-namespace
-{
- static void appendDigits( sal_Int32 _nNumber, sal_Int8 nDigits, ::rtl::OUStringBuffer& _rOut )
- {
- sal_Int32 nCurLen = _rOut.getLength();
- _rOut.append( _nNumber );
- while ( _rOut.getLength() - nCurLen < nDigits )
- _rOut.insert( nCurLen, (sal_Unicode)'0' );
- }
-}
-
-//------------------------------------------------------------------------
-void ODatabaseForm::AppendComponent(HtmlSuccessfulObjList& rList, const Reference<XPropertySet>& xComponentSet, const ::rtl::OUString& rNamePrefix,
- const Reference<XControl>& rxSubmitButton, const ::com::sun::star::awt::MouseEvent& MouseEvt)
-{
- if (!xComponentSet.is())
- return;
-
- // MIB 25.6.98: Geschachtelte Formulare abfangen ... oder muesste
- // man sie submitten?
- if (!hasProperty(PROPERTY_CLASSID, xComponentSet))
- return;
-
- // Namen ermitteln
- if (!hasProperty(PROPERTY_NAME, xComponentSet))
- return;
-
- sal_Int16 nClassId = 0;
- xComponentSet->getPropertyValue(PROPERTY_CLASSID) >>= nClassId;
- ::rtl::OUString aName;
- xComponentSet->getPropertyValue( PROPERTY_NAME ) >>= aName;
- if( !aName.getLength() && nClassId != FormComponentType::IMAGEBUTTON)
- return;
- else // Name um den Prefix erweitern
- aName = rNamePrefix + aName;
-
- switch( nClassId )
- {
- // Buttons
- case FormComponentType::COMMANDBUTTON:
- {
- // Es wird nur der gedrueckte Submit-Button ausgewertet
- // MIB: Sofern ueberhaupt einer uebergeben wurde
- if( rxSubmitButton.is() )
- {
- Reference<XPropertySet> xSubmitButtonComponent(rxSubmitButton->getModel(), UNO_QUERY);
- if (xSubmitButtonComponent == xComponentSet && hasProperty(PROPERTY_LABEL, xComponentSet))
- {
- // <name>=<label>
- ::rtl::OUString aLabel;
- xComponentSet->getPropertyValue( PROPERTY_LABEL ) >>= aLabel;
- rList.push_back( HtmlSuccessfulObj(aName, aLabel) );
- }
- }
- } break;
-
- // ImageButtons
- case FormComponentType::IMAGEBUTTON:
- {
- // Es wird nur der gedrueckte Submit-Button ausgewertet
- // MIB: Sofern ueberhaupt einer uebergeben wurde
- if( rxSubmitButton.is() )
- {
- Reference<XPropertySet> xSubmitButtonComponent(rxSubmitButton->getModel(), UNO_QUERY);
- if (xSubmitButtonComponent == xComponentSet)
- {
- // <name>.x=<pos.X>&<name>.y=<pos.Y>
- ::rtl::OUString aLhs = aName;
- ::rtl::OUString aRhs = ::rtl::OUString::valueOf( MouseEvt.X );
-
- // nur wenn ein Name vorhanden ist, kann ein name.x
- aLhs += aName.getLength() ? UniString::CreateFromAscii(".x") : UniString::CreateFromAscii("x");
- rList.push_back( HtmlSuccessfulObj(aLhs, aRhs) );
-
- aLhs = aName;
- aRhs = ::rtl::OUString::valueOf( MouseEvt.Y );
- aLhs += aName.getLength() ? UniString::CreateFromAscii(".y") : UniString::CreateFromAscii("y");
- rList.push_back( HtmlSuccessfulObj(aLhs, aRhs) );
-
- }
- }
- } break;
-
- // CheckBoxen / RadioButtons
- case FormComponentType::CHECKBOX:
- case FormComponentType::RADIOBUTTON:
- {
- // <name>=<refValue>
- if( !hasProperty(PROPERTY_STATE, xComponentSet) )
- break;
- sal_Int16 nChecked = 0;
- xComponentSet->getPropertyValue( PROPERTY_STATE ) >>= nChecked;
- if( nChecked != 1 )
- break;
-
- ::rtl::OUString aStrValue;
- if( hasProperty(PROPERTY_REFVALUE, xComponentSet) )
- xComponentSet->getPropertyValue( PROPERTY_REFVALUE ) >>= aStrValue;
-
- rList.push_back( HtmlSuccessfulObj(aName, aStrValue) );
- } break;
-
- // Edit
- case FormComponentType::TEXTFIELD:
- {
- // <name>=<text>
- if( !hasProperty(PROPERTY_TEXT, xComponentSet) )
- break;
-
- // MIB: Spezial-Behandlung fuer Multiline-Edit nur dann, wenn
- // es auch ein Control dazu gibt.
- Any aTmp = xComponentSet->getPropertyValue( PROPERTY_MULTILINE );
- sal_Bool bMulti = rxSubmitButton.is()
- && (aTmp.getValueType().getTypeClass() == TypeClass_BOOLEAN)
- && getBOOL(aTmp);
- ::rtl::OUString sText;
- if ( bMulti ) // Bei MultiLineEdit Text am Control abholen
- {
-
- Reference<XControlContainer> xControlContainer(rxSubmitButton->getContext(), UNO_QUERY);
- if( !xControlContainer.is() ) break;
-
- Sequence<Reference<XControl> > aControlSeq = xControlContainer->getControls();
- Reference<XControl> xControl;
- Reference<XFormComponent> xControlComponent;
-
- // Richtiges Control suchen
- sal_Int32 i;
- for( i=0; i<aControlSeq.getLength(); i++ )
- {
- xControl = aControlSeq.getConstArray()[i];
- Reference<XPropertySet> xModel(xControl->getModel(), UNO_QUERY);
- if (xModel == xComponentSet)
- {
- Reference<XTextComponent> xTextComponent(xControl, UNO_QUERY);
- if( xTextComponent.is() )
- sText = xTextComponent->getText();
- break;
- }
- }
- // Control nicht gefunden oder nicht existent, (Edit im Grid)
- if (i == aControlSeq.getLength())
- xComponentSet->getPropertyValue( PROPERTY_TEXT ) >>= sText;
- }
- else
- xComponentSet->getPropertyValue( PROPERTY_TEXT ) >>= sText;
-
- rList.push_back( HtmlSuccessfulObj(aName, sText) );
- } break;
-
- // ComboBox, Patternfield
- case FormComponentType::COMBOBOX:
- case FormComponentType::PATTERNFIELD:
- {
- // <name>=<text>
- if( hasProperty(PROPERTY_TEXT, xComponentSet) )
- {
- ::rtl::OUString aText;
- xComponentSet->getPropertyValue( PROPERTY_TEXT ) >>= aText;
- rList.push_back( HtmlSuccessfulObj(aName, aText) );
- }
- } break;
- case FormComponentType::CURRENCYFIELD:
- case FormComponentType::NUMERICFIELD:
- {
- // <name>=<wert> // wert wird als double mit Punkt als Decimaltrenner
- // kein Wert angegeben (NULL) -> wert leer
- if( hasProperty(PROPERTY_VALUE, xComponentSet) )
- {
- ::rtl::OUString aText;
- Any aVal = xComponentSet->getPropertyValue( PROPERTY_VALUE );
-
- double aDoubleVal = 0;
- if (aVal >>= aDoubleVal)
- {
- sal_Int16 nScale = 0;
- xComponentSet->getPropertyValue( PROPERTY_DECIMAL_ACCURACY ) >>= nScale;
- aText = ::rtl::math::doubleToUString(aDoubleVal, rtl_math_StringFormat_F, nScale, '.', sal_True);
- }
- rList.push_back( HtmlSuccessfulObj(aName, aText) );
- }
- } break;
- case FormComponentType::DATEFIELD:
- {
- // <name>=<wert> // Wert wird als Datum im Format (MM-DD-YYYY)
- // kein Wert angegeben (NULL) -> wert leer
- if( hasProperty(PROPERTY_DATE, xComponentSet) )
- {
- ::rtl::OUString aText;
- Any aVal = xComponentSet->getPropertyValue( PROPERTY_DATE );
- sal_Int32 nInt32Val = 0;
- if (aVal >>= nInt32Val)
- {
- ::Date aDate( nInt32Val );
- ::rtl::OUStringBuffer aBuffer;
- appendDigits( aDate.GetMonth(), 2, aBuffer );
- aBuffer.append( (sal_Unicode)'-' );
- appendDigits( aDate.GetDay(), 2, aBuffer );
- aBuffer.append( (sal_Unicode)'-' );
- appendDigits( aDate.GetYear(), 4, aBuffer );
- aText = aBuffer.makeStringAndClear();
- }
- rList.push_back( HtmlSuccessfulObj(aName, aText) );
- }
- } break;
- case FormComponentType::TIMEFIELD:
- {
- // <name>=<wert> // Wert wird als Zeit im Format (HH:MM:SS) angegeben
- // kein Wert angegeben (NULL) -> wert leer
- if( hasProperty(PROPERTY_TIME, xComponentSet) )
- {
- ::rtl::OUString aText;
- Any aVal = xComponentSet->getPropertyValue( PROPERTY_TIME );
- sal_Int32 nInt32Val = 0;
- if (aVal >>= nInt32Val)
- {
- ::Time aTime(nInt32Val);
- ::rtl::OUStringBuffer aBuffer;
- appendDigits( aTime.GetHour(), 2, aBuffer );
- aBuffer.append( (sal_Unicode)'-' );
- appendDigits( aTime.GetMin(), 2, aBuffer );
- aBuffer.append( (sal_Unicode)'-' );
- appendDigits( aTime.GetSec(), 2, aBuffer );
- aText = aBuffer.makeStringAndClear();
- }
- rList.push_back( HtmlSuccessfulObj(aName, aText) );
- }
- } break;
-
- // starform
- case FormComponentType::HIDDENCONTROL:
- {
-
- // <name>=<value>
- if( hasProperty(PROPERTY_HIDDEN_VALUE, xComponentSet) )
- {
- ::rtl::OUString aText;
- xComponentSet->getPropertyValue( PROPERTY_HIDDEN_VALUE ) >>= aText;
- rList.push_back( HtmlSuccessfulObj(aName, aText) );
- }
- } break;
-
- // starform
- case FormComponentType::FILECONTROL:
- {
- // <name>=<text>
- if( hasProperty(PROPERTY_TEXT, xComponentSet) )
- {
-
- ::rtl::OUString aText;
- xComponentSet->getPropertyValue( PROPERTY_TEXT ) >>= aText;
- rList.push_back( HtmlSuccessfulObj(aName, aText, SUCCESSFUL_REPRESENT_FILE) );
- }
- } break;
-
- // starform
- case FormComponentType::LISTBOX:
- {
-
- // <name>=<Token0>&<name>=<Token1>&...&<name>=<TokenN> (Mehrfachselektion)
- if (!hasProperty(PROPERTY_SELECT_SEQ, xComponentSet) ||
- !hasProperty(PROPERTY_STRINGITEMLIST, xComponentSet))
- break;
-
- // angezeigte Werte
- Sequence< ::rtl::OUString > aVisibleList;
- xComponentSet->getPropertyValue( PROPERTY_STRINGITEMLIST ) >>= aVisibleList;
- sal_Int32 nStringCnt = aVisibleList.getLength();
- const ::rtl::OUString* pStrings = aVisibleList.getConstArray();
-
- // Werte-Liste
- Sequence< ::rtl::OUString > aValueList;
- xComponentSet->getPropertyValue( PROPERTY_VALUE_SEQ ) >>= aValueList;
- sal_Int32 nValCnt = aValueList.getLength();
- const ::rtl::OUString* pVals = aValueList.getConstArray();
-
- // Selektion
- Sequence<sal_Int16> aSelectList;
- xComponentSet->getPropertyValue( PROPERTY_SELECT_SEQ ) >>= aSelectList;
- sal_Int32 nSelCount = aSelectList.getLength();
- const sal_Int16* pSels = aSelectList.getConstArray();
-
- // Einfach- oder Mehrfach-Selektion
- // Bei Einfach-Selektionen beruecksichtigt MT nur den ersten Eintrag
- // in der Liste.
- if (nSelCount > 1 && !getBOOL(xComponentSet->getPropertyValue(PROPERTY_MULTISELECTION)))
- nSelCount = 1;
-
- // Die Indizes in der Selektions-Liste koennen auch ungueltig sein,
- // also muss man die gueltigen erstmal raussuchen um die Laenge
- // der neuen Liste zu bestimmen.
- sal_Int32 nCurCnt = 0;
- sal_Int32 i;
- for( i=0; i<nSelCount; ++i )
- {
- if( pSels[i] < nStringCnt )
- ++nCurCnt;
- }
-
- ::rtl::OUString aSubValue;
- for(i=0; i<nCurCnt; ++i )
- {
- sal_Int16 nSelPos = pSels[i];
- if (nSelPos < nValCnt && pVals[nSelPos].getLength())
- {
- aSubValue = pVals[nSelPos];
- }
- else
- {
- aSubValue = pStrings[nSelPos];
- }
- rList.push_back( HtmlSuccessfulObj(aName, aSubValue) );
- }
- } break;
- case FormComponentType::GRIDCONTROL:
- {
- // Die einzelnen Spaltenwerte werden verschickt,
- // der Name wird mit dem Prefix des Names des Grids erweitert
- Reference<XIndexAccess> xContainer(xComponentSet, UNO_QUERY);
- if (!xContainer.is())
- break;
-
- aName += UniString('.');
-
- Reference<XPropertySet> xSet;
- sal_Int32 nCount = xContainer->getCount();
- // we know already how many objects should be appended,
- // so why not allocate the space for them
- rList.reserve( nCount + rList.capacity() ); // not size()
- for (sal_Int32 i = 0; i < nCount; ++i)
- {
- xContainer->getByIndex(i) >>= xSet;
- if (xSet.is())
- AppendComponent(rList, xSet, aName, rxSubmitButton, MouseEvt);
- }
- }
- }
-}
-
-//------------------------------------------------------------------------
-void ODatabaseForm::FillSuccessfulList( HtmlSuccessfulObjList& rList,
- const Reference<XControl>& rxSubmitButton, const ::com::sun::star::awt::MouseEvent& MouseEvt )
-{
- // Liste loeschen
- rList.clear();
- // Ueber Components iterieren
- Reference<XPropertySet> xComponentSet;
- ::rtl::OUString aPrefix;
-
- // we know already how many objects should be appended,
- // so why not allocate the space for them
- rList.reserve( getCount() );
- for( sal_Int32 nIndex=0; nIndex < getCount(); nIndex++ )
- {
- getByIndex( nIndex ) >>= xComponentSet;
- AppendComponent(rList, xComponentSet, aPrefix, rxSubmitButton, MouseEvt);
- }
-}
-
-//------------------------------------------------------------------------
-void ODatabaseForm::Encode( ::rtl::OUString& rString ) const
-{
- ::rtl::OUString aResult;
-
- // Immer ANSI #58641
-// rString.Convert(CHARSET_SYSTEM, CHARSET_ANSI);
-
-
- // Zeilenendezeichen werden als CR dargestellt
- UniString sConverter = rString;
- sConverter.ConvertLineEnd( LINEEND_CR );
- rString = sConverter;
-
-
- // Jeden einzelnen Character ueberpruefen
- sal_Int32 nStrLen = rString.getLength();
- sal_Unicode nCharCode;
- for( sal_Int32 nCurPos=0; nCurPos < nStrLen; ++nCurPos )
- {
- nCharCode = rString[nCurPos];
-
- // Behandlung fuer chars, die kein alphanumerisches Zeichen sind
- // und CharacterCodes > 127
- if( (!isalnum(nCharCode) && nCharCode != (sal_Unicode)' ') || nCharCode > 127 )
- {
- switch( nCharCode )
- {
- case 13: // CR
- aResult += ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("%0D%0A") ); // Hex-Darstellung CR LF
- break;
-
-
- // Netscape Sonderbehandlung
- case 42: // '*'
- case 45: // '-'
- case 46: // '.'
- case 64: // '@'
- case 95: // '_'
- aResult += UniString(nCharCode);
- break;
-
- default:
- {
- // In Hex umrechnen
- short nHi = ((sal_Int16)nCharCode) / 16;
- short nLo = ((sal_Int16)nCharCode) - (nHi*16);
- if( nHi > 9 ) nHi += (int)'A'-10; else nHi += (int)'0';
- if( nLo > 9 ) nLo += (int)'A'-10; else nLo += (int)'0';
- aResult += UniString('%');
- aResult += UniString((sal_Unicode)nHi);
- aResult += UniString((sal_Unicode)nLo);
- }
- }
- }
- else
- aResult += UniString(nCharCode);
- }
-
-
- // Spaces durch '+' ersetzen
- aResult = aResult.replace(' ', '+');
-
- rString = aResult;
-}
-
-//------------------------------------------------------------------------
-void ODatabaseForm::InsertTextPart( INetMIMEMessage& rParent, const ::rtl::OUString& rName,
- const ::rtl::OUString& rData )
-{
-
- // Part als Message-Child erzeugen
- INetMIMEMessage* pChild = new INetMIMEMessage();
-
-
- // Header
- ::rtl::OUString aContentDisp (RTL_CONSTASCII_USTRINGPARAM("form-data; name=\"") );
- aContentDisp += rName;
- aContentDisp += UniString('\"');
- pChild->SetContentDisposition( aContentDisp );
- pChild->SetContentType( UniString::CreateFromAscii("text/plain") );
-
- rtl_TextEncoding eSystemEncoding = gsl_getSystemTextEncoding();
- const sal_Char* pBestMatchingEncoding = rtl_getBestMimeCharsetFromTextEncoding( eSystemEncoding );
- UniString aBestMatchingEncoding = UniString::CreateFromAscii( pBestMatchingEncoding );
- pChild->SetContentTransferEncoding(aBestMatchingEncoding);
-
- // Body
- SvMemoryStream* pStream = new SvMemoryStream;
- pStream->WriteLine( ByteString( UniString(rData), rtl_getTextEncodingFromMimeCharset(pBestMatchingEncoding) ) );
- pStream->Flush();
- pStream->Seek( 0 );
- pChild->SetDocumentLB( new SvLockBytes(pStream, sal_True) );
- rParent.AttachChild( *pChild );
-}
-
-//------------------------------------------------------------------------
-sal_Bool ODatabaseForm::InsertFilePart( INetMIMEMessage& rParent, const ::rtl::OUString& rName,
- const ::rtl::OUString& rFileName )
-{
- UniString aFileName( rFileName );
- UniString aContentType(UniString::CreateFromAscii(CONTENT_TYPE_STR_TEXT_PLAIN));
- SvStream *pStream = 0;
-
- if( aFileName.Len() )
- {
- // Bisher koennen wir nur File-URLs verarbeiten
- INetURLObject aURL;
- aURL.SetSmartProtocol(INET_PROT_FILE);
- aURL.SetSmartURL(rFileName);
- if( INET_PROT_FILE == aURL.GetProtocol() )
- {
- aFileName = INetURLObject::decode(aURL.PathToFileName(), '%', INetURLObject::DECODE_UNAMBIGUOUS);
- DirEntry aDirEntry( aFileName );
- if( aDirEntry.Exists() )
- {
- pStream = ::utl::UcbStreamHelper::CreateStream(aFileName, STREAM_READ);
- if (!pStream || (pStream->GetError() != ERRCODE_NONE))
- {
- delete pStream;
- pStream = 0;
- }
- }
- INetContentType eContentType = INetContentTypes::GetContentType4Extension(
- aDirEntry.GetExtension() );
- if (eContentType != CONTENT_TYPE_UNKNOWN)
- aContentType = INetContentTypes::GetContentType(eContentType);
- }
- }
-
- // Wenn irgendetwas nicht geklappt hat, legen wir einen leeren
- // MemoryStream an
- if( !pStream )
- pStream = new SvMemoryStream;
-
-
- // Part als Message-Child erzeugen
- INetMIMEMessage* pChild = new INetMIMEMessage;
-
-
- // Header
- ::rtl::OUString aContentDisp (RTL_CONSTASCII_USTRINGPARAM( "form-data; name=\"") );
- aContentDisp += rName;
- aContentDisp += UniString('\"');
- aContentDisp += ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("; filename=\"") );
- aContentDisp += aFileName;
- aContentDisp += UniString('\"');
- pChild->SetContentDisposition( aContentDisp );
- pChild->SetContentType( aContentType );
- pChild->SetContentTransferEncoding( UniString(::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("8bit") ) ) );
-
-
- // Body
- pChild->SetDocumentLB( new SvLockBytes(pStream, sal_True) );
- rParent.AttachChild( *pChild );
-
- return sal_True;
-}
-
-//==============================================================================
-// internals
-//------------------------------------------------------------------------------
-void ODatabaseForm::onError( const SQLErrorEvent& _rEvent )
-{
- m_aErrorListeners.notifyEach( &XSQLErrorListener::errorOccured, _rEvent );
-}
-
-//------------------------------------------------------------------------------
-void ODatabaseForm::onError( const SQLException& _rException, const ::rtl::OUString& _rContextDescription )
-{
- if ( !m_aErrorListeners.getLength() )
- return;
-
- SQLErrorEvent aEvent( *this, makeAny( prependErrorInfo( _rException, *this, _rContextDescription ) ) );
- onError( aEvent );
-}
-
-//------------------------------------------------------------------------------
-void ODatabaseForm::updateParameterInfo()
-{
- m_aParameterManager.updateParameterInfo( m_aFilterManager );
-}
-
-//------------------------------------------------------------------------------
-bool ODatabaseForm::hasValidParent() const
-{
- // do we have to fill the parameters again?
- if (m_bSubForm)
- {
- Reference<XResultSet> xResultSet(m_xParent, UNO_QUERY);
- if (!xResultSet.is())
- {
- OSL_FAIL("ODatabaseForm::hasValidParent() : no parent resultset !");
- return false;
- }
- try
- {
- Reference< XPropertySet > xSet( m_xParent, UNO_QUERY );
- Reference< XLoadable > xLoad( m_xParent, UNO_QUERY );
- if ( xLoad->isLoaded()
- && ( xResultSet->isBeforeFirst()
- || xResultSet->isAfterLast()
- || getBOOL( xSet->getPropertyValue( PROPERTY_ISNEW ) )
- )
- )
- // the parent form is loaded and on a "virtual" row -> not valid
- return false;
- }
- catch(const Exception&)
- {
- // parent could be forwardonly?
- return false;
- }
- }
- return true;
-}
-
-//------------------------------------------------------------------------------
-bool ODatabaseForm::fillParameters( ::osl::ResettableMutexGuard& _rClearForNotifies, const Reference< XInteractionHandler >& _rxCompletionHandler )
-{
- // do we have to fill the parameters again?
- if ( !m_aParameterManager.isUpToDate() )
- updateParameterInfo();
-
- // is there a valid parent?
- if ( m_bSubForm && !hasValidParent() )
- return true;
-
- // ensure we're connected
- if ( !implEnsureConnection() )
- return false;
-
- if ( m_aParameterManager.isUpToDate() )
- return m_aParameterManager.fillParameterValues( _rxCompletionHandler, _rClearForNotifies );
-
- return true;
-}
-
-//------------------------------------------------------------------------------
-void ODatabaseForm::saveInsertOnlyState( )
-{
- OSL_ENSURE( !m_aIgnoreResult.hasValue(), "ODatabaseForm::saveInsertOnlyState: overriding old value!" );
- m_aIgnoreResult = m_xAggregateSet->getPropertyValue( PROPERTY_INSERTONLY );
-}
-
-//------------------------------------------------------------------------------
-void ODatabaseForm::restoreInsertOnlyState( )
-{
- if ( m_aIgnoreResult.hasValue() )
- {
- m_xAggregateSet->setPropertyValue( PROPERTY_INSERTONLY, m_aIgnoreResult );
- m_aIgnoreResult = Any();
- }
-}
-
-//------------------------------------------------------------------------------
-sal_Bool ODatabaseForm::executeRowSet(::osl::ResettableMutexGuard& _rClearForNotifies, sal_Bool bMoveToFirst, const Reference< XInteractionHandler >& _rxCompletionHandler)
-{
- if (!m_xAggregateAsRowSet.is())
- return sal_False;
-
- if (!fillParameters(_rClearForNotifies, _rxCompletionHandler))
- return sal_False;
-
- restoreInsertOnlyState( );
-
- // ensure the aggregated row set has the correct properties
- sal_Int32 nConcurrency = ResultSetConcurrency::READ_ONLY;
-
- // if we have a parent, who is not positioned on a valid row
- // we can't be updatable!
- if (m_bSubForm && !hasValidParent())
- {
- nConcurrency = ResultSetConcurrency::READ_ONLY;
-
- // don't use any parameters if we don't have a valid parent
- m_aParameterManager.setAllParametersNull();
-
- // switch to "insert only" mode
- saveInsertOnlyState( );
- m_xAggregateSet->setPropertyValue( PROPERTY_INSERTONLY, makeAny( sal_True ) );
- }
- else if (m_bAllowInsert || m_bAllowUpdate || m_bAllowDelete)
- nConcurrency = ResultSetConcurrency::UPDATABLE;
- else
- nConcurrency = ResultSetConcurrency::READ_ONLY;
-
- m_xAggregateSet->setPropertyValue( PROPERTY_RESULTSET_CONCURRENCY, makeAny( (sal_Int32)nConcurrency ) );
- m_xAggregateSet->setPropertyValue( PROPERTY_RESULTSET_TYPE, makeAny( (sal_Int32)ResultSetType::SCROLL_SENSITIVE ) );
-
- sal_Bool bSuccess = sal_False;
- try
- {
- m_xAggregateAsRowSet->execute();
- bSuccess = sal_True;
- }
- catch(const RowSetVetoException&)
- {
- }
- catch(const SQLException& eDb)
- {
- _rClearForNotifies.clear();
- if (m_sCurrentErrorContext.getLength())
- onError(eDb, m_sCurrentErrorContext);
- else
- onError(eDb, FRM_RES_STRING(RID_STR_READERROR));
- _rClearForNotifies.reset();
-
- restoreInsertOnlyState( );
- }
-
- if (bSuccess)
- {
- // adjust the privilege property
- // m_nPrivileges;
- m_xAggregateSet->getPropertyValue(PROPERTY_PRIVILEGES) >>= m_nPrivileges;
- if (!m_bAllowInsert)
- m_nPrivileges &= ~Privilege::INSERT;
- if (!m_bAllowUpdate)
- m_nPrivileges &= ~Privilege::UPDATE;
- if (!m_bAllowDelete)
- m_nPrivileges &= ~Privilege::DELETE;
-
- if (bMoveToFirst)
- {
- // the row set is positioned _before_ the first row (per definitionem), so move the set ...
- try
- {
- // if we have an insert only rowset we move to the insert row
- next();
- if (((m_nPrivileges & Privilege::INSERT) == Privilege::INSERT)
- && isAfterLast())
- {
- // move on the insert row of set
- // resetting must be done later, after the load events have been posted
- // see :moveToInsertRow and load , reload
- Reference<XResultSetUpdate> xUpdate;
- if (query_aggregation( m_xAggregate, xUpdate))
- xUpdate->moveToInsertRow();
- }
- }
- catch(const SQLException& eDB)
- {
- _rClearForNotifies.clear();
- if (m_sCurrentErrorContext.getLength())
- onError(eDB, m_sCurrentErrorContext);
- else
- onError(eDB, FRM_RES_STRING(RID_STR_READERROR));
- _rClearForNotifies.reset();
- bSuccess = sal_False;
- }
- }
- }
- return bSuccess;
-}
-
-//------------------------------------------------------------------
-void ODatabaseForm::disposing()
-{
- if (m_pAggregatePropertyMultiplexer)
- m_pAggregatePropertyMultiplexer->dispose();
-
- if (m_bLoaded)
- unload();
-
- // cancel the submit/reset-thread
- {
- ::osl::MutexGuard aGuard( m_aMutex );
- if (m_pThread)
- {
- m_pThread->release();
- m_pThread = NULL;
- }
- }
-
- EventObject aEvt(static_cast<XWeak*>(this));
- m_aLoadListeners.disposeAndClear(aEvt);
- m_aRowSetApproveListeners.disposeAndClear(aEvt);
- m_aParameterManager.disposing( aEvt );
- m_aResetListeners.disposing();
- m_aSubmitListeners.disposeAndClear(aEvt);
- m_aErrorListeners.disposeAndClear(aEvt);
-
- m_aParameterManager.dispose(); // (to free any references it may have to me)
- m_aFilterManager.dispose(); // (dito)
-
- OFormComponents::disposing();
- OPropertySetAggregationHelper::disposing();
-
- // stop listening on the aggregate
- if (m_xAggregateAsRowSet.is())
- m_xAggregateAsRowSet->removeRowSetListener(this);
-
- // dispose the active connection
- Reference<XComponent> xAggregationComponent;
- if (query_aggregation(m_xAggregate, xAggregationComponent))
- xAggregationComponent->dispose();
-
- m_aPropertyBagHelper.dispose();
-}
-
-//------------------------------------------------------------------------------
-Reference< XConnection > ODatabaseForm::getConnection()
-{
- Reference< XConnection > xConn;
- m_xAggregateSet->getPropertyValue( PROPERTY_ACTIVE_CONNECTION ) >>= xConn;
- return xConn;
-}
-
-//------------------------------------------------------------------------------
-::osl::Mutex& ODatabaseForm::getMutex()
-{
- return m_aMutex;
-}
-
-//==============================================================================
-// property handling
-//------------------------------------------------------------------------------
-void ODatabaseForm::describeFixedAndAggregateProperties(
- Sequence< Property >& _rProps,
- Sequence< Property >& _rAggregateProps ) const
-{
- BEGIN_DESCRIBE_AGGREGATION_PROPERTIES(22, m_xAggregateSet)
- // we want to "override" the privileges, since we have additional "AllowInsert" etc. properties
- RemoveProperty( _rAggregateProps, PROPERTY_PRIVILEGES );
-
- // InsertOnly is also to be overridden, since we sometimes change it ourself
- RemoveProperty( _rAggregateProps, PROPERTY_INSERTONLY );
-
- // we remove and re-declare the DataSourceName property, 'cause we want it to be constrained, and the
- // original property of our aggregate isn't
- RemoveProperty( _rAggregateProps, PROPERTY_DATASOURCE );
-
- // for connection sharing, we need to override the ActiveConnection property, too
- RemoveProperty( _rAggregateProps, PROPERTY_ACTIVE_CONNECTION );
-
- // the Filter property is also overwritten, since we have some implicit filters
- // (e.g. the ones which result from linking master fields to detail fields
- // via column names instead of parameters)
- RemoveProperty( _rAggregateProps, PROPERTY_FILTER );
- RemoveProperty( _rAggregateProps, PROPERTY_APPLYFILTER );
-
- DECL_IFACE_PROP4(ACTIVE_CONNECTION, XConnection, BOUND, TRANSIENT, MAYBEVOID, CONSTRAINED);
- DECL_BOOL_PROP2 ( APPLYFILTER, BOUND, MAYBEDEFAULT );
- DECL_PROP1 ( NAME, ::rtl::OUString, BOUND );
- DECL_PROP1 ( MASTERFIELDS, Sequence< ::rtl::OUString >, BOUND );
- DECL_PROP1 ( DETAILFIELDS, Sequence< ::rtl::OUString >, BOUND );
- DECL_PROP2 ( DATASOURCE, ::rtl::OUString, BOUND, CONSTRAINED );
- DECL_PROP3 ( CYCLE, TabulatorCycle, BOUND, MAYBEVOID, MAYBEDEFAULT );
- DECL_PROP2 ( FILTER, ::rtl::OUString, BOUND, MAYBEDEFAULT );
- DECL_BOOL_PROP2 ( INSERTONLY, BOUND, MAYBEDEFAULT );
- DECL_PROP1 ( NAVIGATION, NavigationBarMode, BOUND );
- DECL_BOOL_PROP1 ( ALLOWADDITIONS, BOUND );
- DECL_BOOL_PROP1 ( ALLOWEDITS, BOUND );
- DECL_BOOL_PROP1 ( ALLOWDELETIONS, BOUND );
- DECL_PROP2 ( PRIVILEGES, sal_Int32, TRANSIENT, READONLY );
- DECL_PROP1 ( TARGET_URL, ::rtl::OUString, BOUND );
- DECL_PROP1 ( TARGET_FRAME, ::rtl::OUString, BOUND );
- DECL_PROP1 ( SUBMIT_METHOD, FormSubmitMethod, BOUND );
- DECL_PROP1 ( SUBMIT_ENCODING, FormSubmitEncoding, BOUND );
- DECL_BOOL_PROP3 ( DYNAMIC_CONTROL_BORDER, BOUND, MAYBEVOID, MAYBEDEFAULT );
- DECL_PROP3 ( CONTROL_BORDER_COLOR_FOCUS, sal_Int32, BOUND, MAYBEVOID, MAYBEDEFAULT );
- DECL_PROP3 ( CONTROL_BORDER_COLOR_MOUSE, sal_Int32, BOUND, MAYBEVOID, MAYBEDEFAULT );
- DECL_PROP3 ( CONTROL_BORDER_COLOR_INVALID, sal_Int32, BOUND, MAYBEVOID, MAYBEDEFAULT );
- END_DESCRIBE_PROPERTIES();
-}
-
-//------------------------------------------------------------------------------
-Reference< XMultiPropertySet > ODatabaseForm::getPropertiesInterface()
-{
- return Reference< XMultiPropertySet >( *this, UNO_QUERY );
-}
-
-//------------------------------------------------------------------------------
-::cppu::IPropertyArrayHelper& ODatabaseForm::getInfoHelper()
-{
- return m_aPropertyBagHelper.getInfoHelper();
-}
-
-//------------------------------------------------------------------------------
-Reference< XPropertySetInfo > ODatabaseForm::getPropertySetInfo() throw( RuntimeException )
-{
- return createPropertySetInfo( getInfoHelper() );
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::addProperty( const ::rtl::OUString& _rName, ::sal_Int16 _nAttributes, const Any& _rInitialValue ) throw (PropertyExistException, IllegalTypeException, IllegalArgumentException, RuntimeException)
-{
- m_aPropertyBagHelper.addProperty( _rName, _nAttributes, _rInitialValue );
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::removeProperty( const ::rtl::OUString& _rName ) throw (UnknownPropertyException, NotRemoveableException, RuntimeException)
-{
- m_aPropertyBagHelper.removeProperty( _rName );
-}
-
-//--------------------------------------------------------------------
-Sequence< PropertyValue > SAL_CALL ODatabaseForm::getPropertyValues() throw (RuntimeException)
-{
- return m_aPropertyBagHelper.getPropertyValues();
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setPropertyValues( const Sequence< PropertyValue >& _rProps ) throw (UnknownPropertyException, PropertyVetoException, IllegalArgumentException, WrappedTargetException, RuntimeException)
-{
- m_aPropertyBagHelper.setPropertyValues( _rProps );
-}
-
-//------------------------------------------------------------------------------
-Any SAL_CALL ODatabaseForm::getWarnings( ) throw (SQLException, RuntimeException)
-{
- return m_aWarnings.getWarnings();
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::clearWarnings( ) throw (SQLException, RuntimeException)
-{
- m_aWarnings.clearWarnings();
-}
-
-//------------------------------------------------------------------------------
-Reference< XCloneable > SAL_CALL ODatabaseForm::createClone( ) throw (RuntimeException)
-{
- ODatabaseForm* pClone = new ODatabaseForm( *this );
- osl_incrementInterlockedCount( &pClone->m_refCount );
- pClone->clonedFrom( *this );
- osl_decrementInterlockedCount( &pClone->m_refCount );
- return pClone;
-}
-
-//------------------------------------------------------------------------------
-void ODatabaseForm::fire( sal_Int32* pnHandles, const Any* pNewValues, const Any* pOldValues, sal_Int32 nCount, sal_Bool bVetoable )
-{
- // same as in getFastPropertyValue(sal_Int32) : if we're resetting currently don't fire any changes of the
- // IsModified property from sal_False to sal_True, as this is only temporary 'til the reset is done
- if (m_nResetsPending > 0)
- {
- // look for the PROPERTY_ID_ISMODIFIED
- sal_Int32 nPos = 0;
- for (nPos=0; nPos<nCount; ++nPos)
- if (pnHandles[nPos] == PROPERTY_ID_ISMODIFIED)
- break;
-
- if ((nPos < nCount) && (pNewValues[nPos].getValueType().getTypeClass() == TypeClass_BOOLEAN) && getBOOL(pNewValues[nPos]))
- { // yeah, we found it, and it changed to TRUE
- if (nPos == 0)
- { // just cut the first element
- ++pnHandles;
- ++pNewValues;
- ++pOldValues;
- --nCount;
- }
- else if (nPos == nCount - 1)
- // just cut the last element
- --nCount;
- else
- { // split into two base class calls
- OPropertySetAggregationHelper::fire(pnHandles, pNewValues, pOldValues, nPos, bVetoable);
- ++nPos;
- OPropertySetAggregationHelper::fire(pnHandles + nPos, pNewValues + nPos, pOldValues + nPos, nCount - nPos, bVetoable);
- return;
- }
- }
- }
-
- OPropertySetAggregationHelper::fire(pnHandles, pNewValues, pOldValues, nCount, bVetoable);
-}
-
-//------------------------------------------------------------------------------
-Any SAL_CALL ODatabaseForm::getFastPropertyValue( sal_Int32 nHandle )
- throw(UnknownPropertyException, WrappedTargetException, RuntimeException)
-{
- if ((nHandle == PROPERTY_ID_ISMODIFIED) && (m_nResetsPending > 0))
- return ::cppu::bool2any((sal_False));
- // don't allow the aggregate which is currently being reset to return a (temporary) "yes"
- else
- return OPropertySetAggregationHelper::getFastPropertyValue(nHandle);
-}
-
-//------------------------------------------------------------------------------
-void ODatabaseForm::getFastPropertyValue( Any& rValue, sal_Int32 nHandle ) const
-{
- switch (nHandle)
- {
- case PROPERTY_ID_INSERTONLY:
- rValue <<= m_bInsertOnly;
- break;
-
- case PROPERTY_ID_FILTER:
- rValue <<= m_aFilterManager.getFilterComponent( FilterManager::fcPublicFilter );
- break;
-
- case PROPERTY_ID_APPLYFILTER:
- rValue <<= m_aFilterManager.isApplyPublicFilter();
- break;
-
- case PROPERTY_ID_DATASOURCE:
- rValue = m_xAggregateSet->getPropertyValue( PROPERTY_DATASOURCE );
- break;
-
- case PROPERTY_ID_TARGET_URL:
- rValue <<= m_aTargetURL;
- break;
- case PROPERTY_ID_TARGET_FRAME:
- rValue <<= m_aTargetFrame;
- break;
- case PROPERTY_ID_SUBMIT_METHOD:
- rValue <<= m_eSubmitMethod;
- break;
- case PROPERTY_ID_SUBMIT_ENCODING:
- rValue <<= m_eSubmitEncoding;
- break;
- case PROPERTY_ID_NAME:
- rValue <<= m_sName;
- break;
- case PROPERTY_ID_MASTERFIELDS:
- rValue <<= m_aMasterFields;
- break;
- case PROPERTY_ID_DETAILFIELDS:
- rValue <<= m_aDetailFields;
- break;
- case PROPERTY_ID_CYCLE:
- rValue = m_aCycle;
- break;
- case PROPERTY_ID_NAVIGATION:
- rValue <<= m_eNavigation;
- break;
- case PROPERTY_ID_ALLOWADDITIONS:
- rValue <<= (sal_Bool)m_bAllowInsert;
- break;
- case PROPERTY_ID_ALLOWEDITS:
- rValue <<= (sal_Bool)m_bAllowUpdate;
- break;
- case PROPERTY_ID_ALLOWDELETIONS:
- rValue <<= (sal_Bool)m_bAllowDelete;
- break;
- case PROPERTY_ID_PRIVILEGES:
- rValue <<= (sal_Int32)m_nPrivileges;
- break;
- case PROPERTY_ID_DYNAMIC_CONTROL_BORDER:
- rValue = m_aDynamicControlBorder;
- break;
- case PROPERTY_ID_CONTROL_BORDER_COLOR_FOCUS:
- rValue = m_aControlBorderColorFocus;
- break;
- case PROPERTY_ID_CONTROL_BORDER_COLOR_MOUSE:
- rValue = m_aControlBorderColorMouse;
- break;
- case PROPERTY_ID_CONTROL_BORDER_COLOR_INVALID:
- rValue = m_aControlBorderColorInvalid;
- break;
- default:
- if ( m_aPropertyBagHelper.hasDynamicPropertyByHandle( nHandle ) )
- m_aPropertyBagHelper.getDynamicFastPropertyValue( nHandle, rValue );
- else
- OPropertySetAggregationHelper::getFastPropertyValue( rValue, nHandle );
- break;
- }
-}
-
-//------------------------------------------------------------------------------
-sal_Bool ODatabaseForm::convertFastPropertyValue( Any& rConvertedValue, Any& rOldValue,
- sal_Int32 nHandle, const Any& rValue ) throw( IllegalArgumentException )
-{
- sal_Bool bModified(sal_False);
- switch (nHandle)
- {
- case PROPERTY_ID_INSERTONLY:
- bModified = tryPropertyValue( rConvertedValue, rOldValue, rValue, m_bInsertOnly );
- break;
-
- case PROPERTY_ID_FILTER:
- bModified = tryPropertyValue( rConvertedValue, rOldValue, rValue, m_aFilterManager.getFilterComponent( FilterManager::fcPublicFilter ) );
- break;
-
- case PROPERTY_ID_APPLYFILTER:
- bModified = tryPropertyValue( rConvertedValue, rOldValue, rValue, m_aFilterManager.isApplyPublicFilter() );
- break;
-
- case PROPERTY_ID_DATASOURCE:
- {
- Any aAggregateProperty;
- getFastPropertyValue(aAggregateProperty, PROPERTY_ID_DATASOURCE);
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, aAggregateProperty, ::getCppuType(static_cast<const ::rtl::OUString*>(NULL)));
- }
- break;
- case PROPERTY_ID_TARGET_URL:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_aTargetURL);
- break;
- case PROPERTY_ID_TARGET_FRAME:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_aTargetFrame);
- break;
- case PROPERTY_ID_SUBMIT_METHOD:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_eSubmitMethod);
- break;
- case PROPERTY_ID_SUBMIT_ENCODING:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_eSubmitEncoding);
- break;
- case PROPERTY_ID_NAME:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_sName);
- break;
- case PROPERTY_ID_MASTERFIELDS:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_aMasterFields);
- break;
- case PROPERTY_ID_DETAILFIELDS:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_aDetailFields);
- break;
- case PROPERTY_ID_CYCLE:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_aCycle, ::getCppuType(static_cast<const TabulatorCycle*>(NULL)));
- break;
- case PROPERTY_ID_NAVIGATION:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_eNavigation);
- break;
- case PROPERTY_ID_ALLOWADDITIONS:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_bAllowInsert);
- break;
- case PROPERTY_ID_ALLOWEDITS:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_bAllowUpdate);
- break;
- case PROPERTY_ID_ALLOWDELETIONS:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_bAllowDelete);
- break;
- case PROPERTY_ID_DYNAMIC_CONTROL_BORDER:
- bModified = tryPropertyValue( rConvertedValue, rOldValue, rValue, m_aDynamicControlBorder, ::getBooleanCppuType() );
- break;
- case PROPERTY_ID_CONTROL_BORDER_COLOR_FOCUS:
- bModified = tryPropertyValue( rConvertedValue, rOldValue, rValue, m_aControlBorderColorFocus, getCppuType( static_cast< sal_Int32* >( NULL ) ) );
- break;
- case PROPERTY_ID_CONTROL_BORDER_COLOR_MOUSE:
- bModified = tryPropertyValue( rConvertedValue, rOldValue, rValue, m_aControlBorderColorMouse, getCppuType( static_cast< sal_Int32* >( NULL ) ) );
- break;
- case PROPERTY_ID_CONTROL_BORDER_COLOR_INVALID:
- bModified = tryPropertyValue( rConvertedValue, rOldValue, rValue, m_aControlBorderColorInvalid, getCppuType( static_cast< sal_Int32* >( NULL ) ) );
- break;
- default:
- if ( m_aPropertyBagHelper.hasDynamicPropertyByHandle ( nHandle ) )
- bModified = m_aPropertyBagHelper.convertDynamicFastPropertyValue( nHandle, rValue, rConvertedValue, rOldValue );
- else
- bModified = OPropertySetAggregationHelper::convertFastPropertyValue( rConvertedValue, rOldValue, nHandle, rValue );
- break;
- }
- return bModified;
-}
-
-//------------------------------------------------------------------------------
-void ODatabaseForm::setFastPropertyValue_NoBroadcast( sal_Int32 nHandle, const Any& rValue ) throw( Exception )
-{
- switch (nHandle)
- {
- case PROPERTY_ID_INSERTONLY:
- rValue >>= m_bInsertOnly;
- if ( m_aIgnoreResult.hasValue() )
- m_aIgnoreResult <<= m_bInsertOnly;
- else
- m_xAggregateSet->setPropertyValue( PROPERTY_INSERTONLY, makeAny( m_bInsertOnly ) );
- break;
-
- case PROPERTY_ID_FILTER:
- {
- ::rtl::OUString sNewFilter;
- rValue >>= sNewFilter;
- m_aFilterManager.setFilterComponent( FilterManager::fcPublicFilter, sNewFilter );
- }
- break;
-
- case PROPERTY_ID_APPLYFILTER:
- {
- sal_Bool bApply = sal_True;
- rValue >>= bApply;
- m_aFilterManager.setApplyPublicFilter( bApply );
- }
- break;
-
- case PROPERTY_ID_DATASOURCE:
- {
- Reference< XConnection > xSomeConnection;
- if ( ::dbtools::isEmbeddedInDatabase( getParent(), xSomeConnection ) )
- throw PropertyVetoException();
-
- try
- {
- m_xAggregateSet->setPropertyValue(PROPERTY_DATASOURCE, rValue);
- }
- catch(const Exception&)
- {
- }
- }
- break;
- case PROPERTY_ID_TARGET_URL:
- rValue >>= m_aTargetURL;
- break;
- case PROPERTY_ID_TARGET_FRAME:
- rValue >>= m_aTargetFrame;
- break;
- case PROPERTY_ID_SUBMIT_METHOD:
- rValue >>= m_eSubmitMethod;
- break;
- case PROPERTY_ID_SUBMIT_ENCODING:
- rValue >>= m_eSubmitEncoding;
- break;
- case PROPERTY_ID_NAME:
- rValue >>= m_sName;
- break;
- case PROPERTY_ID_MASTERFIELDS:
- rValue >>= m_aMasterFields;
- invlidateParameters();
- break;
- case PROPERTY_ID_DETAILFIELDS:
- rValue >>= m_aDetailFields;
- invlidateParameters();
- break;
- case PROPERTY_ID_CYCLE:
- m_aCycle = rValue;
- break;
- case PROPERTY_ID_NAVIGATION:
- rValue >>= m_eNavigation;
- break;
- case PROPERTY_ID_ALLOWADDITIONS:
- m_bAllowInsert = getBOOL(rValue);
- break;
- case PROPERTY_ID_ALLOWEDITS:
- m_bAllowUpdate = getBOOL(rValue);
- break;
- case PROPERTY_ID_ALLOWDELETIONS:
- m_bAllowDelete = getBOOL(rValue);
- break;
- case PROPERTY_ID_DYNAMIC_CONTROL_BORDER:
- m_aDynamicControlBorder = rValue;
- break;
- case PROPERTY_ID_CONTROL_BORDER_COLOR_FOCUS:
- m_aControlBorderColorFocus = rValue;
- break;
- case PROPERTY_ID_CONTROL_BORDER_COLOR_MOUSE:
- m_aControlBorderColorMouse = rValue;
- break;
- case PROPERTY_ID_CONTROL_BORDER_COLOR_INVALID:
- m_aControlBorderColorInvalid = rValue;
- break;
-
- case PROPERTY_ID_ACTIVE_CONNECTION:
- {
- Reference< XConnection > xOuterConnection;
- if ( ::dbtools::isEmbeddedInDatabase( getParent(), xOuterConnection ) )
- {
- if ( xOuterConnection != Reference< XConnection >( rValue, UNO_QUERY ) )
- // somebody's trying to set a connection which is not equal the connection
- // implied by the database we're embedded in
- throw PropertyVetoException();
- }
- OPropertySetAggregationHelper::setFastPropertyValue_NoBroadcast( nHandle, rValue );
- break;
- }
-
- default:
- if ( m_aPropertyBagHelper.hasDynamicPropertyByHandle( nHandle ) )
- m_aPropertyBagHelper.setDynamicFastPropertyValue( nHandle, rValue );
- else
- OPropertySetAggregationHelper::setFastPropertyValue_NoBroadcast( nHandle, rValue );
- break;
- }
-}
-
-//------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::forwardingPropertyValue( sal_Int32 _nHandle )
-{
- OSL_ENSURE( _nHandle == PROPERTY_ID_ACTIVE_CONNECTION, "ODatabaseForm::forwardingPropertyValue: unexpected property!" );
- if ( _nHandle == PROPERTY_ID_ACTIVE_CONNECTION )
- {
- if ( m_bSharingConnection )
- stopSharingConnection( );
- m_bForwardingConnection = sal_True;
- }
-}
-
-//------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::forwardedPropertyValue( sal_Int32 _nHandle, bool /*_bSuccess*/ )
-{
- OSL_ENSURE( _nHandle == PROPERTY_ID_ACTIVE_CONNECTION, "ODatabaseForm::forwardedPropertyValue: unexpected property!" );
- if ( _nHandle == PROPERTY_ID_ACTIVE_CONNECTION )
- {
- m_bForwardingConnection = sal_False;
- }
-}
-
-//==============================================================================
-// com::sun::star::beans::XPropertyState
-//------------------------------------------------------------------
-PropertyState ODatabaseForm::getPropertyStateByHandle(sal_Int32 nHandle)
-{
- PropertyState eState;
- switch (nHandle)
- {
- case PROPERTY_ID_NAVIGATION:
- return (NavigationBarMode_CURRENT == m_eNavigation) ? PropertyState_DEFAULT_VALUE : PropertyState_DIRECT_VALUE;
-
- case PROPERTY_ID_CYCLE:
- eState = m_aCycle.hasValue() ? PropertyState_DIRECT_VALUE : PropertyState_DEFAULT_VALUE;
- break;
-
- case PROPERTY_ID_INSERTONLY:
- eState = m_bInsertOnly ? PropertyState_DIRECT_VALUE : PropertyState_DEFAULT_VALUE;
- break;
-
- case PROPERTY_ID_FILTER:
- if ( !m_aFilterManager.getFilterComponent( FilterManager::fcPublicFilter ).getLength() )
- eState = PropertyState_DEFAULT_VALUE;
- else
- eState = PropertyState_DIRECT_VALUE;
- break;
-
- case PROPERTY_ID_APPLYFILTER:
- eState = m_aFilterManager.isApplyPublicFilter() ? PropertyState_DEFAULT_VALUE : PropertyState_DIRECT_VALUE;
- break;
-
- case PROPERTY_ID_DYNAMIC_CONTROL_BORDER:
- eState = m_aDynamicControlBorder.hasValue() ? PropertyState_DIRECT_VALUE : PropertyState_DEFAULT_VALUE;
- break;
-
- case PROPERTY_ID_CONTROL_BORDER_COLOR_FOCUS:
- eState = m_aControlBorderColorFocus.hasValue() ? PropertyState_DIRECT_VALUE : PropertyState_DEFAULT_VALUE;
- break;
-
- case PROPERTY_ID_CONTROL_BORDER_COLOR_MOUSE:
- eState = m_aControlBorderColorMouse.hasValue() ? PropertyState_DIRECT_VALUE : PropertyState_DEFAULT_VALUE;
- break;
-
- case PROPERTY_ID_CONTROL_BORDER_COLOR_INVALID:
- eState = m_aControlBorderColorInvalid.hasValue() ? PropertyState_DIRECT_VALUE : PropertyState_DEFAULT_VALUE;
- break;
-
- default:
- eState = OPropertySetAggregationHelper::getPropertyStateByHandle(nHandle);
- }
- return eState;
-}
-
-//------------------------------------------------------------------
-void ODatabaseForm::setPropertyToDefaultByHandle(sal_Int32 nHandle)
-{
- switch (nHandle)
- {
- case PROPERTY_ID_INSERTONLY:
- case PROPERTY_ID_FILTER:
- case PROPERTY_ID_APPLYFILTER:
- case PROPERTY_ID_NAVIGATION:
- case PROPERTY_ID_CYCLE:
- case PROPERTY_ID_DYNAMIC_CONTROL_BORDER:
- case PROPERTY_ID_CONTROL_BORDER_COLOR_FOCUS:
- case PROPERTY_ID_CONTROL_BORDER_COLOR_MOUSE:
- case PROPERTY_ID_CONTROL_BORDER_COLOR_INVALID:
- setFastPropertyValue( nHandle, getPropertyDefaultByHandle( nHandle ) );
- break;
-
- default:
- OPropertySetAggregationHelper::setPropertyToDefaultByHandle(nHandle);
- }
-}
-
-//------------------------------------------------------------------
-Any ODatabaseForm::getPropertyDefaultByHandle( sal_Int32 nHandle ) const
-{
- Any aReturn;
- switch (nHandle)
- {
- case PROPERTY_ID_INSERTONLY:
- case PROPERTY_ID_DYNAMIC_CONTROL_BORDER:
- aReturn <<= sal_False;
- break;
-
- case PROPERTY_ID_FILTER:
- aReturn <<= ::rtl::OUString();
- break;
-
- case PROPERTY_ID_APPLYFILTER:
- aReturn <<= sal_True;
- break;
-
- case PROPERTY_ID_NAVIGATION:
- aReturn = makeAny(NavigationBarMode_CURRENT);
- break;
-
- case PROPERTY_ID_CYCLE:
- case PROPERTY_ID_CONTROL_BORDER_COLOR_FOCUS:
- case PROPERTY_ID_CONTROL_BORDER_COLOR_MOUSE:
- case PROPERTY_ID_CONTROL_BORDER_COLOR_INVALID:
- break;
-
- default:
- if ( m_aPropertyBagHelper.hasDynamicPropertyByHandle( nHandle ) )
- m_aPropertyBagHelper.getDynamicPropertyDefaultByHandle( nHandle, aReturn );
- else
- aReturn = OPropertySetAggregationHelper::getPropertyDefaultByHandle( nHandle );
- break;
- }
- return aReturn;
-}
-
-//==============================================================================
-// com::sun::star::form::XReset
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::reset() throw( RuntimeException )
-{
- ::osl::ResettableMutexGuard aGuard(m_aMutex);
-
- if (isLoaded())
- {
- ::osl::MutexGuard aResetGuard(m_aResetSafety);
- ++m_nResetsPending;
- reset_impl(true);
- return;
- }
-
- if ( !m_aResetListeners.empty() )
- {
- ::osl::MutexGuard aResetGuard(m_aResetSafety);
- ++m_nResetsPending;
- // create an own thread if we have (approve-)reset-listeners (so the listeners can't do that much damage
- // to this thread which is probably the main one)
- if (!m_pThread)
- {
- m_pThread = new OFormSubmitResetThread(this);
- m_pThread->acquire();
- m_pThread->create();
- }
- EventObject aEvt;
- m_pThread->addEvent(&aEvt, sal_False);
- }
- else
- {
- // direct call without any approving by the listeners
- aGuard.clear();
-
- ::osl::MutexGuard aResetGuard(m_aResetSafety);
- ++m_nResetsPending;
- reset_impl(false);
- }
-}
-
-//-----------------------------------------------------------------------------
-void ODatabaseForm::reset_impl(bool _bAproveByListeners)
-{
- if ( _bAproveByListeners )
- if ( !m_aResetListeners.approveReset() )
- return;
-
- ::osl::ResettableMutexGuard aResetGuard(m_aResetSafety);
- // do we have a database connected form and stay on the insert row
- sal_Bool bInsertRow = sal_False;
- if (m_xAggregateSet.is())
- bInsertRow = getBOOL(m_xAggregateSet->getPropertyValue(PROPERTY_ISNEW));
- if (bInsertRow)
- {
- try
- {
- // Iterate through all columns and set the default value
- Reference< XColumnsSupplier > xColsSuppl( m_xAggregateSet, UNO_QUERY );
- Reference< XIndexAccess > xIndexCols( xColsSuppl->getColumns(), UNO_QUERY );
- for (sal_Int32 i = 0; i < xIndexCols->getCount(); ++i)
- {
- Reference< XPropertySet > xColProps;
- xIndexCols->getByIndex(i) >>= xColProps;
-
- Reference< XColumnUpdate > xColUpdate( xColProps, UNO_QUERY );
- if ( !xColUpdate.is() )
- continue;
-
- Reference< XPropertySetInfo > xPSI;
- if ( xColProps.is() )
- xPSI = xColProps->getPropertySetInfo( );
-
- static const ::rtl::OUString PROPERTY_CONTROLDEFAULT( RTL_CONSTASCII_USTRINGPARAM( "ControlDefault" ) );
- if ( xPSI.is() && xPSI->hasPropertyByName( PROPERTY_CONTROLDEFAULT ) )
- {
- Any aDefault = xColProps->getPropertyValue( PROPERTY_CONTROLDEFAULT );
-
- sal_Bool bReadOnly = sal_False;
- if ( xPSI->hasPropertyByName( PROPERTY_ISREADONLY ) )
- xColProps->getPropertyValue( PROPERTY_ISREADONLY ) >>= bReadOnly;
-
- if ( !bReadOnly )
- {
- try
- {
- if ( aDefault.hasValue() )
- xColUpdate->updateObject( aDefault );
- }
- catch(const Exception&)
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- }
- }
- }
- }
- catch(const Exception&)
- {
- }
-
- if (m_bSubForm)
- {
- Reference< XColumnsSupplier > xParentColSupp( m_xParent, UNO_QUERY );
- Reference< XNameAccess > xParentCols;
- if ( xParentColSupp.is() )
- xParentCols = xParentColSupp->getColumns();
-
- if ( xParentCols.is() && xParentCols->hasElements() && m_aMasterFields.getLength() )
- {
- try
- {
- // analyze our parameters
- if ( !m_aParameterManager.isUpToDate() )
- updateParameterInfo();
-
- m_aParameterManager.resetParameterValues( );
- }
- catch(const Exception&)
- {
- OSL_FAIL("ODatabaseForm::reset_impl: could not initialize the master-detail-driven parameters!");
- }
- }
- }
- }
-
- aResetGuard.clear();
- // iterate through all components. don't use an XIndexAccess as this will cause massive
- // problems with the count.
- Reference<XEnumeration> xIter = createEnumeration();
- while (xIter->hasMoreElements())
- {
- Reference<XReset> xReset;
- xIter->nextElement() >>= xReset;
- if (xReset.is())
- {
- // TODO : all reset-methods have to be thread-safe
- xReset->reset();
- }
- }
-
- aResetGuard.reset();
- // ensure that the row isn't modified
- // (do this _before_ the listeners are notified ! their reaction (maybe asynchronous) may depend
- // on the modified state of the row)
- if (bInsertRow)
- m_xAggregateSet->setPropertyValue(PROPERTY_ISMODIFIED, ::cppu::bool2any(sal_Bool(sal_False)));
-
- aResetGuard.clear();
- {
- m_aResetListeners.resetted();
- }
-
- aResetGuard.reset();
- // and again : ensure the row isn't modified
- // we already did this after we (and maybe our dependents) resetted the values, but the listeners may have changed the row, too
- if (bInsertRow)
- m_xAggregateSet->setPropertyValue(PROPERTY_ISMODIFIED, ::cppu::bool2any((sal_False)));
-
- --m_nResetsPending;
-}
-
-//-----------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::addResetListener(const Reference<XResetListener>& _rListener) throw( RuntimeException )
-{
- m_aResetListeners.addTypedListener( _rListener );
-}
-
-//-----------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::removeResetListener(const Reference<XResetListener>& _rListener) throw( RuntimeException )
-{
- m_aResetListeners.removeTypedListener( _rListener );
-}
-
-//==============================================================================
-// com::sun::star::form::XSubmit
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::submit( const Reference<XControl>& Control,
- const ::com::sun::star::awt::MouseEvent& MouseEvt ) throw( RuntimeException )
-{
- {
- ::osl::MutexGuard aGuard(m_aMutex);
- // Sind Controls und eine Submit-URL vorhanden?
- if( !getCount() || !m_aTargetURL.getLength() )
- return;
- }
-
- ::osl::ClearableMutexGuard aGuard(m_aMutex);
- if (m_aSubmitListeners.getLength())
- {
- // create an own thread if we have (approve-)submit-listeners (so the listeners can't do that much damage
- // to this thread which is probably the main one)
- if (!m_pThread)
- {
- m_pThread = new OFormSubmitResetThread(this);
- m_pThread->acquire();
- m_pThread->create();
- }
- m_pThread->addEvent(&MouseEvt, Control, sal_True);
- }
- else
- {
- // direct call without any approving by the listeners
- aGuard.clear();
- submit_impl( Control, MouseEvt, true );
- }
-}
-// -----------------------------------------------------------------------------
-void lcl_dispatch(const Reference< XFrame >& xFrame,const Reference<XURLTransformer>& xTransformer,const ::rtl::OUString& aURLStr,const ::rtl::OUString& aReferer,const ::rtl::OUString& aTargetName
- ,const ::rtl::OUString& aData,rtl_TextEncoding _eEncoding)
-{
- URL aURL;
- aURL.Complete = aURLStr;
- xTransformer->parseStrict(aURL);
-
- Reference< XDispatch > xDisp = Reference< XDispatchProvider > (xFrame,UNO_QUERY)->queryDispatch(aURL, aTargetName,
- FrameSearchFlag::SELF | FrameSearchFlag::PARENT | FrameSearchFlag::CHILDREN |
- FrameSearchFlag::SIBLINGS | FrameSearchFlag::CREATE | FrameSearchFlag::TASKS);
-
- if (xDisp.is())
- {
- Sequence<PropertyValue> aArgs(2);
- aArgs.getArray()[0].Name = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("Referer") );
- aArgs.getArray()[0].Value <<= aReferer;
-
- // build a sequence from the to-be-submitted string
- ByteString a8BitData(aData.getStr(), (sal_uInt16)aData.getLength(), _eEncoding);
- // always ANSI #58641
- Sequence< sal_Int8 > aPostData((sal_Int8*)a8BitData.GetBuffer(), a8BitData.Len());
- Reference< XInputStream > xPostData = new SequenceInputStream(aPostData);
-
- aArgs.getArray()[1].Name = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("PostData") );
- aArgs.getArray()[1].Value <<= xPostData;
-
- xDisp->dispatch(aURL, aArgs);
- } // if (xDisp.is())
-}
-//------------------------------------------------------------------------------
-void ODatabaseForm::submit_impl(const Reference<XControl>& Control, const ::com::sun::star::awt::MouseEvent& MouseEvt, bool _bAproveByListeners)
-{
-
- if (_bAproveByListeners)
- {
- ::cppu::OInterfaceIteratorHelper aIter(m_aSubmitListeners);
- EventObject aEvt(static_cast<XWeak*>(this));
- sal_Bool bCanceled = sal_False;
- while (aIter.hasMoreElements() && !bCanceled)
- {
- if (!((XSubmitListener*)aIter.next())->approveSubmit(aEvt))
- bCanceled = sal_True;
- }
-
- if (bCanceled)
- return;
- }
-
- FormSubmitEncoding eSubmitEncoding;
- FormSubmitMethod eSubmitMethod;
- ::rtl::OUString aURLStr;
- ::rtl::OUString aReferer;
- ::rtl::OUString aTargetName;
- Reference< XModel > xModel;
- {
- SolarMutexGuard aGuard;
- // starform->Forms
-
- Reference<XChild> xParent(m_xParent, UNO_QUERY);
-
- if (xParent.is())
- xModel = getXModel(xParent->getParent());
-
- if (xModel.is())
- aReferer = xModel->getURL();
-
- // TargetItem
- aTargetName = m_aTargetFrame;
-
- eSubmitEncoding = m_eSubmitEncoding;
- eSubmitMethod = m_eSubmitMethod;
- aURLStr = m_aTargetURL;
- }
-
- if (!xModel.is())
- return;
- Reference< XFrame > xFrame = xModel->getCurrentController()->getFrame();
- if (!xFrame.is())
- return;
-
- Reference<XURLTransformer>
- xTransformer(m_xServiceFactory->createInstance(
- ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.util.URLTransformer") ) ), UNO_QUERY);
- DBG_ASSERT(xTransformer.is(), "ODatabaseForm::submit_impl : could not create an URL transformer !");
-
- // URL-Encoding
- if( eSubmitEncoding == FormSubmitEncoding_URL )
- {
- ::rtl::OUString aData;
- {
- SolarMutexGuard aGuard;
- aData = GetDataURLEncoded( Control, MouseEvt );
- }
-
- URL aURL;
- // FormMethod GET
- if( eSubmitMethod == FormSubmitMethod_GET )
- {
- INetURLObject aUrlObj( aURLStr, INetURLObject::WAS_ENCODED );
- aUrlObj.SetParam( aData, INetURLObject::ENCODE_ALL );
- aURL.Complete = aUrlObj.GetMainURL( INetURLObject::DECODE_UNAMBIGUOUS );
- if (xTransformer.is())
- xTransformer->parseStrict(aURL);
-
- Reference< XDispatch > xDisp = Reference< XDispatchProvider > (xFrame,UNO_QUERY)->queryDispatch(aURL, aTargetName,
- FrameSearchFlag::SELF | FrameSearchFlag::PARENT | FrameSearchFlag::CHILDREN |
- FrameSearchFlag::SIBLINGS | FrameSearchFlag::CREATE | FrameSearchFlag::TASKS);
-
- if (xDisp.is())
- {
- Sequence<PropertyValue> aArgs(1);
- aArgs.getArray()->Name = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("Referer") );
- aArgs.getArray()->Value <<= aReferer;
- xDisp->dispatch(aURL, aArgs);
- }
- }
- // FormMethod POST
- else if( eSubmitMethod == FormSubmitMethod_POST )
- {
- lcl_dispatch(xFrame,xTransformer,aURLStr,aReferer,aTargetName,aData,RTL_TEXTENCODING_MS_1252);
- }
- }
- else if( eSubmitEncoding == FormSubmitEncoding_MULTIPART )
- {
- URL aURL;
- aURL.Complete = aURLStr;
- xTransformer->parseStrict(aURL);
-
- Reference< XDispatch > xDisp = Reference< XDispatchProvider > (xFrame,UNO_QUERY)->queryDispatch(aURL, aTargetName,
- FrameSearchFlag::SELF | FrameSearchFlag::PARENT | FrameSearchFlag::CHILDREN |
- FrameSearchFlag::SIBLINGS | FrameSearchFlag::CREATE | FrameSearchFlag::TASKS);
-
- if (xDisp.is())
- {
- ::rtl::OUString aContentType;
- Sequence<sal_Int8> aData;
- {
- SolarMutexGuard aGuard;
- aData = GetDataMultiPartEncoded(Control, MouseEvt, aContentType);
- }
- if (!aData.getLength())
- return;
-
- Sequence<PropertyValue> aArgs(3);
- aArgs.getArray()[0].Name = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("Referer") );
- aArgs.getArray()[0].Value <<= aReferer;
- aArgs.getArray()[1].Name = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("ContentType") );
- aArgs.getArray()[1].Value <<= aContentType;
-
- // build a sequence from the to-be-submitted string
- Reference< XInputStream > xPostData = new SequenceInputStream(aData);
-
- aArgs.getArray()[2].Name = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("PostData") );
- aArgs.getArray()[2].Value <<= xPostData;
-
- xDisp->dispatch(aURL, aArgs);
- }
- }
- else if( eSubmitEncoding == FormSubmitEncoding_TEXT )
- {
- ::rtl::OUString aData;
- {
- SolarMutexGuard aGuard;
- aData = GetDataTextEncoded( Reference<XControl> (), MouseEvt );
- }
-
- lcl_dispatch(xFrame,xTransformer,aURLStr,aReferer,aTargetName,aData,osl_getThreadTextEncoding());
- }
- else {
- OSL_FAIL("ODatabaseForm::submit_Impl : wrong encoding !");
- }
-
-}
-
-// XSubmit
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::addSubmitListener(const Reference<XSubmitListener>& _rListener) throw( RuntimeException )
-{
- m_aSubmitListeners.addInterface(_rListener);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::removeSubmitListener(const Reference<XSubmitListener>& _rListener) throw( RuntimeException )
-{
- m_aSubmitListeners.removeInterface(_rListener);
-}
-
-//==============================================================================
-// com::sun::star::sdbc::XSQLErrorBroadcaster
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::addSQLErrorListener(const Reference<XSQLErrorListener>& _rListener) throw( RuntimeException )
-{
- m_aErrorListeners.addInterface(_rListener);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::removeSQLErrorListener(const Reference<XSQLErrorListener>& _rListener) throw( RuntimeException )
-{
- m_aErrorListeners.removeInterface(_rListener);
-}
-
-//------------------------------------------------------------------------------
-void ODatabaseForm::invlidateParameters()
-{
- ::osl::MutexGuard aGuard(m_aMutex);
- m_aParameterManager.clearAllParameterInformation();
-}
-
-//==============================================================================
-// OChangeListener
-//------------------------------------------------------------------------------
-void ODatabaseForm::_propertyChanged(const PropertyChangeEvent& evt) throw( RuntimeException )
-{
- if ((0 == evt.PropertyName.compareToAscii(PROPERTY_ACTIVE_CONNECTION)) && !m_bForwardingConnection)
- {
- // the rowset changed its active connection itself (without interaction from our side), so
- // we need to fire this event, too
- sal_Int32 nHandle = PROPERTY_ID_ACTIVE_CONNECTION;
- fire(&nHandle, &evt.NewValue, &evt.OldValue, 1, sal_False);
- }
- else // it was one of the statement relevant props
- {
- // if the statement has changed we have to delete the parameter info
- invlidateParameters();
- }
-}
-
-//==============================================================================
-// smartXChild
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setParent(const InterfaceRef& Parent) throw ( ::com::sun::star::lang::NoSupportException, ::com::sun::star::uno::RuntimeException)
-{
- // SYNCHRONIZED ----->
- ::osl::ResettableMutexGuard aGuard(m_aMutex);
-
- Reference<XForm> xParentForm(getParent(), UNO_QUERY);
- if (xParentForm.is())
- {
- try
- {
- Reference< XRowSetApproveBroadcaster > xParentApprBroadcast( xParentForm, UNO_QUERY_THROW );
- xParentApprBroadcast->removeRowSetApproveListener( this );
-
- Reference< XLoadable > xParentLoadable( xParentForm, UNO_QUERY_THROW );
- xParentLoadable->removeLoadListener( this );
-
- Reference< XPropertySet > xParentProperties( xParentForm, UNO_QUERY_THROW );
- xParentProperties->removePropertyChangeListener( PROPERTY_ISNEW, this );
- }
- catch(const Exception&)
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- }
-
- OFormComponents::setParent(Parent);
-
- xParentForm.set(getParent(), UNO_QUERY);
- if ( xParentForm.is() )
- {
- try
- {
- Reference< XRowSetApproveBroadcaster > xParentApprBroadcast( xParentForm, UNO_QUERY_THROW );
- xParentApprBroadcast->addRowSetApproveListener( this );
-
- Reference< XLoadable > xParentLoadable( xParentForm, UNO_QUERY_THROW );
- xParentLoadable->addLoadListener( this );
-
- Reference< XPropertySet > xParentProperties( xParentForm, UNO_QUERY_THROW );
- xParentProperties->addPropertyChangeListener( PROPERTY_ISNEW, this );
- }
- catch(const Exception&)
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- }
-
- Reference< XPropertySet > xAggregateProperties( m_xAggregateSet );
- aGuard.clear();
- // <----- SYNCHRONIZED
-
- Reference< XConnection > xOuterConnection;
- sal_Bool bIsEmbedded = ::dbtools::isEmbeddedInDatabase( Parent, xOuterConnection );
-
- if ( bIsEmbedded )
- xAggregateProperties->setPropertyValue( PROPERTY_DATASOURCE, makeAny( ::rtl::OUString() ) );
-}
-
-//==============================================================================
-// smartXTabControllerModel
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL ODatabaseForm::getGroupControl() throw(com::sun::star::uno::RuntimeException)
-{
- ::osl::ResettableMutexGuard aGuard(m_aMutex);
-
- // Sollen Controls in einer TabOrder gruppe zusammengefasst werden?
- if (m_aCycle.hasValue())
- {
- sal_Int32 nCycle = 0;
- ::cppu::enum2int(nCycle, m_aCycle);
- return nCycle != TabulatorCycle_PAGE;
- }
-
- if (isLoaded() && getConnection().is())
- return sal_True;
-
- return sal_False;
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setControlModels(const Sequence<Reference<XControlModel> >& rControls) throw( RuntimeException )
-{
- ::osl::ResettableMutexGuard aGuard(m_aMutex);
-
- // TabIndex in der Reihenfolge der Sequence setzen
- const Reference<XControlModel>* pControls = rControls.getConstArray();
- sal_Int16 nTabIndex = 1;
- sal_Int32 nCount = getCount();
- sal_Int32 nNewCount = rControls.getLength();
-
- // HiddenControls und Formulare werden nicht aufgefuehrt
- if (nNewCount <= nCount)
- {
- Any aElement;
- for (sal_Int32 i=0; i < nNewCount; ++i, ++pControls)
- {
- Reference<XFormComponent> xComp(*pControls, UNO_QUERY);
- if (xComp.is())
- {
- // suchen der Componente in der Liste
- for (sal_Int32 j = 0; j < nCount; ++j)
- {
- Reference<XFormComponent> xElement;
- ::cppu::extractInterface(xElement, getByIndex(j));
- if (xComp == xElement)
- {
- Reference<XPropertySet> xSet(xComp, UNO_QUERY);
- if (xSet.is() && hasProperty(PROPERTY_TABINDEX, xSet))
- xSet->setPropertyValue( PROPERTY_TABINDEX, makeAny(nTabIndex++) );
- break;
- }
- }
- }
- }
- }
-}
-
-//------------------------------------------------------------------------------
-Sequence<Reference<XControlModel> > SAL_CALL ODatabaseForm::getControlModels() throw( RuntimeException )
-{
- ::osl::MutexGuard aGuard(m_aMutex);
- return m_pGroupManager->getControlModels();
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setGroup( const Sequence<Reference<XControlModel> >& _rGroup, const ::rtl::OUString& Name ) throw( RuntimeException )
-{
- ::osl::MutexGuard aGuard(m_aMutex);
-
- // Die Controls werden gruppiert, indem ihr Name dem Namen des ersten
- // Controls der Sequenz angepasst wird
- const Reference<XControlModel>* pControls = _rGroup.getConstArray();
- Reference< XPropertySet > xSet;
- ::rtl::OUString sGroupName( Name );
-
- for( sal_Int32 i=0; i<_rGroup.getLength(); ++i, ++pControls )
- {
- xSet = xSet.query( *pControls );
- if ( !xSet.is() )
- {
- // can't throw an exception other than a RuntimeException (which would not be appropriate),
- // so we ignore (and only assert) this
- OSL_FAIL( "ODatabaseForm::setGroup: invalid arguments!" );
- continue;
- }
-
- if (!sGroupName.getLength())
- xSet->getPropertyValue(PROPERTY_NAME) >>= sGroupName;
- else
- xSet->setPropertyValue(PROPERTY_NAME, makeAny(sGroupName));
- }
-}
-
-//------------------------------------------------------------------------------
-sal_Int32 SAL_CALL ODatabaseForm::getGroupCount() throw( RuntimeException )
-{
- ::osl::MutexGuard aGuard(m_aMutex);
- return m_pGroupManager->getGroupCount();
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::getGroup( sal_Int32 nGroup, Sequence<Reference<XControlModel> >& _rGroup, ::rtl::OUString& _rName ) throw( RuntimeException )
-{
- ::osl::MutexGuard aGuard(m_aMutex);
- _rGroup.realloc(0);
- _rName = ::rtl::OUString();
-
- if ((nGroup < 0) || (nGroup >= m_pGroupManager->getGroupCount()))
- return;
- m_pGroupManager->getGroup( nGroup, _rGroup, _rName );
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::getGroupByName(const ::rtl::OUString& Name, Sequence< Reference<XControlModel> >& _rGroup) throw( RuntimeException )
-{
- ::osl::MutexGuard aGuard(m_aMutex);
- _rGroup.realloc(0);
- m_pGroupManager->getGroupByName( Name, _rGroup );
-}
-
-//==============================================================================
-// com::sun::star::lang::XEventListener
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::disposing(const EventObject& Source) throw( RuntimeException )
-{
- // does the call come from the connection which we are sharing with our parent?
- if ( isSharingConnection() )
- {
- Reference< XConnection > xConnSource( Source.Source, UNO_QUERY );
- if ( xConnSource.is() )
- {
-#if OSL_DEBUG_LEVEL > 0
- Reference< XConnection > xActiveConn;
- m_xAggregateSet->getPropertyValue( PROPERTY_ACTIVE_CONNECTION ) >>= xActiveConn;
- OSL_ENSURE( xActiveConn.get() == xConnSource.get(), "ODatabaseForm::disposing: where did this come from?" );
- // there should be exactly one XConnection object we're listening at - our aggregate connection
-#endif
- disposingSharedConnection( xConnSource );
- }
- }
-
- OInterfaceContainer::disposing(Source);
-
- // does the disposing come from the aggregate ?
- if (m_xAggregate.is())
- { // no -> forward it
- com::sun::star::uno::Reference<com::sun::star::lang::XEventListener> xListener;
- if (query_aggregation(m_xAggregate, xListener))
- xListener->disposing(Source);
- }
-}
-
-//------------------------------------------------------------------------------
-void ODatabaseForm::impl_createLoadTimer()
-{
- OSL_PRECOND( m_pLoadTimer == NULL, "ODatabaseForm::impl_createLoadTimer: timer already exists!" );
- m_pLoadTimer = new Timer();
- m_pLoadTimer->SetTimeout(100);
- m_pLoadTimer->SetTimeoutHdl(LINK(this,ODatabaseForm,OnTimeout));
-}
-
-//==============================================================================
-// com::sun::star::form::XLoadListener
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::loaded(const EventObject& /*aEvent*/) throw( RuntimeException )
-{
- {
- ::osl::MutexGuard aGuard( m_aMutex );
- Reference< XRowSet > xParentRowSet( m_xParent, UNO_QUERY_THROW );
- xParentRowSet->addRowSetListener( this );
-
- impl_createLoadTimer();
- }
-
- load_impl( sal_True );
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::unloading(const EventObject& /*aEvent*/) throw( RuntimeException )
-{
- {
- // now stop the rowset listening if we are a subform
- ::osl::MutexGuard aGuard( m_aMutex );
-
- if ( m_pLoadTimer && m_pLoadTimer->IsActive() )
- m_pLoadTimer->Stop();
- DELETEZ( m_pLoadTimer );
-
- Reference< XRowSet > xParentRowSet( m_xParent, UNO_QUERY_THROW );
- xParentRowSet->removeRowSetListener( this );
- }
-
- unload();
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::unloaded(const EventObject& /*aEvent*/) throw( RuntimeException )
-{
- // nothing to do
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::reloading(const EventObject& /*aEvent*/) throw( RuntimeException )
-{
- // now stop the rowset listening if we are a subform
- ::osl::MutexGuard aGuard(m_aMutex);
- Reference<XRowSet> xParentRowSet(m_xParent, UNO_QUERY);
- if (xParentRowSet.is())
- xParentRowSet->removeRowSetListener(this);
-
- if (m_pLoadTimer && m_pLoadTimer->IsActive())
- m_pLoadTimer->Stop();
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::reloaded(const EventObject& /*aEvent*/) throw( RuntimeException )
-{
- reload_impl(sal_True);
- {
- ::osl::MutexGuard aGuard(m_aMutex);
- Reference<XRowSet> xParentRowSet(m_xParent, UNO_QUERY);
- if (xParentRowSet.is())
- xParentRowSet->addRowSetListener(this);
- }
-}
-
-//------------------------------------------------------------------------------
-IMPL_LINK( ODatabaseForm, OnTimeout, void*, EMPTYARG )
-{
- reload_impl(sal_True);
- return 1;
-}
-
-//==============================================================================
-// com::sun::star::form::XLoadable
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::load() throw( RuntimeException )
-{
- load_impl(sal_False);
-}
-
-//------------------------------------------------------------------------------
-sal_Bool ODatabaseForm::canShareConnection( const Reference< XPropertySet >& _rxParentProps )
-{
- // our own data source
- ::rtl::OUString sOwnDatasource;
- m_xAggregateSet->getPropertyValue( PROPERTY_DATASOURCE ) >>= sOwnDatasource;
-
- // our parents data source
- ::rtl::OUString sParentDataSource;
- OSL_ENSURE( _rxParentProps.is() && _rxParentProps->getPropertySetInfo().is() && _rxParentProps->getPropertySetInfo()->hasPropertyByName( PROPERTY_DATASOURCE ),
- "ODatabaseForm::doShareConnection: invalid parent form!" );
- if ( _rxParentProps.is() )
- _rxParentProps->getPropertyValue( PROPERTY_DATASOURCE ) >>= sParentDataSource;
-
- sal_Bool bCanShareConnection = sal_False;
-
- // both rowsets share are connected to the same data source
- if ( sParentDataSource == sOwnDatasource )
- {
- if ( 0 != sParentDataSource.getLength() )
- // and it's really a data source name (not empty)
- bCanShareConnection = sal_True;
- else
- { // the data source name is empty
- // -> ook for the URL
- ::rtl::OUString sParentURL;
- ::rtl::OUString sMyURL;
- _rxParentProps->getPropertyValue( PROPERTY_URL ) >>= sParentURL;
- m_xAggregateSet->getPropertyValue( PROPERTY_URL ) >>= sMyURL;
-
- bCanShareConnection = (sParentURL == sMyURL);
- }
- }
-
- if ( bCanShareConnection )
- {
- // check for the user/password
-
- // take the user property on the rowset (if any) into account
- ::rtl::OUString sParentUser, sParentPwd;
- _rxParentProps->getPropertyValue( PROPERTY_USER ) >>= sParentUser;
- _rxParentProps->getPropertyValue( PROPERTY_PASSWORD ) >>= sParentPwd;
-
- ::rtl::OUString sMyUser, sMyPwd;
- m_xAggregateSet->getPropertyValue( PROPERTY_USER ) >>= sMyUser;
- m_xAggregateSet->getPropertyValue( PROPERTY_PASSWORD ) >>= sMyPwd;
-
- bCanShareConnection =
- ( sParentUser == sMyUser )
- && ( sParentPwd == sMyPwd );
- }
-
- return bCanShareConnection;
-}
-
-//------------------------------------------------------------------------------
-void ODatabaseForm::doShareConnection( const Reference< XPropertySet >& _rxParentProps )
-{
- // get the conneciton of the parent
- Reference< XConnection > xParentConn;
- _rxParentProps->getPropertyValue( PROPERTY_ACTIVE_CONNECTION ) >>= xParentConn;
- OSL_ENSURE( xParentConn.is(), "ODatabaseForm::doShareConnection: we're a valid sub-form, but the parent has no connection?!" );
-
- if ( xParentConn.is() )
- {
- // add as dispose listener to the connection
- Reference< XComponent > xParentConnComp( xParentConn, UNO_QUERY );
- OSL_ENSURE( xParentConnComp.is(), "ODatabaseForm::doShareConnection: invalid connection!" );
- xParentConnComp->addEventListener( static_cast< XLoadListener* >( this ) );
-
- // forward the connection to our own aggreagte
- m_bForwardingConnection = sal_True;
- m_xAggregateSet->setPropertyValue( PROPERTY_ACTIVE_CONNECTION, makeAny( xParentConn ) );
- m_bForwardingConnection = sal_False;
-
- m_bSharingConnection = sal_True;
- }
- else
- m_bSharingConnection = sal_False;
-}
-
-//------------------------------------------------------------------------------
-void ODatabaseForm::disposingSharedConnection( const Reference< XConnection >& /*_rxConn*/ )
-{
- stopSharingConnection();
-
- // TODO: we could think about whether or not to re-connect.
- unload( );
-}
-
-//------------------------------------------------------------------------------
-void ODatabaseForm::stopSharingConnection( )
-{
- OSL_ENSURE( m_bSharingConnection, "ODatabaseForm::stopSharingConnection: invalid call!" );
-
- if ( m_bSharingConnection )
- {
- // get the connection
- Reference< XConnection > xSharedConn;
- m_xAggregateSet->getPropertyValue( PROPERTY_ACTIVE_CONNECTION ) >>= xSharedConn;
- OSL_ENSURE( xSharedConn.is(), "ODatabaseForm::stopSharingConnection: there's no conn!" );
-
- // remove ourself as event listener
- Reference< XComponent > xSharedConnComp( xSharedConn, UNO_QUERY );
- if ( xSharedConnComp.is() )
- xSharedConnComp->removeEventListener( static_cast< XLoadListener* >( this ) );
-
- // no need to dispose the conn: we're not the owner, this is our parent
- // (in addition, this method may be called if the connection is beeing disposed while we use it)
-
- // reset the property
- xSharedConn.clear();
- m_bForwardingConnection = sal_True;
- m_xAggregateSet->setPropertyValue( PROPERTY_ACTIVE_CONNECTION, makeAny( xSharedConn ) );
- m_bForwardingConnection = sal_False;
-
- // reset the flag
- m_bSharingConnection = sal_False;
- }
-}
-
-//------------------------------------------------------------------------------
-sal_Bool ODatabaseForm::implEnsureConnection()
-{
- try
- {
- if ( getConnection( ).is() )
- // if our aggregate already has a connection, nothing needs to be done about it
- return sal_True;
-
- // see whether we're an embedded form
- Reference< XConnection > xOuterConnection;
- if ( ::dbtools::isEmbeddedInDatabase( getParent(), xOuterConnection ) )
- {
- m_xAggregateSet->setPropertyValue( PROPERTY_ACTIVE_CONNECTION, makeAny( xOuterConnection ) );
- return xOuterConnection.is();
- }
-
- m_bSharingConnection = sal_False;
-
- // if we're a sub form, we try to re-use the connection of our parent
- if (m_bSubForm)
- {
- OSL_ENSURE( Reference< XForm >( getParent(), UNO_QUERY ).is(),
- "ODatabaseForm::implEnsureConnection: m_bSubForm is TRUE, but the parent is no form?" );
-
- Reference< XPropertySet > xParentProps( getParent(), UNO_QUERY );
-
- // can we re-use (aka share) the connection of the parent?
- if ( canShareConnection( xParentProps ) )
- {
- // yep -> do it
- doShareConnection( xParentProps );
- // success?
- if ( m_bSharingConnection )
- // yes -> outta here
- return sal_True;
- }
- }
-
- if (m_xAggregateSet.is())
- {
- Reference< XConnection > xConnection = connectRowset(
- Reference<XRowSet> (m_xAggregate, UNO_QUERY),
- m_xServiceFactory,
- sal_True // set a calculated connection as ActiveConnection
- );
- return xConnection.is();
- }
- }
- catch(const SQLException& eDB)
- {
- onError(eDB, FRM_RES_STRING(RID_STR_CONNECTERROR));
- }
- catch(const Exception&)
- {
- DBG_UNHANDLED_EXCEPTION();
- }
-
- return sal_False;
-}
-
-//------------------------------------------------------------------------------
-void ODatabaseForm::load_impl(sal_Bool bCausedByParentForm, sal_Bool bMoveToFirst, const Reference< XInteractionHandler >& _rxCompletionHandler ) throw( RuntimeException )
-{
- ::osl::ResettableMutexGuard aGuard(m_aMutex);
-
- // are we already loaded?
- if (isLoaded())
- return;
-
- m_bSubForm = bCausedByParentForm;
-
- // if we don't have a connection, we are not intended to be a database form or the aggregate was not able
- // to establish a connection
- sal_Bool bConnected = implEnsureConnection();
-
- // we don't have to execute if we do not have a command to execute
- sal_Bool bExecute = bConnected && m_xAggregateSet.is() && getString(m_xAggregateSet->getPropertyValue(PROPERTY_COMMAND)).getLength();
-
- // a database form always uses caching
- // we use starting fetchsize with at least 10 rows
- if (bConnected)
- m_xAggregateSet->setPropertyValue(PROPERTY_FETCHSIZE, makeAny((sal_Int32)40));
-
- // if we're loaded as sub form we got a "rowSetChanged" from the parent rowset _before_ we got the "loaded"
- // so we don't need to execute the statement again, this was already done
- // (and there were no relevant changes between these two listener calls, the "load" of a form is quite an
- // atomar operation.)
-
- sal_Bool bSuccess = sal_False;
- if (bExecute)
- {
- m_sCurrentErrorContext = FRM_RES_STRING(RID_ERR_LOADING_FORM);
- bSuccess = executeRowSet(aGuard, bMoveToFirst, _rxCompletionHandler);
- }
-
- if (bSuccess)
- {
- m_bLoaded = sal_True;
- aGuard.clear();
- EventObject aEvt(static_cast<XWeak*>(this));
- m_aLoadListeners.notifyEach( &XLoadListener::loaded, aEvt );
-
- // if we are on the insert row, we have to reset all controls
- // to set the default values
- if (bExecute && getBOOL(m_xAggregateSet->getPropertyValue(PROPERTY_ISNEW)))
- reset();
- }
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::unload() throw( RuntimeException )
-{
- ::osl::ResettableMutexGuard aGuard(m_aMutex);
- if (!isLoaded())
- return;
-
- DELETEZ(m_pLoadTimer);
-
- aGuard.clear();
- EventObject aEvt(static_cast<XWeak*>(this));
- m_aLoadListeners.notifyEach( &XLoadListener::unloading, aEvt );
-
- if (m_xAggregateAsRowSet.is())
- {
- // we may have reset the InsertOnly property on the aggregate - restore it
- restoreInsertOnlyState( );
-
- // clear the parameters if there are any
- invlidateParameters();
-
- try
- {
- // close the aggregate
- Reference<XCloseable> xCloseable;
- query_aggregation( m_xAggregate, xCloseable);
- aGuard.clear();
- if (xCloseable.is())
- xCloseable->close();
- }
- catch(const SQLException&)
- {
- }
- aGuard.reset();
- }
-
- m_bLoaded = sal_False;
-
- // if the connection we used while we were loaded is only shared with our parent, we
- // reset it
- if ( isSharingConnection() )
- stopSharingConnection();
-
- aGuard.clear();
- m_aLoadListeners.notifyEach( &XLoadListener::unloaded, aEvt );
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::reload() throw( RuntimeException )
-{
- reload_impl(sal_True);
-}
-
-//------------------------------------------------------------------------------
-void ODatabaseForm::reload_impl(sal_Bool bMoveToFirst, const Reference< XInteractionHandler >& _rxCompletionHandler ) throw( RuntimeException )
-{
- ::osl::ResettableMutexGuard aGuard(m_aMutex);
- if (!isLoaded())
- return;
-
- DocumentModifyGuard aModifyGuard( *this );
- // ensures the document is not marked as "modified" just because we change some control's content during
- // reloading ...
-
- EventObject aEvent(static_cast<XWeak*>(this));
- {
- // only if there is no approve listener we can post the event at this time
- // otherwise see approveRowsetChange
- // the aprrovement is done by the aggregate
- if (!m_aRowSetApproveListeners.getLength())
- {
- ::cppu::OInterfaceIteratorHelper aIter(m_aLoadListeners);
- aGuard.clear();
-
- while (aIter.hasMoreElements())
- ((XLoadListener*)aIter.next())->reloading(aEvent);
-
- aGuard.reset();
- }
- }
-
- sal_Bool bSuccess = sal_True;
- try
- {
- m_sCurrentErrorContext = FRM_RES_STRING(RID_ERR_REFRESHING_FORM);
- bSuccess = executeRowSet(aGuard, bMoveToFirst, _rxCompletionHandler);
- }
- catch(const SQLException&)
- {
- OSL_FAIL("ODatabaseForm::reload_impl : shouldn't executeRowSet catch this exception?");
- }
-
- if (bSuccess)
- {
- ::cppu::OInterfaceIteratorHelper aIter(m_aLoadListeners);
- aGuard.clear();
- while (aIter.hasMoreElements())
- ((XLoadListener*)aIter.next())->reloaded(aEvent);
-
- // if we are on the insert row, we have to reset all controls
- // to set the default values
- if (getBOOL(m_xAggregateSet->getPropertyValue(PROPERTY_ISNEW)))
- reset();
- }
- else
- m_bLoaded = sal_False;
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL ODatabaseForm::isLoaded() throw( RuntimeException )
-{
- return m_bLoaded;
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::addLoadListener(const Reference<XLoadListener>& aListener) throw( RuntimeException )
-{
- m_aLoadListeners.addInterface(aListener);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::removeLoadListener(const Reference<XLoadListener>& aListener) throw( RuntimeException )
-{
- m_aLoadListeners.removeInterface(aListener);
-}
-
-//==============================================================================
-// com::sun::star::sdbc::XCloseable
-//==============================================================================
-void SAL_CALL ODatabaseForm::close() throw( SQLException, RuntimeException )
-{
- // unload will close the aggregate
- unload();
-}
-
-//==============================================================================
-// com::sun::star::sdbc::XRowSetListener
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::cursorMoved(const EventObject& /*event*/) throw( RuntimeException )
-{
- // reload the subform with the new parameters of the parent
- // do this handling delayed to provide of execute too many SQL Statements
- ::osl::ResettableMutexGuard aGuard(m_aMutex);
-
- DBG_ASSERT( m_pLoadTimer, "ODatabaseForm::cursorMoved: how can this happen?!" );
- if ( !m_pLoadTimer )
- impl_createLoadTimer();
-
- if ( m_pLoadTimer->IsActive() )
- m_pLoadTimer->Stop();
-
- // and start the timer again
- m_pLoadTimer->Start();
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::rowChanged(const EventObject& /*event*/) throw( RuntimeException )
-{
- // ignore it
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::rowSetChanged(const EventObject& /*event*/) throw( RuntimeException )
-{
- // not interested in :
- // if our parent is an ODatabaseForm, too, then after this rowSetChanged we'll get a "reloaded"
- // or a "loaded" event.
- // If somebody gave us another parent which is an XRowSet but doesn't handle an execute as
- // "load" respectivly "reload" ... can't do anything ....
-}
-
-//------------------------------------------------------------------------------
-bool ODatabaseForm::impl_approveRowChange_throw( const EventObject& _rEvent, const bool _bAllowSQLException,
- ::osl::ClearableMutexGuard& _rGuard )
-{
- ::cppu::OInterfaceIteratorHelper aIter( m_aRowSetApproveListeners );
- _rGuard.clear();
- while ( aIter.hasMoreElements() )
- {
- Reference< XRowSetApproveListener > xListener( static_cast< XRowSetApproveListener* >( aIter.next() ) );
- if ( !xListener.is() )
- continue;
-
- try
- {
- if ( !xListener->approveRowSetChange( _rEvent ) )
- return false;
- }
- catch (const DisposedException& e)
- {
- if ( e.Context == xListener )
- aIter.remove();
- }
- catch (const RuntimeException&)
- {
- throw;
- }
- catch (const SQLException&)
- {
- if ( _bAllowSQLException )
- throw;
- DBG_UNHANDLED_EXCEPTION();
- }
- catch (const Exception&)
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- }
- return true;
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL ODatabaseForm::approveCursorMove(const EventObject& event) throw( RuntimeException )
-{
- // is our aggregate calling?
- if (event.Source == InterfaceRef(static_cast<XWeak*>(this)))
- {
- // Our aggregate doesn't have any ApproveRowSetListeners (expect ourself), as we re-routed the queryInterface
- // for XRowSetApproveBroadcaster-interface.
- // So we have to multiplex this approve request.
- ::cppu::OInterfaceIteratorHelper aIter( m_aRowSetApproveListeners );
- while ( aIter.hasMoreElements() )
- {
- Reference< XRowSetApproveListener > xListener( static_cast< XRowSetApproveListener* >( aIter.next() ) );
- if ( !xListener.is() )
- continue;
-
- try
- {
- if ( !xListener->approveCursorMove( event ) )
- return sal_False;
- }
- catch (const DisposedException& e)
- {
- if ( e.Context == xListener )
- aIter.remove();
- }
- catch (const RuntimeException&)
- {
- throw;
- }
- catch (const Exception&)
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- }
- return true;
- }
- else
- {
- // this is a call from our parent ...
- // a parent's cursor move will result in a re-execute of our own row-set, so we have to
- // ask our own RowSetChangesListeners, too
- ::osl::ClearableMutexGuard aGuard( m_aMutex );
- if ( !impl_approveRowChange_throw( event, false, aGuard ) )
- return sal_False;
- }
- return sal_True;
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL ODatabaseForm::approveRowChange(const RowChangeEvent& event) throw( RuntimeException )
-{
- // is our aggregate calling?
- if (event.Source == InterfaceRef(static_cast<XWeak*>(this)))
- {
- // Our aggregate doesn't have any ApproveRowSetListeners (expect ourself), as we re-routed the queryInterface
- // for XRowSetApproveBroadcaster-interface.
- // So we have to multiplex this approve request.
- ::cppu::OInterfaceIteratorHelper aIter( m_aRowSetApproveListeners );
- while ( aIter.hasMoreElements() )
- {
- Reference< XRowSetApproveListener > xListener( static_cast< XRowSetApproveListener* >( aIter.next() ) );
- if ( !xListener.is() )
- continue;
-
- try
- {
- if ( !xListener->approveRowChange( event ) )
- return false;
- }
- catch (const DisposedException& e)
- {
- if ( e.Context == xListener )
- aIter.remove();
- }
- catch (const RuntimeException&)
- {
- throw;
- }
- catch (const Exception&)
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- }
- return true;
- }
- return sal_True;
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL ODatabaseForm::approveRowSetChange(const EventObject& event) throw( RuntimeException )
-{
- if (event.Source == InterfaceRef(static_cast<XWeak*>(this))) // ignore our aggregate as we handle this approve ourself
- {
- ::osl::ClearableMutexGuard aGuard( m_aMutex );
- bool bWasLoaded = isLoaded();
- if ( !impl_approveRowChange_throw( event, false, aGuard ) )
- return sal_False;
-
- if ( bWasLoaded )
- {
- m_aLoadListeners.notifyEach( &XLoadListener::reloading, event );
- }
- }
- else
- {
- // this is a call from our parent ...
- // a parent's cursor move will result in a re-execute of our own row-set, so we have to
- // ask our own RowSetChangesListeners, too
- ::osl::ClearableMutexGuard aGuard( m_aMutex );
- if ( !impl_approveRowChange_throw( event, false, aGuard ) )
- return sal_False;
- }
- return sal_True;
-}
-
-//==============================================================================
-// com::sun::star::sdb::XRowSetApproveBroadcaster
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::addRowSetApproveListener(const Reference<XRowSetApproveListener>& _rListener) throw( RuntimeException )
-{
- ::osl::ResettableMutexGuard aGuard(m_aMutex);
- m_aRowSetApproveListeners.addInterface(_rListener);
-
- // do we have to multiplex ?
- if (m_aRowSetApproveListeners.getLength() == 1)
- {
- Reference<XRowSetApproveBroadcaster> xBroadcaster;
- if (query_aggregation( m_xAggregate, xBroadcaster))
- {
- Reference<XRowSetApproveListener> xListener((XRowSetApproveListener*)this);
- xBroadcaster->addRowSetApproveListener(xListener);
- }
- }
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::removeRowSetApproveListener(const Reference<XRowSetApproveListener>& _rListener) throw( RuntimeException )
-{
- ::osl::ResettableMutexGuard aGuard(m_aMutex);
- // do we have to remove the multiplex ?
- m_aRowSetApproveListeners.removeInterface(_rListener);
- if ( m_aRowSetApproveListeners.getLength() == 0 )
- {
- Reference<XRowSetApproveBroadcaster> xBroadcaster;
- if (query_aggregation( m_xAggregate, xBroadcaster))
- {
- Reference<XRowSetApproveListener> xListener((XRowSetApproveListener*)this);
- xBroadcaster->removeRowSetApproveListener(xListener);
- }
- }
-}
-
-//==============================================================================
-// com::sun:star::form::XDatabaseParameterBroadcaster
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::addDatabaseParameterListener(const Reference<XDatabaseParameterListener>& _rListener) throw( RuntimeException )
-{
- m_aParameterManager.addParameterListener( _rListener );
-}
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::removeDatabaseParameterListener(const Reference<XDatabaseParameterListener>& _rListener) throw( RuntimeException )
-{
- m_aParameterManager.removeParameterListener( _rListener );
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::addParameterListener(const Reference<XDatabaseParameterListener>& _rListener) throw( RuntimeException )
-{
- ODatabaseForm::addDatabaseParameterListener( _rListener );
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::removeParameterListener(const Reference<XDatabaseParameterListener>& _rListener) throw( RuntimeException )
-{
- ODatabaseForm::removeDatabaseParameterListener( _rListener );
-}
-
-//==============================================================================
-// com::sun::star::sdb::XCompletedExecution
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::executeWithCompletion( const Reference< XInteractionHandler >& _rxHandler ) throw(SQLException, RuntimeException)
-{
- ::osl::ClearableMutexGuard aGuard(m_aMutex);
- // the difference between execute and load is, that we position on the first row in case of load
- // after execute we remain before the first row
- if (!isLoaded())
- {
- aGuard.clear();
- load_impl(sal_False, sal_False, _rxHandler);
- }
- else
- {
- EventObject event(static_cast< XWeak* >(this));
- if ( !impl_approveRowChange_throw( event, true, aGuard ) )
- return;
-
- // we're loaded and somebody want's to execute ourself -> this means a reload
- reload_impl(sal_False, _rxHandler);
- }
-}
-
-//==============================================================================
-// com::sun::star::sdbc::XRowSet
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::execute() throw( SQLException, RuntimeException )
-{
- ::osl::ResettableMutexGuard aGuard(m_aMutex);
- // if somebody calls an execute and we're not loaded we reroute this call to our load method.
-
- // the difference between execute and load is, that we position on the first row in case of load
- // after execute we remain before the first row
- if (!isLoaded())
- {
- aGuard.clear();
- load_impl(sal_False, sal_False);
- }
- else
- {
- EventObject event(static_cast< XWeak* >(this));
- if ( !impl_approveRowChange_throw( event, true, aGuard ) )
- return;
-
- // we're loaded and somebody want's to execute ourself -> this means a reload
- reload_impl(sal_False);
- }
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::addRowSetListener(const Reference<XRowSetListener>& _rListener) throw( RuntimeException )
-{
- if (m_xAggregateAsRowSet.is())
- m_xAggregateAsRowSet->addRowSetListener(_rListener);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::removeRowSetListener(const Reference<XRowSetListener>& _rListener) throw( RuntimeException )
-{
- if (m_xAggregateAsRowSet.is())
- m_xAggregateAsRowSet->removeRowSetListener(_rListener);
-}
-
-//==============================================================================
-// com::sun::star::sdbc::XResultSet
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL ODatabaseForm::next() throw( SQLException, RuntimeException )
-{
- return m_xAggregateAsRowSet->next();
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL ODatabaseForm::isBeforeFirst() throw( SQLException, RuntimeException )
-{
- return m_xAggregateAsRowSet->isBeforeFirst();
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL ODatabaseForm::isAfterLast() throw( SQLException, RuntimeException )
-{
- return m_xAggregateAsRowSet->isAfterLast();
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL ODatabaseForm::isFirst() throw( SQLException, RuntimeException )
-{
- return m_xAggregateAsRowSet->isFirst();
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL ODatabaseForm::isLast() throw( SQLException, RuntimeException )
-{
- return m_xAggregateAsRowSet->isLast();
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::beforeFirst() throw( SQLException, RuntimeException )
-{
- m_xAggregateAsRowSet->beforeFirst();
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::afterLast() throw( SQLException, RuntimeException )
-{
- m_xAggregateAsRowSet->afterLast();
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL ODatabaseForm::first() throw( SQLException, RuntimeException )
-{
- return m_xAggregateAsRowSet->first();
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL ODatabaseForm::last() throw( SQLException, RuntimeException )
-{
- return m_xAggregateAsRowSet->last();
-}
-
-//------------------------------------------------------------------------------
-sal_Int32 SAL_CALL ODatabaseForm::getRow() throw( SQLException, RuntimeException )
-{
- return m_xAggregateAsRowSet->getRow();
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL ODatabaseForm::absolute(sal_Int32 row) throw( SQLException, RuntimeException )
-{
- return m_xAggregateAsRowSet->absolute(row);
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL ODatabaseForm::relative(sal_Int32 rows) throw( SQLException, RuntimeException )
-{
- return m_xAggregateAsRowSet->relative(rows);
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL ODatabaseForm::previous() throw( SQLException, RuntimeException )
-{
- return m_xAggregateAsRowSet->previous();
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::refreshRow() throw( SQLException, RuntimeException )
-{
- m_xAggregateAsRowSet->refreshRow();
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL ODatabaseForm::rowUpdated() throw( SQLException, RuntimeException )
-{
- return m_xAggregateAsRowSet->rowUpdated();
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL ODatabaseForm::rowInserted() throw( SQLException, RuntimeException )
-{
- return m_xAggregateAsRowSet->rowInserted();
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL ODatabaseForm::rowDeleted() throw( SQLException, RuntimeException )
-{
- return m_xAggregateAsRowSet->rowDeleted();
-}
-
-//------------------------------------------------------------------------------
-InterfaceRef SAL_CALL ODatabaseForm::getStatement() throw( SQLException, RuntimeException )
-{
- return m_xAggregateAsRowSet->getStatement();
-}
-
-// com::sun::star::sdbc::XResultSetUpdate
-// exceptions during insert update and delete will be forwarded to the errorlistener
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::insertRow() throw( SQLException, RuntimeException )
-{
- try
- {
- Reference<XResultSetUpdate> xUpdate;
- if (query_aggregation( m_xAggregate, xUpdate))
- xUpdate->insertRow();
- }
- catch(const RowSetVetoException&)
- {
- throw;
- }
- catch(const SQLException& eDb)
- {
- onError(eDb, FRM_RES_STRING(RID_STR_ERR_INSERTRECORD));
- throw;
- }
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::updateRow() throw( SQLException, RuntimeException )
-{
- try
- {
- Reference<XResultSetUpdate> xUpdate;
- if (query_aggregation( m_xAggregate, xUpdate))
- xUpdate->updateRow();
- }
- catch(const RowSetVetoException&)
- {
- throw;
- }
- catch(const SQLException& eDb)
- {
- onError(eDb, FRM_RES_STRING(RID_STR_ERR_UPDATERECORD));
- throw;
- }
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::deleteRow() throw( SQLException, RuntimeException )
-{
- try
- {
- Reference<XResultSetUpdate> xUpdate;
- if (query_aggregation( m_xAggregate, xUpdate))
- xUpdate->deleteRow();
- }
- catch(const RowSetVetoException&)
- {
- throw;
- }
- catch(const SQLException& eDb)
- {
- onError(eDb, FRM_RES_STRING(RID_STR_ERR_DELETERECORD));
- throw;
- }
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::cancelRowUpdates() throw( SQLException, RuntimeException )
-{
- try
- {
- Reference<XResultSetUpdate> xUpdate;
- if (query_aggregation( m_xAggregate, xUpdate))
- xUpdate->cancelRowUpdates();
- }
- catch(const RowSetVetoException&)
- {
- throw;
- }
- catch(const SQLException& eDb)
- {
- onError(eDb, FRM_RES_STRING(RID_STR_ERR_INSERTRECORD));
- throw;
- }
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::moveToInsertRow() throw( SQLException, RuntimeException )
-{
- Reference<XResultSetUpdate> xUpdate;
- if (query_aggregation( m_xAggregate, xUpdate))
- {
- // _always_ move to the insert row
- //
- // Formerly, the following line was conditioned with a "not is new", means we did not move the aggregate
- // to the insert row if it was already positioned there.
- //
- // This prevented the RowSet implementation from resetting it's column values. We, ourself, formerly
- // did this reset of columns in reset_impl, where we set every column to the ControlDefault, or, if this
- // was not present, to NULL. However, the problem with setting to NULL was #88888#, the problem with
- // _not_ setting to NULL (which was the original fix for #88888#) was #97955#.
- //
- // So now we
- // * move our aggregate to the insert row
- // * in reset_impl
- // - set the control defaults into the columns if not void
- // - do _not_ set the columns to NULL if no control default is set
- //
- // Still, there is #72756#. During fixing this bug, DG introduced not calling the aggregate here. So
- // in theory, we re-introduced #72756#. But the bug described therein does not happen anymore, as the
- // preliminaries for it changed (no display of guessed values for new records with autoinc fields)
- //
- // BTW: the public Issuezilla bug is #i2815#
- //
- xUpdate->moveToInsertRow();
-
- // then set the default values and the parameters given from the parent
- reset();
- }
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::moveToCurrentRow() throw( SQLException, RuntimeException )
-{
- Reference<XResultSetUpdate> xUpdate;
- if (query_aggregation( m_xAggregate, xUpdate))
- xUpdate->moveToCurrentRow();
-}
-
-// com::sun::star::sdbcx::XDeleteRows
-//------------------------------------------------------------------------------
-Sequence<sal_Int32> SAL_CALL ODatabaseForm::deleteRows(const Sequence<Any>& rows) throw( SQLException, RuntimeException )
-{
- try
- {
- Reference<XDeleteRows> xDelete;
- if (query_aggregation( m_xAggregate, xDelete))
- return xDelete->deleteRows(rows);
- }
- catch(const RowSetVetoException&)
- {
- throw;
- }
- catch(const SQLException& eDb)
- {
- onError(eDb, FRM_RES_STRING(RID_STR_ERR_DELETERECORDS));
- throw;
- }
-
- return Sequence< sal_Int32 >();
-}
-
-// com::sun::star::sdbc::XParameters
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setNull(sal_Int32 parameterIndex, sal_Int32 sqlType) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setNull(parameterIndex, sqlType);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setObjectNull(sal_Int32 parameterIndex, sal_Int32 sqlType, const ::rtl::OUString& typeName) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setObjectNull(parameterIndex, sqlType, typeName);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setBoolean(sal_Int32 parameterIndex, sal_Bool x) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setBoolean(parameterIndex, x);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setByte(sal_Int32 parameterIndex, sal_Int8 x) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setByte(parameterIndex, x);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setShort(sal_Int32 parameterIndex, sal_Int16 x) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setShort(parameterIndex, x);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setInt(sal_Int32 parameterIndex, sal_Int32 x) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setInt(parameterIndex, x);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setLong(sal_Int32 parameterIndex, sal_Int64 x) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setLong(parameterIndex, x);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setFloat(sal_Int32 parameterIndex, float x) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setFloat(parameterIndex, x);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setDouble(sal_Int32 parameterIndex, double x) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setDouble(parameterIndex, x);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setString(sal_Int32 parameterIndex, const ::rtl::OUString& x) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setString(parameterIndex, x);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setBytes(sal_Int32 parameterIndex, const Sequence< sal_Int8 >& x) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setBytes(parameterIndex, x);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setDate(sal_Int32 parameterIndex, const ::com::sun::star::util::Date& x) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setDate(parameterIndex, x);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setTime(sal_Int32 parameterIndex, const ::com::sun::star::util::Time& x) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setTime(parameterIndex, x);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setTimestamp(sal_Int32 parameterIndex, const ::com::sun::star::util::DateTime& x) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setTimestamp(parameterIndex, x);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setBinaryStream(sal_Int32 parameterIndex, const Reference<XInputStream>& x, sal_Int32 length) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setBinaryStream(parameterIndex, x, length);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setCharacterStream(sal_Int32 parameterIndex, const Reference<XInputStream>& x, sal_Int32 length) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setCharacterStream(parameterIndex, x, length);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setObjectWithInfo(sal_Int32 parameterIndex, const Any& x, sal_Int32 targetSqlType, sal_Int32 scale) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setObjectWithInfo(parameterIndex, x, targetSqlType, scale);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setObject(sal_Int32 parameterIndex, const Any& x) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setObject(parameterIndex, x);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setRef(sal_Int32 parameterIndex, const Reference<XRef>& x) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setRef(parameterIndex, x);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setBlob(sal_Int32 parameterIndex, const Reference<XBlob>& x) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setBlob(parameterIndex, x);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setClob(sal_Int32 parameterIndex, const Reference<XClob>& x) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setClob(parameterIndex, x);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setArray(sal_Int32 parameterIndex, const Reference<XArray>& x) throw( SQLException, RuntimeException )
-{
- m_aParameterManager.setArray(parameterIndex, x);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::clearParameters() throw( SQLException, RuntimeException )
-{
- m_aParameterManager.clearParameters();
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::propertyChange( const PropertyChangeEvent& evt ) throw (RuntimeException)
-{
- if ( evt.Source == m_xParent )
- {
- if ( evt.PropertyName == PROPERTY_ISNEW )
- {
- sal_Bool bCurrentIsNew( sal_False );
- OSL_VERIFY( evt.NewValue >>= bCurrentIsNew );
- if ( !bCurrentIsNew )
- reload_impl( sal_True );
- }
- return;
- }
- OFormComponents::propertyChange( evt );
-}
-
-// com::sun::star::lang::XServiceInfo
-//------------------------------------------------------------------------------
-::rtl::OUString SAL_CALL ODatabaseForm::getImplementationName_Static()
-{
- return ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.comp.forms.ODatabaseForm" ) );
-}
-
-//------------------------------------------------------------------------------
-Sequence< ::rtl::OUString > SAL_CALL ODatabaseForm::getCompatibleServiceNames_Static()
-{
- Sequence< ::rtl::OUString > aServices( 1 );
- ::rtl::OUString* pServices = aServices.getArray();
-
- *pServices++ = FRM_COMPONENT_FORM;
-
- return aServices;
-}
-
-//------------------------------------------------------------------------------
-Sequence< ::rtl::OUString > SAL_CALL ODatabaseForm::getCurrentServiceNames_Static()
-{
- Sequence< ::rtl::OUString > aServices( 5 );
- ::rtl::OUString* pServices = aServices.getArray();
-
- *pServices++ = FRM_SUN_FORMCOMPONENT;
- *pServices++ = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.form.FormComponents") );
- *pServices++ = FRM_SUN_COMPONENT_FORM;
- *pServices++ = FRM_SUN_COMPONENT_HTMLFORM;
- *pServices++ = FRM_SUN_COMPONENT_DATAFORM;
-
- return aServices;
-}
-
-//------------------------------------------------------------------------------
-Sequence< ::rtl::OUString > SAL_CALL ODatabaseForm::getSupportedServiceNames_Static()
-{
- return ::comphelper::concatSequences(
- getCurrentServiceNames_Static(),
- getCompatibleServiceNames_Static()
- );
-}
-
-//------------------------------------------------------------------------------
-::rtl::OUString SAL_CALL ODatabaseForm::getImplementationName() throw( RuntimeException )
-{
- return getImplementationName_Static();
-}
-
-//------------------------------------------------------------------------------
-Sequence< ::rtl::OUString > SAL_CALL ODatabaseForm::getSupportedServiceNames() throw( RuntimeException )
-{
- // the services of our aggregate
- Sequence< ::rtl::OUString > aServices;
- Reference< XServiceInfo > xInfo;
- if (query_aggregation(m_xAggregate, xInfo))
- aServices = xInfo->getSupportedServiceNames();
-
- // concat with out own services
- return ::comphelper::concatSequences(
- getCurrentServiceNames_Static(),
- aServices
- );
- // use getCurrentXXX instead of getSupportedXXX, because at runtime, we do not want to have
- // the compatible names
- // This is maily to be consistent with the implementation before fixing #97083#, though the
- // better solution _may_ be to return the compatible names at runtime, too
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL ODatabaseForm::supportsService(const ::rtl::OUString& ServiceName) throw( RuntimeException )
-{
- Sequence< ::rtl::OUString > aSupported( getSupportedServiceNames() );
- const ::rtl::OUString* pArray = aSupported.getConstArray();
- for( sal_Int32 i = 0; i < aSupported.getLength(); ++i, ++pArray )
- if( pArray->equals( ServiceName ) )
- return sal_True;
- return sal_False;
-}
-
-//==============================================================================
-// com::sun::star::io::XPersistObject
-//------------------------------------------------------------------------------
-
-const sal_uInt16 CYCLE = 0x0001;
-const sal_uInt16 DONTAPPLYFILTER = 0x0002;
-
-//------------------------------------------------------------------------------
-::rtl::OUString ODatabaseForm::getServiceName() throw( RuntimeException )
-{
- return FRM_COMPONENT_FORM; // old (non-sun) name for compatibility !
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::write(const Reference<XObjectOutputStream>& _rxOutStream) throw( IOException, RuntimeException )
-{
- DBG_ASSERT(m_xAggregateSet.is(), "ODatabaseForm::write : only to be called if the aggregate exists !");
-
- // all children
- OFormComponents::write(_rxOutStream);
-
- // version
- _rxOutStream->writeShort(0x0003);
-
- // Name
- _rxOutStream << m_sName;
-
- ::rtl::OUString sDataSource;
- if (m_xAggregateSet.is())
- m_xAggregateSet->getPropertyValue(PROPERTY_DATASOURCE) >>= sDataSource;
- _rxOutStream << sDataSource;
-
- // former CursorSource
- ::rtl::OUString sCommand;
- if (m_xAggregateSet.is())
- m_xAggregateSet->getPropertyValue(PROPERTY_COMMAND) >>= sCommand;
- _rxOutStream << sCommand;
-
- // former MasterFields
- _rxOutStream << m_aMasterFields;
- // former DetailFields
- _rxOutStream << m_aDetailFields;
-
- // former DataSelectionType
- DataSelectionType eTranslated = DataSelectionType_TABLE;
- if (m_xAggregateSet.is())
- {
- sal_Int32 nCommandType = 0;
- m_xAggregateSet->getPropertyValue(PROPERTY_COMMANDTYPE) >>= nCommandType;
- switch (nCommandType)
- {
- case CommandType::TABLE : eTranslated = DataSelectionType_TABLE; break;
- case CommandType::QUERY : eTranslated = DataSelectionType_QUERY; break;
- case CommandType::COMMAND:
- {
- sal_Bool bEscapeProcessing = getBOOL(m_xAggregateSet->getPropertyValue(PROPERTY_ESCAPE_PROCESSING));
- eTranslated = bEscapeProcessing ? DataSelectionType_SQL : DataSelectionType_SQLPASSTHROUGH;
- }
- break;
- default : OSL_FAIL("ODatabaseForm::write : wrong CommandType !");
- }
- }
- _rxOutStream->writeShort((sal_Int16)eTranslated); // former DataSelectionType
-
- // very old versions expect a CursorType here
- _rxOutStream->writeShort(DatabaseCursorType_KEYSET);
-
- _rxOutStream->writeBoolean(m_eNavigation != NavigationBarMode_NONE);
-
- // former DataEntry
- if (m_xAggregateSet.is())
- _rxOutStream->writeBoolean(getBOOL(m_xAggregateSet->getPropertyValue(PROPERTY_INSERTONLY)));
- else
- _rxOutStream->writeBoolean(sal_False);
-
- _rxOutStream->writeBoolean(m_bAllowInsert);
- _rxOutStream->writeBoolean(m_bAllowUpdate);
- _rxOutStream->writeBoolean(m_bAllowDelete);
-
- // html form stuff
- ::rtl::OUString sTmp = INetURLObject::decode( m_aTargetURL, '%', INetURLObject::DECODE_UNAMBIGUOUS);
- _rxOutStream << sTmp;
- _rxOutStream->writeShort( (sal_Int16)m_eSubmitMethod );
- _rxOutStream->writeShort( (sal_Int16)m_eSubmitEncoding );
- _rxOutStream << m_aTargetFrame;
-
- // version 2 didn't know some options and the "default" state
- sal_Int32 nCycle = TabulatorCycle_RECORDS;
- if (m_aCycle.hasValue())
- {
- ::cppu::enum2int(nCycle, m_aCycle);
- if (m_aCycle == TabulatorCycle_PAGE)
- // unknown in earlier versions
- nCycle = TabulatorCycle_RECORDS;
- }
- _rxOutStream->writeShort((sal_Int16) nCycle);
-
- _rxOutStream->writeShort((sal_Int16)m_eNavigation);
-
- ::rtl::OUString sFilter;
- ::rtl::OUString sOrder;
- if (m_xAggregateSet.is())
- {
- m_xAggregateSet->getPropertyValue(PROPERTY_FILTER) >>= sFilter;
- m_xAggregateSet->getPropertyValue(PROPERTY_SORT) >>= sOrder;
- }
- _rxOutStream << sFilter;
- _rxOutStream << sOrder;
-
-
- // version 3
- sal_uInt16 nAnyMask = 0;
- if (m_aCycle.hasValue())
- nAnyMask |= CYCLE;
-
- if (m_xAggregateSet.is() && !getBOOL(m_xAggregateSet->getPropertyValue(PROPERTY_APPLYFILTER)))
- nAnyMask |= DONTAPPLYFILTER;
-
- _rxOutStream->writeShort(nAnyMask);
-
- if (nAnyMask & CYCLE)
- {
- sal_Int32 nRealCycle = 0;
- ::cppu::enum2int(nRealCycle, m_aCycle);
- _rxOutStream->writeShort((sal_Int16)nRealCycle);
- }
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::read(const Reference<XObjectInputStream>& _rxInStream) throw( IOException, RuntimeException )
-{
- DBG_ASSERT(m_xAggregateSet.is(), "ODatabaseForm::read : only to be called if the aggregate exists !");
-
- OFormComponents::read(_rxInStream);
-
- // version
- sal_uInt16 nVersion = _rxInStream->readShort();
-
- _rxInStream >> m_sName;
-
- ::rtl::OUString sAggregateProp;
- _rxInStream >> sAggregateProp;
- if (m_xAggregateSet.is())
- m_xAggregateSet->setPropertyValue(PROPERTY_DATASOURCE, makeAny(sAggregateProp));
- _rxInStream >> sAggregateProp;
- if (m_xAggregateSet.is())
- m_xAggregateSet->setPropertyValue(PROPERTY_COMMAND, makeAny(sAggregateProp));
-
- _rxInStream >> m_aMasterFields;
- _rxInStream >> m_aDetailFields;
-
- sal_Int16 nCursorSourceType = _rxInStream->readShort();
- sal_Int32 nCommandType = 0;
- switch ((DataSelectionType)nCursorSourceType)
- {
- case DataSelectionType_TABLE : nCommandType = CommandType::TABLE; break;
- case DataSelectionType_QUERY : nCommandType = CommandType::QUERY; break;
- case DataSelectionType_SQL:
- case DataSelectionType_SQLPASSTHROUGH:
- {
- nCommandType = CommandType::COMMAND;
- sal_Bool bEscapeProcessing = ((DataSelectionType)nCursorSourceType) != DataSelectionType_SQLPASSTHROUGH;
- m_xAggregateSet->setPropertyValue(PROPERTY_ESCAPE_PROCESSING, makeAny((sal_Bool)bEscapeProcessing));
- }
- break;
- default : OSL_FAIL("ODatabaseForm::read : wrong CommandType !");
- }
- if (m_xAggregateSet.is())
- m_xAggregateSet->setPropertyValue(PROPERTY_COMMANDTYPE, makeAny(nCommandType));
-
- // obsolete
- _rxInStream->readShort();
-
- // navigation mode was a boolean in version 1
- // war in der version 1 ein sal_Bool
- sal_Bool bNavigation = _rxInStream->readBoolean();
- if (nVersion == 1)
- m_eNavigation = bNavigation ? NavigationBarMode_CURRENT : NavigationBarMode_NONE;
-
- sal_Bool bInsertOnly = _rxInStream->readBoolean();
- if (m_xAggregateSet.is())
- m_xAggregateSet->setPropertyValue(PROPERTY_INSERTONLY, makeAny(bInsertOnly));
-
- m_bAllowInsert = _rxInStream->readBoolean();
- m_bAllowUpdate = _rxInStream->readBoolean();
- m_bAllowDelete = _rxInStream->readBoolean();
-
- // html stuff
- ::rtl::OUString sTmp;
- _rxInStream >> sTmp;
- m_aTargetURL = INetURLObject::decode( sTmp, '%', INetURLObject::DECODE_UNAMBIGUOUS);
- m_eSubmitMethod = (FormSubmitMethod)_rxInStream->readShort();
- m_eSubmitEncoding = (FormSubmitEncoding)_rxInStream->readShort();
- _rxInStream >> m_aTargetFrame;
-
- if (nVersion > 1)
- {
- sal_Int32 nCycle = _rxInStream->readShort();
- m_aCycle = ::cppu::int2enum(nCycle, ::getCppuType(static_cast<const TabulatorCycle*>(NULL)));
- m_eNavigation = (NavigationBarMode)_rxInStream->readShort();
-
- _rxInStream >> sAggregateProp;
- setPropertyValue(PROPERTY_FILTER, makeAny(sAggregateProp));
-
- _rxInStream >> sAggregateProp;
- if (m_xAggregateSet.is())
- m_xAggregateSet->setPropertyValue(PROPERTY_SORT, makeAny(sAggregateProp));
- }
-
- sal_uInt16 nAnyMask = 0;
- if (nVersion > 2)
- {
- nAnyMask = _rxInStream->readShort();
- if (nAnyMask & CYCLE)
- {
- sal_Int32 nCycle = _rxInStream->readShort();
- m_aCycle = ::cppu::int2enum(nCycle, ::getCppuType(static_cast<const TabulatorCycle*>(NULL)));
- }
- else
- m_aCycle.clear();
- }
- if (m_xAggregateSet.is())
- m_xAggregateSet->setPropertyValue(PROPERTY_APPLYFILTER, makeAny((sal_Bool)((nAnyMask & DONTAPPLYFILTER) == 0)));
-}
-
-//------------------------------------------------------------------------------
-void ODatabaseForm::implInserted( const ElementDescription* _pElement )
-{
- OFormComponents::implInserted( _pElement );
-
- Reference< XSQLErrorBroadcaster > xBroadcaster( _pElement->xInterface, UNO_QUERY );
- Reference< XForm > xForm ( _pElement->xInterface, UNO_QUERY );
-
- if ( xBroadcaster.is() && !xForm.is() )
- { // the object is an error broadcaster, but no form itself -> add ourself as listener
- xBroadcaster->addSQLErrorListener( this );
- }
-}
-
-//------------------------------------------------------------------------------
-void ODatabaseForm::implRemoved(const InterfaceRef& _rxObject)
-{
- OFormComponents::implRemoved( _rxObject );
-
- Reference<XSQLErrorBroadcaster> xBroadcaster(_rxObject, UNO_QUERY);
- Reference<XForm> xForm(_rxObject, UNO_QUERY);
- if (xBroadcaster.is() && !xForm.is())
- { // the object is an error broadcaster, but no form itself -> remove ourself as listener
- xBroadcaster->removeSQLErrorListener(this);
- }
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::errorOccured(const SQLErrorEvent& _rEvent) throw( RuntimeException )
-{
- // give it to my own error listener
- onError(_rEvent);
- // TODO : think about extending the chain with an SQLContext object saying
- // "this was an error of one of my children"
-}
-
-// com::sun::star::container::XNamed
-//------------------------------------------------------------------------------
-::rtl::OUString SAL_CALL ODatabaseForm::getName() throw( RuntimeException )
-{
- ::rtl::OUString sReturn;
- OPropertySetHelper::getFastPropertyValue(PROPERTY_ID_NAME) >>= sReturn;
- return sReturn;
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODatabaseForm::setName(const ::rtl::OUString& aName) throw( RuntimeException )
-{
- setFastPropertyValue(PROPERTY_ID_NAME, makeAny(aName));
-}
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/DatabaseForm.hxx b/forms/source/component/DatabaseForm.hxx
deleted file mode 100644
index fb8984b45..000000000
--- a/forms/source/component/DatabaseForm.hxx
+++ /dev/null
@@ -1,569 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FRM_DATABASEFORM_HXX_
-#define _FRM_DATABASEFORM_HXX_
-
-#include "propertybaghelper.hxx"
-#include <com/sun/star/sdbc/XDataSource.hpp>
-#include <com/sun/star/sdb/XSQLErrorListener.hpp>
-#include <com/sun/star/io/XPersistObject.hpp>
-#include <com/sun/star/sdb/XSQLErrorBroadcaster.hpp>
-#include <com/sun/star/form/FormSubmitMethod.hpp>
-#include <com/sun/star/form/FormSubmitEncoding.hpp>
-#include <com/sun/star/form/XSubmit.hpp>
-#include <com/sun/star/form/XReset.hpp>
-#include <com/sun/star/form/XDatabaseParameterBroadcaster2.hpp>
-#include <com/sun/star/sdb/XCompletedExecution.hpp>
-#include <com/sun/star/sdbc/XRowSet.hpp>
-#include <com/sun/star/sdbcx/XDeleteRows.hpp>
-#include <com/sun/star/sdbc/XResultSetUpdate.hpp>
-#include <com/sun/star/sdb/XRowSetApproveListener.hpp>
-#include <com/sun/star/sdb/XRowSetApproveBroadcaster.hpp>
-#include <com/sun/star/form/NavigationBarMode.hpp>
-#include <com/sun/star/form/XLoadable.hpp>
-#include <com/sun/star/form/XLoadListener.hpp>
-#include <com/sun/star/form/XForm.hpp>
-#include <com/sun/star/awt/XTabControllerModel.hpp>
-#include <com/sun/star/script/XEventAttacherManager.hpp>
-#include <com/sun/star/sdbc/XRowSetListener.hpp>
-#include <com/sun/star/sdb/XResultSetAccess.hpp>
-#include <com/sun/star/sdbc/XCloseable.hpp>
-#include <com/sun/star/container/XNamed.hpp>
-#include <com/sun/star/lang/XServiceInfo.hpp>
-#include <com/sun/star/sdbc/XParameters.hpp>
-#include <com/sun/star/sdbc/XConnection.hpp>
-#include <com/sun/star/task/XInteractionHandler.hpp>
-#include <com/sun/star/beans/XPropertyContainer.hpp>
-#include <com/sun/star/beans/XPropertyAccess.hpp>
-#include <com/sun/star/sdbc/XWarningsSupplier.hpp>
-
-
-#include <tools/link.hxx>
-#include "InterfaceContainer.hxx"
-
-#include <connectivity/parameters.hxx>
-#include <connectivity/filtermanager.hxx>
-#include <connectivity/warningscontainer.hxx>
-
-#include "listenercontainers.hxx"
-#include "ids.hxx"
-#include <comphelper/propmultiplex.hxx>
-#include <comphelper/uno3.hxx>
-#include <comphelper/proparrhlp.hxx>
-#include <cppuhelper/implbase12.hxx>
-#include <cppuhelper/implbase4.hxx>
-#include <cppuhelper/implbase7.hxx>
-
-namespace com { namespace sun { namespace star { namespace sdbc {
- class SQLException;
-} } } }
-
-class Timer;
-class INetMIMEMessage;
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
-//========================================================================
-//= html tools
-//========================================================================
-
-const sal_uInt16 SUCCESSFUL_REPRESENT_TEXT = 0x0001;
-const sal_uInt16 SUCCESSFUL_REPRESENT_FILE = 0x0002;
-
-//------------------------------------------------------------------------------
-class HtmlSuccessfulObj
-{
-public:
- ::rtl::OUString aName;
- ::rtl::OUString aValue;
- sal_uInt16 nRepresentation;
-
- HtmlSuccessfulObj( const ::rtl::OUString& _rName, const ::rtl::OUString& _rValue,
- sal_uInt16 _nRepresent = SUCCESSFUL_REPRESENT_TEXT )
- :aName( _rName )
- ,aValue( _rValue )
- ,nRepresentation( _nRepresent )
- {
- }
-
- HtmlSuccessfulObj()
- {
- }
-};
-
-
-DECLARE_STL_VECTOR(HtmlSuccessfulObj, HtmlSuccessfulObjList);
-
-//========================================================================
-class OGroupManager;
-class OFormSubmitResetThread;
-typedef ::cppu::ImplHelper12 < ::com::sun::star::form::XForm
- , ::com::sun::star::awt::XTabControllerModel
- , ::com::sun::star::form::XLoadListener
- , ::com::sun::star::sdbc::XRowSetListener
- , ::com::sun::star::sdb::XRowSetApproveListener
- , ::com::sun::star::form::XDatabaseParameterBroadcaster2
- , ::com::sun::star::sdb::XSQLErrorListener
- , ::com::sun::star::sdb::XSQLErrorBroadcaster
- , ::com::sun::star::form::XReset
- , ::com::sun::star::form::XSubmit
- , ::com::sun::star::form::XLoadable
- , ::com::sun::star::container::XNamed
- > ODatabaseForm_BASE1;
-
-
-typedef ::cppu::ImplHelper4 < ::com::sun::star::lang::XServiceInfo
- , ::com::sun::star::beans::XPropertyContainer
- , ::com::sun::star::beans::XPropertyAccess
- , ::com::sun::star::sdbc::XWarningsSupplier
- > ODatabaseForm_BASE2;
-
-typedef ::cppu::ImplHelper7< ::com::sun::star::sdbc::XCloseable,
- ::com::sun::star::sdbc::XRowSet,
- ::com::sun::star::sdb::XCompletedExecution,
- ::com::sun::star::sdb::XRowSetApproveBroadcaster,
- ::com::sun::star::sdbc::XResultSetUpdate,
- ::com::sun::star::sdbcx::XDeleteRows,
- ::com::sun::star::sdbc::XParameters > ODatabaseForm_BASE3;
-
-
-class ODatabaseForm :public OFormComponents
- ,public OPropertySetAggregationHelper
- ,public OPropertyChangeListener
- ,public ODatabaseForm_BASE1
- ,public ODatabaseForm_BASE2
- ,public ODatabaseForm_BASE3
- ,public IPropertyBagHelperContext
-{
- friend class OFormSubmitResetThread;
-
- OImplementationIdsRef m_aHoldIdHelper;
-
- // listener administration
- ::cppu::OInterfaceContainerHelper m_aLoadListeners;
- ::cppu::OInterfaceContainerHelper m_aRowSetApproveListeners;
- ::cppu::OInterfaceContainerHelper m_aRowSetListeners;
- ::cppu::OInterfaceContainerHelper m_aSubmitListeners;
- ::cppu::OInterfaceContainerHelper m_aErrorListeners;
- ResetListeners m_aResetListeners;
- ::osl::Mutex m_aResetSafety;
- ::com::sun::star::uno::Any m_aCycle;
- ::com::sun::star::uno::Any m_aIgnoreResult; // set when we are a subform and our master form positioned on a new row
- ::com::sun::star::uno::Sequence< ::rtl::OUString > m_aMasterFields;
- ::com::sun::star::uno::Sequence< ::rtl::OUString > m_aDetailFields;
-
- // the object doin' most of the work - an SDB-rowset
- ::com::sun::star::uno::Reference< ::com::sun::star::uno::XAggregation> m_xAggregate;
- // same object, interface as member because of performance reasons
- ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XRowSet> m_xAggregateAsRowSet;
-
- PropertyBagHelper m_aPropertyBagHelper;
- ::dbtools::WarningsContainer m_aWarnings;
- OPropertyChangeMultiplexer* m_pAggregatePropertyMultiplexer;
- // Verwaltung der ControlGruppen
- OGroupManager* m_pGroupManager;
- ::dbtools::ParameterManager m_aParameterManager;
- ::dbtools::FilterManager m_aFilterManager;
- Timer* m_pLoadTimer;
-
- OFormSubmitResetThread* m_pThread;
- ::rtl::OUString m_sCurrentErrorContext;
- // will be used as additional context information
- // when an exception is catched and forwarded to the listeners
-
- sal_Int32 m_nResetsPending;
-// <overwritten_properties>
- sal_Int32 m_nPrivileges;
- sal_Bool m_bInsertOnly;
-// </overwritten_properties>
-
-// <properties>
- ::com::sun::star::uno::Any m_aControlBorderColorFocus;
- ::com::sun::star::uno::Any m_aControlBorderColorMouse;
- ::com::sun::star::uno::Any m_aControlBorderColorInvalid;
- ::com::sun::star::uno::Any m_aDynamicControlBorder;
- ::rtl::OUString m_sName;
- ::rtl::OUString m_aTargetURL;
- ::rtl::OUString m_aTargetFrame;
- ::com::sun::star::form::FormSubmitMethod m_eSubmitMethod;
- ::com::sun::star::form::FormSubmitEncoding m_eSubmitEncoding;
- ::com::sun::star::form::NavigationBarMode m_eNavigation;
- sal_Bool m_bAllowInsert : 1;
- sal_Bool m_bAllowUpdate : 1;
- sal_Bool m_bAllowDelete : 1;
-// </properties>
- sal_Bool m_bLoaded : 1;
- sal_Bool m_bSubForm : 1;
- sal_Bool m_bForwardingConnection : 1; // sal_True if we're setting the ActiveConnection on the aggregate
- sal_Bool m_bSharingConnection : 1; // sal_True if the connection we're using is shared with out parent
-
-public:
- ODatabaseForm(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory);
- ODatabaseForm( const ODatabaseForm& _cloneSource );
- ~ODatabaseForm();
-
- // UNO binding
- DECLARE_UNO3_AGG_DEFAULTS(ODatabaseForm, OFormComponents);
- virtual ::com::sun::star::uno::Any SAL_CALL queryAggregation(const ::com::sun::star::uno::Type& _rType) throw(::com::sun::star::uno::RuntimeException);
-
- // XTypeProvider
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> SAL_CALL getTypes( ) throw(::com::sun::star::uno::RuntimeException);
- virtual ::com::sun::star::uno::Sequence<sal_Int8> SAL_CALL getImplementationId( ) throw(::com::sun::star::uno::RuntimeException);
-
- // ::com::sun::star::lang::XComponent
- virtual void SAL_CALL disposing();
-
- // property handling
- virtual ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySetInfo > SAL_CALL getPropertySetInfo( ) throw(::com::sun::star::uno::RuntimeException);
- virtual ::cppu::IPropertyArrayHelper& SAL_CALL getInfoHelper();
- virtual void SAL_CALL getFastPropertyValue(::com::sun::star::uno::Any& rValue, sal_Int32 nHandle ) const;
- virtual sal_Bool SAL_CALL convertFastPropertyValue(::com::sun::star::uno::Any& rConvertedValue, ::com::sun::star::uno::Any& rOldValue, sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue ) throw(::com::sun::star::lang::IllegalArgumentException);
- virtual void SAL_CALL setFastPropertyValue_NoBroadcast(sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue) throw ( ::com::sun::star::uno::Exception );
-
- ::com::sun::star::uno::Any SAL_CALL getFastPropertyValue( sal_Int32 nHandle )
- throw(::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::lang::WrappedTargetException, ::com::sun::star::uno::RuntimeException);
- void fire( sal_Int32 * pnHandles, const ::com::sun::star::uno::Any * pNewValues, const ::com::sun::star::uno::Any * pOldValues, sal_Int32 nCount, sal_Bool bVetoable );
-
- // IPropertyBagHelperContext
- virtual ::osl::Mutex& getMutex();
- virtual void describeFixedAndAggregateProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& _out_rFixedProperties,
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& _out_rAggregateProperties
- ) const;
- virtual ::com::sun::star::uno::Reference< ::com::sun::star::beans::XMultiPropertySet >
- getPropertiesInterface();
-
- // com::sun::star::beans::XPropertyState
- virtual ::com::sun::star::beans::PropertyState getPropertyStateByHandle(sal_Int32 nHandle);
- virtual void setPropertyToDefaultByHandle(sal_Int32 nHandle);
- virtual ::com::sun::star::uno::Any getPropertyDefaultByHandle(sal_Int32 nHandle) const;
-
- // com::sun::star::sdbc::XSQLErrorBroadcaster
- virtual void SAL_CALL addSQLErrorListener(const ::com::sun::star::uno::Reference< ::com::sun::star::sdb::XSQLErrorListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeSQLErrorListener(const ::com::sun::star::uno::Reference< ::com::sun::star::sdb::XSQLErrorListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::form::XForm
- // nothing to implement
-
- // com::sun::star::form::XReset
- virtual void SAL_CALL reset() throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL addResetListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XResetListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeResetListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XResetListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::form::XSubmit
- virtual void SAL_CALL submit(const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControl>& aControl, const ::com::sun::star::awt::MouseEvent& aMouseEvt) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL addSubmitListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XSubmitListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeSubmitListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XSubmitListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::container::XChild
- virtual InterfaceRef SAL_CALL getParent() throw ( ::com::sun::star::uno::RuntimeException) { return OFormComponents::getParent(); }
- virtual void SAL_CALL setParent(const InterfaceRef& Parent) throw ( :: com::sun::star::lang::NoSupportException , ::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::container::XNamed
- virtual ::rtl::OUString SAL_CALL getName() throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setName(const ::rtl::OUString& aName) throw(::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::awt::XTabControllerModel
- virtual sal_Bool SAL_CALL getGroupControl() throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setGroupControl(sal_Bool /*_bGroupControl*/) throw(::com::sun::star::uno::RuntimeException) { }
- virtual void SAL_CALL setControlModels(const ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControlModel > >& _rControls) throw(::com::sun::star::uno::RuntimeException);
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControlModel > > SAL_CALL getControlModels() throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setGroup(const ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControlModel > >& _rGroup, const ::rtl::OUString& _rGroupName) throw(::com::sun::star::uno::RuntimeException);
- virtual sal_Int32 SAL_CALL getGroupCount() throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL getGroup(sal_Int32 _nGroup, ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControlModel > >& _rxGroup, ::rtl::OUString& _rName) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL getGroupByName(const ::rtl::OUString& _rName, ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControlModel > >& _rxGroup) throw(::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::lang::XEventListener
- virtual void SAL_CALL disposing(const ::com::sun::star::lang::EventObject& _rSource) throw(::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::form::XLoadListener
- virtual void SAL_CALL loaded(const ::com::sun::star::lang::EventObject& aEvent) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL unloading(const ::com::sun::star::lang::EventObject& aEvent) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL unloaded(const ::com::sun::star::lang::EventObject& aEvent) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL reloading(const ::com::sun::star::lang::EventObject& aEvent) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL reloaded(const ::com::sun::star::lang::EventObject& aEvent) throw(::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::form::XLoadable
- virtual void SAL_CALL load() throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL unload() throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL reload() throw(::com::sun::star::uno::RuntimeException);
- virtual sal_Bool SAL_CALL isLoaded() throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL addLoadListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XLoadListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeLoadListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XLoadListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::sdbc::XCloseable
- virtual void SAL_CALL close() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::sdbc::XRowSetListener
- virtual void SAL_CALL cursorMoved(const ::com::sun::star::lang::EventObject& event) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL rowChanged(const ::com::sun::star::lang::EventObject& event) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL rowSetChanged(const ::com::sun::star::lang::EventObject& event) throw(::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::sdb::XRowSetApproveListener
- virtual sal_Bool SAL_CALL approveCursorMove(const ::com::sun::star::lang::EventObject& event) throw(::com::sun::star::uno::RuntimeException);
- virtual sal_Bool SAL_CALL approveRowChange(const ::com::sun::star::sdb::RowChangeEvent& event) throw(::com::sun::star::uno::RuntimeException);
- virtual sal_Bool SAL_CALL approveRowSetChange(const ::com::sun::star::lang::EventObject& event) throw(::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::sdb::XRowSetApproveBroadcaster
- virtual void SAL_CALL addRowSetApproveListener(const ::com::sun::star::uno::Reference< ::com::sun::star::sdb::XRowSetApproveListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeRowSetApproveListener(const ::com::sun::star::uno::Reference< ::com::sun::star::sdb::XRowSetApproveListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
-
- // com::sun:star::form::XDatabaseParameterBroadcaster2
- virtual void SAL_CALL addDatabaseParameterListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XDatabaseParameterListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeDatabaseParameterListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XDatabaseParameterListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
-
- // com::sun:star::form::XDatabaseParameterBroadcaster
- virtual void SAL_CALL addParameterListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XDatabaseParameterListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeParameterListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XDatabaseParameterListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::sdbc::XRowSet
- virtual void SAL_CALL execute() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL addRowSetListener(const ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XRowSetListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeRowSetListener(const ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XRowSetListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::sdb::XCompletedExecution
- virtual void SAL_CALL executeWithCompletion( const ::com::sun::star::uno::Reference< ::com::sun::star::task::XInteractionHandler >& handler ) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::sdbc::XResultSet
- virtual sal_Bool SAL_CALL next() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual sal_Bool SAL_CALL isBeforeFirst() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual sal_Bool SAL_CALL isAfterLast() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual sal_Bool SAL_CALL isFirst() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual sal_Bool SAL_CALL isLast() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL beforeFirst() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL afterLast() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual sal_Bool SAL_CALL first() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual sal_Bool SAL_CALL last() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual sal_Int32 SAL_CALL getRow() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual sal_Bool SAL_CALL absolute(sal_Int32 row) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual sal_Bool SAL_CALL relative(sal_Int32 rows) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual sal_Bool SAL_CALL previous() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL refreshRow() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual sal_Bool SAL_CALL rowUpdated() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual sal_Bool SAL_CALL rowInserted() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual sal_Bool SAL_CALL rowDeleted() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual InterfaceRef SAL_CALL getStatement() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::sdbc::XResultSetUpdate
- virtual void SAL_CALL insertRow() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL updateRow() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL deleteRow() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL cancelRowUpdates() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL moveToInsertRow() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL moveToCurrentRow() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::sdbcx::XDeleteRows
- virtual ::com::sun::star::uno::Sequence< sal_Int32 > SAL_CALL deleteRows(const ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Any>& rows) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::lang::XServiceInfo
- virtual sal_Bool SAL_CALL supportsService(const ::rtl::OUString& ServiceName) throw(::com::sun::star::uno::RuntimeException);
- virtual ::rtl::OUString SAL_CALL getImplementationName() throw(::com::sun::star::uno::RuntimeException);
- virtual ::com::sun::star::uno::Sequence< ::rtl::OUString > SAL_CALL getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::lang::XServiceInfo - static version
- static ::rtl::OUString SAL_CALL getImplementationName_Static();
- static ::com::sun::star::uno::Sequence< ::rtl::OUString > SAL_CALL getSupportedServiceNames_Static();
- static ::com::sun::star::uno::Sequence< ::rtl::OUString > SAL_CALL getCurrentServiceNames_Static();
- static ::com::sun::star::uno::Sequence< ::rtl::OUString > SAL_CALL getCompatibleServiceNames_Static();
- static ::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface > SAL_CALL Create( const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory >& _rxFactory );
-
- // com::sun::star::io::XPersistObject
- virtual ::rtl::OUString SAL_CALL getServiceName() throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL write(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectOutputStream>& _rxOutStream) throw(::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL read(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectInputStream>& _rxInStream) throw(::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::sdbc::XSQLErrorListener
- virtual void SAL_CALL errorOccured(const ::com::sun::star::sdb::SQLErrorEvent& aEvent) throw(::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::sdbc::XParameters
- virtual void SAL_CALL setNull(sal_Int32 parameterIndex, sal_Int32 sqlType) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setObjectNull(sal_Int32 parameterIndex, sal_Int32 sqlType, const ::rtl::OUString& typeName) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setBoolean(sal_Int32 parameterIndex, sal_Bool x) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setByte(sal_Int32 parameterIndex, sal_Int8 x) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setShort(sal_Int32 parameterIndex, sal_Int16 x) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setInt(sal_Int32 parameterIndex, sal_Int32 x) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setLong(sal_Int32 parameterIndex, sal_Int64 x) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setFloat(sal_Int32 parameterIndex, float x) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setDouble(sal_Int32 parameterIndex, double x) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setString(sal_Int32 parameterIndex, const ::rtl::OUString& x) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setBytes(sal_Int32 parameterIndex, const ::com::sun::star::uno::Sequence< sal_Int8 >& x) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setDate(sal_Int32 parameterIndex, const ::com::sun::star::util::Date& x) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setTime(sal_Int32 parameterIndex, const ::com::sun::star::util::Time& x) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setTimestamp(sal_Int32 parameterIndex, const ::com::sun::star::util::DateTime& x) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setBinaryStream(sal_Int32 parameterIndex, const ::com::sun::star::uno::Reference< ::com::sun::star::io::XInputStream>& x, sal_Int32 length) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setCharacterStream(sal_Int32 parameterIndex, const ::com::sun::star::uno::Reference< ::com::sun::star::io::XInputStream>& x, sal_Int32 length) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setObject(sal_Int32 parameterIndex, const ::com::sun::star::uno::Any& x) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setObjectWithInfo(sal_Int32 parameterIndex, const ::com::sun::star::uno::Any& x, sal_Int32 targetSqlType, sal_Int32 scale) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setRef(sal_Int32 parameterIndex, const ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XRef>& x) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setBlob(sal_Int32 parameterIndex, const ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XBlob>& x) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setClob(sal_Int32 parameterIndex, const ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XClob>& x) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setArray(sal_Int32 parameterIndex, const ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XArray>& x) throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL clearParameters() throw(::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
-
- // XPropertyChangeListener
- virtual void SAL_CALL propertyChange( const ::com::sun::star::beans::PropertyChangeEvent& evt ) throw (::com::sun::star::uno::RuntimeException);
-
- // XPropertyContainer
- virtual void SAL_CALL addProperty( const ::rtl::OUString& Name, ::sal_Int16 Attributes, const ::com::sun::star::uno::Any& DefaultValue ) throw (::com::sun::star::beans::PropertyExistException, ::com::sun::star::beans::IllegalTypeException, ::com::sun::star::lang::IllegalArgumentException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeProperty( const ::rtl::OUString& Name ) throw (::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::beans::NotRemoveableException, ::com::sun::star::uno::RuntimeException);
-
- // XPropertyAccess
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::beans::PropertyValue > SAL_CALL getPropertyValues( ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setPropertyValues( const ::com::sun::star::uno::Sequence< ::com::sun::star::beans::PropertyValue >& aProps ) throw (::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::beans::PropertyVetoException, ::com::sun::star::lang::IllegalArgumentException, ::com::sun::star::lang::WrappedTargetException, ::com::sun::star::uno::RuntimeException);
- using OPropertySetAggregationHelper::setPropertyValues;
-
- // XWarningsSupplier
- virtual ::com::sun::star::uno::Any SAL_CALL getWarnings( ) throw (::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL clearWarnings( ) throw (::com::sun::star::sdbc::SQLException, ::com::sun::star::uno::RuntimeException);
-
- // XCloneable
- virtual ::com::sun::star::uno::Reference< ::com::sun::star::util::XCloneable > SAL_CALL createClone( ) throw (::com::sun::star::uno::RuntimeException);
-
- inline void submitNBC( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControl>& Control, const ::com::sun::star::awt::MouseEvent& MouseEvt );
-
-protected:
- // OPropertySetAggregationHelper overridables
- virtual void SAL_CALL forwardingPropertyValue( sal_Int32 _nHandle );
- virtual void SAL_CALL forwardedPropertyValue( sal_Int32 _nHandle, bool _bSuccess );
-
- // OInterfaceContainer overridables
- virtual void implInserted( const ElementDescription* _pElement );
- virtual void implRemoved(const InterfaceRef& _rxObject);
-
- // OPropertyChangeListener
- virtual void _propertyChanged( const ::com::sun::star::beans::PropertyChangeEvent& ) throw(::com::sun::star::uno::RuntimeException);
-
-private:
- sal_Bool executeRowSet(::osl::ResettableMutexGuard& _rClearForNotifies, sal_Bool bMoveToFirst = sal_True,
- const ::com::sun::star::uno::Reference< ::com::sun::star::task::XInteractionHandler >& _rxCompletionHandler = ::com::sun::star::uno::Reference< ::com::sun::star::task::XInteractionHandler >());
- bool fillParameters(::osl::ResettableMutexGuard& _rClearForNotifies,
- const ::com::sun::star::uno::Reference< ::com::sun::star::task::XInteractionHandler >& _rxCompletionHandler = ::com::sun::star::uno::Reference< ::com::sun::star::task::XInteractionHandler >());
- void updateParameterInfo();
- bool hasValidParent() const;
-
- // impl methods
- void load_impl(sal_Bool bCausedByParentForm, sal_Bool bMoveToFirst = sal_True,
- const ::com::sun::star::uno::Reference< ::com::sun::star::task::XInteractionHandler >& _rxCompletionHandler = ::com::sun::star::uno::Reference< ::com::sun::star::task::XInteractionHandler >())
- throw(::com::sun::star::uno::RuntimeException);
- void reload_impl(sal_Bool bMoveToFirst,
- const ::com::sun::star::uno::Reference< ::com::sun::star::task::XInteractionHandler >& _rxCompletionHandler = ::com::sun::star::uno::Reference< ::com::sun::star::task::XInteractionHandler >())
- throw(::com::sun::star::uno::RuntimeException);
- void submit_impl(const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControl>& Control, const ::com::sun::star::awt::MouseEvent& MouseEvt, bool _bAproveByListeners);
- void reset_impl(bool _bAproveByListeners);
-
- sal_Bool implEnsureConnection();
-
- // connection sharing
-
- /// checks if we can re-use (aka share) the connection of the given parent
- sal_Bool canShareConnection( const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet >& _rxParentProps );
-
- /// starts sharing the connection with the parent
- void doShareConnection( const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet >& _rxParentProps );
-
- /// stops sharing the connection with the parent
- void stopSharingConnection( );
-
- /// called when the connection which we share with our parent is beeing disposed
- void disposingSharedConnection( const ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XConnection >& _rxConn );
-
- /// checks if we currently share our connection with our parent
- sal_Bool isSharingConnection( ) const { return m_bSharingConnection; }
-
- /** calls our row set approval listeners
-
- @param _rEvent
- the event to notify
- @param _bAllowSQLException
- <TRUE/> if SQLExceptions are allowed to leave the method
- @param _rGuard
- the guard to be cleared before actually calling into the listeners, but after making
- a copy of the listeners array to operate on.
- @return
- <TRUE/> if and only if the execution has been approved
- */
- bool impl_approveRowChange_throw(
- const ::com::sun::star::lang::EventObject& _rEvent,
- const bool _bAllowSQLException,
- ::osl::ClearableMutexGuard& _rGuard
- );
-
- /// invalidate all our parameter-related stuff
- void invlidateParameters();
-
- void saveInsertOnlyState( );
- void restoreInsertOnlyState( );
-
- // error handling
- void onError(const ::com::sun::star::sdb::SQLErrorEvent& _rEvent);
- void onError(const ::com::sun::star::sdbc::SQLException&, const ::rtl::OUString& _rContextDescription);
-
- // html tools
- ::rtl::OUString GetDataEncoded(bool _bURLEncoded,const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControl>& SubmitButton, const ::com::sun::star::awt::MouseEvent& MouseEvt);
- ::rtl::OUString GetDataURLEncoded(const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControl>& SubmitButton, const ::com::sun::star::awt::MouseEvent& MouseEvt);
- ::rtl::OUString GetDataTextEncoded(const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControl>& SubmitButton, const ::com::sun::star::awt::MouseEvent& MouseEvt);
- ::com::sun::star::uno::Sequence<sal_Int8> GetDataMultiPartEncoded(const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControl>& SubmitButton, const ::com::sun::star::awt::MouseEvent& MouseEvt,
- ::rtl::OUString& rContentType);
-
- void AppendComponent(HtmlSuccessfulObjList& rList, const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet>& xComponentSet, const ::rtl::OUString& rNamePrefix,
- const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControl>& rxSubmitButton, const ::com::sun::star::awt::MouseEvent& MouseEvt);
-
- void FillSuccessfulList(HtmlSuccessfulObjList& rList, const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControl>& rxSubmitButton, const ::com::sun::star::awt::MouseEvent& MouseEvt);
-
- void InsertTextPart(INetMIMEMessage& rParent, const ::rtl::OUString& rName, const ::rtl::OUString& rData);
- sal_Bool InsertFilePart(INetMIMEMessage& rParent, const ::rtl::OUString& rName, const ::rtl::OUString& rFileName);
- void Encode(::rtl::OUString& rString) const;
-
- ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XConnection > getConnection();
-
- void impl_createLoadTimer();
-
- void impl_construct();
-
- DECL_LINK( OnTimeout, void* );
-protected:
- using OPropertySetHelper::getPropertyValues;
-};
-
-inline void ODatabaseForm::submitNBC(const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControl>& Control, const ::com::sun::star::awt::MouseEvent& MouseEvt)
-{
- submit_impl(Control, MouseEvt, sal_False);
-}
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-#endif // _FRM_DATABASEFORM_HXX_
-
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Date.cxx b/forms/source/component/Date.cxx
deleted file mode 100644
index decd3a23c..000000000
--- a/forms/source/component/Date.cxx
+++ /dev/null
@@ -1,365 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "Date.hxx"
-#include <tools/debug.hxx>
-#include <tools/date.hxx>
-#include <connectivity/dbconversion.hxx>
-#include <com/sun/star/sdbc/DataType.hpp>
-
-using namespace dbtools;
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
-using namespace ::com::sun::star;
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::sdb;
-using namespace ::com::sun::star::sdbc;
-using namespace ::com::sun::star::sdbcx;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::util;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::io;
-using namespace ::com::sun::star::lang;
-
-//------------------------------------------------------------------
-ODateControl::ODateControl(const Reference<XMultiServiceFactory>& _rxFactory)
- :OBoundControl(_rxFactory, VCL_CONTROL_DATEFIELD)
-{
-}
-
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL ODateControl_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new ODateControl(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> ODateControl::_getTypes()
-{
- return OBoundControl::_getTypes();
-}
-
-//------------------------------------------------------------------------------
-StringSequence SAL_CALL ODateControl::getSupportedServiceNames() throw()
-{
- StringSequence aSupported = OBoundControl::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 1);
-
- ::rtl::OUString*pArray = aSupported.getArray();
- pArray[aSupported.getLength()-1] = FRM_SUN_CONTROL_DATEFIELD;
- return aSupported;
-}
-
-/*************************************************************************/
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL ODateModel_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new ODateModel(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> ODateModel::_getTypes()
-{
- return OEditBaseModel::_getTypes();
-}
-
-//------------------------------------------------------------------
-DBG_NAME( ODateModel )
-//------------------------------------------------------------------
-ODateModel::ODateModel(const Reference<XMultiServiceFactory>& _rxFactory)
- :OEditBaseModel( _rxFactory, VCL_CONTROLMODEL_DATEFIELD, FRM_SUN_CONTROL_DATEFIELD, sal_True, sal_True )
- // use the old control name for compytibility reasons
- ,OLimitedFormats( _rxFactory, FormComponentType::DATEFIELD )
-{
- DBG_CTOR( ODateModel, NULL );
-
- m_nClassId = FormComponentType::DATEFIELD;
- initValueProperty( PROPERTY_DATE, PROPERTY_ID_DATE );
-
- setAggregateSet(m_xAggregateFastSet, getOriginalHandle(PROPERTY_ID_DATEFORMAT));
-
- osl_incrementInterlockedCount( &m_refCount );
- try
- {
- if ( m_xAggregateSet.is() )
- m_xAggregateSet->setPropertyValue( PROPERTY_DATEMIN, makeAny( (sal_Int32)( ::Date( 1, 1, 1800 ).GetDate() ) ) );
- }
- catch( const Exception& )
- {
- OSL_FAIL( "ODateModel::ODateModel: caught an exception!" );
- }
- osl_decrementInterlockedCount( &m_refCount );
-}
-
-//------------------------------------------------------------------------------
-ODateModel::ODateModel( const ODateModel* _pOriginal, const Reference<XMultiServiceFactory>& _rxFactory )
- :OEditBaseModel( _pOriginal, _rxFactory )
- ,OLimitedFormats( _rxFactory, FormComponentType::DATEFIELD )
-{
- DBG_CTOR( ODateModel, NULL );
-
- setAggregateSet( m_xAggregateFastSet, getOriginalHandle( PROPERTY_ID_DATEFORMAT ) );
-}
-
-//------------------------------------------------------------------------------
-ODateModel::~ODateModel( )
-{
- setAggregateSet(Reference< XFastPropertySet >(), -1);
- DBG_DTOR( ODateModel, NULL );
-}
-
-// XCloneable
-//------------------------------------------------------------------------------
-IMPLEMENT_DEFAULT_CLONING( ODateModel )
-
-// XServiceInfo
-//------------------------------------------------------------------------------
-StringSequence SAL_CALL ODateModel::getSupportedServiceNames() throw()
-{
- StringSequence aSupported = OBoundControlModel::getSupportedServiceNames();
-
- sal_Int32 nOldLen = aSupported.getLength();
- aSupported.realloc( nOldLen + 8 );
- ::rtl::OUString* pStoreTo = aSupported.getArray() + nOldLen;
-
- *pStoreTo++ = BINDABLE_CONTROL_MODEL;
- *pStoreTo++ = DATA_AWARE_CONTROL_MODEL;
- *pStoreTo++ = VALIDATABLE_CONTROL_MODEL;
-
- *pStoreTo++ = BINDABLE_DATA_AWARE_CONTROL_MODEL;
- *pStoreTo++ = VALIDATABLE_BINDABLE_CONTROL_MODEL;
-
- *pStoreTo++ = FRM_SUN_COMPONENT_DATEFIELD;
- *pStoreTo++ = FRM_SUN_COMPONENT_DATABASE_DATEFIELD;
- *pStoreTo++ = BINDABLE_DATABASE_DATE_FIELD;
-
- return aSupported;
-}
-
-//------------------------------------------------------------------------------
-::rtl::OUString SAL_CALL ODateModel::getServiceName() throw ( ::com::sun::star::uno::RuntimeException)
-{
- return FRM_COMPONENT_DATEFIELD; // old (non-sun) name for compatibility !
-}
-
-// XPropertySet
-//------------------------------------------------------------------------------
-void ODateModel::describeFixedProperties( Sequence< Property >& _rProps ) const
-{
- BEGIN_DESCRIBE_PROPERTIES( 4, OEditBaseModel )
- DECL_PROP3(DEFAULT_DATE, sal_Int32, BOUND, MAYBEDEFAULT, MAYBEVOID);
- DECL_PROP1(TABINDEX, sal_Int16, BOUND);
- DECL_PROP1(FORMATKEY, sal_Int32, TRANSIENT);
- DECL_IFACE_PROP2(FORMATSSUPPLIER, XNumberFormatsSupplier, READONLY, TRANSIENT);
- END_DESCRIBE_PROPERTIES();
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODateModel::getFastPropertyValue(Any& _rValue, sal_Int32 _nHandle ) const
-{
- switch (_nHandle)
- {
- case PROPERTY_ID_FORMATKEY:
- getFormatKeyPropertyValue(_rValue);
- break;
- case PROPERTY_ID_FORMATSSUPPLIER:
- _rValue <<= getFormatsSupplier();
- break;
- default:
- OEditBaseModel::getFastPropertyValue(_rValue, _nHandle);
- break;
- }
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL ODateModel::convertFastPropertyValue(Any& _rConvertedValue, Any& _rOldValue,
- sal_Int32 _nHandle, const Any& _rValue ) throw(IllegalArgumentException)
-{
- if (PROPERTY_ID_FORMATKEY == _nHandle)
- return convertFormatKeyPropertyValue(_rConvertedValue, _rOldValue, _rValue);
- else
- return OEditBaseModel::convertFastPropertyValue(_rConvertedValue, _rOldValue, _nHandle, _rValue );
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ODateModel::setFastPropertyValue_NoBroadcast(sal_Int32 _nHandle, const Any& _rValue) throw ( ::com::sun::star::uno::Exception)
-{
- if (PROPERTY_ID_FORMATKEY == _nHandle)
- setFormatKeyPropertyValue(_rValue);
- else
- OEditBaseModel::setFastPropertyValue_NoBroadcast(_nHandle, _rValue);
-}
-
-// XLoadListener
-//------------------------------------------------------------------------------
-void ODateModel::onConnectedDbColumn( const Reference< XInterface >& _rxForm )
-{
- OBoundControlModel::onConnectedDbColumn( _rxForm );
- Reference<XPropertySet> xField = getField();
- if (xField.is())
- {
- m_bDateTimeField = sal_False;
- try
- {
- sal_Int32 nFieldType = 0;
- xField->getPropertyValue(PROPERTY_FIELDTYPE) >>= nFieldType;
- m_bDateTimeField = (nFieldType == DataType::TIMESTAMP);
- }
- catch(Exception&)
- {
- }
- }
-}
-
-//------------------------------------------------------------------------------
-sal_Bool ODateModel::commitControlValueToDbColumn( bool /*_bPostReset*/ )
-{
- Any aControlValue( m_xAggregateFastSet->getFastPropertyValue( getValuePropertyAggHandle() ) );
- if ( !compare( aControlValue, m_aSaveValue ) )
- {
- if ( !aControlValue.hasValue() )
- m_xColumnUpdate->updateNull();
- else
- {
- try
- {
- util::Date aDate;
- if ( !( aControlValue >>= aDate ) )
- {
- sal_Int32 nAsInt(0);
- aControlValue >>= nAsInt;
- aDate = DBTypeConversion::toDate(nAsInt);
- }
-
- if ( !m_bDateTimeField )
- m_xColumnUpdate->updateDate( aDate );
- else
- {
- util::DateTime aDateTime = m_xColumn->getTimestamp();
- aDateTime.Day = aDate.Day;
- aDateTime.Month = aDate.Month;
- aDateTime.Year = aDate.Year;
- m_xColumnUpdate->updateTimestamp( aDateTime );
- }
- }
- catch(Exception&)
- {
- return sal_False;
- }
- }
- m_aSaveValue = aControlValue;
- }
- return sal_True;
-}
-
-//------------------------------------------------------------------------------
-void ODateModel::impl_translateControlValueToUNODate( Any& _rUNOValue ) const
-{
- _rUNOValue = getControlValue();
- if ( _rUNOValue.hasValue() )
- {
- sal_Int32 nDate = 0;
- OSL_VERIFY( _rUNOValue >>= nDate );
- _rUNOValue <<= DBTypeConversion::toDate( nDate );
- }
-}
-
-//------------------------------------------------------------------------------
-Any ODateModel::translateControlValueToExternalValue( ) const
-{
- Any aExternalValue;
- impl_translateControlValueToUNODate( aExternalValue );
- return aExternalValue;
-}
-
-//------------------------------------------------------------------------------
-Any ODateModel::translateExternalValueToControlValue( const Any& _rExternalValue ) const
-{
- Any aControlValue;
- if ( _rExternalValue.hasValue() )
- {
- util::Date aDate;
- OSL_VERIFY( _rExternalValue >>= aDate );
- aControlValue <<= DBTypeConversion::toINT32( aDate );
- }
- return aControlValue;
-}
-
-//------------------------------------------------------------------------------
-Any ODateModel::translateControlValueToValidatableValue( ) const
-{
- Any aValidatableValue;
- impl_translateControlValueToUNODate( aValidatableValue );
- return aValidatableValue;
-}
-
-//------------------------------------------------------------------------------
-Any ODateModel::translateDbColumnToControlValue()
-{
- util::Date aDate = m_xColumn->getDate();
- if (m_xColumn->wasNull())
- m_aSaveValue.clear();
- else
- // the aggregated set expects an Int32 as value ...
- m_aSaveValue <<= DBTypeConversion::toINT32(aDate);
-
- return m_aSaveValue;
-}
-
-//------------------------------------------------------------------------------
-Any ODateModel::getDefaultForReset() const
-{
- return m_aDefault;
-}
-
-//------------------------------------------------------------------------------
-void ODateModel::resetNoBroadcast()
-{
- OEditBaseModel::resetNoBroadcast();
- m_aSaveValue.clear();
-}
-
-//------------------------------------------------------------------------------
-Sequence< Type > ODateModel::getSupportedBindingTypes()
-{
- return Sequence< Type >( &::getCppuType( static_cast< util::Date* >( NULL ) ), 1 );
-}
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Date.hxx b/forms/source/component/Date.hxx
deleted file mode 100644
index 3b7c56cf2..000000000
--- a/forms/source/component/Date.hxx
+++ /dev/null
@@ -1,135 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FORMS_DATE_HXX_
-#define _FORMS_DATE_HXX_
-
-#include "EditBase.hxx"
-#include "limitedformats.hxx"
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
-//==================================================================
-//= ODateModel
-//==================================================================
-class ODateModel
- :public OEditBaseModel
- ,public OLimitedFormats
-{
- ::com::sun::star::uno::Any m_aSaveValue;
- sal_Bool m_bDateTimeField;
-
-protected:
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
-public:
- DECLARE_DEFAULT_LEAF_XTOR( ODateModel );
-
- // XPersistObject
- virtual ::rtl::OUString SAL_CALL getServiceName() throw ( ::com::sun::star::uno::RuntimeException );
-
- // ::com::sun::star::beans::XPropertySet
- virtual void SAL_CALL getFastPropertyValue(::com::sun::star::uno::Any& rValue, sal_Int32 nHandle ) const;
- virtual sal_Bool SAL_CALL convertFastPropertyValue(::com::sun::star::uno::Any& rConvertedValue, ::com::sun::star::uno::Any& rOldValue,
- sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue )
- throw(::com::sun::star::lang::IllegalArgumentException);
- virtual void SAL_CALL setFastPropertyValue_NoBroadcast(sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue) throw ( ::com::sun::star::uno::Exception);
-
- // XServiceInfo
- IMPLEMENTATION_NAME(ODateModel);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw();
-
- // XPropertySet
- using OEditBaseModel::getFastPropertyValue;
-
- // OControlModel's property handling
- virtual void describeFixedProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
-
-protected:
- // OBoundControlModel overridables
- virtual ::com::sun::star::uno::Any
- translateDbColumnToControlValue( );
- virtual sal_Bool commitControlValueToDbColumn( bool _bPostReset );
-
- virtual ::com::sun::star::uno::Any
- translateControlValueToExternalValue( ) const;
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type >
- getSupportedBindingTypes();
- virtual ::com::sun::star::uno::Any
- translateExternalValueToControlValue( const ::com::sun::star::uno::Any& _rExternalValue ) const;
-
- virtual ::com::sun::star::uno::Any
- translateControlValueToValidatableValue( ) const;
-
- virtual ::com::sun::star::uno::Any
- getDefaultForReset() const;
-
- virtual void resetNoBroadcast();
-
- virtual void onConnectedDbColumn( const ::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >& _rxForm );
-
-protected:
- DECLARE_XCLONEABLE();
-
-private:
- /** translates the control value (the VCL-internal integer representation of a date) into
- a UNO-Date.
- */
- void impl_translateControlValueToUNODate(
- ::com::sun::star::uno::Any& _rUNOValue ) const;
-};
-
-//==================================================================
-//= ODateControl
-//==================================================================
-class ODateControl: public OBoundControl
-{
-protected:
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
-public:
- ODateControl(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory);
- DECLARE_UNO3_AGG_DEFAULTS(ODateControl, OBoundControl);
-
-// ::com::sun::star::lang::XServiceInfo
- IMPLEMENTATION_NAME(ODateControl);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw();
-};
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-#endif // _FORMS_DATE_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Edit.cxx b/forms/source/component/Edit.cxx
deleted file mode 100644
index 5a2097a71..000000000
--- a/forms/source/component/Edit.cxx
+++ /dev/null
@@ -1,761 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-
-#include "Edit.hxx"
-
-#include <com/sun/star/uno/Type.hxx>
-#include <com/sun/star/awt/XWindow.hpp>
-#include <com/sun/star/container/XIndexAccess.hpp>
-#include <com/sun/star/form/XSubmit.hpp>
-#include <com/sun/star/util/NumberFormat.hpp>
-#include <com/sun/star/sdbc/DataType.hpp>
-#include <com/sun/star/awt/XVclWindowPeer.hpp>
-
-#include <vcl/svapp.hxx>
-#include <tools/wintypes.hxx>
-
-#include <connectivity/dbtools.hxx>
-#include <connectivity/formattedcolumnvalue.hxx>
-#include <connectivity/dbconversion.hxx>
-
-#include <tools/diagnose_ex.h>
-#include <tools/debug.hxx>
-
-#include <comphelper/container.hxx>
-#include <comphelper/numbers.hxx>
-
-using namespace dbtools;
-
-//.........................................................................
-namespace frm
-{
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::sdb;
-using namespace ::com::sun::star::sdbc;
-using namespace ::com::sun::star::sdbcx;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::io;
-using namespace ::com::sun::star::lang;
-using namespace ::com::sun::star::util;
-using namespace ::com::sun::star::form::binding;
-
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OEditControl_CreateInstance(const Reference< XMultiServiceFactory > & _rxFactory)
-{
- return *(new OEditControl(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> OEditControl::_getTypes()
-{
- static Sequence<Type> aTypes;
- if (!aTypes.getLength())
- {
- // my two base classes
- aTypes = concatSequences(OBoundControl::_getTypes(), OEditControl_BASE::getTypes());
- }
- return aTypes;
-}
-
-//------------------------------------------------------------------------------
-Any SAL_CALL OEditControl::queryAggregation(const Type& _rType) throw (RuntimeException)
-{
- Any aReturn = OBoundControl::queryAggregation(_rType);
- if (!aReturn.hasValue())
- aReturn = OEditControl_BASE::queryInterface(_rType);
-
- return aReturn;
-}
-
-DBG_NAME(OEditControl);
-//------------------------------------------------------------------------------
-OEditControl::OEditControl(const Reference<XMultiServiceFactory>& _rxFactory)
- :OBoundControl( _rxFactory, FRM_SUN_CONTROL_RICHTEXTCONTROL )
- ,m_aChangeListeners(m_aMutex)
- ,m_nKeyEvent( 0 )
-{
- DBG_CTOR(OEditControl,NULL);
-
- increment(m_refCount);
- {
- Reference<XWindow> xComp;
- if (query_aggregation(m_xAggregate, xComp))
- {
- xComp->addFocusListener(this);
- xComp->addKeyListener(this);
- }
- }
- decrement(m_refCount);
-}
-
-//------------------------------------------------------------------------------
-OEditControl::~OEditControl()
-{
- if( m_nKeyEvent )
- Application::RemoveUserEvent( m_nKeyEvent );
-
- if (!OComponentHelper::rBHelper.bDisposed)
- {
- acquire();
- dispose();
- }
-
- DBG_DTOR(OEditControl,NULL);
-}
-
-// XChangeBroadcaster
-//------------------------------------------------------------------------------
-void OEditControl::addChangeListener(const Reference<XChangeListener>& l) throw ( ::com::sun::star::uno::RuntimeException)
-{
- m_aChangeListeners.addInterface( l );
-}
-
-//------------------------------------------------------------------------------
-void OEditControl::removeChangeListener(const Reference<XChangeListener>& l) throw ( ::com::sun::star::uno::RuntimeException)
-{
- m_aChangeListeners.removeInterface( l );
-}
-
-// OComponentHelper
-//------------------------------------------------------------------------------
-void OEditControl::disposing()
-{
- OBoundControl::disposing();
-
- EventObject aEvt(static_cast<XWeak*>(this));
- m_aChangeListeners.disposeAndClear(aEvt);
-}
-
-// XServiceInfo
-//------------------------------------------------------------------------------
-StringSequence OEditControl::getSupportedServiceNames() throw()
-{
- StringSequence aSupported = OBoundControl::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 1);
-
- ::rtl::OUString*pArray = aSupported.getArray();
- pArray[aSupported.getLength()-1] = FRM_SUN_CONTROL_TEXTFIELD;
- return aSupported;
-}
-
-// XEventListener
-//------------------------------------------------------------------------------
-void OEditControl::disposing(const EventObject& Source) throw( RuntimeException )
-{
- OBoundControl::disposing(Source);
-}
-
-// XFocusListener
-//------------------------------------------------------------------------------
-void OEditControl::focusGained( const FocusEvent& /*e*/ ) throw ( ::com::sun::star::uno::RuntimeException)
-{
- Reference<XPropertySet> xSet(getModel(), UNO_QUERY);
- if (xSet.is())
- xSet->getPropertyValue( PROPERTY_TEXT ) >>= m_aHtmlChangeValue;
-}
-
-//------------------------------------------------------------------------------
-void OEditControl::focusLost( const FocusEvent& /*e*/ ) throw ( ::com::sun::star::uno::RuntimeException)
-{
- Reference<XPropertySet> xSet(getModel(), UNO_QUERY);
- if (xSet.is())
- {
- ::rtl::OUString sNewHtmlChangeValue;
- xSet->getPropertyValue( PROPERTY_TEXT ) >>= sNewHtmlChangeValue;
- if( sNewHtmlChangeValue != m_aHtmlChangeValue )
- {
- EventObject aEvt( *this );
- m_aChangeListeners.notifyEach( &XChangeListener::changed, aEvt );
- }
- }
-}
-
-// XKeyListener
-//------------------------------------------------------------------------------
-void OEditControl::keyPressed(const ::com::sun::star::awt::KeyEvent& e) throw ( ::com::sun::star::uno::RuntimeException)
-{
- if( e.KeyCode != KEY_RETURN || e.Modifiers != 0 )
- return;
-
- // Steht das Control in einem Formular mit einer Submit-URL?
- Reference<XPropertySet> xSet(getModel(), UNO_QUERY);
- if( !xSet.is() )
- return;
-
- // nicht fuer multiline edits
- Any aTmp( xSet->getPropertyValue(PROPERTY_MULTILINE));
- if ((aTmp.getValueType().equals(::getBooleanCppuType())) && getBOOL(aTmp))
- return;
-
- Reference<XFormComponent> xFComp(xSet, UNO_QUERY);
- InterfaceRef xParent = xFComp->getParent();
- if( !xParent.is() )
- return;
-
- Reference<XPropertySet> xFormSet(xParent, UNO_QUERY);
- if( !xFormSet.is() )
- return;
-
- aTmp = xFormSet->getPropertyValue( PROPERTY_TARGET_URL );
- if (!aTmp.getValueType().equals(::getCppuType((const ::rtl::OUString*)NULL)) ||
- !getString(aTmp).getLength() )
- return;
-
- Reference<XIndexAccess> xElements(xParent, UNO_QUERY);
- sal_Int32 nCount = xElements->getCount();
- if( nCount > 1 )
- {
- Reference<XPropertySet> xFCSet;
- for( sal_Int32 nIndex=0; nIndex < nCount; nIndex++ )
- {
- // Any aElement(xElements->getByIndex(nIndex));
- xElements->getByIndex(nIndex) >>= xFCSet;
- OSL_ENSURE(xFCSet.is(),"OEditControl::keyPressed: No XPropertySet!");
-
- if (hasProperty(PROPERTY_CLASSID, xFCSet) &&
- getINT16(xFCSet->getPropertyValue(PROPERTY_CLASSID)) == FormComponentType::TEXTFIELD)
- {
- // Noch ein weiteres Edit gefunden ==> dann nicht submitten
- if (xFCSet != xSet)
- return;
- }
- }
- }
-
- // Da wir noch im Haender stehen, submit asynchron ausloesen
- if( m_nKeyEvent )
- Application::RemoveUserEvent( m_nKeyEvent );
- m_nKeyEvent = Application::PostUserEvent( LINK(this, OEditControl,OnKeyPressed) );
-}
-
-//------------------------------------------------------------------------------
-void OEditControl::keyReleased(const ::com::sun::star::awt::KeyEvent& /*e*/) throw ( ::com::sun::star::uno::RuntimeException)
-{
-}
-
-//------------------------------------------------------------------------------
-IMPL_LINK(OEditControl, OnKeyPressed, void*, /*EMPTYARG*/)
-{
- m_nKeyEvent = 0;
-
- Reference<XFormComponent> xFComp(getModel(), UNO_QUERY);
- InterfaceRef xParent = xFComp->getParent();
- Reference<XSubmit> xSubmit(xParent, UNO_QUERY);
- if (xSubmit.is())
- xSubmit->submit( Reference<XControl>(), ::com::sun::star::awt::MouseEvent() );
- return 0L;
-}
-
-//------------------------------------------------------------------
-void SAL_CALL OEditControl::createPeer( const Reference< XToolkit>& _rxToolkit, const Reference< XWindowPeer>& _rxParent ) throw ( RuntimeException )
-{
- OBoundControl::createPeer(_rxToolkit, _rxParent);
-}
-
-/*************************************************************************/
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OEditModel_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new OEditModel(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> OEditModel::_getTypes()
-{
- return OEditBaseModel::_getTypes();
-}
-
-
-DBG_NAME(OEditModel);
-//------------------------------------------------------------------
-OEditModel::OEditModel(const Reference<XMultiServiceFactory>& _rxFactory)
- :OEditBaseModel( _rxFactory, FRM_SUN_COMPONENT_RICHTEXTCONTROL, FRM_SUN_CONTROL_TEXTFIELD, sal_True, sal_True )
- ,m_bMaxTextLenModified(sal_False)
- ,m_bWritingFormattedFake(sal_False)
-{
- DBG_CTOR(OEditModel,NULL);
-
- m_nClassId = FormComponentType::TEXTFIELD;
- initValueProperty( PROPERTY_TEXT, PROPERTY_ID_TEXT );
-}
-
-//------------------------------------------------------------------
-OEditModel::OEditModel( const OEditModel* _pOriginal, const Reference<XMultiServiceFactory>& _rxFactory )
- :OEditBaseModel( _pOriginal, _rxFactory )
- ,m_bMaxTextLenModified(sal_False)
- ,m_bWritingFormattedFake(sal_False)
-{
- DBG_CTOR( OEditModel, NULL );
-
- // Note that most of the properties are not clone from the original object:
- // Things as the format key, it's type, and such, depend on the field being part of a loaded form
- // (they're initialized in onConnectedDbColumn). Even if the original object _is_ part of such a form, we ourself
- // certainly aren't, so these members are defaulted. If we're inserted into a form which is already loaded,
- // they will be set to new values, anyway ....
-}
-
-//------------------------------------------------------------------
-OEditModel::~OEditModel()
-{
- if (!OComponentHelper::rBHelper.bDisposed)
- {
- acquire();
- dispose();
- }
-
- DBG_DTOR(OEditModel,NULL);
-}
-
-//------------------------------------------------------------------------------
-IMPLEMENT_DEFAULT_CLONING( OEditModel )
-
-//------------------------------------------------------------------------------
-void OEditModel::disposing()
-{
- OEditBaseModel::disposing();
- m_pValueFormatter.reset();
-}
-
-// XPersistObject
-//------------------------------------------------------------------------------
-::rtl::OUString SAL_CALL OEditModel::getServiceName() throw ( ::com::sun::star::uno::RuntimeException)
-{
- return FRM_COMPONENT_EDIT; // old (non-sun) name for compatibility !
-}
-
-// XServiceInfo
-//------------------------------------------------------------------------------
-StringSequence SAL_CALL OEditModel::getSupportedServiceNames() throw()
-{
- StringSequence aSupported = OBoundControlModel::getSupportedServiceNames();
-
- sal_Int32 nOldLen = aSupported.getLength();
- aSupported.realloc( nOldLen + 8 );
- ::rtl::OUString* pStoreTo = aSupported.getArray() + nOldLen;
-
- *pStoreTo++ = BINDABLE_CONTROL_MODEL;
- *pStoreTo++ = DATA_AWARE_CONTROL_MODEL;
- *pStoreTo++ = VALIDATABLE_CONTROL_MODEL;
-
- *pStoreTo++ = BINDABLE_DATA_AWARE_CONTROL_MODEL;
- *pStoreTo++ = VALIDATABLE_BINDABLE_CONTROL_MODEL;
-
- *pStoreTo++ = FRM_SUN_COMPONENT_TEXTFIELD;
- *pStoreTo++ = FRM_SUN_COMPONENT_DATABASE_TEXTFIELD;
- *pStoreTo++ = BINDABLE_DATABASE_TEXT_FIELD;
-
- return aSupported;
-}
-
-// XPropertySet
-void SAL_CALL OEditModel::getFastPropertyValue(Any& rValue, sal_Int32 nHandle ) const
-{
- if ( PROPERTY_ID_PERSISTENCE_MAXTEXTLENGTH == nHandle )
- {
- if ( m_bMaxTextLenModified )
- rValue <<= sal_Int16(0);
- else if ( m_xAggregateSet.is() )
- rValue = m_xAggregateSet->getPropertyValue(PROPERTY_MAXTEXTLEN);
- }
- else
- {
- OEditBaseModel::getFastPropertyValue(rValue, nHandle );
- }
-}
-
-//------------------------------------------------------------------------------
-void OEditModel::describeFixedProperties( Sequence< Property >& _rProps ) const
-{
- BEGIN_DESCRIBE_PROPERTIES( 5, OEditBaseModel )
- DECL_PROP2(PERSISTENCE_MAXTEXTLENGTH,sal_Int16, READONLY, TRANSIENT);
- DECL_PROP2(DEFAULT_TEXT, ::rtl::OUString, BOUND, MAYBEDEFAULT);
- DECL_BOOL_PROP1(EMPTY_IS_NULL, BOUND);
- DECL_PROP1(TABINDEX, sal_Int16, BOUND);
- DECL_BOOL_PROP2(FILTERPROPOSAL, BOUND, MAYBEDEFAULT);
- END_DESCRIBE_PROPERTIES();
-}
-
-//------------------------------------------------------------------------------
-void OEditModel::describeAggregateProperties( Sequence< Property >& _rAggregateProps ) const
-{
- OEditBaseModel::describeAggregateProperties( _rAggregateProps );
-
- // our aggregate is a rich text model, which also derives from OControlModel, as
- // do we, so we need to remove some duplicate properties
- RemoveProperty( _rAggregateProps, PROPERTY_TABINDEX );
- RemoveProperty( _rAggregateProps, PROPERTY_CLASSID );
- RemoveProperty( _rAggregateProps, PROPERTY_NAME );
- RemoveProperty( _rAggregateProps, PROPERTY_TAG );
- RemoveProperty( _rAggregateProps, PROPERTY_NATIVE_LOOK );
-
-}
-
-//------------------------------------------------------------------------------
-bool OEditModel::implActsAsRichText( ) const
-{
- sal_Bool bActAsRichText = sal_False;
- if ( m_xAggregateSet.is() )
- {
- OSL_VERIFY( m_xAggregateSet->getPropertyValue( PROPERTY_RICH_TEXT ) >>= bActAsRichText );
- }
- return bActAsRichText;
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OEditModel::reset( ) throw(RuntimeException)
-{
- // no reset if we currently act as rich text control
- if ( implActsAsRichText() )
- return;
-
- OEditBaseModel::reset();
-}
-
-//------------------------------------------------------------------------------
-namespace
-{
- void lcl_transferProperties( const Reference< XPropertySet >& _rxSource, const Reference< XPropertySet >& _rxDest )
- {
- try
- {
- Reference< XPropertySetInfo > xSourceInfo;
- if ( _rxSource.is() )
- xSourceInfo = _rxSource->getPropertySetInfo();
-
- Reference< XPropertySetInfo > xDestInfo;
- if ( _rxDest.is() )
- xDestInfo = _rxDest->getPropertySetInfo();
-
- if ( !xSourceInfo.is() || !xDestInfo.is() )
- {
- OSL_FAIL( "lcl_transferProperties: invalid property set(s)!" );
- return;
- }
-
- Sequence< Property > aSourceProps( xSourceInfo->getProperties() );
- const Property* pSourceProps = aSourceProps.getConstArray();
- const Property* pSourcePropsEnd = aSourceProps.getConstArray() + aSourceProps.getLength();
- while ( pSourceProps != pSourcePropsEnd )
- {
- if ( !xDestInfo->hasPropertyByName( pSourceProps->Name ) )
- {
- ++pSourceProps;
- continue;
- }
-
- Property aDestProp( xDestInfo->getPropertyByName( pSourceProps->Name ) );
- if ( 0 != ( aDestProp.Attributes & PropertyAttribute::READONLY ) )
- {
- ++pSourceProps;
- continue;
- }
-
- try
- {
- _rxDest->setPropertyValue( pSourceProps->Name, _rxSource->getPropertyValue( pSourceProps->Name ) );
- }
- catch(const IllegalArgumentException& e)
- {
-#if OSL_DEBUG_LEVEL > 0
- ::rtl::OString sMessage( "could not transfer the property named '" );
- sMessage += ::rtl::OString( pSourceProps->Name.getStr(), pSourceProps->Name.getLength(), RTL_TEXTENCODING_ASCII_US );
- sMessage += ::rtl::OString( "'." );
- if ( e.Message.getLength() )
- {
- sMessage += ::rtl::OString( "\n\nMessage:\n" );
- sMessage += ::rtl::OString( e.Message.getStr(), e.Message.getLength(), RTL_TEXTENCODING_ASCII_US );
- }
- OSL_FAIL( sMessage.getStr() );
-#else
- (void)e;
-#endif
- }
-
- ++pSourceProps;
- }
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- }
-}
-
-//------------------------------------------------------------------------------
-void OEditModel::writeAggregate( const Reference< XObjectOutputStream >& _rxOutStream ) const
-{
- // we need to fake the writing of our aggregate. Since #i24387#, we have another aggregate,
- // but for compatibility, we need to use an "old" aggregate for writing and reading
-
- Reference< XPropertySet > xFakedAggregate(
- getContext().createComponent( (rtl::OUString)VCL_CONTROLMODEL_EDIT ),
- UNO_QUERY
- );
- OSL_ENSURE( xFakedAggregate.is(), "OEditModel::writeAggregate: could not create an old EditControlModel!" );
- if ( !xFakedAggregate.is() )
- return;
-
- lcl_transferProperties( m_xAggregateSet, xFakedAggregate );
-
- Reference< XPersistObject > xFakedPersist( xFakedAggregate, UNO_QUERY );
- OSL_ENSURE( xFakedPersist.is(), "OEditModel::writeAggregate: no XPersistObject!" );
- if ( xFakedPersist.is() )
- xFakedPersist->write( _rxOutStream );
-}
-
-//------------------------------------------------------------------------------
-void OEditModel::readAggregate( const Reference< XObjectInputStream >& _rxInStream )
-{
- // we need to fake the reading of our aggregate. Since #i24387#, we have another aggregate,
- // but for compatibility, we need to use an "old" aggregate for writing and reading
-
- Reference< XPropertySet > xFakedAggregate(
- getContext().createComponent( (rtl::OUString)VCL_CONTROLMODEL_EDIT ),
- UNO_QUERY
- );
- Reference< XPersistObject > xFakedPersist( xFakedAggregate, UNO_QUERY );
- OSL_ENSURE( xFakedPersist.is(), "OEditModel::readAggregate: no XPersistObject, or no faked aggregate at all!" );
- if ( xFakedPersist.is() )
- {
- xFakedPersist->read( _rxInStream );
- lcl_transferProperties( xFakedAggregate, m_xAggregateSet );
- }
-}
-
-//------------------------------------------------------------------------------
-void OEditModel::write(const Reference<XObjectOutputStream>& _rxOutStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException)
-{
- Any aCurrentText;
- sal_Int16 nOldTextLen = 0;
- // bin ich gerade loaded und habe dazu zeitweilig die MaxTextLen umgesetzt ?
- if ( m_bMaxTextLenModified )
- { // -> fuer die Dauer des Speicherns meinem aggregierten Model die alte TextLen einreden
-
- // before doing this we have to save the current text value of the aggregate, as this may be affected by resetting the text len
- aCurrentText = m_xAggregateSet->getPropertyValue(PROPERTY_TEXT);
-
- m_xAggregateSet->getPropertyValue(PROPERTY_MAXTEXTLEN) >>= nOldTextLen;
- m_xAggregateSet->setPropertyValue(PROPERTY_MAXTEXTLEN, makeAny((sal_Int16)0));
- }
-
- OEditBaseModel::write(_rxOutStream);
-
- if ( m_bMaxTextLenModified )
- { // wieder zuruecksetzen
- m_xAggregateSet->setPropertyValue(PROPERTY_MAXTEXTLEN, makeAny(nOldTextLen));
- // and reset the text
- // First we set it to an empty string : Without this the second setPropertyValue would not do anything as it thinks
- // we aren't changing the prop (it didn't notify the - implicite - change of the text prop while setting the max text len)
- // This seems to be a bug with in toolkit's EditControl-implementation.
- m_xAggregateSet->setPropertyValue(PROPERTY_TEXT, makeAny(::rtl::OUString()));
- m_xAggregateSet->setPropertyValue(PROPERTY_TEXT, aCurrentText);
- }
-}
-
-//------------------------------------------------------------------------------
-void OEditModel::read(const Reference<XObjectInputStream>& _rxInStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException)
-{
- OEditBaseModel::read(_rxInStream);
-
- // Some versions (5.1 'til about 552) wrote a wrong DefaultControl-property value which is unknown
- // to older versions (5.0).
- // correct this ...
- if (m_xAggregateSet.is())
- {
- Any aDefaultControl = m_xAggregateSet->getPropertyValue(PROPERTY_DEFAULTCONTROL);
- if ( (aDefaultControl.getValueType().getTypeClass() == TypeClass_STRING)
- && (getString(aDefaultControl).compareTo(STARDIV_ONE_FORM_CONTROL_TEXTFIELD) == COMPARE_EQUAL)
- )
- {
- m_xAggregateSet->setPropertyValue( PROPERTY_DEFAULTCONTROL, makeAny( (::rtl::OUString)STARDIV_ONE_FORM_CONTROL_EDIT ) );
- // Older as well as current versions should understand this : the former knew only the STARDIV_ONE_FORM_CONTROL_EDIT,
- // the latter are registered for both STARDIV_ONE_FORM_CONTROL_EDIT and STARDIV_ONE_FORM_CONTROL_TEXTFIELD.
- }
- }
-}
-
-//------------------------------------------------------------------------------
-sal_uInt16 OEditModel::getPersistenceFlags() const
-{
- sal_uInt16 nFlags = OEditBaseModel::getPersistenceFlags();
-
- if (m_bWritingFormattedFake)
- nFlags |= PF_FAKE_FORMATTED_FIELD;
-
- return nFlags;
-}
-
-//------------------------------------------------------------------------------
-void OEditModel::onConnectedDbColumn( const Reference< XInterface >& _rxForm )
-{
- Reference< XPropertySet > xField = getField();
- if ( xField.is() )
- {
- m_pValueFormatter.reset( new ::dbtools::FormattedColumnValue( getContext(), Reference< XRowSet >( _rxForm, UNO_QUERY ), xField ) );
-
- if ( m_pValueFormatter->getKeyType() != NumberFormat::SCIENTIFIC )
- {
- m_bMaxTextLenModified = getINT16(m_xAggregateSet->getPropertyValue(PROPERTY_MAXTEXTLEN)) != 0;
- if ( !m_bMaxTextLenModified )
- {
- sal_Int32 nFieldLen = 0;
- xField->getPropertyValue(::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("Precision") ) ) >>= nFieldLen;
-
- if (nFieldLen && nFieldLen <= USHRT_MAX)
- {
- Any aVal;
- aVal <<= (sal_Int16)nFieldLen;
- m_xAggregateSet->setPropertyValue(PROPERTY_MAXTEXTLEN, aVal);
-
- m_bMaxTextLenModified = sal_True;
- }
- }
- else
- m_bMaxTextLenModified = sal_False; // to get sure that the text len won't be set in unloaded
- }
- }
-}
-
-//------------------------------------------------------------------------------
-void OEditModel::onDisconnectedDbColumn()
-{
- OEditBaseModel::onDisconnectedDbColumn();
-
- m_pValueFormatter.reset();
-
- if ( hasField() && m_bMaxTextLenModified )
- {
- Any aVal;
- aVal <<= (sal_Int16)0; // nur wenn es 0 war, habe ich es in onConnectedDbColumn umgesetzt
- m_xAggregateSet->setPropertyValue(PROPERTY_MAXTEXTLEN, aVal);
- m_bMaxTextLenModified = sal_False;
- }
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OEditModel::approveDbColumnType( sal_Int32 _nColumnType )
-{
- // if we act as rich text curently, we do not allow binding to a database column
- if ( implActsAsRichText() )
- return sal_False;
-
- return OEditBaseModel::approveDbColumnType( _nColumnType );
-}
-
-//------------------------------------------------------------------------------
-void OEditModel::resetNoBroadcast()
-{
- OEditBaseModel::resetNoBroadcast();
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OEditModel::commitControlValueToDbColumn( bool /*_bPostReset*/ )
-{
- Any aNewValue( m_xAggregateFastSet->getFastPropertyValue( getValuePropertyAggHandle() ) );
-
- ::rtl::OUString sNewValue;
- aNewValue >>= sNewValue;
-
- if ( !aNewValue.hasValue()
- || ( !sNewValue.getLength() // an empty string
- && m_bEmptyIsNull // which should be interpreted as NULL
- )
- )
- {
- m_xColumnUpdate->updateNull();
- }
- else
- {
- OSL_PRECOND( m_pValueFormatter.get(), "OEditModel::commitControlValueToDbColumn: no value formatter!" );
- try
- {
- if ( m_pValueFormatter.get() )
- {
- if ( !m_pValueFormatter->setFormattedValue( sNewValue ) )
- return sal_False;
- }
- else
- m_xColumnUpdate->updateString( sNewValue );
- }
- catch ( const Exception& )
- {
- return sal_False;
- }
- }
-
- return sal_True;
-}
-
-//------------------------------------------------------------------------------
-Any OEditModel::translateDbColumnToControlValue()
-{
- OSL_PRECOND( m_pValueFormatter.get(), "OEditModel::translateDbColumnToControlValue: no value formatter!" );
- Any aRet;
- if ( m_pValueFormatter.get() )
- {
- ::rtl::OUString sValue( m_pValueFormatter->getFormattedValue() );
- if ( !sValue.getLength()
- && m_pValueFormatter->getColumn().is()
- && m_pValueFormatter->getColumn()->wasNull()
- )
- {
- }
- else
- {
- // #i2817# OJ
- sal_uInt16 nMaxTextLen = getINT16( m_xAggregateSet->getPropertyValue( PROPERTY_MAXTEXTLEN ) );
- if ( nMaxTextLen && sValue.getLength() > nMaxTextLen )
- {
- sal_Int32 nDiff = sValue.getLength() - nMaxTextLen;
- sValue = sValue.replaceAt( nMaxTextLen, nDiff, ::rtl::OUString() );
- }
-
- aRet <<= sValue;
- }
- }
-
- return aRet.hasValue() ? aRet : makeAny( ::rtl::OUString() );
-}
-
-//------------------------------------------------------------------------------
-Any OEditModel::getDefaultForReset() const
-{
- return makeAny( m_aDefaultText );
-}
-
-//.........................................................................
-}
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Edit.hxx b/forms/source/component/Edit.hxx
deleted file mode 100644
index a8ce04747..000000000
--- a/forms/source/component/Edit.hxx
+++ /dev/null
@@ -1,189 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FORMS_EDIT_HXX_
-#define _FORMS_EDIT_HXX_
-
-#include "EditBase.hxx"
-
-#include <cppuhelper/implbase3.hxx>
-
-namespace dbtools { class FormattedColumnValue; }
-
-//.........................................................................
-namespace frm
-{
-
-//==================================================================
-//= OEditModel
-//==================================================================
-class OEditModel
- :public OEditBaseModel
-{
- ::std::auto_ptr< ::dbtools::FormattedColumnValue >
- m_pValueFormatter;
- sal_Bool m_bMaxTextLenModified : 1; // set to <TRUE/> when we change the MaxTextLen of the aggregate
-
- sal_Bool m_bWritingFormattedFake : 1;
- // are we writing something which should be interpreted as formatted upon reading?
-
-protected:
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
- DECLARE_DEFAULT_LEAF_XTOR( OEditModel );
-
- void enableFormattedWriteFake() { m_bWritingFormattedFake = sal_True; }
- void disableFormattedWriteFake() { m_bWritingFormattedFake = sal_False; }
- sal_Bool lastReadWasFormattedFake() const { return (getLastReadVersion() & PF_FAKE_FORMATTED_FIELD) != 0; }
-
- friend InterfaceRef SAL_CALL OEditModel_CreateInstance(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory);
- friend class OFormattedFieldWrapper;
- friend class OFormattedModel; // temporary
-
-public:
- virtual void SAL_CALL disposing();
-
- // XPropertySet
- virtual void SAL_CALL getFastPropertyValue(::com::sun::star::uno::Any& rValue, sal_Int32 nHandle ) const;
-
- // XPersistObject
- virtual void SAL_CALL write(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectOutputStream>& _rxOutStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL read(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectInputStream>& _rxInStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
- virtual ::rtl::OUString SAL_CALL getServiceName() throw ( ::com::sun::star::uno::RuntimeException);
-
- // XPropertySet
- using OBoundControlModel::getFastPropertyValue;
-
- // XReset
- virtual void SAL_CALL reset( ) throw(::com::sun::star::uno::RuntimeException);
-
- // XServiceInfo
- IMPLEMENTATION_NAME(OEditModel);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw();
-
- // OControlModel's property handling
- virtual void describeFixedProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
- virtual void describeAggregateProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rAggregateProps
- ) const;
-
- // XEventListener
- using OBoundControlModel::disposing;
-
-protected:
- // OControlModel overridables
- virtual void writeAggregate( const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectOutputStream >& _rxOutStream ) const;
- virtual void readAggregate( const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectInputStream >& _rxInStream );
-
- // OBoundControlModel overridables
- virtual ::com::sun::star::uno::Any
- translateDbColumnToControlValue( );
- virtual sal_Bool commitControlValueToDbColumn( bool _bPostReset );
-
- virtual ::com::sun::star::uno::Any
- getDefaultForReset() const;
-
- virtual void onConnectedDbColumn( const ::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >& _rxForm );
- virtual void onDisconnectedDbColumn();
-
- virtual sal_Bool approveDbColumnType( sal_Int32 _nColumnType );
-
- virtual void resetNoBroadcast();
-
-protected:
- virtual sal_uInt16 getPersistenceFlags() const;
-
- DECLARE_XCLONEABLE();
-
-private:
- bool implActsAsRichText( ) const;
-};
-
-//==================================================================
-//= OEditControl
-//==================================================================
-typedef ::cppu::ImplHelper3< ::com::sun::star::awt::XFocusListener,
- ::com::sun::star::awt::XKeyListener,
- ::com::sun::star::form::XChangeBroadcaster > OEditControl_BASE;
-
-class OEditControl : public OBoundControl
- ,public OEditControl_BASE
-{
- ::cppu::OInterfaceContainerHelper
- m_aChangeListeners;
-
- ::rtl::OUString m_aHtmlChangeValue;
- sal_uInt32 m_nKeyEvent;
-
-public:
- OEditControl(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory);
- virtual ~OEditControl();
-
- DECLARE_UNO3_AGG_DEFAULTS(OEditControl, OBoundControl);
- virtual ::com::sun::star::uno::Any SAL_CALL queryAggregation(const ::com::sun::star::uno::Type& _rType) throw(::com::sun::star::uno::RuntimeException);
-
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
-// OComponentHelper
- virtual void SAL_CALL disposing();
-
-// ::com::sun::star::lang::XEventListener
- virtual void SAL_CALL disposing(const ::com::sun::star::lang::EventObject& _rSource) throw(::com::sun::star::uno::RuntimeException);
-
-// ::com::sun::star::lang::XServiceInfo
- IMPLEMENTATION_NAME(OEditControl);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw();
-
-// ::com::sun::star::form::XChangeBroadcaster
- virtual void SAL_CALL addChangeListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XChangeListener>& _rxListener) throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeChangeListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XChangeListener>& _rxListener) throw ( ::com::sun::star::uno::RuntimeException);
-
-// ::com::sun::star::awt::XFocusListener
- virtual void SAL_CALL focusGained( const ::com::sun::star::awt::FocusEvent& e ) throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL focusLost( const ::com::sun::star::awt::FocusEvent& e ) throw ( ::com::sun::star::uno::RuntimeException);
-
-// ::com::sun::star::awt::XKeyListener
- virtual void SAL_CALL keyPressed(const ::com::sun::star::awt::KeyEvent& e) throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL keyReleased(const ::com::sun::star::awt::KeyEvent& e) throw ( ::com::sun::star::uno::RuntimeException);
-
- // XControl
- virtual void SAL_CALL createPeer( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XToolkit >& _rxToolkit, const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XWindowPeer >& _rxParent ) throw ( ::com::sun::star::uno::RuntimeException );
-
-private:
- DECL_LINK( OnKeyPressed, void* );
-};
-
-//.........................................................................
-}
-//.........................................................................
-
-#endif // _FORMS_EDIT_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/EditBase.cxx b/forms/source/component/EditBase.cxx
deleted file mode 100644
index 6afff3637..000000000
--- a/forms/source/component/EditBase.cxx
+++ /dev/null
@@ -1,361 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "EditBase.hxx"
-#include "property.hxx"
-#include "property.hrc"
-#include "services.hxx"
-#include <tools/debug.hxx>
-#include <comphelper/basicio.hxx>
-#include <cppuhelper/queryinterface.hxx>
-#include "frm_resource.hxx"
-#include "frm_resource.hrc"
-
-//.........................................................................
-namespace frm
-{
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::sdb;
-using namespace ::com::sun::star::sdbc;
-using namespace ::com::sun::star::sdbcx;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::io;
-using namespace ::com::sun::star::lang;
-using namespace ::com::sun::star::util;
-
-const sal_uInt16 DEFAULT_LONG = 0x0001;
-const sal_uInt16 DEFAULT_DOUBLE = 0x0002;
-const sal_uInt16 FILTERPROPOSAL = 0x0004;
-
-DBG_NAME( OEditBaseModel )
-//------------------------------------------------------------------
-OEditBaseModel::OEditBaseModel( const Reference< XMultiServiceFactory >& _rxFactory, const ::rtl::OUString& rUnoControlModelName,
- const ::rtl::OUString& rDefault, const sal_Bool _bSupportExternalBinding, const sal_Bool _bSupportsValidation )
- :OBoundControlModel( _rxFactory, rUnoControlModelName, rDefault, sal_True, _bSupportExternalBinding, _bSupportsValidation )
- ,m_nLastReadVersion(0)
- ,m_bEmptyIsNull(sal_True)
- ,m_bFilterProposal(sal_False)
-{
- DBG_CTOR( OEditBaseModel, NULL );
-}
-
-//------------------------------------------------------------------
-OEditBaseModel::OEditBaseModel( const OEditBaseModel* _pOriginal, const Reference< XMultiServiceFactory >& _rxFactory )
- :OBoundControlModel( _pOriginal, _rxFactory )
- ,m_nLastReadVersion(0)
-{
- DBG_CTOR( OEditBaseModel, NULL );
-
- m_bFilterProposal = _pOriginal->m_bFilterProposal;
- m_bEmptyIsNull = _pOriginal->m_bEmptyIsNull;
- m_aDefault = _pOriginal->m_aDefault;
- m_aDefaultText = _pOriginal->m_aDefaultText;
-}
-
-//------------------------------------------------------------------
-OEditBaseModel::~OEditBaseModel( )
-{
- DBG_DTOR( OEditBaseModel, NULL );
-}
-
-// XPersist
-//------------------------------------------------------------------------------
-void OEditBaseModel::write(const Reference<XObjectOutputStream>& _rxOutStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException)
-{
- OBoundControlModel::write(_rxOutStream);
-
- // Version
- sal_uInt16 nVersionId = 0x0005;
- DBG_ASSERT((getPersistenceFlags() & ~PF_SPECIAL_FLAGS) == 0,
- "OEditBaseModel::write : invalid special version flags !");
- // please don't use other flags, older versions can't interpret them !
-
- nVersionId |= getPersistenceFlags();
- _rxOutStream->writeShort(nVersionId);
-
- // Name
- _rxOutStream->writeShort(0); // obsolete
- _rxOutStream << m_aDefaultText;
-
- // Maskierung fuer any
- sal_uInt16 nAnyMask = 0;
- if (m_aDefault.getValueType().getTypeClass() == TypeClass_LONG)
- nAnyMask |= DEFAULT_LONG;
- else if (m_aDefault.getValueType().getTypeClass() == TypeClass_DOUBLE)
- nAnyMask |= DEFAULT_DOUBLE;
-
- if (m_bFilterProposal) // da boolean, kein Wert speichern
- nAnyMask |= FILTERPROPOSAL;
-
- _rxOutStream->writeBoolean(m_bEmptyIsNull);
- _rxOutStream->writeShort(nAnyMask);
-
- if ((nAnyMask & DEFAULT_LONG) == DEFAULT_LONG)
- _rxOutStream->writeLong(getINT32(m_aDefault));
- else if ((nAnyMask & DEFAULT_DOUBLE) == DEFAULT_DOUBLE)
- _rxOutStream->writeDouble(getDouble(m_aDefault));
-
- // since version 5 we write the help text
- writeHelpTextCompatibly(_rxOutStream);
- // (that's potentially bad : at the time I added the above line we had two derived classes : OEditModel and
- // OFormattedModel. The first one does not have an own version handling, so it can't write the help text itself,
- // the second one does it's own writing (reading) after calling our method, so normally we shouldn't write any
- // additional members as this is not compatible to older office versions.
- // We decided to place the writing of the help text here as it seems the less worse alternative. There is no delivered
- // office version including formatted controls (and thus the OFormattedModel), and the OFormattedModel::read seems
- // robust against this change (as it will read a wrong and unknown file version and thus set it's members to defaults).
-
- if ((nVersionId & PF_HANDLE_COMMON_PROPS) != 0)
- writeCommonEditProperties(_rxOutStream);
-
- // !!! properties common to all OEditBaseModel derived classes should be written in writeCommonEditProperties !!!
-}
-
-//------------------------------------------------------------------------------
-sal_uInt16 OEditBaseModel::getPersistenceFlags() const
-{
- return PF_HANDLE_COMMON_PROPS;
-}
-
-//------------------------------------------------------------------------------
-void OEditBaseModel::read(const Reference<XObjectInputStream>& _rxInStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException)
-{
- OBoundControlModel::read(_rxInStream);
- ::osl::MutexGuard aGuard(m_aMutex);
-
- // Version eigene Versionsnummer
- sal_uInt16 nVersion = _rxInStream->readShort();
- m_nLastReadVersion = nVersion;
-
- sal_Bool bHandleCommonProps = (nVersion & PF_HANDLE_COMMON_PROPS) != 0;
- nVersion = nVersion & ~PF_SPECIAL_FLAGS;
-
- // obsolete
- _rxInStream->readShort();
-
- _rxInStream >> m_aDefaultText;
-
- if (nVersion >= 0x0003)
- {
- m_bEmptyIsNull = _rxInStream->readBoolean();
-
- sal_uInt16 nAnyMask = _rxInStream->readShort();
- if ((nAnyMask & DEFAULT_LONG) == DEFAULT_LONG)
- {
- sal_Int32 nValue = _rxInStream->readLong();
- m_aDefault <<= (sal_Int32)nValue;
- }
- else if ((nAnyMask & DEFAULT_DOUBLE) == DEFAULT_DOUBLE)
- {
- double fValue = _rxInStream->readDouble();
- m_aDefault <<= (double)fValue;
- }
-
- if ((nAnyMask & FILTERPROPOSAL) == FILTERPROPOSAL)
- m_bFilterProposal = sal_True;
- }
-
- if (nVersion > 4)
- readHelpTextCompatibly(_rxInStream);
-
- if (bHandleCommonProps)
- readCommonEditProperties(_rxInStream);
-
- // Nach dem Lesen die Defaultwerte anzeigen
- if ( getControlSource().getLength() )
- // (not if we don't have a control source - the "State" property acts like it is persistent, then)
- resetNoBroadcast();
-};
-
-//------------------------------------------------------------------------------
-void OEditBaseModel::defaultCommonEditProperties()
-{
- OBoundControlModel::defaultCommonProperties();
- // no own common properties at the moment
-}
-
-//------------------------------------------------------------------------------
-void OEditBaseModel::readCommonEditProperties(const Reference<XObjectInputStream>& _rxInStream)
-{
- sal_Int32 nLen = _rxInStream->readLong();
-
- Reference<XMarkableStream> xMark(_rxInStream, UNO_QUERY);
- DBG_ASSERT(xMark.is(), "OBoundControlModel::readCommonProperties : can only work with markable streams !");
- sal_Int32 nMark = xMark->createMark();
-
- // read properties common to all OBoundControlModels
- OBoundControlModel::readCommonProperties(_rxInStream);
-
- // read properties common to all OEditBaseModels
-
- // skip the remaining bytes
- xMark->jumpToMark(nMark);
- _rxInStream->skipBytes(nLen);
- xMark->deleteMark(nMark);
-}
-
-//------------------------------------------------------------------------------
-void OEditBaseModel::writeCommonEditProperties(const Reference<XObjectOutputStream>& _rxOutStream)
-{
- Reference<XMarkableStream> xMark(_rxOutStream, UNO_QUERY);
- DBG_ASSERT(xMark.is(), "OEditBaseModel::writeCommonProperties : can only work with markable streams !");
- sal_Int32 nMark = xMark->createMark();
-
- // a placeholder where we will write the overall length (later in this method)
- sal_Int32 nLen = 0;
- _rxOutStream->writeLong(nLen);
-
- // write properties common to all OBoundControlModels
- OBoundControlModel::writeCommonProperties(_rxOutStream);
-
- // write properties common to all OEditBaseModels
-
- // close the block - write the correct length at the beginning
- nLen = xMark->offsetToMark(nMark) - sizeof(nLen);
- xMark->jumpToMark(nMark);
- _rxOutStream->writeLong(nLen);
- xMark->jumpToFurthest();
- xMark->deleteMark(nMark);
-}
-
-//------------------------------------------------------------------------------
-void OEditBaseModel::getFastPropertyValue( Any& rValue, sal_Int32 nHandle ) const
-{
- switch (nHandle)
- {
- case PROPERTY_ID_EMPTY_IS_NULL:
- rValue <<= (sal_Bool)m_bEmptyIsNull;
- break;
- case PROPERTY_ID_FILTERPROPOSAL:
- rValue <<= (sal_Bool)m_bFilterProposal;
- break;
- case PROPERTY_ID_DEFAULT_TEXT:
- rValue <<= m_aDefaultText;
- break;
- case PROPERTY_ID_DEFAULT_VALUE:
- case PROPERTY_ID_DEFAULT_DATE:
- case PROPERTY_ID_DEFAULT_TIME:
- rValue = m_aDefault;
- break;
- default:
- OBoundControlModel::getFastPropertyValue(rValue, nHandle);
- }
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OEditBaseModel::convertFastPropertyValue( Any& rConvertedValue, Any& rOldValue,
- sal_Int32 nHandle, const Any& rValue ) throw( IllegalArgumentException )
-{
- sal_Bool bModified(sal_False);
- switch (nHandle)
- {
- case PROPERTY_ID_EMPTY_IS_NULL:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_bEmptyIsNull);
- break;
- case PROPERTY_ID_FILTERPROPOSAL:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_bFilterProposal);
- break;
- case PROPERTY_ID_DEFAULT_TEXT:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_aDefaultText);
- break;
- case PROPERTY_ID_DEFAULT_VALUE:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_aDefault, ::getCppuType((const double*)0));
- break;
- case PROPERTY_ID_DEFAULT_DATE:
- case PROPERTY_ID_DEFAULT_TIME:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_aDefault, ::getCppuType((const sal_Int32*)0));
- break;
- default:
- bModified = OBoundControlModel::convertFastPropertyValue(
- rConvertedValue,
- rOldValue,
- nHandle,
- rValue);
- }
- return bModified;
-}
-
-//------------------------------------------------------------------------------
-void OEditBaseModel::setFastPropertyValue_NoBroadcast( sal_Int32 nHandle, const Any& rValue ) throw ( ::com::sun::star::uno::Exception)
-{
- switch (nHandle)
- {
- case PROPERTY_ID_EMPTY_IS_NULL:
- DBG_ASSERT(rValue.getValueType().getTypeClass() == TypeClass_BOOLEAN, "invalid type" );
- m_bEmptyIsNull = getBOOL(rValue);
- break;
- case PROPERTY_ID_FILTERPROPOSAL:
- DBG_ASSERT(rValue.getValueType().getTypeClass() == TypeClass_BOOLEAN, "invalid type" );
- m_bFilterProposal = getBOOL(rValue);
- break;
- // Aenderung der defaultwerte fuehrt zu reset
- case PROPERTY_ID_DEFAULT_TEXT:
- DBG_ASSERT(rValue.getValueType().getTypeClass() == TypeClass_STRING, "invalid type" );
- rValue >>= m_aDefaultText;
- resetNoBroadcast();
- break;
- case PROPERTY_ID_DEFAULT_VALUE:
- case PROPERTY_ID_DEFAULT_DATE:
- case PROPERTY_ID_DEFAULT_TIME:
- m_aDefault = rValue;
- resetNoBroadcast();
- break;
- default:
- OBoundControlModel::setFastPropertyValue_NoBroadcast(nHandle, rValue );
- }
-}
-
-//XPropertyState
-//------------------------------------------------------------------------------
-Any OEditBaseModel::getPropertyDefaultByHandle( sal_Int32 nHandle ) const
-{
- switch (nHandle)
- {
- case PROPERTY_ID_DEFAULT_TEXT:
- return makeAny(::rtl::OUString());
- case PROPERTY_ID_FILTERPROPOSAL:
- return Any(makeAny((sal_Bool)sal_False));
- case PROPERTY_ID_DEFAULT_VALUE:
- case PROPERTY_ID_DEFAULT_DATE:
- case PROPERTY_ID_DEFAULT_TIME:
- return Any();
- default:
- return OBoundControlModel::getPropertyDefaultByHandle(nHandle);
- }
-}
-
-//.........................................................................
-}
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/EditBase.hxx b/forms/source/component/EditBase.hxx
deleted file mode 100644
index 0a070c06e..000000000
--- a/forms/source/component/EditBase.hxx
+++ /dev/null
@@ -1,115 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FORMS_EDITBASE_HXX_
-#define _FORMS_EDITBASE_HXX_
-
-#include "FormComponent.hxx"
-#include <tools/date.hxx>
-#include <tools/link.hxx>
-#include <com/sun/star/util/XNumberFormatter.hpp>
-#include <com/sun/star/awt/XFocusListener.hpp>
-#include <com/sun/star/awt/XKeyListener.hpp>
-#include <com/sun/star/form/XChangeBroadcaster.hpp>
-#include <com/sun/star/lang/XEventListener.hpp>
-#include <com/sun/star/lang/XServiceInfo.hpp>
-#include <com/sun/star/lang/XComponent.hpp>
-
-// persistence flags for use with the version id
-#define PF_HANDLE_COMMON_PROPS 0x8000
- // Derived classes which use their own persistence methods (read/write) and have an own
- // version handling therein may want to clear this flag in getPersistenceFlags.
- // If done so, this class will write an version without a call to writeCommonEditProperties.
-#define PF_FAKE_FORMATTED_FIELD 0x4000
- // .... hmmm .... a fake, as the name suggests. see OFormattedFieldWrapper
-#define PF_RESERVED_2 0x2000
-#define PF_RESERVED_3 0x1000
-#define PF_RESERVED_4 0x0800
-#define PF_RESERVED_5 0x0400
-#define PF_RESERVED_6 0x0200
-#define PF_RESERVED_7 0x0100
-
-#define PF_SPECIAL_FLAGS 0xFF00
-
-//.........................................................................
-namespace frm
-{
-
-//==================================================================
-//= OEditBaseModel
-//==================================================================
-class OEditBaseModel : public OBoundControlModel
-{
- sal_Int16 m_nLastReadVersion;
-
-protected:
-// [properties] fuer all Editierfelder
- ::com::sun::star::uno::Any m_aDefault;
- ::rtl::OUString m_aDefaultText; // default value
- sal_Bool m_bEmptyIsNull : 1; // empty string will be interepreted as NULL when committing
- sal_Bool m_bFilterProposal : 1; // use a list of possible value in filtermode
-// [properties]
-
- sal_Int16 getLastReadVersion() const { return m_nLastReadVersion; }
-
-public:
- DECLARE_DEFAULT_BOUND_XTOR( OEditBaseModel );
-
- // XPersistObject
- virtual void SAL_CALL write(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectOutputStream>& _rxOutStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL read(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectInputStream>& _rxInStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
-
- // XPropertySet
- virtual void SAL_CALL getFastPropertyValue(::com::sun::star::uno::Any& rValue, sal_Int32 nHandle ) const;
- virtual sal_Bool SAL_CALL convertFastPropertyValue(::com::sun::star::uno::Any& rConvertedValue, ::com::sun::star::uno::Any& rOldValue,
- sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue )
- throw(::com::sun::star::lang::IllegalArgumentException);
- virtual void SAL_CALL setFastPropertyValue_NoBroadcast(sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue) throw ( ::com::sun::star::uno::Exception);
- using ::cppu::OPropertySetHelper::getFastPropertyValue;
-
- // XPropertyState
- virtual ::com::sun::star::uno::Any getPropertyDefaultByHandle( sal_Int32 nHandle ) const;
-
-protected:
- // new properties common to all edit models should be handled with the following two methods
- void SAL_CALL readCommonEditProperties(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectInputStream>& _rxInStream);
- void SAL_CALL writeCommonEditProperties(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectOutputStream>& _rxOutStream);
- void defaultCommonEditProperties();
-
- virtual sal_uInt16 getPersistenceFlags() const;
- // derived classes may use this if they want this base class to write additinal version flags
- // (one of the PF_.... constants). After ::read they may ask for that flags with getLastReadVersion
-};
-
-//.........................................................................
-}
-//.........................................................................
-
-#endif // _FORMS_EDITBASE_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/EventThread.cxx b/forms/source/component/EventThread.cxx
deleted file mode 100644
index 5670635e0..000000000
--- a/forms/source/component/EventThread.cxx
+++ /dev/null
@@ -1,242 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "EventThread.hxx"
-#include <comphelper/guarding.hxx>
-#include <tools/debug.hxx>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::lang;
-
-DBG_NAME( OComponentEventThread )
-OComponentEventThread::OComponentEventThread( ::cppu::OComponentHelper* pCompImpl ) :
- m_pCompImpl( pCompImpl )
-{
- DBG_CTOR( OComponentEventThread, NULL );
-
- increment(m_refCount);
-
- // Eine Referenz des Controls halten
- {
- InterfaceRef xIFace(static_cast<XWeak*>(pCompImpl));
- query_interface(xIFace, m_xComp);
- }
-
- // und uns an dem Control anmelden
- {
- Reference<XEventListener> xEvtLstnr = static_cast<XEventListener*>(this);
- m_xComp->addEventListener( xEvtLstnr );
- }
-
- decrement(m_refCount);
-}
-
-OComponentEventThread::~OComponentEventThread()
-{
- DBG_DTOR( OComponentEventThread, NULL );
-
- DBG_ASSERT( m_aEvents.size() == 0,
- "OComponentEventThread::~OComponentEventThread: Kein dispose gerufen?" );
-
- impl_clearEventQueue();
-}
-
-Any SAL_CALL OComponentEventThread::queryInterface(const Type& _rType) throw (RuntimeException)
-{
- Any aReturn;
-
- aReturn = OWeakObject::queryInterface(_rType);
-
- if (!aReturn.hasValue())
- aReturn = ::cppu::queryInterface(_rType,
- static_cast<XEventListener*>(this)
- );
-
- return aReturn;
-}
-
-void OComponentEventThread::impl_clearEventQueue()
-{
- while ( m_aEvents.size() )
- {
- delete *m_aEvents.begin();
- m_aEvents.erase( m_aEvents.begin() );
- }
- m_aControls.erase( m_aControls.begin(), m_aControls.end() );
- m_aFlags.erase( m_aFlags.begin(), m_aFlags.end() );
-}
-
-void OComponentEventThread::disposing( const EventObject& evt ) throw ( ::com::sun::star::uno::RuntimeException)
-{
- if( evt.Source == m_xComp )
- {
- ::osl::MutexGuard aGuard( m_aMutex );
-
- // Event-Listener abmelden
- Reference<XEventListener> xEvtLstnr = static_cast<XEventListener*>(this);
- m_xComp->removeEventListener( xEvtLstnr );
-
- // Event-Queue loeschen
- impl_clearEventQueue();
-
- // Das Control loslassen und pCompImpl auf 0 setzen, damit der
- // Thread weiss, dass er sich beenden soll.
- m_xComp = 0;
- m_pCompImpl = 0;
-
- // Den Thread aufwecken und beenden.
- m_aCond.set();
- terminate();
- }
-}
-
-void OComponentEventThread::addEvent( const EventObject* _pEvt, sal_Bool bFlag )
-{
- Reference<XControl> xTmp;
- addEvent( _pEvt, xTmp, bFlag );
-}
-
-void OComponentEventThread::addEvent( const EventObject* _pEvt,
- const Reference<XControl>& rControl,
- sal_Bool bFlag )
-{
- ::osl::MutexGuard aGuard( m_aMutex );
-
- // Daten in die Queue stellen
- m_aEvents.push_back( cloneEvent( _pEvt ) );
-
- Reference<XWeak> xWeakControl(rControl, UNO_QUERY);
- Reference<XAdapter> xControlAdapter = xWeakControl.is() ? xWeakControl->queryAdapter() : Reference<XAdapter>();
- m_aControls.push_back( xControlAdapter );
-
- m_aFlags.push_back( bFlag );
-
- // Thread aufwecken
- m_aCond.set();
-}
-
-void OComponentEventThread::implStarted( )
-{
- acquire( );
-}
-
-void OComponentEventThread::implTerminated( )
-{
- release( );
-}
-
-void SAL_CALL OComponentEventThread::kill()
-{
- OComponentEventThread_TBASE::terminate();
- OComponentEventThread_TBASE::join();
-
- implTerminated( );
-}
-
-void SAL_CALL OComponentEventThread::onTerminated()
-{
- OComponentEventThread_TBASE::onTerminated();
-
- implTerminated( );
-}
-
-void OComponentEventThread::run()
-{
- implStarted( );
-
- // uns selbst festhalten, damit wir nicht geloescht werden,
- // wenn zwischendrinne mal ein dispose gerufen wird.
- InterfaceRef xThis(static_cast<XWeak*>(this));
-
- do
- {
- ::osl::MutexGuard aGuard(m_aMutex);
-
- while( m_aEvents.size() > 0 )
- {
- // Das Control holen und festhalten, damit es waehrend des
- // actionPerformed nicht geloescht werden kann.
- Reference<XComponent> xComp = m_xComp;
- ::cppu::OComponentHelper *pCompImpl = m_pCompImpl;
-
- ThreadEvents::iterator firstEvent( m_aEvents.begin() );
- EventObject* pEvt = *firstEvent;
- m_aEvents.erase( firstEvent );
-
- ThreadObjects::iterator firstControl( m_aControls.begin() );
- Reference<XAdapter> xControlAdapter = *firstControl;
- m_aControls.erase( firstControl );
-
- ThreadBools::iterator firstFlag( m_aFlags.begin() );
- sal_Bool bFlag = *firstFlag;
- m_aFlags.erase( firstFlag );
-
- {
- MutexRelease aReleaseOnce(m_aMutex);
- // Weil ein queryHardRef eine Exception schmeissen kann sollte
- // es nicht bei gelocktem Mutex aufgerufen werden.
- Reference<XControl> xControl;
- if ( xControlAdapter.is() )
- query_interface(xControlAdapter->queryAdapted(), xControl);
-
- if( xComp.is() )
- processEvent( pCompImpl, pEvt, xControl, bFlag );
- }
-
- delete pEvt;
- };
-
- // Nach einem dispose kennen wir das Control nicht mehr. Dann darf
- // auch nicht gewartet werden.
- if( !m_xComp.is() )
- return;
-
- // Warte-Bedingung zuruecksetzen
- m_aCond.reset();
- {
- MutexRelease aReleaseOnce(m_aMutex);
- // und warten ... falls nicht zwischenzeitlich doch noch ein
- // Event eingetroffen ist.
- m_aCond.wait();
- }
- }
- while( sal_True );
-}
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/EventThread.hxx b/forms/source/component/EventThread.hxx
deleted file mode 100644
index f0568ef4f..000000000
--- a/forms/source/component/EventThread.hxx
+++ /dev/null
@@ -1,128 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FRM_EVENT_THREAD_HXX_
-#define _FRM_EVENT_THREAD_HXX_
-
-#include <com/sun/star/lang/XEventListener.hpp>
-#include <com/sun/star/lang/EventObject.hpp>
-#include <com/sun/star/lang/XComponent.hpp>
-#include <com/sun/star/awt/XControl.hpp>
-#include <osl/thread.hxx>
-
-
-#include <osl/conditn.hxx>
-#include <cppuhelper/component.hxx>
-#include <comphelper/stl_types.hxx>
-#include <comphelper/uno3.hxx>
-using namespace comphelper;
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
-// ***************************************************************************************************
-// ***************************************************************************************************
-
-typedef ::osl::Thread OComponentEventThread_TBASE;
-class OComponentEventThread
- :public OComponentEventThread_TBASE
- ,public ::com::sun::star::lang::XEventListener
- ,public ::cppu::OWeakObject
-{
- DECLARE_STL_VECTOR(::com::sun::star::lang::EventObject*, ThreadEvents);
- DECLARE_STL_VECTOR(::com::sun::star::uno::Reference< ::com::sun::star::uno::XAdapter> , ThreadObjects);
- DECLARE_STL_VECTOR(sal_Bool, ThreadBools);
-
- ::osl::Mutex m_aMutex;
- ::osl::Condition m_aCond; // Queue gefuellt?
- ThreadEvents m_aEvents; // Event-Queue
- ThreadObjects m_aControls; // Control fuer Submit
- ThreadBools m_aFlags; // Flags fuer Submit/Reset
-
- ::cppu::OComponentHelper* m_pCompImpl; // Implementierung des Controls
- ::com::sun::star::uno::Reference< ::com::sun::star::lang::XComponent> m_xComp; // ::com::sun::star::lang::XComponent des Controls
-
-protected:
-
- // XThread
- virtual void SAL_CALL run();
-
- virtual void SAL_CALL kill();
- virtual void SAL_CALL onTerminated();
-
- // Die folgende Methode wird gerufen um das Event unter Beruecksichtigung
- // seines Typs zu duplizieren.
- virtual ::com::sun::star::lang::EventObject* cloneEvent(const ::com::sun::star::lang::EventObject* _pEvt) const = 0;
-
- // Ein Event bearbeiten. Der Mutex ist dabei nicht gelockt, pCompImpl
- // bleibt aber in jedem Fall gueltig. Bei pEvt kann es sich auch um
- // einen abgeleiteten Typ handeln, naemlich den, den cloneEvent
- // zurueckgibt. rControl ist nur gesetzt, wenn beim addEvent ein
- // Control uebergeben wurde. Da das Control nur als WeakRef gehalten
- // wird kann es auch zwischenzeitlich verschwinden.
- virtual void processEvent( ::cppu::OComponentHelper* _pCompImpl,
- const ::com::sun::star::lang::EventObject* _pEvt,
- const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControl>& _rControl,
- sal_Bool _bFlag) = 0;
-
-public:
-
- // UNO Anbindung
- DECLARE_UNO3_DEFAULTS(OComponentEventThread, OWeakObject);
- virtual ::com::sun::star::uno::Any SAL_CALL queryInterface(const ::com::sun::star::uno::Type& _rType) throw (::com::sun::star::uno::RuntimeException);
-
- OComponentEventThread(::cppu::OComponentHelper* pCompImpl);
- virtual ~OComponentEventThread();
-
- void addEvent( const ::com::sun::star::lang::EventObject* _pEvt, sal_Bool bFlag = sal_False );
- void addEvent( const ::com::sun::star::lang::EventObject* _pEvt, const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControl>& rControl,
- sal_Bool bFlag = sal_False );
-
- // ::com::sun::star::lang::XEventListener
- virtual void SAL_CALL disposing(const ::com::sun::star::lang::EventObject& _rSource ) throw (::com::sun::star::uno::RuntimeException);
-
-/* resolve ambiguity : both OWeakObject and OObject have these memory operators */
- void * SAL_CALL operator new( size_t size ) throw() { return osl::Thread::operator new(size); }
- void SAL_CALL operator delete( void * p ) throw() { osl::Thread::operator delete(p); }
-
-private:
- void implStarted( );
- void implTerminated( );
-
- void impl_clearEventQueue();
-};
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-#endif // _FRM_EVENT_THREAD_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/File.cxx b/forms/source/component/File.cxx
deleted file mode 100644
index 61b3bcfe5..000000000
--- a/forms/source/component/File.cxx
+++ /dev/null
@@ -1,306 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-
-
-#include "File.hxx"
-
-#include <com/sun/star/form/FormComponentType.hpp>
-
-#include "property.hrc"
-#include "services.hxx"
-#include <tools/debug.hxx>
-#include <comphelper/container.hxx>
-#include <comphelper/basicio.hxx>
-#include <comphelper/guarding.hxx>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::sdb;
-using namespace ::com::sun::star::sdbc;
-using namespace ::com::sun::star::sdbcx;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::io;
-using namespace ::com::sun::star::lang;
-using namespace ::com::sun::star::util;
-
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OFileControlModel_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new OFileControlModel(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> OFileControlModel::_getTypes()
-{
- static Sequence<Type> aTypes;
- if (!aTypes.getLength())
- {
- // my base class
- Sequence<Type> aBaseClassTypes = OControlModel::_getTypes();
-
- Sequence<Type> aOwnTypes(1);
- Type* pOwnTypes = aOwnTypes.getArray();
- pOwnTypes[0] = getCppuType((Reference<XReset>*)NULL);
-
- aTypes = concatSequences(aBaseClassTypes, aOwnTypes);
- }
- return aTypes;
-}
-
-
-// XServiceInfo
-//------------------------------------------------------------------------------
-StringSequence OFileControlModel::getSupportedServiceNames() throw(RuntimeException)
-{
- StringSequence aSupported = OControlModel::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 1);
-
- ::rtl::OUString*pArray = aSupported.getArray();
- pArray[aSupported.getLength()-1] = FRM_SUN_COMPONENT_FILECONTROL;
- return aSupported;
-}
-
-//------------------------------------------------------------------
-DBG_NAME( OFileControlModel )
-//------------------------------------------------------------------
-OFileControlModel::OFileControlModel(const Reference<XMultiServiceFactory>& _rxFactory)
- :OControlModel(_rxFactory, VCL_CONTROLMODEL_FILECONTROL)
- ,m_aResetListeners(m_aMutex)
-{
- DBG_CTOR( OFileControlModel, NULL );
- m_nClassId = FormComponentType::FILECONTROL;
-}
-
-//------------------------------------------------------------------
-OFileControlModel::OFileControlModel( const OFileControlModel* _pOriginal, const Reference<XMultiServiceFactory>& _rxFactory )
- :OControlModel( _pOriginal, _rxFactory )
- ,m_aResetListeners( m_aMutex )
-{
- DBG_CTOR( OFileControlModel, NULL );
-
- m_sDefaultValue = _pOriginal->m_sDefaultValue;
-}
-
-//------------------------------------------------------------------
-OFileControlModel::~OFileControlModel()
-{
- if (!OComponentHelper::rBHelper.bDisposed)
- {
- acquire();
- dispose();
- }
- DBG_DTOR( OFileControlModel, NULL );
-}
-
-//------------------------------------------------------------------------------
-IMPLEMENT_DEFAULT_CLONING( OFileControlModel )
-
-//------------------------------------------------------------------------------
-Any SAL_CALL OFileControlModel::queryAggregation(const Type& _rType) throw (RuntimeException)
-{
- Any aReturn = OControlModel::queryAggregation(_rType);
- if (!aReturn.hasValue())
- aReturn = ::cppu::queryInterface(_rType
- ,static_cast<XReset*>(this)
- );
-
- return aReturn;
-}
-
-// OComponentHelper
-//-----------------------------------------------------------------------------
-void OFileControlModel::disposing()
-{
- OControlModel::disposing();
-
- EventObject aEvt(static_cast<XWeak*>(this));
- m_aResetListeners.disposeAndClear(aEvt);
-}
-
-//------------------------------------------------------------------------------
-Any OFileControlModel::getPropertyDefaultByHandle( sal_Int32 _nHandle ) const
-{
- Any aReturn;
- switch ( _nHandle )
- {
- case PROPERTY_ID_DEFAULT_TEXT:
- return makeAny( ::rtl::OUString() );
- }
- return OControlModel::getPropertyDefaultByHandle( _nHandle );
-}
-
-//------------------------------------------------------------------------------
-void OFileControlModel::getFastPropertyValue(Any& rValue, sal_Int32 nHandle) const
-{
- switch (nHandle)
- {
- case PROPERTY_ID_DEFAULT_TEXT : rValue <<= m_sDefaultValue; break;
- default:
- OControlModel::getFastPropertyValue(rValue, nHandle);
- }
-}
-
-//------------------------------------------------------------------------------
-void OFileControlModel::setFastPropertyValue_NoBroadcast(sal_Int32 nHandle, const Any& rValue) throw ( ::com::sun::star::uno::Exception)
-{
- switch (nHandle)
- {
- case PROPERTY_ID_DEFAULT_TEXT :
- DBG_ASSERT(rValue.getValueType().getTypeClass() == TypeClass_STRING, "OFileControlModel::setFastPropertyValue_NoBroadcast : invalid type !" );
- rValue >>= m_sDefaultValue;
- break;
- default:
- OControlModel::setFastPropertyValue_NoBroadcast(nHandle, rValue);
- }
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OFileControlModel::convertFastPropertyValue(Any& rConvertedValue, Any& rOldValue, sal_Int32 nHandle, const Any& rValue)
- throw( IllegalArgumentException )
-{
- switch (nHandle)
- {
- case PROPERTY_ID_DEFAULT_TEXT :
- return tryPropertyValue(rConvertedValue, rOldValue, rValue, m_sDefaultValue);
- default:
- return OControlModel::convertFastPropertyValue(rConvertedValue, rOldValue, nHandle, rValue);
- }
-}
-
-//------------------------------------------------------------------------------
-void OFileControlModel::describeFixedProperties( Sequence< Property >& _rProps ) const
-{
- BEGIN_DESCRIBE_PROPERTIES( 2, OControlModel )
- DECL_PROP1(DEFAULT_TEXT, ::rtl::OUString, BOUND);
- DECL_PROP1(TABINDEX, sal_Int16, BOUND);
- END_DESCRIBE_PROPERTIES();
-}
-
-//------------------------------------------------------------------------------
-::rtl::OUString SAL_CALL OFileControlModel::getServiceName() throw ( ::com::sun::star::uno::RuntimeException)
-{
- return FRM_COMPONENT_FILECONTROL; // old (non-sun) name for compatibility !
-}
-
-//------------------------------------------------------------------------------
-void OFileControlModel::write(const Reference<stario::XObjectOutputStream>& _rxOutStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException)
-{
- OControlModel::write(_rxOutStream);
-
- ::osl::MutexGuard aGuard(m_aMutex);
-
- // Version
- _rxOutStream->writeShort(0x0002);
- // Default-Wert
- _rxOutStream << m_sDefaultValue;
- writeHelpTextCompatibly(_rxOutStream);
-}
-
-//------------------------------------------------------------------------------
-void OFileControlModel::read(const Reference<stario::XObjectInputStream>& _rxInStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException)
-{
- OControlModel::read(_rxInStream);
- ::osl::MutexGuard aGuard(m_aMutex);
-
- // Version
- sal_uInt16 nVersion = _rxInStream->readShort();
- // Default-Wert
- switch (nVersion)
- {
- case 1:
- _rxInStream >> m_sDefaultValue; break;
- case 2:
- _rxInStream >> m_sDefaultValue;
- readHelpTextCompatibly(_rxInStream);
- break;
- default:
- OSL_FAIL("OFileControlModel::read : unknown version !");
- m_sDefaultValue = ::rtl::OUString();
- }
-
- // Nach dem Lesen die Defaultwerte anzeigen
-// _reset();
-}
-
-//-----------------------------------------------------------------------------
-void SAL_CALL OFileControlModel::reset() throw ( ::com::sun::star::uno::RuntimeException)
-{
- ::cppu::OInterfaceIteratorHelper aIter(m_aResetListeners);
- EventObject aEvt(static_cast<XWeak*>(this));
- sal_Bool bContinue = sal_True;
- while (aIter.hasMoreElements() && bContinue)
- bContinue =((XResetListener*)aIter.next())->approveReset(aEvt);
-
- if (bContinue)
- {
- {
- // Wenn Models threadSave
- ::osl::MutexGuard aGuard(m_aMutex);
- _reset();
- }
- m_aResetListeners.notifyEach( &XResetListener::resetted, aEvt );
- }
-}
-
-//-----------------------------------------------------------------------------
-void OFileControlModel::addResetListener(const Reference<XResetListener>& _rxListener) throw ( ::com::sun::star::uno::RuntimeException)
-{
- m_aResetListeners.addInterface(_rxListener);
-}
-
-//-----------------------------------------------------------------------------
-void OFileControlModel::removeResetListener(const Reference<XResetListener>& _rxListener) throw ( ::com::sun::star::uno::RuntimeException)
-{
- m_aResetListeners.removeInterface(_rxListener);
-}
-
-//------------------------------------------------------------------------------
-void OFileControlModel::_reset()
-{
- { // release our mutex once (it's acquired in the calling method !), as setting aggregate properties
- // may cause any uno controls belonging to us to lock the solar mutex, which is potentially dangerous with
- // our own mutex locked
- MutexRelease aRelease(m_aMutex);
- m_xAggregateSet->setPropertyValue(PROPERTY_TEXT, makeAny(m_sDefaultValue));
- }
-}
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/File.hxx b/forms/source/component/File.hxx
deleted file mode 100644
index 4f0c56f13..000000000
--- a/forms/source/component/File.hxx
+++ /dev/null
@@ -1,105 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FORMS_FILE_HXX_
-#define _FORMS_FILE_HXX_
-
-#include "FormComponent.hxx"
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
-//==================================================================
-// OFileControlModel
-//==================================================================
-class OFileControlModel
- :public OControlModel
- ,public ::com::sun::star::form::XReset
-{
- ::cppu::OInterfaceContainerHelper m_aResetListeners;
- ::rtl::OUString m_sDefaultValue;
-
-protected:
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
-public:
- DECLARE_DEFAULT_LEAF_XTOR( OFileControlModel );
-
- DECLARE_UNO3_AGG_DEFAULTS(OFileControlModel, OControlModel);
- virtual ::com::sun::star::uno::Any SAL_CALL queryAggregation(const ::com::sun::star::uno::Type& _rType) throw(::com::sun::star::uno::RuntimeException);
-
- // XServiceInfo
- IMPLEMENTATION_NAME(OFileControlModel);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException);
-
- // OComponentHelper
- virtual void SAL_CALL disposing();
-
- // XPropertySet and friends
- virtual void SAL_CALL getFastPropertyValue(::com::sun::star::uno::Any& rValue, sal_Int32 nHandle) const;
- virtual void SAL_CALL setFastPropertyValue_NoBroadcast(sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue) throw ( ::com::sun::star::uno::Exception);
-
- virtual sal_Bool SAL_CALL convertFastPropertyValue(::com::sun::star::uno::Any& rConvertedValue, ::com::sun::star::uno::Any& rOldValue, sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue )
- throw(::com::sun::star::lang::IllegalArgumentException);
-
- virtual ::com::sun::star::uno::Any getPropertyDefaultByHandle( sal_Int32 _nHandle ) const;
-
- // XPersistObject
- virtual ::rtl::OUString SAL_CALL getServiceName() throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL write(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectOutputStream>& _rxOutStream) throw ( ::com ::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL read(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectInputStream>& _rxInStream) throw ( ::com ::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
-
- // XReset
- virtual void SAL_CALL reset() throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL addResetListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XResetListener>& _rxListener) throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeResetListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XResetListener>& _rxListener) throw ( ::com::sun::star::uno::RuntimeException);
-
- // OControlModel's property handling
- virtual void describeFixedProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
-
- // prevent method hiding
- using OControlModel::disposing;
- using OControlModel::getFastPropertyValue;
-
-protected:
- virtual void _reset();
-
- DECLARE_XCLONEABLE();
-};
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-#endif // _FORMS_FILE_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Filter.cxx b/forms/source/component/Filter.cxx
deleted file mode 100644
index a4c6243b5..000000000
--- a/forms/source/component/Filter.cxx
+++ /dev/null
@@ -1,933 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-
-
-#include "Filter.hxx"
-#include "FormComponent.hxx"
-#include "frm_module.hxx"
-#include "frm_resource.hrc"
-#include "frm_resource.hxx"
-#include "property.hrc"
-#include "property.hxx"
-
-/** === begin UNO includes === **/
-#include <com/sun/star/awt/VclWindowPeerAttribute.hpp>
-#include <com/sun/star/awt/XCheckBox.hpp>
-#include <com/sun/star/awt/XComboBox.hpp>
-#include <com/sun/star/awt/XListBox.hpp>
-#include <com/sun/star/awt/XRadioButton.hpp>
-#include <com/sun/star/awt/XVclWindowPeer.hpp>
-#include <com/sun/star/beans/NamedValue.hpp>
-#include <com/sun/star/container/XChild.hpp>
-#include <com/sun/star/container/XIndexAccess.hpp>
-#include <com/sun/star/container/XNamed.hpp>
-#include <com/sun/star/form/FormComponentType.hpp>
-#include <com/sun/star/sdb/BooleanComparisonMode.hpp>
-#include <com/sun/star/sdb/XColumn.hpp>
-#include <com/sun/star/sdb/XSQLQueryComposerFactory.hpp>
-#include <com/sun/star/sdbc/DataType.hpp>
-#include <com/sun/star/sdbc/XRowSet.hpp>
-#include <com/sun/star/sdbcx/XColumnsSupplier.hpp>
-#include <com/sun/star/sdbcx/XTablesSupplier.hpp>
-#include <com/sun/star/ui/dialogs/XExecutableDialog.hpp>
-#include <com/sun/star/awt/XItemList.hpp>
-/** === end UNO includes === **/
-
-#include <comphelper/numbers.hxx>
-#include <comphelper/property.hxx>
-#include <connectivity/dbconversion.hxx>
-#include <connectivity/dbtools.hxx>
-#include <connectivity/formattedcolumnvalue.hxx>
-#include <connectivity/predicateinput.hxx>
-#include <rtl/ustrbuf.hxx>
-#include <toolkit/helper/vclunohelper.hxx>
-#include <tools/diagnose_ex.h>
-#include <unotools/localedatawrapper.hxx>
-#include <vcl/stdtext.hxx>
-#include <vcl/svapp.hxx>
-#include <tools/wintypes.hxx>
-
-//--------------------------------------------------------------------------
-extern "C" void SAL_CALL createRegistryInfo_OFilterControl()
-{
- static ::frm::OMultiInstanceAutoRegistration< ::frm::OFilterControl > aAutoRegistration;
-}
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
- using namespace ::com::sun::star::uno;
- using namespace ::com::sun::star::awt;
- using namespace ::com::sun::star::lang;
- using namespace ::com::sun::star::beans;
- using namespace ::com::sun::star::sdb;
- using namespace ::com::sun::star::sdbc;
- using namespace ::com::sun::star::sdbcx;
- using namespace ::com::sun::star::util;
- using namespace ::com::sun::star::form;
- using namespace ::com::sun::star::container;
- using namespace ::com::sun::star::ui::dialogs;
-
- using namespace ::connectivity;
-
- //=====================================================================
- // OFilterControl
- //=====================================================================
- //---------------------------------------------------------------------
- OFilterControl::OFilterControl( const Reference< XMultiServiceFactory >& _rxORB )
- :UnoControl( _rxORB )
- ,m_aTextListeners( *this )
- ,m_aParser( _rxORB )
- ,m_nControlClass( FormComponentType::TEXTFIELD )
- ,m_bFilterList( sal_False )
- ,m_bMultiLine( sal_False )
- ,m_bFilterListFilled( sal_False )
- {
- }
-
- //---------------------------------------------------------------------
- sal_Bool OFilterControl::ensureInitialized( )
- {
- if ( !m_xField.is() )
- {
- OSL_FAIL( "OFilterControl::ensureInitialized: improperly initialized: no field!" );
- return sal_False;
- }
-
- if ( !m_xConnection.is() )
- {
- OSL_FAIL( "OFilterControl::ensureInitialized: improperly initialized: no connection!" );
- return sal_False;
- }
-
- if ( !m_xFormatter.is() )
- {
- // we can create one from the connection, if it's an SDB connection
- Reference< XNumberFormatsSupplier > xFormatSupplier = ::dbtools::getNumberFormats( m_xConnection, sal_True, maContext.getLegacyServiceFactory() );
-
- if ( xFormatSupplier.is() )
- {
- maContext.createComponent( "com.sun.star.util.NumberFormatter", m_xFormatter );
- if ( m_xFormatter.is() )
- m_xFormatter->attachNumberFormatsSupplier( xFormatSupplier );
- }
- }
- if ( !m_xFormatter.is() )
- {
- OSL_FAIL( "OFilterControl::ensureInitialized: no number formatter!" );
- // no fallback anymore
- return sal_False;
- }
-
- return sal_True;
- }
-
- //---------------------------------------------------------------------
- Any SAL_CALL OFilterControl::queryAggregation( const Type & rType ) throw(RuntimeException)
- {
- Any aRet = UnoControl::queryAggregation( rType);
- if(!aRet.hasValue())
- aRet = OFilterControl_BASE::queryInterface(rType);
-
- return aRet;
- }
-
- //------------------------------------------------------------------
- ::rtl::OUString OFilterControl::GetComponentServiceName()
- {
- ::rtl::OUString aServiceName;
- switch (m_nControlClass)
- {
- case FormComponentType::RADIOBUTTON:
- aServiceName = rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("radiobutton") );
- break;
- case FormComponentType::CHECKBOX:
- aServiceName = rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("checkbox") );
- break;
- case FormComponentType::COMBOBOX:
- aServiceName = rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("combobox") );
- break;
- case FormComponentType::LISTBOX:
- aServiceName = rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("listbox") );
- break;
- default:
- if (m_bMultiLine)
- aServiceName = rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("MultiLineEdit") );
- else
- aServiceName = rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("Edit") );
- }
- return aServiceName;
- }
-
- // XComponent
- //---------------------------------------------------------------------
- void OFilterControl::dispose() throw( RuntimeException )
- {
- EventObject aEvt(*this);
- m_aTextListeners.disposeAndClear( aEvt );
- UnoControl::dispose();
- }
-
- //---------------------------------------------------------------------
- void OFilterControl::createPeer( const Reference< XToolkit > & rxToolkit, const Reference< XWindowPeer > & rParentPeer ) throw(RuntimeException)
- {
- UnoControl::createPeer( rxToolkit, rParentPeer );
-
- try
- {
- Reference< XVclWindowPeer > xVclWindow( getPeer(), UNO_QUERY_THROW );
- switch ( m_nControlClass )
- {
- case FormComponentType::CHECKBOX:
- {
- // checkboxes always have a tristate-mode
- xVclWindow->setProperty( PROPERTY_TRISTATE, makeAny( sal_Bool( sal_True ) ) );
- xVclWindow->setProperty( PROPERTY_STATE, makeAny( sal_Int32( STATE_DONTKNOW ) ) );
-
- Reference< XCheckBox > xBox( getPeer(), UNO_QUERY_THROW );
- xBox->addItemListener( this );
-
- }
- break;
-
- case FormComponentType::RADIOBUTTON:
- {
- xVclWindow->setProperty( PROPERTY_STATE, makeAny( sal_Int32( STATE_NOCHECK ) ) );
-
- Reference< XRadioButton > xRadio( getPeer(), UNO_QUERY_THROW );
- xRadio->addItemListener( this );
- }
- break;
-
- case FormComponentType::LISTBOX:
- {
- Reference< XListBox > xListBox( getPeer(), UNO_QUERY_THROW );
- xListBox->addItemListener( this );
- }
- // no break
-
- case FormComponentType::COMBOBOX:
- {
- xVclWindow->setProperty(PROPERTY_AUTOCOMPLETE, makeAny( sal_Bool( sal_True ) ) );
- }
- // no break
-
- default:
- {
- Reference< XWindow > xWindow( getPeer(), UNO_QUERY );
- xWindow->addFocusListener( this );
-
- Reference< XTextComponent > xText( getPeer(), UNO_QUERY );
- if (xText.is())
- xText->setMaxTextLen(0);
- }
- break;
- }
-
- OControl::initFormControlPeer( getPeer() );
-
- // filter controls are _never_ readonly
- Reference< XPropertySet > xModel( getModel(), UNO_QUERY_THROW );
- Reference< XPropertySetInfo > xModelPSI( xModel->getPropertySetInfo(), UNO_SET_THROW );
- if ( xModelPSI->hasPropertyByName( PROPERTY_READONLY ) )
- xVclWindow->setProperty( PROPERTY_READONLY, makeAny( sal_Bool( sal_False ) ) );
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
-
- if (m_bFilterList)
- m_bFilterListFilled = sal_False;
- }
-
- //---------------------------------------------------------------------
- void OFilterControl::PrepareWindowDescriptor( WindowDescriptor& rDescr )
- {
- if (m_bFilterList)
- rDescr.WindowAttributes |= VclWindowPeerAttribute::DROPDOWN;
- }
-
- //---------------------------------------------------------------------
- void OFilterControl::ImplSetPeerProperty( const ::rtl::OUString& rPropName, const Any& rVal )
- {
- // these properties are ignored
- if (rPropName == PROPERTY_TEXT ||
- rPropName == PROPERTY_STATE)
- return;
-
- UnoControl::ImplSetPeerProperty( rPropName, rVal );
- }
-
- // XEventListener
- //---------------------------------------------------------------------
- void SAL_CALL OFilterControl::disposing(const EventObject& Source) throw( RuntimeException )
- {
- UnoControl::disposing(Source);
- }
-
- // XItemListener
- //---------------------------------------------------------------------
- void SAL_CALL OFilterControl::itemStateChanged( const ItemEvent& rEvent ) throw(RuntimeException)
- {
- ::rtl::OUStringBuffer aText;
- switch (m_nControlClass)
- {
- case FormComponentType::CHECKBOX:
- {
- if ( ( rEvent.Selected == STATE_CHECK ) || ( rEvent.Selected == STATE_NOCHECK ) )
- {
- sal_Int32 nBooleanComparisonMode = ::dbtools::DatabaseMetaData( m_xConnection ).getBooleanComparisonMode();
-
- bool bSelected = ( rEvent.Selected == STATE_CHECK );
-
- ::rtl::OUString sExpressionMarker( RTL_CONSTASCII_USTRINGPARAM( "$expression$" ) );
- ::dbtools::getBoleanComparisonPredicate(
- sExpressionMarker,
- bSelected,
- nBooleanComparisonMode,
- aText
- );
-
- ::rtl::OUString sText( aText.makeStringAndClear() );
- sal_Int32 nMarkerPos( sText.indexOf( sExpressionMarker ) );
- OSL_ENSURE( nMarkerPos == 0, "OFilterControl::itemStateChanged: unsupported boolean comparison mode!" );
- // If this assertion fails, then getBoleanComparisonPredicate created a predicate which
- // does not start with the expression we gave it. The only known case is when
- // the comparison mode is ACCESS_COMPAT, and the value is TRUE. In this case,
- // the expression is rather complex.
- // Well, so this is a known issue - the filter controls (and thus the form based filter)
- // do not work with boolean MS Access fields.
- // To fix this, we would probably have to revert here to always return "1" or "0" as normalized
- // filter, and change our client code to properly translate this (which could be some effort).
- if ( nMarkerPos == 0 )
- aText.append( sText.copy( sExpressionMarker.getLength() ) );
- else
- {
- // fallback
- aText.appendAscii( bSelected ? "1" : "0" );
- }
- }
- }
- break;
-
- case FormComponentType::LISTBOX:
- {
- try
- {
- const Reference< XItemList > xItemList( getModel(), UNO_QUERY_THROW );
- ::rtl::OUString sItemText( xItemList->getItemText( rEvent.Selected ) );
-
- const MapString2String::const_iterator itemPos = m_aDisplayItemToValueItem.find( sItemText );
- if ( itemPos != m_aDisplayItemToValueItem.end() )
- {
- sItemText = itemPos->second;
- if ( sItemText.getLength() )
- {
- ::dbtools::OPredicateInputController aPredicateInput( maContext.getLegacyServiceFactory(), m_xConnection, getParseContext() );
- ::rtl::OUString sErrorMessage;
- OSL_VERIFY( aPredicateInput.normalizePredicateString( sItemText, m_xField, &sErrorMessage ) );
- }
- }
- aText.append( sItemText );
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- }
- break;
-
- case FormComponentType::RADIOBUTTON:
- {
- if ( rEvent.Selected == STATE_CHECK )
- aText.append( ::comphelper::getString( Reference< XPropertySet >( getModel(), UNO_QUERY )->getPropertyValue( PROPERTY_REFVALUE ) ) );
- }
- break;
- }
-
- ::rtl::OUString sText( aText.makeStringAndClear() );
- if ( m_aText.compareTo( sText ) )
- {
- m_aText = sText;
- TextEvent aEvt;
- aEvt.Source = *this;
- ::cppu::OInterfaceIteratorHelper aIt( m_aTextListeners );
- while( aIt.hasMoreElements() )
- ((XTextListener *)aIt.next())->textChanged( aEvt );
- }
- }
-
- //---------------------------------------------------------------------
- void OFilterControl::implInitFilterList()
- {
- if ( !ensureInitialized( ) )
- // already asserted in ensureInitialized
- return;
-
- // ensure the cursor and the statement are disposed as soon as we leave
- ::utl::SharedUNOComponent< XResultSet > xListCursor;
- ::utl::SharedUNOComponent< XStatement > xStatement;
-
- try
- {
- m_bFilterListFilled = sal_True;
-
- if ( !m_xField.is() )
- return;
-
- ::rtl::OUString sFieldName;
- m_xField->getPropertyValue( PROPERTY_NAME ) >>= sFieldName;
-
- // here we need a table to which the field belongs to
- const Reference< XChild > xModelAsChild( getModel(), UNO_QUERY_THROW );
- const Reference< XRowSet > xForm( xModelAsChild->getParent(), UNO_QUERY_THROW );
- const Reference< XPropertySet > xFormProps( xForm, UNO_QUERY_THROW );
-
- // create a query composer
- Reference< XColumnsSupplier > xSuppColumns;
- xFormProps->getPropertyValue(::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("SingleSelectQueryComposer"))) >>= xSuppColumns;
-
- const Reference< XConnection > xConnection( ::dbtools::getConnection( xForm ), UNO_SET_THROW );
- const Reference< XNameAccess > xFieldNames( xSuppColumns->getColumns(), UNO_SET_THROW );
- if ( !xFieldNames->hasByName( sFieldName ) )
- return;
- ::rtl::OUString sRealFieldName, sTableName;
- const Reference< XPropertySet > xComposerFieldProps( xFieldNames->getByName( sFieldName ), UNO_QUERY_THROW );
- xComposerFieldProps->getPropertyValue( PROPERTY_REALNAME ) >>= sRealFieldName;
- xComposerFieldProps->getPropertyValue( PROPERTY_TABLENAME ) >>= sTableName;
-
- // obtain the table of the field
- const Reference< XTablesSupplier > xSuppTables( xSuppColumns, UNO_QUERY_THROW );
- const Reference< XNameAccess > xTablesNames( xSuppTables->getTables(), UNO_SET_THROW );
- const Reference< XNamed > xNamedTable( xTablesNames->getByName( sTableName ), UNO_QUERY_THROW );
- sTableName = xNamedTable->getName();
-
- // create a statement selecting all values for the given field
- ::rtl::OUStringBuffer aStatement;
-
- const Reference< XDatabaseMetaData > xMeta( xConnection->getMetaData(), UNO_SET_THROW );
- const ::rtl::OUString sQuoteChar = xMeta->getIdentifierQuoteString();
-
- aStatement.appendAscii( "SELECT DISTINCT " );
- aStatement.append( sQuoteChar );
- aStatement.append( sRealFieldName );
- aStatement.append( sQuoteChar );
-
- // if the field had an alias in our form's statement, give it this alias in the new statement, too
- if ( sFieldName.getLength() && ( sFieldName != sRealFieldName ) )
- {
- aStatement.appendAscii(" AS ");
- aStatement.append( sQuoteChar );
- aStatement.append( sFieldName );
- aStatement.append( sQuoteChar );
- }
-
- aStatement.appendAscii( " FROM " );
-
- ::rtl::OUString sCatalog, sSchema, sTable;
- ::dbtools::qualifiedNameComponents( xMeta, sTableName, sCatalog, sSchema, sTable, ::dbtools::eInDataManipulation );
- aStatement.append( ::dbtools::composeTableNameForSelect( xConnection, sCatalog, sSchema, sTable ) );
-
- // execute the statement
- xStatement.reset( xConnection->createStatement() );
- const ::rtl::OUString sSelectStatement( aStatement.makeStringAndClear( ) );
- xListCursor.reset( xStatement->executeQuery( sSelectStatement ) );
-
- // retrieve the one column which we take the values from
- const Reference< XColumnsSupplier > xSupplyCols( xListCursor, UNO_QUERY_THROW );
- const Reference< XIndexAccess > xFields( xSupplyCols->getColumns(), UNO_QUERY_THROW );
- const Reference< XPropertySet > xDataField( xFields->getByIndex(0), UNO_QUERY_THROW );
-
- // ensure the values will be formatted according to the field format
- const ::dbtools::FormattedColumnValue aFormatter( m_xFormatter, xDataField );
-
- ::std::vector< ::rtl::OUString > aProposals;
- aProposals.reserve(16);
-
- while ( xListCursor->next() && ( aProposals.size() < size_t( SHRT_MAX ) ) )
- {
- const ::rtl::OUString sCurrentValue = aFormatter.getFormattedValue();
- aProposals.push_back( sCurrentValue );
- }
-
- // fill the list items into our peer
- Sequence< ::rtl::OUString> aStringSeq( aProposals.size() );
- ::std::copy( aProposals.begin(), aProposals.end(), aStringSeq.getArray() );
-
- const Reference< XComboBox > xComboBox( getPeer(), UNO_QUERY_THROW );
- xComboBox->addItems( aStringSeq, 0 );
-
- // set the drop down line count to something reasonable
- const sal_Int16 nLineCount = ::std::min( sal_Int16( 16 ), sal_Int16( aStringSeq.getLength() ) );
- xComboBox->setDropDownLineCount( nLineCount );
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- }
-
- // XFocusListener
- //---------------------------------------------------------------------
- void SAL_CALL OFilterControl::focusGained(const FocusEvent& /*e*/) throw( RuntimeException )
- {
- // should we fill the combobox?
- if (m_bFilterList && !m_bFilterListFilled)
- implInitFilterList();
- }
-
- //---------------------------------------------------------------------
- void SAL_CALL OFilterControl::focusLost(const FocusEvent& /*e*/) throw( RuntimeException )
- {
- }
-
- //---------------------------------------------------------------------
- sal_Bool SAL_CALL OFilterControl::commit() throw(RuntimeException)
- {
- if ( !ensureInitialized( ) )
- // already asserted in ensureInitialized
- return sal_True;
-
- ::rtl::OUString aText;
- switch (m_nControlClass)
- {
- case FormComponentType::TEXTFIELD:
- case FormComponentType::COMBOBOX:
- {
- Reference< XTextComponent > xText( getPeer(), UNO_QUERY );
- if (xText.is())
- aText = xText->getText();
- } break;
- default:
- return sal_True;
- }
- if (m_aText.compareTo(aText))
- {
- // check the text with the SQL-Parser
- ::rtl::OUString aNewText(aText);
- aNewText.trim();
- if ( aNewText.getLength() )
- {
- ::dbtools::OPredicateInputController aPredicateInput( maContext.getLegacyServiceFactory(), m_xConnection, getParseContext() );
- ::rtl::OUString sErrorMessage;
- if ( !aPredicateInput.normalizePredicateString( aNewText, m_xField, &sErrorMessage ) )
- {
- // display the error and outta here
- SQLContext aError;
- aError.Message = String( FRM_RES_STRING( RID_STR_SYNTAXERROR ) );
- aError.Details = sErrorMessage;
- displayException( aError );
- return sal_False;
- }
- }
-
- setText(aNewText);
- TextEvent aEvt;
- aEvt.Source = *this;
- ::cppu::OInterfaceIteratorHelper aIt( m_aTextListeners );
- while( aIt.hasMoreElements() )
- static_cast< XTextListener* >( aIt.next() )->textChanged( aEvt );
- }
- return sal_True;
- }
-
- // XTextComponent
- //---------------------------------------------------------------------
- void SAL_CALL OFilterControl::addTextListener(const Reference< XTextListener > & l) throw(RuntimeException)
- {
- m_aTextListeners.addInterface( l );
- }
-
- //---------------------------------------------------------------------
- void SAL_CALL OFilterControl::removeTextListener(const Reference< XTextListener > & l) throw(RuntimeException)
- {
- m_aTextListeners.removeInterface( l );
- }
-
- //---------------------------------------------------------------------
- void SAL_CALL OFilterControl::setText( const ::rtl::OUString& aText ) throw(RuntimeException)
- {
- if ( !ensureInitialized( ) )
- // already asserted in ensureInitialized
- return;
-
- switch (m_nControlClass)
- {
- case FormComponentType::CHECKBOX:
- {
- Reference< XVclWindowPeer > xVclWindow( getPeer(), UNO_QUERY );
- if (xVclWindow.is())
- {
- Any aValue;
- if ( aText.equalsAsciiL( RTL_CONSTASCII_STRINGPARAM( "1" ) )
- || aText.equalsIgnoreAsciiCaseAscii( "TRUE" )
- || aText.equalsIgnoreAsciiCaseAscii( "IS TRUE" )
- )
- {
- aValue <<= (sal_Int32)STATE_CHECK;
- }
- else if ( aText.equalsAsciiL( RTL_CONSTASCII_STRINGPARAM( "0" ) )
- || aText.equalsIgnoreAsciiCaseAscii( "FALSE" )
- )
- {
- aValue <<= (sal_Int32)STATE_NOCHECK;
- }
- else
- aValue <<= (sal_Int32)STATE_DONTKNOW;
-
- m_aText = aText;
- xVclWindow->setProperty( PROPERTY_STATE, aValue );
- }
- } break;
- case FormComponentType::RADIOBUTTON:
- {
- Reference< XVclWindowPeer > xVclWindow( getPeer(), UNO_QUERY );
- if (xVclWindow.is())
- {
- ::rtl::OUString aRefText = ::comphelper::getString(com::sun::star::uno::Reference< XPropertySet > (getModel(), UNO_QUERY)->getPropertyValue(PROPERTY_REFVALUE));
- Any aValue;
- if (aText == aRefText)
- aValue <<= (sal_Int32)STATE_CHECK;
- else
- aValue <<= (sal_Int32)STATE_NOCHECK;
- m_aText = aText;
- xVclWindow->setProperty(PROPERTY_STATE, aValue);
- }
- } break;
- case FormComponentType::LISTBOX:
- {
- Reference< XListBox > xListBox( getPeer(), UNO_QUERY );
- if (xListBox.is())
- {
- m_aText = aText;
- MapString2String::const_iterator itemPos = m_aDisplayItemToValueItem.find( m_aText );
- if ( itemPos == m_aDisplayItemToValueItem.end() )
- {
- const bool isQuoted = ( m_aText.getLength() > 1 )
- && ( m_aText[0] == '\'' )
- && ( m_aText[ m_aText.getLength() - 1 ] == '\'' );
- if ( isQuoted )
- {
- m_aText = m_aText.copy( 1, m_aText.getLength() - 2 );
- itemPos = m_aDisplayItemToValueItem.find( m_aText );
- }
- }
-
- OSL_ENSURE( ( itemPos != m_aDisplayItemToValueItem.end() ) || ( m_aText.getLength() == 0 ),
- "OFilterControl::setText: this text is not in my display list!" );
- if ( itemPos == m_aDisplayItemToValueItem.end() )
- m_aText = ::rtl::OUString();
-
- if ( m_aText.getLength() == 0)
- {
- while ( xListBox->getSelectedItemPos() >= 0 )
- {
- xListBox->selectItemPos( xListBox->getSelectedItemPos(), sal_False );
- }
- }
- else
- {
- xListBox->selectItem( m_aText, sal_True );
- }
- }
- }
- break;
-
- default:
- {
- Reference< XTextComponent > xText( getPeer(), UNO_QUERY );
- if (xText.is())
- {
- m_aText = aText;
- xText->setText(aText);
- }
- }
- }
- }
-
- //---------------------------------------------------------------------
- void SAL_CALL OFilterControl::insertText( const ::com::sun::star::awt::Selection& rSel, const ::rtl::OUString& aText ) throw(::com::sun::star::uno::RuntimeException)
- {
- Reference< XTextComponent > xText( getPeer(), UNO_QUERY );
- if (xText.is())
- {
- xText->insertText(rSel, aText);
- m_aText = xText->getText();
- }
- }
-
- //---------------------------------------------------------------------
- ::rtl::OUString SAL_CALL OFilterControl::getText() throw(RuntimeException)
- {
- return m_aText;
- }
-
- //---------------------------------------------------------------------
- ::rtl::OUString SAL_CALL OFilterControl::getSelectedText( void ) throw(RuntimeException)
- {
- ::rtl::OUString aSelected;
- Reference< XTextComponent > xText( getPeer(), UNO_QUERY );
- if (xText.is())
- aSelected = xText->getSelectedText();
-
- return aSelected;
- }
-
- //---------------------------------------------------------------------
- void SAL_CALL OFilterControl::setSelection( const ::com::sun::star::awt::Selection& aSelection ) throw(::com::sun::star::uno::RuntimeException)
- {
- Reference< XTextComponent > xText( getPeer(), UNO_QUERY );
- if (xText.is())
- xText->setSelection( aSelection );
- }
-
- //---------------------------------------------------------------------
- ::com::sun::star::awt::Selection SAL_CALL OFilterControl::getSelection( void ) throw(::com::sun::star::uno::RuntimeException)
- {
- ::com::sun::star::awt::Selection aSel;
- Reference< XTextComponent > xText( getPeer(), UNO_QUERY );
- if (xText.is())
- aSel = xText->getSelection();
- return aSel;
- }
-
- //---------------------------------------------------------------------
- sal_Bool SAL_CALL OFilterControl::isEditable( void ) throw(RuntimeException)
- {
- Reference< XTextComponent > xText( getPeer(), UNO_QUERY );
- return xText.is() && xText->isEditable();
- }
-
- //---------------------------------------------------------------------
- void SAL_CALL OFilterControl::setEditable( sal_Bool bEditable ) throw(RuntimeException)
- {
- Reference< XTextComponent > xText( getPeer(), UNO_QUERY );
- if (xText.is())
- xText->setEditable(bEditable);
- }
-
- //---------------------------------------------------------------------
- sal_Int16 SAL_CALL OFilterControl::getMaxTextLen() throw(RuntimeException)
- {
- Reference< XTextComponent > xText( getPeer(), UNO_QUERY );
- return xText.is() ? xText->getMaxTextLen() : 0;
- }
-
- //---------------------------------------------------------------------
- void SAL_CALL OFilterControl::setMaxTextLen( sal_Int16 nLength ) throw(RuntimeException)
- {
- Reference< XTextComponent > xText( getPeer(), UNO_QUERY );
- if (xText.is())
- xText->setMaxTextLen(nLength);
- }
-
- //---------------------------------------------------------------------
- void OFilterControl::displayException( const ::com::sun::star::sdb::SQLContext& _rExcept )
- {
- try
- {
- Sequence< Any > aArgs(2);
- aArgs[0] <<= PropertyValue(::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("SQLException") ), 0, makeAny( _rExcept ), PropertyState_DIRECT_VALUE);
- aArgs[1] <<= PropertyValue(::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("ParentWindow") ), 0, makeAny( m_xMessageParent ), PropertyState_DIRECT_VALUE);
-
- static ::rtl::OUString s_sDialogServiceName (RTL_CONSTASCII_USTRINGPARAM("com.sun.star.sdb.ErrorMessageDialog") );
-
- Reference< XExecutableDialog > xErrorDialog( maContext.createComponentWithArguments( s_sDialogServiceName, aArgs ), UNO_QUERY );
- if ( xErrorDialog.is() )
- xErrorDialog->execute();
- else
- {
- Window* pMessageParent = VCLUnoHelper::GetWindow( m_xMessageParent );
- ShowServiceNotAvailableError( pMessageParent, s_sDialogServiceName, sal_True );
- }
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- }
-
- //---------------------------------------------------------------------
- void SAL_CALL OFilterControl::initialize( const Sequence< Any >& aArguments ) throw (Exception, RuntimeException)
- {
- const Any* pArguments = aArguments.getConstArray();
- const Any* pArgumentsEnd = pArguments + aArguments.getLength();
-
- PropertyValue aProp;
- NamedValue aValue;
- const ::rtl::OUString* pName = NULL;
- const Any* pValue = NULL;
-
- for ( ; pArguments != pArgumentsEnd; ++pArguments )
- {
- // we recognize PropertyValues and NamedValues
- if ( *pArguments >>= aProp )
- {
- pName = &aProp.Name;
- pValue = &aProp.Value;
- }
- else if ( *pArguments >>= aValue )
- {
- pName = &aValue.Name;
- pValue = &aValue.Value;
- }
- else
- {
- OSL_FAIL( "OFilterControl::initialize: unrecognized argument!" );
- continue;
- }
-
- if ( 0 == pName->compareToAscii( "MessageParent" ) )
- {
- // the message parent
- *pValue >>= m_xMessageParent;
- OSL_ENSURE( m_xMessageParent.is(), "OFilterControl::initialize: invalid MessageParent!" );
- }
- else if ( 0 == pName->compareToAscii( "NumberFormatter" ) )
- {
- // the number format. This argument is optional.
- *pValue >>= m_xFormatter;
- OSL_ENSURE( m_xFormatter.is(), "OFilterControl::initialize: invalid NumberFormatter!" );
- }
- else if ( 0 == pName->compareToAscii( "ControlModel" ) )
- {
- // the control model for which we act as filter control
- Reference< XPropertySet > xControlModel;
- if ( !(*pValue >>= xControlModel ) || !xControlModel.is() )
- {
- OSL_FAIL( "OFilterControl::initialize: invalid control model argument!" );
- continue;
- }
-
- // some properties which are "derived" from the control model we're working for
- // ...................................................
- // the field
- m_xField.clear();
- OSL_ENSURE( ::comphelper::hasProperty( PROPERTY_BOUNDFIELD, xControlModel ), "OFilterControl::initialize: control model needs a bound field property!" );
- xControlModel->getPropertyValue( PROPERTY_BOUNDFIELD ) >>= m_xField;
-
- // ...................................................
- // filter list and control class
- m_bFilterList = ::comphelper::hasProperty( PROPERTY_FILTERPROPOSAL, xControlModel ) && ::comphelper::getBOOL( xControlModel->getPropertyValue( PROPERTY_FILTERPROPOSAL ) );
- if ( m_bFilterList )
- m_nControlClass = FormComponentType::COMBOBOX;
- else
- {
- sal_Int16 nClassId = ::comphelper::getINT16( xControlModel->getPropertyValue( PROPERTY_CLASSID ) );
- switch (nClassId)
- {
- case FormComponentType::CHECKBOX:
- case FormComponentType::RADIOBUTTON:
- case FormComponentType::LISTBOX:
- case FormComponentType::COMBOBOX:
- m_nControlClass = nClassId;
- if ( FormComponentType::LISTBOX == nClassId )
- {
- Sequence< ::rtl::OUString > aDisplayItems;
- OSL_VERIFY( xControlModel->getPropertyValue( PROPERTY_STRINGITEMLIST ) >>= aDisplayItems );
- Sequence< ::rtl::OUString > aValueItems;
- OSL_VERIFY( xControlModel->getPropertyValue( PROPERTY_VALUE_SEQ ) >>= aValueItems );
- OSL_ENSURE( aDisplayItems.getLength() == aValueItems.getLength(), "OFilterControl::initialize: inconsistent item lists!" );
- for ( sal_Int32 i=0; i < ::std::min( aDisplayItems.getLength(), aValueItems.getLength() ); ++i )
- m_aDisplayItemToValueItem[ aDisplayItems[i] ] = aValueItems[i];
- }
- break;
- default:
- m_bMultiLine = ::comphelper::hasProperty( PROPERTY_MULTILINE, xControlModel ) && ::comphelper::getBOOL( xControlModel->getPropertyValue( PROPERTY_MULTILINE ) );
- m_nControlClass = FormComponentType::TEXTFIELD;
- break;
- }
- }
-
- // ...................................................
- // the connection meta data for the form which we're working for
- Reference< XChild > xModel( xControlModel, UNO_QUERY );
- Reference< XRowSet > xForm;
- if ( xModel.is() )
- xForm = xForm.query( xModel->getParent() );
- m_xConnection = ::dbtools::getConnection( xForm );
- OSL_ENSURE( m_xConnection.is(), "OFilterControl::initialize: unable to determine the form's connection!" );
- }
- }
- }
-
- //---------------------------------------------------------------------
- ::rtl::OUString SAL_CALL OFilterControl::getImplementationName( ) throw (RuntimeException)
- {
- return getImplementationName_Static();
- }
-
- //---------------------------------------------------------------------
- sal_Bool SAL_CALL OFilterControl::supportsService( const ::rtl::OUString& ServiceName ) throw (RuntimeException)
- {
- Sequence< ::rtl::OUString > aSupported( getSupportedServiceNames() );
- const ::rtl::OUString* pArray = aSupported.getConstArray();
- for( sal_Int32 i = 0; i < aSupported.getLength(); ++i, ++pArray )
- if( pArray->equals( ServiceName ) )
- return sal_True;
- return sal_False;
- }
-
- //---------------------------------------------------------------------
- Sequence< ::rtl::OUString > SAL_CALL OFilterControl::getSupportedServiceNames( ) throw (RuntimeException)
- {
- return getSupportedServiceNames_Static();
- }
-
- //---------------------------------------------------------------------
- ::rtl::OUString SAL_CALL OFilterControl::getImplementationName_Static()
- {
- return ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.comp.forms.OFilterControl" ) );
- }
-
- //---------------------------------------------------------------------
- Sequence< ::rtl::OUString > SAL_CALL OFilterControl::getSupportedServiceNames_Static()
- {
- Sequence< ::rtl::OUString > aNames( 2 );
- aNames[ 0 ] = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.form.control.FilterControl" ) );
- aNames[ 1 ] = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.awt.UnoControl" ) );
- return aNames;
- }
-
- //---------------------------------------------------------------------
- Reference< XInterface > SAL_CALL OFilterControl::Create( const Reference< XMultiServiceFactory >& _rxFactory )
- {
- return static_cast< XServiceInfo* >( new OFilterControl( _rxFactory ) );
- }
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Filter.hxx b/forms/source/component/Filter.hxx
deleted file mode 100644
index 316a214e8..000000000
--- a/forms/source/component/Filter.hxx
+++ /dev/null
@@ -1,161 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef FORMS_COMPONENT_FILTER_HXX
-#define FORMS_COMPONENT_FILTER_HXX
-
-#include <com/sun/star/lang/XServiceInfo.hpp>
-#include <com/sun/star/beans/XPropertySet.hpp>
-#include <com/sun/star/lang/XInitialization.hpp>
-#include <com/sun/star/form/XBoundComponent.hpp>
-#include <com/sun/star/util/XNumberFormatter.hpp>
-#include <com/sun/star/awt/XTextComponent.hpp>
-#include <com/sun/star/sdb/SQLContext.hpp>
-#include <toolkit/controls/unocontrol.hxx>
-
-#include <toolkit/helper/listenermultiplexer.hxx>
-#include <cppuhelper/implbase5.hxx>
-#include <comphelper/uno3.hxx>
-#include <comphelper/componentcontext.hxx>
-#include <cppuhelper/implbase4.hxx>
-#include <connectivity/sqlparse.hxx>
-#include <svx/ParseContext.hxx>
-
-#include <boost/unordered_map.hpp>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
- //=====================================================================
- // OFilterControl
- //=====================================================================
- typedef ::cppu::ImplHelper5 < ::com::sun::star::awt::XTextComponent
- , ::com::sun::star::awt::XFocusListener
- , ::com::sun::star::awt::XItemListener
- , ::com::sun::star::form::XBoundComponent
- , ::com::sun::star::lang::XInitialization
- > OFilterControl_BASE;
-
- class OFilterControl :public UnoControl
- ,public OFilterControl_BASE
- ,public ::svxform::OParseContextClient
- {
- TextListenerMultiplexer m_aTextListeners;
-
- ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet > m_xField;
- ::com::sun::star::uno::Reference< ::com::sun::star::util::XNumberFormatter > m_xFormatter;
- ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XConnection > m_xConnection;
- ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XDatabaseMetaData > m_xMetaData;
- ::com::sun::star::uno::Reference< ::com::sun::star::awt::XWindow > m_xMessageParent;
-
- typedef ::boost::unordered_map< ::rtl::OUString, ::rtl::OUString, ::rtl::OUStringHash > MapString2String;
- MapString2String m_aDisplayItemToValueItem;
-
- ::rtl::OUString m_aText;
- ::connectivity::OSQLParser m_aParser;
- sal_Int16 m_nControlClass; // which kind of control do we use?
- sal_Bool m_bFilterList : 1;
- sal_Bool m_bMultiLine : 1;
- sal_Bool m_bFilterListFilled : 1;
-
- private:
-// OFilterControl(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory >& _rxORB);
-
- void implInitFilterList();
-
- public:
- OFilterControl( const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory >& _rxORB );
-
- DECLARE_UNO3_AGG_DEFAULTS(OFilterControl,OWeakAggObject);
- ::com::sun::star::uno::Any SAL_CALL queryAggregation( const ::com::sun::star::uno::Type & rType ) throw(::com::sun::star::uno::RuntimeException);
-
- virtual ::rtl::OUString GetComponentServiceName();
- virtual void SAL_CALL createPeer( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XToolkit > & rxToolkit, const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XWindowPeer > & rParentPeer ) throw( ::com::sun::star::uno::RuntimeException );
-
- // ::com::sun::star::lang::XComponent
- virtual void SAL_CALL dispose(void) throw( ::com::sun::star::uno::RuntimeException );
-
- // ::com::sun::star::awt::XTextComponent
- virtual void SAL_CALL addTextListener( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XTextListener > & l ) throw( ::com::sun::star::uno::RuntimeException );
- virtual void SAL_CALL removeTextListener( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XTextListener > & l ) throw( ::com::sun::star::uno::RuntimeException );
- virtual void SAL_CALL setText( const ::rtl::OUString& aText ) throw( ::com::sun::star::uno::RuntimeException );
- virtual void SAL_CALL insertText( const ::com::sun::star::awt::Selection& rSel, const ::rtl::OUString& aText ) throw( ::com::sun::star::uno::RuntimeException );
- virtual ::rtl::OUString SAL_CALL getText() throw( ::com::sun::star::uno::RuntimeException );
- virtual ::rtl::OUString SAL_CALL getSelectedText() throw( ::com::sun::star::uno::RuntimeException );
- virtual void SAL_CALL setSelection( const ::com::sun::star::awt::Selection& aSelection ) throw( ::com::sun::star::uno::RuntimeException );
- virtual ::com::sun::star::awt::Selection SAL_CALL getSelection() throw( ::com::sun::star::uno::RuntimeException );
- virtual sal_Bool SAL_CALL isEditable() throw( ::com::sun::star::uno::RuntimeException );
- virtual void SAL_CALL setEditable( sal_Bool bEditable ) throw( ::com::sun::star::uno::RuntimeException );
- virtual void SAL_CALL setMaxTextLen( sal_Int16 nLength ) throw( ::com::sun::star::uno::RuntimeException );
- virtual sal_Int16 SAL_CALL getMaxTextLen() throw( ::com::sun::star::uno::RuntimeException );
-
- // ::com::sun::star::form::XBoundComponent
- virtual void SAL_CALL addUpdateListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XUpdateListener > & /*l*/) throw( ::com::sun::star::uno::RuntimeException ) {}
- virtual void SAL_CALL removeUpdateListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XUpdateListener > & /*l*/) throw( ::com::sun::star::uno::RuntimeException ) {}
- virtual sal_Bool SAL_CALL commit() throw( ::com::sun::star::uno::RuntimeException );
-
- // ::com::sun::star::lang::XEventListener
- virtual void SAL_CALL disposing(const ::com::sun::star::lang::EventObject& Source) throw( ::com::sun::star::uno::RuntimeException );
-
- // ::com::sun::star::awt::XFocusListener
- virtual void SAL_CALL focusGained(const ::com::sun::star::awt::FocusEvent& e) throw( ::com::sun::star::uno::RuntimeException );
- virtual void SAL_CALL focusLost(const ::com::sun::star::awt::FocusEvent& e) throw( ::com::sun::star::uno::RuntimeException );
-
- // ::com::sun::star::awt::XItemListener
- virtual void SAL_CALL itemStateChanged(const ::com::sun::star::awt::ItemEvent& rEvent) throw( ::com::sun::star::uno::RuntimeException );
-
- // ::com::sun::star::util::XInitialization
- virtual void SAL_CALL initialize( const ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Any >& aArguments ) throw (::com::sun::star::uno::Exception, ::com::sun::star::uno::RuntimeException);
-
- // XServiceInfo
- virtual ::rtl::OUString SAL_CALL getImplementationName( ) throw (::com::sun::star::uno::RuntimeException);
- virtual sal_Bool SAL_CALL supportsService( const ::rtl::OUString& ServiceName ) throw (::com::sun::star::uno::RuntimeException);
- virtual ::com::sun::star::uno::Sequence< ::rtl::OUString > SAL_CALL getSupportedServiceNames( ) throw (::com::sun::star::uno::RuntimeException);
-
- // com::sun::star::lang::XServiceInfo - static version
- static ::rtl::OUString SAL_CALL getImplementationName_Static();
- static ::com::sun::star::uno::Sequence< ::rtl::OUString > SAL_CALL getSupportedServiceNames_Static();
- static ::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface > SAL_CALL Create( const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory >& _rxFactory );
-
- protected:
- virtual void PrepareWindowDescriptor( ::com::sun::star::awt::WindowDescriptor& rDesc );
- virtual void ImplSetPeerProperty( const ::rtl::OUString& rPropName, const ::com::sun::star::uno::Any& rVal );
-
- sal_Bool ensureInitialized( );
-
- void displayException( const ::com::sun::star::sdb::SQLContext& _rExcept );
- };
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-#endif // FORMS_COMPONENT_FILTER_HXX
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/FixedText.cxx b/forms/source/component/FixedText.cxx
deleted file mode 100644
index 31ac62216..000000000
--- a/forms/source/component/FixedText.cxx
+++ /dev/null
@@ -1,138 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-
-
-#include "FixedText.hxx"
-#include "services.hxx"
-#include "property.hrc"
-#include "property.hxx"
-#include <tools/debug.hxx>
-
-//.........................................................................
-namespace frm
-{
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::sdb;
-using namespace ::com::sun::star::sdbc;
-using namespace ::com::sun::star::sdbcx;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::io;
-using namespace ::com::sun::star::lang;
-using namespace ::com::sun::star::util;
-
-//------------------------------------------------------------------------------
-InterfaceRef SAL_CALL OFixedTextModel_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory) throw (RuntimeException)
-{
- return *(new OFixedTextModel(_rxFactory));
-}
-
-//------------------------------------------------------------------
-DBG_NAME( OFixedTextModel )
-//------------------------------------------------------------------
-OFixedTextModel::OFixedTextModel( const Reference<XMultiServiceFactory>& _rxFactory )
- :OControlModel(_rxFactory, VCL_CONTROLMODEL_FIXEDTEXT)
-
-{
- DBG_CTOR( OFixedTextModel, NULL );
- m_nClassId = FormComponentType::FIXEDTEXT;
-}
-
-//------------------------------------------------------------------
-OFixedTextModel::OFixedTextModel( const OFixedTextModel* _pOriginal, const Reference<XMultiServiceFactory>& _rxFactory )
- :OControlModel( _pOriginal, _rxFactory )
-
-{
- DBG_CTOR( OFixedTextModel, NULL );
-}
-
-//------------------------------------------------------------------
-OFixedTextModel::~OFixedTextModel( )
-{
- DBG_DTOR( OFixedTextModel, NULL );
-}
-
-//------------------------------------------------------------------------------
-IMPLEMENT_DEFAULT_CLONING( OFixedTextModel )
-
-//------------------------------------------------------------------------------
-StringSequence SAL_CALL OFixedTextModel::getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException)
-{
- StringSequence aSupported = OControlModel::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 1);
-
- ::rtl::OUString* pArray = aSupported.getArray();
- pArray[aSupported.getLength()-1] = FRM_SUN_COMPONENT_FIXEDTEXT;
- return aSupported;
-}
-
-//------------------------------------------------------------------------------
-void OFixedTextModel::describeAggregateProperties( Sequence< Property >& _rAggregateProps ) const
-{
- OControlModel::describeAggregateProperties( _rAggregateProps );
- RemoveProperty( _rAggregateProps, PROPERTY_TABSTOP );
-}
-
-//------------------------------------------------------------------------------
-::rtl::OUString SAL_CALL OFixedTextModel::getServiceName() throw(RuntimeException)
-{
- return FRM_COMPONENT_FIXEDTEXT; // old (non-sun) name for compatibility !
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OFixedTextModel::write(const Reference<XObjectOutputStream>& _rxOutStream)
- throw(IOException, RuntimeException)
-{
- OControlModel::write(_rxOutStream);
-
- // Version
- _rxOutStream->writeShort(0x0002);
- writeHelpTextCompatibly(_rxOutStream);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OFixedTextModel::read(const Reference<XObjectInputStream>& _rxInStream) throw(IOException, RuntimeException)
-{
- OControlModel::read(_rxInStream);
-
- // Version
- sal_Int16 nVersion = _rxInStream->readShort();
- if (nVersion > 1)
- readHelpTextCompatibly(_rxInStream);
-}
-
-//.........................................................................
-}
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/FixedText.hxx b/forms/source/component/FixedText.hxx
deleted file mode 100644
index d9db90885..000000000
--- a/forms/source/component/FixedText.hxx
+++ /dev/null
@@ -1,73 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FORMS_FIXEDTEXT_HXX_
-#define _FORMS_FIXEDTEXT_HXX_
-
-#include "FormComponent.hxx"
-
-//.........................................................................
-namespace frm
-{
-
-//==================================================================
-// OFixedTextModel
-//==================================================================
-class OFixedTextModel
- :public OControlModel
-{
-public:
- DECLARE_DEFAULT_LEAF_XTOR( OFixedTextModel );
-
-// XServiceInfo
- IMPLEMENTATION_NAME(OFixedTextModel);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException);
-
-// XPersistObject
- virtual ::rtl::OUString SAL_CALL getServiceName() throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL
- write(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectOutputStream>& _rxOutStream) throw(::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL
- read(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectInputStream>& _rxInStream) throw(::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
-
- // OControlModel's property handling
- virtual void describeAggregateProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
-
-protected:
- DECLARE_XCLONEABLE();
-};
-
-//.........................................................................
-}
-//.........................................................................
-
-#endif // _FORMS_FIXEDTEXT_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/FormComponent.cxx b/forms/source/component/FormComponent.cxx
deleted file mode 100644
index d57723920..000000000
--- a/forms/source/component/FormComponent.cxx
+++ /dev/null
@@ -1,3070 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-
-#include "componenttools.hxx"
-#include "FormComponent.hxx"
-#include "frm_resource.hrc"
-#include "frm_resource.hxx"
-#include "property.hrc"
-#include "services.hxx"
-
-/** === begin UNO includes === **/
-#include <com/sun/star/awt/XTextComponent.hpp>
-#include <com/sun/star/awt/XVclWindowPeer.hpp>
-#include <com/sun/star/awt/XWindow.hpp>
-#include <com/sun/star/form/XForm.hpp>
-#include <com/sun/star/form/XLoadable.hpp>
-#include <com/sun/star/io/XMarkableStream.hpp>
-#include <com/sun/star/lang/DisposedException.hpp>
-#include <com/sun/star/sdb/XRowSetChangeBroadcaster.hpp>
-#include <com/sun/star/sdb/XRowSetSupplier.hpp>
-#include <com/sun/star/sdbc/ColumnValue.hpp>
-#include <com/sun/star/sdbc/DataType.hpp>
-#include <com/sun/star/util/XModifyBroadcaster.hpp>
-/** === end UNO includes === **/
-
-#include <comphelper/basicio.hxx>
-#include <comphelper/guarding.hxx>
-#include <comphelper/listenernotification.hxx>
-#include <comphelper/property.hxx>
-#include <connectivity/dbtools.hxx>
-#include <cppuhelper/queryinterface.hxx>
-#include <rtl/logfile.hxx>
-#include <toolkit/helper/emptyfontdescriptor.hxx>
-#include <tools/debug.hxx>
-#include <tools/diagnose_ex.h>
-
-#include <functional>
-#include <algorithm>
-
-
-//... namespace frm .......................................................
-namespace frm
-{
-//.........................................................................
-
- using namespace ::com::sun::star::uno;
- using namespace ::com::sun::star::sdb;
- using namespace ::com::sun::star::sdbc;
- using namespace ::com::sun::star::sdbcx;
- using namespace ::com::sun::star::beans;
- using namespace ::com::sun::star::container;
- using namespace ::com::sun::star::form;
- using namespace ::com::sun::star::awt;
- using namespace ::com::sun::star::io;
- using namespace ::com::sun::star::lang;
- using namespace ::com::sun::star::util;
- using namespace ::com::sun::star::form::binding;
- using namespace ::com::sun::star::form::validation;
- using namespace ::dbtools;
- using namespace ::comphelper;
-
- //=========================================================================
- //= FieldChangeNotifier
- //=========================================================================
- //-------------------------------------------------------------------------
- void ControlModelLock::impl_notifyAll_nothrow()
- {
- m_rModel.firePropertyChanges( m_aHandles, m_aOldValues, m_aNewValues, OControlModel::LockAccess() );
- }
-
- //-------------------------------------------------------------------------
- void ControlModelLock::addPropertyNotification( const sal_Int32 _nHandle, const Any& _rOldValue, const Any& _rNewValue )
- {
- sal_Int32 nOldLength = m_aHandles.getLength();
- if ( ( nOldLength != m_aOldValues.getLength() )
- || ( nOldLength != m_aNewValues.getLength() )
- )
- throw RuntimeException( ::rtl::OUString(), m_rModel );
-
- m_aHandles.realloc( nOldLength + 1 );
- m_aHandles[ nOldLength ] = _nHandle;
- m_aOldValues.realloc( nOldLength + 1 );
- m_aOldValues[ nOldLength ] = _rOldValue;
- m_aNewValues.realloc( nOldLength + 1 );
- m_aNewValues[ nOldLength ] = _rNewValue;
- }
-
- //=========================================================================
- //= FieldChangeNotifier
- //=========================================================================
- //-------------------------------------------------------------------------
- class FieldChangeNotifier
- {
- public:
- FieldChangeNotifier( ControlModelLock& _rLock )
- :m_rLock( _rLock )
- ,m_rModel( dynamic_cast< OBoundControlModel& >( _rLock.getModel() ) )
- {
- m_xOldField = m_rModel.getField();
- }
-
- ~FieldChangeNotifier()
- {
- Reference< XPropertySet > xNewField( m_rModel.getField() );
- if ( m_xOldField != xNewField )
- m_rLock.addPropertyNotification( PROPERTY_ID_BOUNDFIELD, makeAny( m_xOldField ), makeAny( xNewField ) );
- }
-
- private:
- ControlModelLock& m_rLock;
- OBoundControlModel& m_rModel;
- Reference< XPropertySet > m_xOldField;
- };
-
-//=============================================================================
-//= base class for form layer controls
-//=============================================================================
-DBG_NAME(frm_OControl)
-//------------------------------------------------------------------------------
-OControl::OControl( const Reference< XMultiServiceFactory >& _rxFactory, const rtl::OUString& _rAggregateService, const sal_Bool _bSetDelegator )
- :OComponentHelper(m_aMutex)
- ,m_aContext( _rxFactory )
-{
- DBG_CTOR(frm_OControl, NULL);
- // VCL-Control aggregieren
- // bei Aggregation den Refcount um eins erhoehen da im setDelegator
- // das Aggregat selbst den Refcount erhoeht
- increment( m_refCount );
- {
- m_xAggregate = m_xAggregate.query( _rxFactory->createInstance( _rAggregateService ) );
- m_xControl = m_xControl.query( m_xAggregate );
- }
- decrement( m_refCount );
-
- if ( _bSetDelegator )
- doSetDelegator();
-}
-
-//------------------------------------------------------------------------------
-OControl::~OControl()
-{
- DBG_DTOR(frm_OControl, NULL);
- doResetDelegator();
-}
-
-//------------------------------------------------------------------------------
-void OControl::doResetDelegator()
-{
- if ( m_xAggregate.is() )
- m_xAggregate->setDelegator( NULL );
-}
-
-//------------------------------------------------------------------------------
-void OControl::doSetDelegator()
-{
- increment( m_refCount );
- if ( m_xAggregate.is() )
- { // those brackets are important for some compilers, don't remove!
- // (they ensure that the temporary object created in the line below
- // is destroyed *before* the refcount-decrement)
- m_xAggregate->setDelegator( static_cast< XWeak* >( this ) );
- }
- decrement( m_refCount );
-}
-
-// UNO Anbindung
-//------------------------------------------------------------------------------
-Any SAL_CALL OControl::queryAggregation( const Type& _rType ) throw(RuntimeException)
-{
- // ask the base class
- Any aReturn( OComponentHelper::queryAggregation(_rType) );
- // ask our own interfaces
- if (!aReturn.hasValue())
- {
- aReturn = OControl_BASE::queryInterface(_rType);
- // ask our aggregate
- if (!aReturn.hasValue() && m_xAggregate.is())
- aReturn = m_xAggregate->queryAggregation(_rType);
- }
-
- return aReturn;
-}
-
-//------------------------------------------------------------------------------
-Sequence<sal_Int8> SAL_CALL OControl::getImplementationId() throw(RuntimeException)
-{
- return OImplementationIds::getImplementationId(getTypes());
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> SAL_CALL OControl::getTypes() throw(RuntimeException)
-{
- TypeBag aTypes( _getTypes() );
-
- Reference< XTypeProvider > xProv;
- if ( query_aggregation( m_xAggregate, xProv ) )
- aTypes.addTypes( xProv->getTypes() );
-
- return aTypes.getTypes();
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> OControl::_getTypes()
-{
- return TypeBag( OComponentHelper::getTypes(), OControl_BASE::getTypes() ).getTypes();
-}
-
-//------------------------------------------------------------------------------
-void OControl::initFormControlPeer( const Reference< XWindowPeer >& /*_rxPeer*/ )
-{
- // nothing to do here
-}
-
-// OComponentHelper
-//------------------------------------------------------------------------------
-void OControl::disposing()
-{
- OComponentHelper::disposing();
-
- m_aWindowStateGuard.attach( NULL, NULL );
-
- Reference< XComponent > xComp;
- if (query_aggregation(m_xAggregate, xComp))
- xComp->dispose();
-}
-
-// XServiceInfo
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL OControl::supportsService(const rtl::OUString& _rsServiceName) throw ( RuntimeException)
-{
- Sequence<rtl::OUString> aSupported = getSupportedServiceNames();
- const rtl::OUString* pSupported = aSupported.getConstArray();
- for (sal_Int32 i=0; i<aSupported.getLength(); ++i, ++pSupported)
- if (pSupported->equals(_rsServiceName))
- return sal_True;
- return sal_False;
-}
-
-//------------------------------------------------------------------------------
-Sequence< ::rtl::OUString > OControl::getAggregateServiceNames()
-{
- Sequence< ::rtl::OUString > aAggServices;
- Reference< XServiceInfo > xInfo;
- if ( query_aggregation( m_xAggregate, xInfo ) )
- aAggServices = xInfo->getSupportedServiceNames();
- return aAggServices;
-}
-
-//------------------------------------------------------------------------------
-Sequence<rtl::OUString> SAL_CALL OControl::getSupportedServiceNames() throw(RuntimeException)
-{
- return ::comphelper::concatSequences(
- getAggregateServiceNames(),
- getSupportedServiceNames_Static()
- );
-}
-
-//------------------------------------------------------------------------------
-Sequence< ::rtl::OUString > SAL_CALL OControl::getSupportedServiceNames_Static() throw( RuntimeException )
-{
- // no own supported service names
- return Sequence< ::rtl::OUString >();
-}
-
-// XEventListener
-//------------------------------------------------------------------------------
-void SAL_CALL OControl::disposing(const com::sun::star::lang::EventObject& _rEvent) throw (RuntimeException)
-{
- Reference< XInterface > xAggAsIface;
- query_aggregation(m_xAggregate, xAggAsIface);
-
- // does the disposing come from the aggregate ?
- if (xAggAsIface != Reference< XInterface >(_rEvent.Source, UNO_QUERY))
- { // no -> forward it
- Reference<com::sun::star::lang::XEventListener> xListener;
- if (query_aggregation(m_xAggregate, xListener))
- xListener->disposing(_rEvent);
- }
-}
-
-// XControl
-//------------------------------------------------------------------------------
-void SAL_CALL OControl::setContext(const Reference< XInterface >& Context) throw (RuntimeException)
-{
- if (m_xControl.is())
- m_xControl->setContext(Context);
-}
-
-//------------------------------------------------------------------------------
-Reference< XInterface > SAL_CALL OControl::getContext() throw (RuntimeException)
-{
- return m_xControl.is() ? m_xControl->getContext() : Reference< XInterface >();
-}
-
-//------------------------------------------------------------------------------
-void OControl::impl_resetStateGuard_nothrow()
-{
- Reference< XWindow2 > xWindow;
- Reference< XControlModel > xModel;
- try
- {
- xWindow.set( getPeer(), UNO_QUERY );
- xModel.set( getModel(), UNO_QUERY );
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- m_aWindowStateGuard.attach( xWindow, xModel );
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OControl::createPeer(const Reference<XToolkit>& _rxToolkit, const Reference<XWindowPeer>& _rxParent) throw (RuntimeException)
-{
- if ( m_xControl.is() )
- {
- m_xControl->createPeer( _rxToolkit, _rxParent );
-
- initFormControlPeer( getPeer() );
-
- impl_resetStateGuard_nothrow();
- }
-}
-
-//------------------------------------------------------------------------------
-Reference<XWindowPeer> SAL_CALL OControl::getPeer() throw ( RuntimeException)
-{
- return m_xControl.is() ? m_xControl->getPeer() : Reference<XWindowPeer>();
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL OControl::setModel(const Reference<XControlModel>& Model) throw ( RuntimeException)
-{
- if ( !m_xControl.is() )
- return sal_False;
-
- sal_Bool bSuccess = m_xControl->setModel( Model );
- impl_resetStateGuard_nothrow();
- return bSuccess;
-}
-
-//------------------------------------------------------------------------------
-Reference<XControlModel> SAL_CALL OControl::getModel() throw ( RuntimeException)
-{
- return m_xControl.is() ? m_xControl->getModel() : Reference<XControlModel>();
-}
-
-//------------------------------------------------------------------------------
-Reference<XView> SAL_CALL OControl::getView() throw ( RuntimeException)
-{
- return m_xControl.is() ? m_xControl->getView() : Reference<XView>();
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OControl::setDesignMode(sal_Bool bOn) throw ( RuntimeException)
-{
- if (m_xControl.is())
- m_xControl->setDesignMode(bOn);
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL OControl::isDesignMode() throw ( RuntimeException)
-{
- return m_xControl.is() ? m_xControl->isDesignMode() : sal_True;
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL OControl::isTransparent() throw ( RuntimeException)
-{
- return m_xControl.is() ? m_xControl->isTransparent() : sal_True;
-}
-
-//==================================================================
-//= OBoundControl
-//==================================================================
-DBG_NAME(frm_OBoundControl);
-//------------------------------------------------------------------
-OBoundControl::OBoundControl( const Reference< XMultiServiceFactory >& _rxFactory,
- const ::rtl::OUString& _rAggregateService, const sal_Bool _bSetDelegator )
- :OControl( _rxFactory, _rAggregateService, _bSetDelegator )
- ,m_bLocked(sal_False)
- ,m_aOriginalFont( EmptyFontDescriptor() )
- ,m_nOriginalTextLineColor( 0 )
-{
- DBG_CTOR(frm_OBoundControl, NULL);
-}
-
-//------------------------------------------------------------------
-OBoundControl::~OBoundControl()
-{
- DBG_DTOR(frm_OBoundControl, NULL);
-}
-// -----------------------------------------------------------------------------
-Sequence< Type> OBoundControl::_getTypes()
-{
- return TypeBag( OControl::_getTypes(), OBoundControl_BASE::getTypes() ).getTypes();
-}
-//------------------------------------------------------------------
-Any SAL_CALL OBoundControl::queryAggregation(const Type& _rType) throw(RuntimeException)
-{
- Any aReturn;
-
- // XTypeProvider first - don't ask the OBoundControl_BASE, it would deliver incomplete types
- if ( _rType.equals( ::getCppuType( static_cast< Reference< XTypeProvider >* >( NULL ) ) ) )
- aReturn = OControl::queryAggregation( _rType );
-
- // ask our own interfaces
- // (do this first (except XTypeProvider ) - we want to "overwrite" XPropertiesChangeListener)
- if ( !aReturn.hasValue() )
- aReturn = OBoundControl_BASE::queryInterface( _rType );
-
- // ask the base class
- if ( !aReturn.hasValue() )
- aReturn = OControl::queryAggregation( _rType );
-
- return aReturn;
-}
-
-//------------------------------------------------------------------
-sal_Bool SAL_CALL OBoundControl::getLock() throw(RuntimeException)
-{
- return m_bLocked;
-}
-
-//------------------------------------------------------------------
-void SAL_CALL OBoundControl::setLock(sal_Bool _bLock) throw(RuntimeException)
-{
- if (m_bLocked == _bLock)
- return;
-
- osl::MutexGuard aGuard(m_aMutex);
- _setLock(_bLock);
- m_bLocked = _bLock;
-}
-
-//------------------------------------------------------------------
-void OBoundControl::_setLock(sal_Bool _bLock)
-{
- // try to set the text component to readonly
- Reference< XWindowPeer > xPeer = getPeer();
- Reference< XTextComponent > xText( xPeer, UNO_QUERY );
-
- if ( xText.is() )
- xText->setEditable( !_bLock );
- else
- {
- // disable the window
- Reference< XWindow > xComp( xPeer, UNO_QUERY );
- if ( xComp.is() )
- xComp->setEnable( !_bLock );
- }
-}
-
-//--------------------------------------------------------------------
-sal_Bool SAL_CALL OBoundControl::setModel( const Reference< XControlModel >& _rxModel ) throw (RuntimeException)
-{
- return OControl::setModel( _rxModel );
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OBoundControl::disposing(const EventObject& Source) throw (RuntimeException)
-{
- // just disambiguate
- OControl::disposing(Source);
-}
-
-//--------------------------------------------------------------------
-void OBoundControl::disposing()
-{
- OControl::disposing();
-}
-
-//==================================================================
-//= OControlModel
-//==================================================================
-DBG_NAME(OControlModel)
-//------------------------------------------------------------------
-Sequence<sal_Int8> SAL_CALL OControlModel::getImplementationId() throw(RuntimeException)
-{
- return OImplementationIds::getImplementationId(getTypes());
-}
-
-//------------------------------------------------------------------
-Sequence<Type> SAL_CALL OControlModel::getTypes() throw(RuntimeException)
-{
- TypeBag aTypes( _getTypes() );
-
- Reference< XTypeProvider > xProv;
- if ( query_aggregation( m_xAggregate, xProv ) )
- aTypes.addTypes( xProv->getTypes() );
-
- return aTypes.getTypes();
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> OControlModel::_getTypes()
-{
- return TypeBag( OComponentHelper::getTypes(),
- OPropertySetAggregationHelper::getTypes(),
- OControlModel_BASE::getTypes()
- ).getTypes();
-}
-
-//------------------------------------------------------------------
-Any SAL_CALL OControlModel::queryAggregation(const Type& _rType) throw (RuntimeException)
-{
- // base class 1
- Any aReturn(OComponentHelper::queryAggregation(_rType));
-
- // base class 2
- if (!aReturn.hasValue())
- {
- aReturn = OControlModel_BASE::queryInterface(_rType);
-
- // our own interfaces
- if (!aReturn.hasValue())
- {
- aReturn = OPropertySetAggregationHelper::queryInterface(_rType);
- // our aggregate
- if (!aReturn.hasValue() && m_xAggregate.is() && !_rType.equals(::getCppuType(static_cast< Reference< XCloneable>* >(NULL))))
- aReturn = m_xAggregate->queryAggregation(_rType);
- }
- }
- return aReturn;
-}
-
-//------------------------------------------------------------------------------
-void OControlModel::readHelpTextCompatibly(const staruno::Reference< stario::XObjectInputStream >& _rxInStream)
-{
- ::rtl::OUString sHelpText;
- ::comphelper::operator>>( _rxInStream, sHelpText);
- try
- {
- if (m_xAggregateSet.is())
- m_xAggregateSet->setPropertyValue(PROPERTY_HELPTEXT, makeAny(sHelpText));
- }
- catch(const Exception&)
- {
- OSL_FAIL("OControlModel::readHelpTextCompatibly: could not forward the property value to the aggregate!");
- }
-}
-
-//------------------------------------------------------------------------------
-void OControlModel::writeHelpTextCompatibly(const staruno::Reference< stario::XObjectOutputStream >& _rxOutStream)
-{
- ::rtl::OUString sHelpText;
- try
- {
- if (m_xAggregateSet.is())
- m_xAggregateSet->getPropertyValue(PROPERTY_HELPTEXT) >>= sHelpText;
- }
- catch(const Exception&)
- {
- OSL_FAIL("OControlModel::writeHelpTextCompatibly: could not retrieve the property value from the aggregate!");
- }
- ::comphelper::operator<<( _rxOutStream, sHelpText);
-}
-
-//------------------------------------------------------------------
-OControlModel::OControlModel(
- const Reference<com::sun::star::lang::XMultiServiceFactory>& _rxFactory,
- const ::rtl::OUString& _rUnoControlModelTypeName,
- const ::rtl::OUString& rDefault, const sal_Bool _bSetDelegator)
- :OComponentHelper(m_aMutex)
- ,OPropertySetAggregationHelper(OComponentHelper::rBHelper)
- ,m_aContext( _rxFactory )
- ,m_lockCount( 0 )
- ,m_aPropertyBagHelper( *this )
- ,m_nTabIndex(FRM_DEFAULT_TABINDEX)
- ,m_nClassId(FormComponentType::CONTROL)
- ,m_bNativeLook( sal_False )
- // form controls are usually embedded into documents, not dialogs, and in documents
- // the native look is ugly ....
- // #i37342#
-{
- DBG_CTOR(OControlModel, NULL);
- if (_rUnoControlModelTypeName.getLength()) // the is a model we have to aggregate
- {
- increment(m_refCount);
-
- {
- m_xAggregate = Reference<XAggregation>(_rxFactory->createInstance(_rUnoControlModelTypeName), UNO_QUERY);
- setAggregation(m_xAggregate);
-
- if ( m_xAggregateSet.is() )
- {
- try
- {
- if ( rDefault.getLength() )
- m_xAggregateSet->setPropertyValue( PROPERTY_DEFAULTCONTROL, makeAny( rDefault ) );
- }
- catch( const Exception& )
- {
- OSL_FAIL( "OControlModel::OControlModel: caught an exception!" );
- }
- }
- }
-
- if (_bSetDelegator)
- doSetDelegator();
-
- // Refcount wieder bei NULL
- decrement(m_refCount);
- }
-}
-
-//------------------------------------------------------------------
-OControlModel::OControlModel( const OControlModel* _pOriginal, const Reference< XMultiServiceFactory>& _rxFactory, const sal_Bool _bCloneAggregate, const sal_Bool _bSetDelegator )
- :OComponentHelper( m_aMutex )
- ,OPropertySetAggregationHelper( OComponentHelper::rBHelper )
- ,m_aContext( _rxFactory )
- ,m_lockCount( 0 )
- ,m_aPropertyBagHelper( *this )
- ,m_nTabIndex( FRM_DEFAULT_TABINDEX )
- ,m_nClassId( FormComponentType::CONTROL )
-{
- DBG_CTOR( OControlModel, NULL );
- DBG_ASSERT( _pOriginal, "OControlModel::OControlModel: invalid original!" );
-
- // copy members
- m_aName = _pOriginal->m_aName;
- m_aTag = _pOriginal->m_aTag;
- m_nTabIndex = _pOriginal->m_nTabIndex;
- m_nClassId = _pOriginal->m_nClassId;
- m_bNativeLook = _pOriginal->m_bNativeLook;
-
- if ( _bCloneAggregate )
- {
- // temporarily increment refcount because of temporary references to ourself in the following
- increment( m_refCount );
-
- {
- // transfer the (only, at the very moment!) ref count
- m_xAggregate = createAggregateClone( _pOriginal );
-
- // set aggregation (retrieve other direct interfaces of the aggregate)
- setAggregation( m_xAggregate );
- }
-
- // set the delegator, if allowed by our derived class
- if ( _bSetDelegator )
- doSetDelegator();
-
- // decrement ref count
- decrement( m_refCount );
- }
-}
-
-//------------------------------------------------------------------
-OControlModel::~OControlModel()
-{
- // release the aggregate
- doResetDelegator( );
-
- DBG_DTOR(OControlModel, NULL);
-}
-
-//------------------------------------------------------------------
-void OControlModel::clonedFrom( const OControlModel* /*_pOriginal*/ )
-{
- // nothing to do in this base class
-}
-
-//------------------------------------------------------------------------------
-void OControlModel::doResetDelegator()
-{
- if (m_xAggregate.is())
- m_xAggregate->setDelegator(NULL);
-}
-
-//------------------------------------------------------------------------------
-void OControlModel::doSetDelegator()
-{
- increment(m_refCount);
- if (m_xAggregate.is())
- {
- m_xAggregate->setDelegator(static_cast<XWeak*>(this));
- }
- decrement(m_refCount);
-}
-
-// XChild
-//------------------------------------------------------------------------------
-Reference< XInterface > SAL_CALL OControlModel::getParent() throw(RuntimeException)
-{
- return m_xParent;
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OControlModel::setParent(const Reference< XInterface >& _rxParent) throw(com::sun::star::lang::NoSupportException, RuntimeException)
-{
- osl::MutexGuard aGuard(m_aMutex);
-
- Reference<XComponent> xComp(m_xParent, UNO_QUERY);
- if (xComp.is())
- xComp->removeEventListener(static_cast<XPropertiesChangeListener*>(this));
-
- m_xParent = _rxParent;
- xComp = xComp.query( m_xParent );
-
- if ( xComp.is() )
- xComp->addEventListener(static_cast<XPropertiesChangeListener*>(this));
-}
-
-// XNamed
-//------------------------------------------------------------------------------
-::rtl::OUString SAL_CALL OControlModel::getName() throw(RuntimeException)
-{
- ::rtl::OUString aReturn;
- OPropertySetHelper::getFastPropertyValue(PROPERTY_ID_NAME) >>= aReturn;
- return aReturn;
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OControlModel::setName(const ::rtl::OUString& _rName) throw(RuntimeException)
-{
- setFastPropertyValue(PROPERTY_ID_NAME, makeAny(_rName));
-}
-
-// XServiceInfo
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL OControlModel::supportsService(const rtl::OUString& _rServiceName) throw ( RuntimeException)
-{
- Sequence<rtl::OUString> aSupported = getSupportedServiceNames();
- const rtl::OUString* pSupported = aSupported.getConstArray();
- for (sal_Int32 i=0; i<aSupported.getLength(); ++i, ++pSupported)
- if (pSupported->equals(_rServiceName))
- return sal_True;
- return sal_False;
-}
-
-//------------------------------------------------------------------------------
-Sequence< ::rtl::OUString > OControlModel::getAggregateServiceNames()
-{
- Sequence< ::rtl::OUString > aAggServices;
- Reference< XServiceInfo > xInfo;
- if ( query_aggregation( m_xAggregate, xInfo ) )
- aAggServices = xInfo->getSupportedServiceNames();
- return aAggServices;
-}
-
-//------------------------------------------------------------------------------
-Sequence<rtl::OUString> SAL_CALL OControlModel::getSupportedServiceNames() throw(RuntimeException)
-{
- return ::comphelper::concatSequences(
- getAggregateServiceNames(),
- getSupportedServiceNames_Static()
- );
-}
-
-//------------------------------------------------------------------------------
-Sequence< ::rtl::OUString > SAL_CALL OControlModel::getSupportedServiceNames_Static() throw( RuntimeException )
-{
- Sequence< ::rtl::OUString > aServiceNames( 2 );
- aServiceNames[ 0 ] = FRM_SUN_FORMCOMPONENT;
- aServiceNames[ 1 ] = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.form.FormControlModel") );
- return aServiceNames;
-}
-
-// XEventListener
-//------------------------------------------------------------------------------
-void SAL_CALL OControlModel::disposing(const com::sun::star::lang::EventObject& _rSource) throw (RuntimeException)
-{
- // release the parent
- if (_rSource.Source == m_xParent)
- {
- osl::MutexGuard aGuard(m_aMutex);
- m_xParent = NULL;
- }
- else
- {
- Reference<com::sun::star::lang::XEventListener> xEvtLst;
- if (query_aggregation(m_xAggregate, xEvtLst))
- {
- osl::MutexGuard aGuard(m_aMutex);
- xEvtLst->disposing(_rSource);
- }
- }
-}
-
-// OComponentHelper
-//-----------------------------------------------------------------------------
-void OControlModel::disposing()
-{
- OPropertySetAggregationHelper::disposing();
-
- Reference<com::sun::star::lang::XComponent> xComp;
- if (query_aggregation(m_xAggregate, xComp))
- xComp->dispose();
-
- setParent(Reference<XFormComponent>());
-
- m_aPropertyBagHelper.dispose();
-}
-
-//------------------------------------------------------------------------------
-void OControlModel::writeAggregate( const Reference< XObjectOutputStream >& _rxOutStream ) const
-{
- Reference< XPersistObject > xPersist;
- if ( query_aggregation( m_xAggregate, xPersist ) )
- xPersist->write( _rxOutStream );
-}
-
-//------------------------------------------------------------------------------
-void OControlModel::readAggregate( const Reference< XObjectInputStream >& _rxInStream )
-{
- Reference< XPersistObject > xPersist;
- if ( query_aggregation( m_xAggregate, xPersist ) )
- xPersist->read( _rxInStream );
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OControlModel::write(const Reference<stario::XObjectOutputStream>& _rxOutStream)
- throw(stario::IOException, RuntimeException)
-{
- osl::MutexGuard aGuard(m_aMutex);
-
- // 1. Schreiben des UnoControls
- Reference<stario::XMarkableStream> xMark(_rxOutStream, UNO_QUERY);
- if ( !xMark.is() )
- {
- throw IOException(
- FRM_RES_STRING( RID_STR_INVALIDSTREAM ),
- static_cast< ::cppu::OWeakObject* >( this )
- );
- }
-
- sal_Int32 nMark = xMark->createMark();
- sal_Int32 nLen = 0;
-
- _rxOutStream->writeLong(nLen);
-
- writeAggregate( _rxOutStream );
-
- // feststellen der Laenge
- nLen = xMark->offsetToMark(nMark) - 4;
- xMark->jumpToMark(nMark);
- _rxOutStream->writeLong(nLen);
- xMark->jumpToFurthest();
- xMark->deleteMark(nMark);
-
- // 2. Schreiben einer VersionsNummer
- _rxOutStream->writeShort(0x0003);
-
- // 3. Schreiben der allgemeinen Properties
- ::comphelper::operator<<( _rxOutStream, m_aName);
- _rxOutStream->writeShort(m_nTabIndex);
- ::comphelper::operator<<( _rxOutStream, m_aTag); // 3. version
-
- // !!! IMPORTANT NOTE !!!
- // don't write any new members here : this wouldn't be compatible with older versions, as OControlModel
- // is a base class which is called in derived classes "read" method. So if you increment the version
- // and write new stuff, older office versions will read this in the _derived_ classes, which may result
- // in anything from data loss to crash.
- // !!! EOIN !!!
-}
-
-//------------------------------------------------------------------------------
-void OControlModel::read(const Reference<stario::XObjectInputStream>& InStream) throw (::com::sun::star::io::IOException, RuntimeException)
-{
- osl::MutexGuard aGuard(m_aMutex);
-
- Reference<stario::XMarkableStream> xMark(InStream, UNO_QUERY);
- if ( !xMark.is() )
- {
- throw IOException(
- FRM_RES_STRING( RID_STR_INVALIDSTREAM ),
- static_cast< ::cppu::OWeakObject* >( this )
- );
- }
-
- // 1. Lesen des UnoControls
- sal_Int32 nLen = InStream->readLong();
- if (nLen)
- {
- sal_Int32 nMark = xMark->createMark();
-
- try
- {
- readAggregate( InStream );
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
-
- xMark->jumpToMark(nMark);
- InStream->skipBytes(nLen);
- xMark->deleteMark(nMark);
- }
-
- // 2. Lesen des Versionsnummer
- sal_uInt16 nVersion = InStream->readShort();
-
- // 3. Lesen der allgemeinen Properties
- ::comphelper::operator>>( InStream, m_aName);
- m_nTabIndex = InStream->readShort();
-
- if (nVersion > 0x0002)
- ::comphelper::operator>>( InStream, m_aTag);
-
- // we had a version where we wrote the help text
- if (nVersion == 0x0004)
- readHelpTextCompatibly(InStream);
-
- DBG_ASSERT(nVersion < 5, "OControlModel::read : suspicious version number !");
- // 4 was the version where we wrote the help text
- // later versions shouldn't exist (see write for a detailed comment)
-}
-
-//------------------------------------------------------------------------------
-PropertyState OControlModel::getPropertyStateByHandle( sal_Int32 _nHandle )
-{
- // simply compare the current and the default value
- Any aCurrentValue = getPropertyDefaultByHandle( _nHandle );
- Any aDefaultValue; getFastPropertyValue( aDefaultValue, _nHandle );
-
- sal_Bool bEqual = uno_type_equalData(
- const_cast< void* >( aCurrentValue.getValue() ), aCurrentValue.getValueType().getTypeLibType(),
- const_cast< void* >( aDefaultValue.getValue() ), aDefaultValue.getValueType().getTypeLibType(),
- reinterpret_cast< uno_QueryInterfaceFunc >(cpp_queryInterface),
- reinterpret_cast< uno_ReleaseFunc >(cpp_release)
- );
- return bEqual ? PropertyState_DEFAULT_VALUE : PropertyState_DIRECT_VALUE;
-}
-
-//------------------------------------------------------------------------------
-void OControlModel::setPropertyToDefaultByHandle( sal_Int32 _nHandle)
-{
- Any aDefault = getPropertyDefaultByHandle( _nHandle );
-
- Any aConvertedValue, aOldValue;
- if ( convertFastPropertyValue( aConvertedValue, aOldValue, _nHandle, aDefault ) )
- {
- setFastPropertyValue_NoBroadcast( _nHandle, aConvertedValue );
- // TODO: fire the property change
- }
-}
-
-//------------------------------------------------------------------------------
-Any OControlModel::getPropertyDefaultByHandle( sal_Int32 _nHandle ) const
-{
- Any aReturn;
- switch ( _nHandle )
- {
- case PROPERTY_ID_NAME:
- case PROPERTY_ID_TAG:
- aReturn <<= ::rtl::OUString();
- break;
-
- case PROPERTY_ID_CLASSID:
- aReturn <<= (sal_Int16)FormComponentType::CONTROL;
- break;
-
- case PROPERTY_ID_TABINDEX:
- aReturn <<= (sal_Int16)FRM_DEFAULT_TABINDEX;
- break;
-
- case PROPERTY_ID_NATIVE_LOOK:
- aReturn <<= (sal_Bool)sal_True;
- break;
-
- default:
- if ( m_aPropertyBagHelper.hasDynamicPropertyByHandle( _nHandle ) )
- m_aPropertyBagHelper.getDynamicPropertyDefaultByHandle( _nHandle, aReturn );
- else
- OSL_FAIL( "OControlModel::convertFastPropertyValue: unknown handle!" );
- }
- return aReturn;
-}
-
-//------------------------------------------------------------------------------
-void OControlModel::getFastPropertyValue( Any& _rValue, sal_Int32 _nHandle ) const
-{
- switch ( _nHandle )
- {
- case PROPERTY_ID_NAME:
- _rValue <<= m_aName;
- break;
- case PROPERTY_ID_TAG:
- _rValue <<= m_aTag;
- break;
- case PROPERTY_ID_CLASSID:
- _rValue <<= m_nClassId;
- break;
- case PROPERTY_ID_TABINDEX:
- _rValue <<= m_nTabIndex;
- break;
- case PROPERTY_ID_NATIVE_LOOK:
- _rValue <<= (sal_Bool)m_bNativeLook;
- break;
- default:
- if ( m_aPropertyBagHelper.hasDynamicPropertyByHandle( _nHandle ) )
- m_aPropertyBagHelper.getDynamicFastPropertyValue( _nHandle, _rValue );
- else
- OPropertySetAggregationHelper::getFastPropertyValue( _rValue, _nHandle );
- break;
- }
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OControlModel::convertFastPropertyValue(
- Any& _rConvertedValue, Any& _rOldValue, sal_Int32 _nHandle, const Any& _rValue)
- throw (com::sun::star::lang::IllegalArgumentException)
-{
- sal_Bool bModified(sal_False);
- switch (_nHandle)
- {
- case PROPERTY_ID_NAME:
- bModified = tryPropertyValue(_rConvertedValue, _rOldValue, _rValue, m_aName);
- break;
- case PROPERTY_ID_TAG:
- bModified = tryPropertyValue(_rConvertedValue, _rOldValue, _rValue, m_aTag);
- break;
- case PROPERTY_ID_TABINDEX:
- bModified = tryPropertyValue(_rConvertedValue, _rOldValue, _rValue, m_nTabIndex);
- break;
- case PROPERTY_ID_NATIVE_LOOK:
- bModified = tryPropertyValue(_rConvertedValue, _rOldValue, _rValue, m_bNativeLook);
- break;
- default:
- if ( m_aPropertyBagHelper.hasDynamicPropertyByHandle( _nHandle ) )
- bModified = m_aPropertyBagHelper.convertDynamicFastPropertyValue( _nHandle, _rValue, _rConvertedValue, _rOldValue );
- else
- OSL_FAIL( "OControlModel::convertFastPropertyValue: unknown handle!" );
- break;
- }
- return bModified;
-}
-
-//------------------------------------------------------------------------------
-void OControlModel::setFastPropertyValue_NoBroadcast(sal_Int32 _nHandle, const Any& _rValue)
- throw (Exception)
-{
- switch (_nHandle)
- {
- case PROPERTY_ID_NAME:
- DBG_ASSERT(_rValue.getValueType() == getCppuType((const ::rtl::OUString*)NULL),
- "OControlModel::setFastPropertyValue_NoBroadcast : invalid type" );
- _rValue >>= m_aName;
- break;
- case PROPERTY_ID_TAG:
- DBG_ASSERT(_rValue.getValueType() == getCppuType((const ::rtl::OUString*)NULL),
- "OControlModel::setFastPropertyValue_NoBroadcast : invalid type" );
- _rValue >>= m_aTag;
- break;
- case PROPERTY_ID_TABINDEX:
- DBG_ASSERT(_rValue.getValueType() == getCppuType((const sal_Int16*)NULL),
- "OControlModel::setFastPropertyValue_NoBroadcast : invalid type" );
- _rValue >>= m_nTabIndex;
- break;
- case PROPERTY_ID_NATIVE_LOOK:
- OSL_VERIFY( _rValue >>= m_bNativeLook );
- break;
- default:
- if ( m_aPropertyBagHelper.hasDynamicPropertyByHandle( _nHandle ) )
- m_aPropertyBagHelper.setDynamicFastPropertyValue( _nHandle, _rValue );
- else
- OSL_FAIL( "OControlModel::setFastPropertyValue_NoBroadcast: unknown handle!" );
- break;
- }
-}
-
-//------------------------------------------------------------------------------
-void OControlModel::describeFixedProperties( Sequence< Property >& _rProps ) const
-{
- BEGIN_DESCRIBE_BASE_PROPERTIES( 4 )
- DECL_PROP2 (CLASSID, sal_Int16, READONLY, TRANSIENT);
- DECL_PROP1 (NAME, ::rtl::OUString, BOUND);
- DECL_BOOL_PROP2 (NATIVE_LOOK, BOUND, TRANSIENT);
- DECL_PROP1 (TAG, ::rtl::OUString, BOUND);
- END_DESCRIBE_PROPERTIES()
-}
-
-//------------------------------------------------------------------------------
-void OControlModel::describeAggregateProperties( Sequence< Property >& /* [out] */ _rAggregateProps ) const
-{
- if ( m_xAggregateSet.is() )
- {
- Reference< XPropertySetInfo > xPSI( m_xAggregateSet->getPropertySetInfo() );
- if ( xPSI.is() )
- _rAggregateProps = xPSI->getProperties();
- }
-}
-
-//------------------------------------------------------------------------------
-::osl::Mutex& OControlModel::getMutex()
-{
- return m_aMutex;
-}
-
-//------------------------------------------------------------------------------
-void OControlModel::describeFixedAndAggregateProperties( Sequence< Property >& _out_rFixedProperties, Sequence< Property >& _out_rAggregateProperties ) const
-{
- describeFixedProperties( _out_rFixedProperties );
- describeAggregateProperties( _out_rAggregateProperties );
-}
-
-//------------------------------------------------------------------------------
-Reference< XMultiPropertySet > OControlModel::getPropertiesInterface()
-{
- return Reference< XMultiPropertySet >( *this, UNO_QUERY );
-}
-
-//------------------------------------------------------------------------------
-Reference< XPropertySetInfo> SAL_CALL OControlModel::getPropertySetInfo() throw( RuntimeException)
-{
- return createPropertySetInfo( getInfoHelper() );
-}
-
-//------------------------------------------------------------------------------
-::cppu::IPropertyArrayHelper& OControlModel::getInfoHelper()
-{
- return m_aPropertyBagHelper.getInfoHelper();
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OControlModel::addProperty( const ::rtl::OUString& _rName, ::sal_Int16 _nAttributes, const Any& _rInitialValue ) throw (PropertyExistException, IllegalTypeException, IllegalArgumentException, RuntimeException)
-{
- m_aPropertyBagHelper.addProperty( _rName, _nAttributes, _rInitialValue );
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OControlModel::removeProperty( const ::rtl::OUString& _rName ) throw (UnknownPropertyException, NotRemoveableException, RuntimeException)
-{
- m_aPropertyBagHelper.removeProperty( _rName );
-}
-
-//--------------------------------------------------------------------
-Sequence< PropertyValue > SAL_CALL OControlModel::getPropertyValues() throw (RuntimeException)
-{
- return m_aPropertyBagHelper.getPropertyValues();
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OControlModel::setPropertyValues( const Sequence< PropertyValue >& _rProps ) throw (UnknownPropertyException, PropertyVetoException, IllegalArgumentException, WrappedTargetException, RuntimeException)
-{
- m_aPropertyBagHelper.setPropertyValues( _rProps );
-}
-
-//--------------------------------------------------------------------
-void OControlModel::lockInstance( LockAccess )
-{
- m_aMutex.acquire();
- osl_incrementInterlockedCount( &m_lockCount );
-}
-
-//--------------------------------------------------------------------
-oslInterlockedCount OControlModel::unlockInstance( LockAccess )
-{
- OSL_ENSURE( m_lockCount > 0, "OControlModel::unlockInstance: not locked!" );
- oslInterlockedCount lockCount = osl_decrementInterlockedCount( &m_lockCount );
- m_aMutex.release();
- return lockCount;
-}
-
-//--------------------------------------------------------------------
-void OControlModel::firePropertyChanges( const Sequence< sal_Int32 >& _rHandles, const Sequence< Any >& _rOldValues,
- const Sequence< Any >& _rNewValues, LockAccess )
-{
- OPropertySetHelper::fire(
- const_cast< Sequence< sal_Int32 >& >( _rHandles ).getArray(),
- _rNewValues.getConstArray(),
- _rOldValues.getConstArray(),
- _rHandles.getLength(),
- sal_False
- );
-}
-
-//==================================================================
-//= OBoundControlModel
-//==================================================================
-DBG_NAME(frm_OBoundControlModel);
-//------------------------------------------------------------------
-Any SAL_CALL OBoundControlModel::queryAggregation( const Type& _rType ) throw (RuntimeException)
-{
- Any aReturn( OControlModel::queryAggregation(_rType) );
- if (!aReturn.hasValue())
- {
- aReturn = OBoundControlModel_BASE1::queryInterface(_rType);
-
- if ( !aReturn.hasValue() && m_bCommitable )
- aReturn = OBoundControlModel_COMMITTING::queryInterface( _rType );
-
- if ( !aReturn.hasValue() && m_bSupportsExternalBinding )
- aReturn = OBoundControlModel_BINDING::queryInterface( _rType );
-
- if ( !aReturn.hasValue() && m_bSupportsValidation )
- aReturn = OBoundControlModel_VALIDATION::queryInterface( _rType );
- }
-
- return aReturn;
-}
-
-//------------------------------------------------------------------
-OBoundControlModel::OBoundControlModel(
- const Reference< XMultiServiceFactory>& _rxFactory,
- const ::rtl::OUString& _rUnoControlModelTypeName, const ::rtl::OUString& _rDefault,
- const sal_Bool _bCommitable, const sal_Bool _bSupportExternalBinding, const sal_Bool _bSupportsValidation )
- :OControlModel( _rxFactory, _rUnoControlModelTypeName, _rDefault, sal_False )
- ,OPropertyChangeListener( m_aMutex )
- ,m_xField()
- ,m_xAmbientForm()
- ,m_nValuePropertyAggregateHandle( -1 )
- ,m_nFieldType( DataType::OTHER )
- ,m_bValuePropertyMayBeVoid( false )
- ,m_aResetHelper( *this, m_aMutex )
- ,m_aUpdateListeners(m_aMutex)
- ,m_aFormComponentListeners( m_aMutex )
- ,m_bInputRequired( sal_True )
- ,m_pAggPropMultiplexer( NULL )
- ,m_bFormListening( false )
- ,m_bLoaded(sal_False)
- ,m_bRequired(sal_False)
- ,m_bCommitable(_bCommitable)
- ,m_bSupportsExternalBinding( _bSupportExternalBinding )
- ,m_bSupportsValidation( _bSupportsValidation )
- ,m_bForwardValueChanges(sal_True)
- ,m_bTransferingValue( sal_False )
- ,m_bIsCurrentValueValid( sal_True )
- ,m_bBindingControlsRO( sal_False )
- ,m_bBindingControlsEnable( sal_False )
- ,m_eControlValueChangeInstigator( eOther )
- ,m_aLabelServiceName(FRM_SUN_COMPONENT_FIXEDTEXT)
-{
- DBG_CTOR(frm_OBoundControlModel, NULL);
-
- // start property listening at the aggregate
- implInitAggMultiplexer( );
-}
-
-//------------------------------------------------------------------
-OBoundControlModel::OBoundControlModel(
- const OBoundControlModel* _pOriginal, const Reference< XMultiServiceFactory>& _rxFactory )
- :OControlModel( _pOriginal, _rxFactory, sal_True, sal_False )
- ,OPropertyChangeListener( m_aMutex )
- ,m_xField()
- ,m_xAmbientForm()
- ,m_nValuePropertyAggregateHandle( _pOriginal->m_nValuePropertyAggregateHandle )
- ,m_nFieldType( DataType::OTHER )
- ,m_bValuePropertyMayBeVoid( _pOriginal->m_bValuePropertyMayBeVoid )
- ,m_aResetHelper( *this, m_aMutex )
- ,m_aUpdateListeners( m_aMutex )
- ,m_aFormComponentListeners( m_aMutex )
- ,m_xValidator( _pOriginal->m_xValidator )
- ,m_bInputRequired( sal_True )
- ,m_pAggPropMultiplexer( NULL )
- ,m_bFormListening( false )
- ,m_bLoaded( sal_False )
- ,m_bRequired( sal_False )
- ,m_bCommitable( _pOriginal->m_bCommitable )
- ,m_bSupportsExternalBinding( _pOriginal->m_bSupportsExternalBinding )
- ,m_bSupportsValidation( _pOriginal->m_bSupportsValidation )
- ,m_bForwardValueChanges( sal_True )
- ,m_bTransferingValue( sal_False )
- ,m_bIsCurrentValueValid( _pOriginal->m_bIsCurrentValueValid )
- ,m_bBindingControlsRO( sal_False )
- ,m_bBindingControlsEnable( sal_False )
- ,m_eControlValueChangeInstigator( eOther )
-{
- DBG_CTOR(frm_OBoundControlModel, NULL);
-
- // start property listening at the aggregate
- implInitAggMultiplexer( );
-
- m_aLabelServiceName = _pOriginal->m_aLabelServiceName;
- m_sValuePropertyName = _pOriginal->m_sValuePropertyName;
- m_nValuePropertyAggregateHandle = _pOriginal->m_nValuePropertyAggregateHandle;
- m_bValuePropertyMayBeVoid = _pOriginal->m_bValuePropertyMayBeVoid;
- m_aValuePropertyType = _pOriginal->m_aValuePropertyType;
- m_aControlSource = _pOriginal->m_aControlSource;
- m_bInputRequired = _pOriginal->m_bInputRequired;
- // m_xLabelControl, though being a property, is not to be cloned, not even the reference will be transfered.
- // (the former should be clear - a clone of the object we're only referencing does not make sense)
- // (the second would violate the restriction for label controls that they're part of the
- // same form component hierarchy - we ourself are no part, yet, so we can't have a label control)
-
- // start listening for changes at the value property
- implInitValuePropertyListening( );
-}
-
-//------------------------------------------------------------------
-OBoundControlModel::~OBoundControlModel()
-{
- if ( !OComponentHelper::rBHelper.bDisposed )
- {
- acquire();
- dispose();
- }
-
- doResetDelegator( );
-
- OSL_ENSURE( m_pAggPropMultiplexer, "OBoundControlModel::~OBoundControlModel: what about my property multiplexer?" );
- if ( m_pAggPropMultiplexer )
- {
- m_pAggPropMultiplexer->dispose();
- m_pAggPropMultiplexer->release();
- m_pAggPropMultiplexer = NULL;
- }
-
- DBG_DTOR(frm_OBoundControlModel, NULL);
-}
-
-//------------------------------------------------------------------
-void OBoundControlModel::clonedFrom( const OControlModel* _pOriginal )
-{
- const OBoundControlModel* pBoundOriginal = static_cast< const OBoundControlModel* >( _pOriginal );
- // the value binding can be handled as if somebody called setValueBinding here
- // By definition, bindings can be share between bindables
- if ( pBoundOriginal && pBoundOriginal->m_xExternalBinding.is() )
- {
- try
- {
- setValueBinding( pBoundOriginal->m_xExternalBinding );
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- }
-}
-
-//-----------------------------------------------------------------------------
-void OBoundControlModel::implInitAggMultiplexer( )
-{
- increment( m_refCount );
- if ( m_xAggregateSet.is() )
- {
- m_pAggPropMultiplexer = new OPropertyChangeMultiplexer( this, m_xAggregateSet, sal_False );
- m_pAggPropMultiplexer->acquire();
- }
- decrement( m_refCount );
-
- doSetDelegator();
-}
-
-//-----------------------------------------------------------------------------
-void OBoundControlModel::implInitValuePropertyListening( ) const
-{
- // start listening for changes at the value property
- // There are three pre-requisites for this to be done:
- // 1. We support external value bindings. In this case, the changes in the control value need to
- // be propagated to the external binding immediately when they happen
- // 2. We support external validation. In this case, we need to listen for changes in the value
- // property, since we need to revalidate then.
- // 3. We are not committable. In this case, changes in the control value need to be propagated
- // to the database column immediately when they happen.
- if ( m_bSupportsExternalBinding || m_bSupportsValidation || !m_bCommitable )
- {
- OSL_ENSURE( m_pAggPropMultiplexer, "OBoundControlModel::implInitValuePropertyListening: no multiplexer!" );
- if ( m_pAggPropMultiplexer && m_sValuePropertyName.getLength() )
- m_pAggPropMultiplexer->addProperty( m_sValuePropertyName );
- }
-}
-
-//-----------------------------------------------------------------------------
-void OBoundControlModel::initOwnValueProperty( const ::rtl::OUString& i_rValuePropertyName )
-{
- OSL_PRECOND( !m_sValuePropertyName.getLength() && -1 == m_nValuePropertyAggregateHandle,
- "OBoundControlModel::initOwnValueProperty: value property is already initialized!" );
- OSL_ENSURE( i_rValuePropertyName.getLength(), "OBoundControlModel::initOwnValueProperty: invalid property name!" );
- m_sValuePropertyName = i_rValuePropertyName;
-}
-
-//-----------------------------------------------------------------------------
-void OBoundControlModel::initValueProperty( const ::rtl::OUString& _rValuePropertyName, sal_Int32 _nValuePropertyExternalHandle )
-{
- OSL_PRECOND( !m_sValuePropertyName.getLength() && -1 == m_nValuePropertyAggregateHandle,
- "OBoundControlModel::initValueProperty: value property is already initialized!" );
- OSL_ENSURE( _rValuePropertyName.getLength(), "OBoundControlModel::initValueProperty: invalid property name!" );
- OSL_ENSURE( _nValuePropertyExternalHandle != -1, "OBoundControlModel::initValueProperty: invalid property handle!" );
-
- m_sValuePropertyName = _rValuePropertyName;
- m_nValuePropertyAggregateHandle = getOriginalHandle( _nValuePropertyExternalHandle );
- OSL_ENSURE( m_nValuePropertyAggregateHandle != -1, "OBoundControlModel::initValueProperty: unable to find the original handle!" );
-
- if ( m_nValuePropertyAggregateHandle != -1 )
- {
- Reference< XPropertySetInfo > xPropInfo( m_xAggregateSet->getPropertySetInfo(), UNO_SET_THROW );
- Property aValuePropDesc = xPropInfo->getPropertyByName( m_sValuePropertyName );
- m_aValuePropertyType = aValuePropDesc.Type;
- m_bValuePropertyMayBeVoid = ( aValuePropDesc.Attributes & PropertyAttribute::MAYBEVOID ) != 0;
- }
-
- // start listening for changes at the value property
- implInitValuePropertyListening( );
-}
-
-//-----------------------------------------------------------------------------
-void OBoundControlModel::suspendValueListening( )
-{
- OSL_PRECOND( m_sValuePropertyName.getLength(), "OBoundControlModel::suspendValueListening: don't have a value property!" );
- OSL_PRECOND( m_pAggPropMultiplexer, "OBoundControlModel::suspendValueListening: I *am* not listening!" );
-
- if ( m_pAggPropMultiplexer )
- m_pAggPropMultiplexer->lock();
-}
-
-//-----------------------------------------------------------------------------
-void OBoundControlModel::resumeValueListening( )
-{
- OSL_PRECOND( m_sValuePropertyName.getLength(), "OBoundControlModel::resumeValueListening: don't have a value property!" );
- OSL_PRECOND( m_pAggPropMultiplexer, "OBoundControlModel::resumeValueListening: I *am* not listening at all!" );
- OSL_PRECOND( !m_pAggPropMultiplexer || m_pAggPropMultiplexer->locked(), "OBoundControlModel::resumeValueListening: listening not suspended currently!" );
-
- if ( m_pAggPropMultiplexer )
- m_pAggPropMultiplexer->unlock();
-}
-
-//-----------------------------------------------------------------------------
-Sequence< Type > OBoundControlModel::_getTypes()
-{
- TypeBag aTypes(
- OControlModel::_getTypes(),
- OBoundControlModel_BASE1::getTypes()
- );
-
- if ( m_bCommitable )
- aTypes.addTypes( OBoundControlModel_COMMITTING::getTypes() );
-
- if ( m_bSupportsExternalBinding )
- aTypes.addTypes( OBoundControlModel_BINDING::getTypes() );
-
- if ( m_bSupportsValidation )
- aTypes.addTypes( OBoundControlModel_VALIDATION::getTypes() );
-
- return aTypes.getTypes();
-}
-
-// OComponentHelper
-//-----------------------------------------------------------------------------
-void OBoundControlModel::disposing()
-{
- OControlModel::disposing();
-
- ::osl::ClearableMutexGuard aGuard(m_aMutex);
-
- if ( m_pAggPropMultiplexer )
- m_pAggPropMultiplexer->dispose();
-
- // notify all our listeners
- com::sun::star::lang::EventObject aEvt( static_cast< XWeak* >( this ) );
- m_aUpdateListeners.disposeAndClear( aEvt );
- m_aResetHelper.disposing();
-
- // disconnect from our database column
- // TODO: could we replace the following 5 lines with a call to impl_disconnectDatabaseColumn_noNotify?
- // The only more thing which it does is calling onDisconnectedDbColumn - could this
- // cause trouble? At least when we continue to call OControlModel::disposing before, it *may*.
- if ( hasField() )
- {
- getField()->removePropertyChangeListener( PROPERTY_VALUE, this );
- resetField();
- }
- m_xCursor = NULL;
-
- Reference< XComponent > xComp( m_xLabelControl, UNO_QUERY );
- if ( xComp.is() )
- xComp->removeEventListener(static_cast< XEventListener* >( static_cast< XPropertyChangeListener* >( this ) ) );
-
- // disconnect from our external value binding
- if ( hasExternalValueBinding() )
- disconnectExternalValueBinding();
-
- // dito for the validator
- if ( hasValidator() )
- disconnectValidator( );
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::onValuePropertyChange( ControlModelLock& i_rControLock )
-{
- if ( hasExternalValueBinding() )
- { // the control value changed, while we have an external value binding
- // -> forward the value to it
- if ( m_eControlValueChangeInstigator != eExternalBinding )
- transferControlValueToExternal( i_rControLock );
- }
- else if ( !m_bCommitable && m_xColumnUpdate.is() )
- { // the control value changed, while we are bound to a database column,
- // but not committable (which means changes in the control have to be reflected to
- // the underlying database column immediately)
- // -> forward the value to the database column
- if ( m_eControlValueChangeInstigator != eDbColumnBinding )
- commitControlValueToDbColumn( false );
- }
-
- // validate the new value
- if ( m_bSupportsValidation )
- recheckValidity( true );
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::_propertyChanged( const PropertyChangeEvent& _rEvt ) throw ( RuntimeException )
-{
- ControlModelLock aLock( *this );
-
- OSL_ENSURE( _rEvt.PropertyName == m_sValuePropertyName,
- "OBoundControlModel::_propertyChanged: where did this come from (1)?" );
- OSL_ENSURE( m_pAggPropMultiplexer && !m_pAggPropMultiplexer->locked(),
- "OBoundControlModel::_propertyChanged: where did this come from (2)?" );
-
- if ( _rEvt.PropertyName == m_sValuePropertyName )
- {
- onValuePropertyChange( aLock );
- }
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::startAggregatePropertyListening( const ::rtl::OUString& _rPropertyName )
-{
- OSL_PRECOND( m_pAggPropMultiplexer, "OBoundControlModel::startAggregatePropertyListening: no multiplexer!" );
- OSL_ENSURE( _rPropertyName.getLength(), "OBoundControlModel::startAggregatePropertyListening: invalid property name!" );
-
- if ( m_pAggPropMultiplexer && _rPropertyName.getLength() )
- {
- m_pAggPropMultiplexer->addProperty( _rPropertyName );
- }
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::doFormListening( const bool _bStart )
-{
- OSL_PRECOND( !hasExternalValueBinding(), "OBoundControlModel::doFormListening: external value binding should overrule the database binding!" );
-
- if ( isFormListening() == _bStart )
- return;
-
- if ( m_xAmbientForm.is() )
- _bStart ? m_xAmbientForm->addLoadListener( this ) : m_xAmbientForm->removeLoadListener( this );
-
- Reference< XLoadable > xParentLoadable( getParent(), UNO_QUERY );
- if ( getParent().is() && !xParentLoadable.is() )
- {
- // if our parent does not directly support the XLoadable interface, then it might support the
- // XRowSetSupplier/XRowSetChangeBroadcaster interfaces. In this case we have to listen for changes
- // broadcasted by the latter.
- Reference< XRowSetChangeBroadcaster > xRowSetBroadcaster( getParent(), UNO_QUERY );
- if ( xRowSetBroadcaster.is() )
- _bStart ? xRowSetBroadcaster->addRowSetChangeListener( this ) : xRowSetBroadcaster->removeRowSetChangeListener( this );
- }
-
- m_bFormListening = _bStart && m_xAmbientForm.is();
-}
-
-// XChild
-//------------------------------------------------------------------------------
-void SAL_CALL OBoundControlModel::setParent(const Reference<XInterface>& _rxParent) throw(com::sun::star::lang::NoSupportException, RuntimeException)
-{
- ControlModelLock aLock( *this );
- FieldChangeNotifier aBoundFieldNotifier( aLock );
-
- if ( getParent() == _rxParent )
- return;
-
- // disconnect from database column (which is controlled by parent, directly or indirectly)
- if ( hasField() )
- impl_disconnectDatabaseColumn_noNotify();
-
- // log off old listeners
- if ( isFormListening() )
- doFormListening( false );
-
- // actually set the new parent
- OControlModel::setParent( _rxParent );
-
- // a new parent means a new ambient form
- impl_determineAmbientForm_nothrow();
-
- if ( !hasExternalValueBinding() )
- {
- // log on new listeners
- doFormListening( true );
-
- // re-connect to database column of the new parent
- if ( m_xAmbientForm.is() && m_xAmbientForm->isLoaded() )
- impl_connectDatabaseColumn_noNotify( false );
- }
-}
-
-// XEventListener
-//------------------------------------------------------------------------------
-void SAL_CALL OBoundControlModel::disposing(const com::sun::star::lang::EventObject& _rEvent) throw (RuntimeException)
-{
- ControlModelLock aLock( *this );
-
- if ( _rEvent.Source == getField() )
- {
- resetField();
- }
- else if ( _rEvent.Source == m_xLabelControl )
- {
- Reference<XPropertySet> xOldValue = m_xLabelControl;
- m_xLabelControl = NULL;
-
- // fire a propertyChanged (when we leave aLock's scope)
- aLock.addPropertyNotification( PROPERTY_ID_CONTROLLABEL, makeAny( xOldValue ), makeAny( m_xLabelControl ) );
- }
- else if ( _rEvent.Source == m_xExternalBinding )
- { // *first* check for the external binding
- disconnectExternalValueBinding( );
- }
- else if ( _rEvent.Source == m_xValidator )
- { // *then* check for the validator. Reason is that bindings may also act as validator at the same
- // time, in this case, the validator is automatically revoked when the binding is revoked
- disconnectValidator( );
- }
- else
- OControlModel::disposing(_rEvent);
-}
-
-// XServiceInfo
-//------------------------------------------------------------------------------
-StringSequence SAL_CALL OBoundControlModel::getSupportedServiceNames() throw(RuntimeException)
-{
- return ::comphelper::concatSequences(
- getAggregateServiceNames(),
- getSupportedServiceNames_Static()
- );
-}
-
-//------------------------------------------------------------------------------
-Sequence< ::rtl::OUString > SAL_CALL OBoundControlModel::getSupportedServiceNames_Static() throw( RuntimeException )
-{
- Sequence< ::rtl::OUString > aOwnServiceNames( 1 );
- aOwnServiceNames[ 0 ] = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.form.DataAwareControlModel") );
-
- return ::comphelper::concatSequences(
- OControlModel::getSupportedServiceNames_Static(),
- aOwnServiceNames
- );
-}
-
-// XPersist
-//------------------------------------------------------------------------------
-void SAL_CALL OBoundControlModel::write( const Reference<stario::XObjectOutputStream>& _rxOutStream ) throw(stario::IOException, RuntimeException)
-{
- OControlModel::write(_rxOutStream);
-
- osl::MutexGuard aGuard(m_aMutex);
-
- // Version
- _rxOutStream->writeShort(0x0002);
-
- // Controlsource
- ::comphelper::operator<<( _rxOutStream, m_aControlSource);
-
- // !!! IMPORTANT NOTE !!!
- // don't write any new members here : this wouldn't be compatible with older versions, as OBoundControlModel
- // is a base class which is called in derived classes "read" method. So if you increment the version
- // and write new stuff, older office versions will read this in the _derived_ classes, which may result
- // in anything from data loss to crash.
- // (use writeCommonProperties instead, this is called in derived classes write-method)
- // !!! EOIN !!!
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::defaultCommonProperties()
-{
- Reference<com::sun::star::lang::XComponent> xComp(m_xLabelControl, UNO_QUERY);
- if (xComp.is())
- xComp->removeEventListener(static_cast<com::sun::star::lang::XEventListener*>(static_cast<XPropertyChangeListener*>(this)));
- m_xLabelControl = NULL;
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::readCommonProperties(const Reference<stario::XObjectInputStream>& _rxInStream)
-{
- sal_Int32 nLen = _rxInStream->readLong();
-
- Reference<stario::XMarkableStream> xMark(_rxInStream, UNO_QUERY);
- DBG_ASSERT(xMark.is(), "OBoundControlModel::readCommonProperties : can only work with markable streams !");
- sal_Int32 nMark = xMark->createMark();
-
- // read the reference to the label control
- Reference<stario::XPersistObject> xPersist;
- sal_Int32 nUsedFlag;
- nUsedFlag = _rxInStream->readLong();
- if (nUsedFlag)
- xPersist = _rxInStream->readObject();
- m_xLabelControl = m_xLabelControl.query( xPersist );
- Reference< XComponent > xComp( m_xLabelControl, UNO_QUERY );
- if (xComp.is())
- xComp->addEventListener(static_cast<com::sun::star::lang::XEventListener*>(static_cast<XPropertyChangeListener*>(this)));
-
- // read any other new common properties here
-
- // skip the remaining bytes
- xMark->jumpToMark(nMark);
- _rxInStream->skipBytes(nLen);
- xMark->deleteMark(nMark);
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::writeCommonProperties(const Reference<stario::XObjectOutputStream>& _rxOutStream)
-{
- Reference<stario::XMarkableStream> xMark(_rxOutStream, UNO_QUERY);
- DBG_ASSERT(xMark.is(), "OBoundControlModel::writeCommonProperties : can only work with markable streams !");
- sal_Int32 nMark = xMark->createMark();
-
- // a placeholder where we will write the overall length (later in this method)
- sal_Int32 nLen = 0;
- _rxOutStream->writeLong(nLen);
-
- // write the reference to the label control
- Reference<stario::XPersistObject> xPersist(m_xLabelControl, UNO_QUERY);
- sal_Int32 nUsedFlag = 0;
- if (xPersist.is())
- nUsedFlag = 1;
- _rxOutStream->writeLong(nUsedFlag);
- if (xPersist.is())
- _rxOutStream->writeObject(xPersist);
-
- // write any other new common properties here
-
- // write the correct length at the beginning of the block
- nLen = xMark->offsetToMark(nMark) - sizeof(nLen);
- xMark->jumpToMark(nMark);
- _rxOutStream->writeLong(nLen);
- xMark->jumpToFurthest();
- xMark->deleteMark(nMark);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OBoundControlModel::read( const Reference< stario::XObjectInputStream >& _rxInStream ) throw(stario::IOException, RuntimeException)
-{
- OControlModel::read(_rxInStream);
-
- osl::MutexGuard aGuard(m_aMutex);
- sal_uInt16 nVersion = _rxInStream->readShort(); (void)nVersion;
- ::comphelper::operator>>( _rxInStream, m_aControlSource);
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::getFastPropertyValue(Any& rValue, sal_Int32 nHandle) const
-{
- switch (nHandle)
- {
- case PROPERTY_ID_INPUT_REQUIRED:
- rValue <<= m_bInputRequired;
- break;
- case PROPERTY_ID_CONTROLSOURCEPROPERTY:
- rValue <<= m_sValuePropertyName;
- break;
- case PROPERTY_ID_CONTROLSOURCE:
- rValue <<= m_aControlSource;
- break;
- case PROPERTY_ID_BOUNDFIELD:
- rValue <<= getField();
- break;
- case PROPERTY_ID_CONTROLLABEL:
- if (!m_xLabelControl.is())
- rValue.clear();
- else
- rValue <<= m_xLabelControl;
- break;
- default:
- OControlModel::getFastPropertyValue(rValue, nHandle);
- }
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OBoundControlModel::convertFastPropertyValue(
- Any& _rConvertedValue, Any& _rOldValue,
- sal_Int32 _nHandle,
- const Any& _rValue)
- throw (com::sun::star::lang::IllegalArgumentException)
-{
- sal_Bool bModified(sal_False);
- switch (_nHandle)
- {
- case PROPERTY_ID_INPUT_REQUIRED:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, m_bInputRequired );
- break;
- case PROPERTY_ID_CONTROLSOURCE:
- bModified = tryPropertyValue(_rConvertedValue, _rOldValue, _rValue, m_aControlSource);
- break;
- case PROPERTY_ID_BOUNDFIELD:
- OSL_FAIL( "OBoundControlModel::convertFastPropertyValue: BoundField should be a read-only property !" );
- throw com::sun::star::lang::IllegalArgumentException();
- case PROPERTY_ID_CONTROLLABEL:
- if (!_rValue.hasValue())
- { // property set to void
- _rConvertedValue = Any();
- getFastPropertyValue(_rOldValue, _nHandle);
- bModified = m_xLabelControl.is();
- }
- else
- {
- bModified = tryPropertyValue(_rConvertedValue, _rOldValue, _rValue, m_xLabelControl);
- if (!m_xLabelControl.is())
- // an empty interface is interpreted as VOID
- _rOldValue.clear();
- }
- break;
- default:
- bModified = OControlModel::convertFastPropertyValue(_rConvertedValue, _rOldValue, _nHandle, _rValue);
- }
- return bModified;
-}
-
-//------------------------------------------------------------------------------
-Any OBoundControlModel::getPropertyDefaultByHandle( sal_Int32 _nHandle ) const
-{
- Any aDefault;
- switch ( _nHandle )
- {
- case PROPERTY_ID_INPUT_REQUIRED:
- aDefault <<= sal_Bool( sal_True );
- break;
-
- case PROPERTY_ID_CONTROLSOURCE:
- aDefault <<= ::rtl::OUString();
- break;
-
- case PROPERTY_ID_CONTROLLABEL:
- aDefault <<= Reference< XPropertySet >();
- break;
- }
- return aDefault;
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::setFastPropertyValue_NoBroadcast( sal_Int32 nHandle, const Any& rValue ) throw (Exception)
-{
- switch (nHandle)
- {
- case PROPERTY_ID_INPUT_REQUIRED:
- OSL_VERIFY( rValue >>= m_bInputRequired );
- break;
- case PROPERTY_ID_CONTROLSOURCE:
- OSL_VERIFY( rValue >>= m_aControlSource );
- break;
- case PROPERTY_ID_BOUNDFIELD:
- OSL_FAIL("OBoundControlModel::setFastPropertyValue_NoBroadcast : BoundField should be a read-only property !");
- throw com::sun::star::lang::IllegalArgumentException();
- case PROPERTY_ID_CONTROLLABEL:
- {
- if ( rValue.hasValue() && ( rValue.getValueTypeClass() != TypeClass_INTERFACE ) )
- throw com::sun::star::lang::IllegalArgumentException();
-
- Reference< XInterface > xNewValue( rValue, UNO_QUERY );
- if ( !xNewValue.is() )
- { // set property to "void"
- Reference< XComponent > xComp( m_xLabelControl, UNO_QUERY );
- if ( xComp.is() )
- xComp->removeEventListener( static_cast< XPropertyChangeListener* >( this ) );
- m_xLabelControl = NULL;
- break;
- }
-
- Reference< XControlModel > xAsModel ( xNewValue, UNO_QUERY );
- Reference< XServiceInfo > xAsServiceInfo ( xAsModel, UNO_QUERY );
- Reference< XPropertySet > xAsPropSet ( xAsServiceInfo, UNO_QUERY );
- Reference< XChild > xAsChild ( xAsPropSet, UNO_QUERY );
- if ( !xAsChild.is() || !xAsServiceInfo->supportsService( m_aLabelServiceName ) )
- {
- throw com::sun::star::lang::IllegalArgumentException();
- }
-
- // check if weself and the given model have a common anchestor (up to the forms collection)
- Reference<XChild> xCont;
- query_interface(static_cast<XWeak*>(this), xCont);
- Reference< XInterface > xMyTopLevel = xCont->getParent();
- while (xMyTopLevel.is())
- {
- Reference<XForm> xAsForm(xMyTopLevel, UNO_QUERY);
- if (!xAsForm.is())
- // found my root
- break;
-
- Reference<XChild> xLoopAsChild(xMyTopLevel, UNO_QUERY);
- xMyTopLevel = xLoopAsChild.is() ? xLoopAsChild->getParent() : Reference< XInterface >();
- }
- Reference< XInterface > xNewTopLevel = xAsChild->getParent();
- while (xNewTopLevel.is())
- {
- Reference<XForm> xAsForm(xNewTopLevel, UNO_QUERY);
- if (!xAsForm.is())
- break;
-
- Reference<XChild> xLoopAsChild(xNewTopLevel, UNO_QUERY);
- xNewTopLevel = xLoopAsChild.is() ? xLoopAsChild->getParent() : Reference< XInterface >();
- }
- if (xNewTopLevel != xMyTopLevel)
- {
- // the both objects don't belong to the same forms collection -> not acceptable
- throw com::sun::star::lang::IllegalArgumentException();
- }
-
- m_xLabelControl = xAsPropSet;
- Reference<com::sun::star::lang::XComponent> xComp(m_xLabelControl, UNO_QUERY);
- if (xComp.is())
- xComp->addEventListener(static_cast<com::sun::star::lang::XEventListener*>(static_cast<XPropertyChangeListener*>(this)));
- }
- break;
- default:
- OControlModel::setFastPropertyValue_NoBroadcast(nHandle, rValue );
- }
-}
-
-// XPropertyChangeListener
-//------------------------------------------------------------------------------
-void SAL_CALL OBoundControlModel::propertyChange( const PropertyChangeEvent& evt ) throw(RuntimeException)
-{
- // if the DBColumn value changed, transfer it to the control
- if ( evt.PropertyName.equals( PROPERTY_VALUE ) )
- {
- OSL_ENSURE( evt.Source == getField(), "OBoundControlModel::propertyChange: value changes from components other than our database colum?" );
- osl::MutexGuard aGuard(m_aMutex);
- if ( m_bForwardValueChanges && m_xColumn.is() )
- transferDbValueToControl();
- }
- else
- {
- OSL_ENSURE( evt.Source == m_xExternalBinding, "OBoundControlModel::propertyChange: where did this come from?" );
-
- // our binding has properties which can control properties of ourself
- ::rtl::OUString sBindingControlledProperty;
- bool bForwardToLabelControl = false;
- if ( evt.PropertyName.equals( PROPERTY_READONLY ) )
- {
- sBindingControlledProperty = PROPERTY_READONLY;
- }
- else if ( evt.PropertyName.equals( PROPERTY_RELEVANT ) )
- {
- sBindingControlledProperty = PROPERTY_ENABLED;
- bForwardToLabelControl = true;
- }
- else
- return;
-
- try
- {
- setPropertyValue( sBindingControlledProperty, evt.NewValue );
- if ( bForwardToLabelControl && m_xLabelControl.is() )
- m_xLabelControl->setPropertyValue( sBindingControlledProperty, evt.NewValue );
- }
- catch( const Exception& )
- {
- OSL_FAIL( "OBoundControlModel::propertyChange: could not adjust my binding-controlled property!" );
- }
- }
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OBoundControlModel::onRowSetChanged( const EventObject& /*i_Event*/ ) throw (RuntimeException)
-{
- ControlModelLock aLock( *this );
- FieldChangeNotifier aBoundFieldNotifier( aLock );
-
- // disconnect from database column (which is controlled by parent, directly or indirectly)
- if ( hasField() )
- impl_disconnectDatabaseColumn_noNotify();
-
- // log off old listeners
- if ( isFormListening() )
- doFormListening( false );
-
- // determine the new ambient form
- impl_determineAmbientForm_nothrow();
-
- // log on new listeners
- doFormListening( true );
-
- // re-connect to database column if needed and possible
- if ( m_xAmbientForm.is() && m_xAmbientForm->isLoaded() )
- impl_connectDatabaseColumn_noNotify( false );
-}
-
-// XBoundComponent
-//------------------------------------------------------------------------------
-void SAL_CALL OBoundControlModel::addUpdateListener(const Reference<XUpdateListener>& _rxListener) throw(RuntimeException)
-{
- m_aUpdateListeners.addInterface(_rxListener);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OBoundControlModel::removeUpdateListener(const Reference< XUpdateListener>& _rxListener) throw(RuntimeException)
-{
- m_aUpdateListeners.removeInterface(_rxListener);
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL OBoundControlModel::commit() throw(RuntimeException)
-{
- ControlModelLock aLock( *this );
-
- OSL_PRECOND( m_bCommitable, "OBoundControlModel::commit: invalid call (I'm not commitable !) " );
- if ( hasExternalValueBinding() )
- {
- // in most cases, no action is required: For most derivees, we know the value property of
- // our control (see initValueProperty), and when an external binding is active, we
- // instantly forward all changes in this property to the external binding.
- if ( !m_sValuePropertyName.getLength() )
- // but for those derivees which did not use this feature, we need an
- // explicit transfer
- transferControlValueToExternal( aLock );
- return sal_True;
- }
-
- OSL_ENSURE( !hasExternalValueBinding(), "OBoundControlModel::commit: control flow broken!" );
- // we reach this only if we're not working with an external binding
-
- if ( !hasField() )
- return sal_True;
-
- ::cppu::OInterfaceIteratorHelper aIter( m_aUpdateListeners );
- EventObject aEvent;
- aEvent.Source = static_cast< XWeak* >( this );
- sal_Bool bSuccess = sal_True;
-
- aLock.release();
- // >>>>>>>> ----- UNSAFE ----- >>>>>>>>
- while (aIter.hasMoreElements() && bSuccess)
- bSuccess = static_cast< XUpdateListener* >( aIter.next() )->approveUpdate( aEvent );
- // <<<<<<<< ----- UNSAFE ----- <<<<<<<<
- aLock.acquire();
-
- if ( bSuccess )
- {
- try
- {
- if ( m_xColumnUpdate.is() )
- bSuccess = commitControlValueToDbColumn( sal_False );
- }
- catch(Exception&)
- {
- bSuccess = sal_False;
- }
- }
-
- if ( bSuccess )
- {
- aLock.release();
- m_aUpdateListeners.notifyEach( &XUpdateListener::updated, aEvent );
- }
-
- return bSuccess;
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::resetField()
-{
- m_xColumnUpdate.clear();
- m_xColumn.clear();
- m_xField.clear();
- m_nFieldType = DataType::OTHER;
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OBoundControlModel::connectToField(const Reference<XRowSet>& rForm)
-{
- OSL_PRECOND( !hasExternalValueBinding(), "OBoundControlModel::connectToField: invalid call (have an external binding)!" );
-
- // wenn eine Verbindung zur Datenbank existiert
- if (rForm.is() && getConnection(rForm).is())
- {
- // Feld bestimmen und PropertyChangeListener
- m_xCursor = rForm;
- Reference<XPropertySet> xFieldCandidate;
-
- if (m_xCursor.is())
- {
- Reference<XColumnsSupplier> xColumnsSupplier(m_xCursor, UNO_QUERY);
- DBG_ASSERT(xColumnsSupplier.is(), "OBoundControlModel::connectToField : the row set should support the com::sun::star::sdb::ResultSet service !");
- if (xColumnsSupplier.is())
- {
- Reference<XNameAccess> xColumns(xColumnsSupplier->getColumns(), UNO_QUERY);
- if (xColumns.is() && xColumns->hasByName(m_aControlSource))
- {
- OSL_VERIFY( xColumns->getByName(m_aControlSource) >>= xFieldCandidate );
- }
- }
- }
-
- try
- {
- sal_Int32 nFieldType = DataType::OTHER;
- if ( xFieldCandidate.is() )
- {
- xFieldCandidate->getPropertyValue( PROPERTY_FIELDTYPE ) >>= nFieldType;
- if ( approveDbColumnType( nFieldType ) )
- impl_setField_noNotify( xFieldCandidate );
- }
- else
- impl_setField_noNotify( NULL );
-
- if ( m_xField.is() )
- {
- if( m_xField->getPropertySetInfo()->hasPropertyByName( PROPERTY_VALUE ) )
- {
- m_nFieldType = nFieldType;
-
- // an wertaenderungen horchen
- m_xField->addPropertyChangeListener( PROPERTY_VALUE, this );
- m_xColumnUpdate = Reference< XColumnUpdate >( m_xField, UNO_QUERY );
- m_xColumn = Reference< XColumn >( m_xField, UNO_QUERY );
-
- sal_Int32 nNullableFlag = ColumnValue::NO_NULLS;
- m_xField->getPropertyValue(PROPERTY_ISNULLABLE) >>= nNullableFlag;
- m_bRequired = (ColumnValue::NO_NULLS == nNullableFlag);
- // we're optimistic : in case of ColumnValue_NULLABLE_UNKNOWN we assume nullability ....
- }
- else
- {
- OSL_FAIL("OBoundControlModel::connectToField: property NAME not supported!");
- impl_setField_noNotify( NULL );
- }
- }
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- resetField();
- }
- }
- return hasField();
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::initFromField( const Reference< XRowSet >& _rxRowSet )
-{
- // but only if the rowset if posisitioned on a valid record
- if ( hasField() && _rxRowSet.is() )
- {
- if ( !_rxRowSet->isBeforeFirst() && !_rxRowSet->isAfterLast() )
- transferDbValueToControl();
- else
- // reset the field if the row set is empty
- // #i30661#
- resetNoBroadcast();
- }
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OBoundControlModel::approveDbColumnType(sal_Int32 _nColumnType)
-{
- OSL_PRECOND( !hasExternalValueBinding(), "OBoundControlModel::approveDbColumnType: invalid call (have an external binding)!" );
-
- if ((_nColumnType == DataType::BINARY) || (_nColumnType == DataType::VARBINARY)
- || (_nColumnType == DataType::LONGVARBINARY) || (_nColumnType == DataType::OTHER)
- || (_nColumnType == DataType::OBJECT) || (_nColumnType == DataType::DISTINCT)
- || (_nColumnType == DataType::STRUCT) || (_nColumnType == DataType::ARRAY)
- || (_nColumnType == DataType::BLOB) /*|| (_nColumnType == DataType::CLOB)*/
- || (_nColumnType == DataType::REF) || (_nColumnType == DataType::SQLNULL))
- return sal_False;
-
- return sal_True;
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::impl_determineAmbientForm_nothrow()
-{
- Reference< XInterface > xParent( const_cast< OBoundControlModel* >( this )->getParent() );
-
- m_xAmbientForm.set( xParent, UNO_QUERY );
- if ( !m_xAmbientForm.is() )
- {
- Reference< XRowSetSupplier > xSupRowSet( xParent, UNO_QUERY );
- if ( xSupRowSet.is() )
- m_xAmbientForm.set( xSupRowSet->getRowSet(), UNO_QUERY );
- }
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::impl_connectDatabaseColumn_noNotify( bool _bFromReload )
-{
- OSL_PRECOND( !hasExternalValueBinding(), "OBoundControlModel::impl_connectDatabaseColumn_noNotify: not to be called with an external value binding!" );
-
- // consistency checks
- DBG_ASSERT( !( hasField() && !_bFromReload ),
- "OBoundControlModel::impl_connectDatabaseColumn_noNotify: the form is just *loaded*, but we already have a field!" );
- (void)_bFromReload;
-
- Reference< XRowSet > xRowSet( m_xAmbientForm, UNO_QUERY );
- OSL_ENSURE( xRowSet.is(), "OBoundControlModel::impl_connectDatabaseColumn_noNotify: no row set!" );
- if ( !xRowSet.is() )
- return;
-
- if ( !hasField() )
- {
- // connect to the column
- connectToField( xRowSet );
- }
-
- // now that we're connected (more or less, even if we did not find a column),
- // we definately want to forward any potentially occuring value changes
- m_bForwardValueChanges = sal_True;
-
- // let derived classes react on this new connection
- m_bLoaded = sal_True;
- onConnectedDbColumn( xRowSet );
-
- // initially transfer the db column value to the control, if we successfully connected to a database column
- if ( hasField() )
- initFromField( xRowSet );
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::impl_disconnectDatabaseColumn_noNotify()
-{
- OSL_PRECOND( !hasExternalValueBinding(), "OBoundControlModel::impl_disconnectDatabaseColumn_noNotify: not to be called with an external value binding!" );
-
- // let derived classes react on this
- onDisconnectedDbColumn();
-
- if ( hasField() )
- {
- getField()->removePropertyChangeListener( PROPERTY_VALUE, this );
- resetField();
- }
-
- m_xCursor = NULL;
- m_bLoaded = sal_False;
-}
-
-//==============================================================================
-// XLoadListener
-//------------------------------------------------------------------------------
-void SAL_CALL OBoundControlModel::loaded( const EventObject& _rEvent ) throw(RuntimeException)
-{
- ControlModelLock aLock( *this );
- FieldChangeNotifier aBoundFieldNotifier( aLock );
-
- OSL_ENSURE( _rEvent.Source == m_xAmbientForm, "OBoundControlModel::loaded: where does this come from?" );
- (void)_rEvent;
-
- OSL_PRECOND( !hasExternalValueBinding(), "OBoundControlModel::loaded: we should never reach this with an external value binding!" );
- if ( hasExternalValueBinding() )
- return;
-
- impl_connectDatabaseColumn_noNotify( false );
-}
-
-
-//------------------------------------------------------------------------------
-void SAL_CALL OBoundControlModel::unloaded( const com::sun::star::lang::EventObject& /*aEvent*/ ) throw(RuntimeException)
-{
- OSL_PRECOND( !hasExternalValueBinding(), "OBoundControlModel::unloaded: we should never reach this with an external value binding!" );
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OBoundControlModel::reloading( const com::sun::star::lang::EventObject& /*aEvent*/ ) throw(RuntimeException)
-{
- OSL_PRECOND( !hasExternalValueBinding(), "OBoundControlModel::reloading: we should never reach this with an external value binding!" );
- if ( hasExternalValueBinding() )
- return;
-
- osl::MutexGuard aGuard(m_aMutex);
- m_bForwardValueChanges = sal_False;
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OBoundControlModel::unloading(const com::sun::star::lang::EventObject& /*aEvent*/) throw(RuntimeException)
-{
- ControlModelLock aLock( *this );
- FieldChangeNotifier aBoundFieldNotifier( aLock );
-
- OSL_PRECOND( !hasExternalValueBinding(), "OBoundControlModel::unloading: we should never reach this with an external value binding!" );
- if ( hasExternalValueBinding() )
- return;
-
- impl_disconnectDatabaseColumn_noNotify();
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OBoundControlModel::reloaded( const EventObject& _rEvent ) throw(RuntimeException)
-{
- ControlModelLock aLock( *this );
- FieldChangeNotifier aBoundFieldNotifier( aLock );
-
- OSL_ENSURE( _rEvent.Source == m_xAmbientForm, "OBoundControlModel::reloaded: where does this come from?" );
- (void)_rEvent;
-
- OSL_PRECOND( !hasExternalValueBinding(), "OBoundControlModel::reloaded: we should never reach this with an external value binding!" );
- if ( hasExternalValueBinding() )
- return;
-
- impl_connectDatabaseColumn_noNotify( true );
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::setControlValue( const Any& _rValue, ValueChangeInstigator _eInstigator )
-{
- m_eControlValueChangeInstigator = _eInstigator;
- doSetControlValue( _rValue );
- m_eControlValueChangeInstigator = eOther;
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::doSetControlValue( const Any& _rValue )
-{
- OSL_PRECOND( m_xAggregateFastSet.is() && m_xAggregateSet.is(),
- "OBoundControlModel::doSetControlValue: invalid aggregate !" );
- OSL_PRECOND( m_sValuePropertyName.getLength() || ( m_nValuePropertyAggregateHandle != -1 ),
- "OBoundControlModel::doSetControlValue: please override if you have own value property handling!" );
-
- try
- {
- // release our mutex once (it's acquired in one of the the calling methods), as setting aggregate properties
- // may cause any uno controls belonging to us to lock the solar mutex, which is potentially dangerous with
- // our own mutex locked
- MutexRelease aRelease( m_aMutex );
- if ( ( m_nValuePropertyAggregateHandle != -1 ) && m_xAggregateFastSet.is() )
- {
- m_xAggregateFastSet->setFastPropertyValue( m_nValuePropertyAggregateHandle, _rValue );
- }
- else if ( m_sValuePropertyName.getLength() && m_xAggregateSet.is() )
- {
- m_xAggregateSet->setPropertyValue( m_sValuePropertyName, _rValue );
- }
- }
- catch( const Exception& )
- {
- OSL_FAIL( "OBoundControlModel::doSetControlValue: caught an exception!" );
- }
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::onConnectedValidator( )
-{
- try
- {
- // if we have an external validator, we do not want the control to force invalid
- // inputs to the default value. Instead, invalid inputs should be translated
- // to NaN (not a number)
- Reference< XPropertySetInfo > xAggregatePropertyInfo;
- if ( m_xAggregateSet.is() )
- xAggregatePropertyInfo = m_xAggregateSet->getPropertySetInfo();
- if ( xAggregatePropertyInfo.is() && xAggregatePropertyInfo->hasPropertyByName( PROPERTY_ENFORCE_FORMAT ) )
- m_xAggregateSet->setPropertyValue( PROPERTY_ENFORCE_FORMAT, makeAny( (sal_Bool)sal_False ) );
- }
- catch( const Exception& )
- {
- OSL_FAIL( "OBoundControlModel::onConnectedValidator: caught an exception!" );
- }
- recheckValidity( false );
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::onDisconnectedValidator( )
-{
- try
- {
- Reference< XPropertySetInfo > xAggregatePropertyInfo;
- if ( m_xAggregateSet.is() )
- xAggregatePropertyInfo = m_xAggregateSet->getPropertySetInfo();
- if ( xAggregatePropertyInfo.is() && xAggregatePropertyInfo->hasPropertyByName( PROPERTY_ENFORCE_FORMAT ) )
- m_xAggregateSet->setPropertyValue( PROPERTY_ENFORCE_FORMAT, makeAny( (sal_Bool)sal_True ) );
- }
- catch( const Exception& )
- {
- OSL_FAIL( "OBoundControlModel::onDisconnectedValidator: caught an exception!" );
- }
- recheckValidity( false );
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::onConnectedExternalValue( )
-{
- calculateExternalValueType();
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::onDisconnectedExternalValue( )
-{
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::onConnectedDbColumn( const Reference< XInterface >& /*_rxForm*/ )
-{
- OSL_PRECOND( !hasExternalValueBinding(), "OBoundControlModel::onConnectedDbColumn: how this? There's an external value binding!" );
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::onDisconnectedDbColumn()
-{
- OSL_PRECOND( !hasExternalValueBinding(), "OBoundControlModel::onDisconnectedDbColumn: how this? There's an external value binding!" );
-}
-
-// XReset
-//-----------------------------------------------------------------------------
-Any OBoundControlModel::getDefaultForReset() const
-{
- return Any();
-}
-
-//-----------------------------------------------------------------------------
-void OBoundControlModel::resetNoBroadcast()
-{
- setControlValue( getDefaultForReset(), eOther );
-}
-
-//-----------------------------------------------------------------------------
-void OBoundControlModel::addResetListener(const Reference<XResetListener>& l) throw (RuntimeException)
-{
- m_aResetHelper.addResetListener( l );
-}
-
-//-----------------------------------------------------------------------------
-void OBoundControlModel::removeResetListener(const Reference<XResetListener>& l) throw (RuntimeException)
-{
- m_aResetHelper.removeResetListener( l );
-}
-
-//-----------------------------------------------------------------------------
-void OBoundControlModel::reset() throw (RuntimeException)
-{
- if ( !m_aResetHelper.approveReset() )
- return;
-
- ControlModelLock aLock( *this );
-
- // on a new record?
- sal_Bool bIsNewRecord = sal_False;
- Reference<XPropertySet> xSet( m_xCursor, UNO_QUERY );
- if ( xSet.is() )
- {
- try
- {
- xSet->getPropertyValue( PROPERTY_ISNEW ) >>= bIsNewRecord;
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- }
-
- // cursor on an invalid row?
- sal_Bool bInvalidCursorPosition = sal_True;
- try
- {
- bInvalidCursorPosition = m_xCursor.is()
- && ( m_xCursor->isAfterLast()
- || m_xCursor->isBeforeFirst()
- )
- && !bIsNewRecord;
- }
- catch( const SQLException& )
- {
- OSL_FAIL( "OBoundControlModel::reset: caught an SQL exception!" );
- }
- // #i24495# - don't count the insert row as "invalid"
-
- sal_Bool bSimpleReset =
- ( !m_xColumn.is() // no connection to a database column
- || ( m_xCursor.is() // OR we have an improperly positioned cursor
- && bInvalidCursorPosition
- )
- || hasExternalValueBinding() // OR we have an external value binding
- );
-
- if ( !bSimpleReset )
- {
- // The default values will be set if and only if the current value of the field which we're bound
- // to is NULL.
- // Else, the current field value should be refreshed
- // This behaviour is not completely ... "matured": What should happen if the field as well as the
- // control have a default value?
-
- sal_Bool bIsNull = sal_True;
- // we have to access the field content at least once to get a reliable result by XColumn::wasNull
- try
- {
- // normally, we'd do a getString here. However, this is extremely expensive in the case
- // of binary fields. Unfortunately, getString is the only method which is guaranteed
- // to *always* succeed, all other getXXX methods may fail if the column is asked for a
- // non-convertible type
- sal_Int32 nFieldType = DataType::OBJECT;
- getField()->getPropertyValue( PROPERTY_FIELDTYPE ) >>= nFieldType;
- if ( ( nFieldType == DataType::BINARY )
- || ( nFieldType == DataType::VARBINARY )
- || ( nFieldType == DataType::LONGVARBINARY )
- || ( nFieldType == DataType::OBJECT )
- /*|| ( nFieldType == DataType::CLOB )*/
- )
- m_xColumn->getBinaryStream();
- else if ( nFieldType == DataType::BLOB )
- m_xColumn->getBlob();
- else
- m_xColumn->getString();
-
- bIsNull = m_xColumn->wasNull();
- }
- catch(Exception&)
- {
- OSL_FAIL("OBoundControlModel::reset: this should have succeeded in all cases!");
- }
-
- sal_Bool bNeedValueTransfer = sal_True;
-
- if ( bIsNull )
- {
- if ( bIsNewRecord )
- {
- // reset the control to it's default
- resetNoBroadcast();
- // and immediately commit the changes to the DB column, to keep consistency
- commitControlValueToDbColumn( sal_True );
-
- bNeedValueTransfer = sal_False;
- }
- }
-
- if ( bNeedValueTransfer )
- transferDbValueToControl();
- }
- else
- {
- resetNoBroadcast();
-
- // transfer to the external binding, if necessary
- if ( hasExternalValueBinding() )
- transferControlValueToExternal( aLock );
- }
-
- // revalidate, if necessary
- if ( hasValidator() )
- recheckValidity( true );
-
- aLock.release();
-
- m_aResetHelper.notifyResetted();
-}
-
-// -----------------------------------------------------------------------------
-void OBoundControlModel::impl_setField_noNotify( const Reference< XPropertySet>& _rxField )
-{
- DBG_ASSERT( !hasExternalValueBinding(), "OBoundControlModel::impl_setField_noNotify: We have an external value binding!" );
- m_xField = _rxField;
-}
-
-//--------------------------------------------------------------------
-sal_Bool OBoundControlModel::impl_approveValueBinding_nolock( const Reference< XValueBinding >& _rxBinding )
-{
- if ( !_rxBinding.is() )
- return sal_False;
-
- Sequence< Type > aTypeCandidates;
- {
- // SYNCHRONIZED -->
- ::osl::MutexGuard aGuard( m_aMutex );
- aTypeCandidates = getSupportedBindingTypes();
- // <-- SYNCHRONIZED
- }
-
- for ( const Type* pType = aTypeCandidates.getConstArray();
- pType != aTypeCandidates.getConstArray() + aTypeCandidates.getLength();
- ++pType
- )
- {
- if ( _rxBinding->supportsType( *pType ) )
- return sal_True;
- }
-
- return sal_False;
-}
-
-//--------------------------------------------------------------------
-void OBoundControlModel::connectExternalValueBinding(
- const Reference< XValueBinding >& _rxBinding, ControlModelLock& _rInstanceLock )
-{
- OSL_PRECOND( _rxBinding.is(), "OBoundControlModel::connectExternalValueBinding: invalid binding instance!" );
- OSL_PRECOND( !hasExternalValueBinding( ), "OBoundControlModel::connectExternalValueBinding: precond not met (currently have a binding)!" );
-
- // if we're connected to a database column, suspend this
- if ( hasField() )
- impl_disconnectDatabaseColumn_noNotify();
-
- // suspend listening for load-related events at out ambient form.
- // This is because an external value binding overrules a possible database binding.
- if ( isFormListening() )
- doFormListening( false );
-
- // remember this new binding
- m_xExternalBinding = _rxBinding;
-
- // tell the derivee
- onConnectedExternalValue();
-
- try
- {
- // add as value listener so we get notified when the value changes
- Reference< XModifyBroadcaster > xModifiable( m_xExternalBinding, UNO_QUERY );
- if ( xModifiable.is() )
- xModifiable->addModifyListener( this );
-
- // add as property change listener for some (possibly present) properties we're
- // interested in
- Reference< XPropertySet > xBindingProps( m_xExternalBinding, UNO_QUERY );
- Reference< XPropertySetInfo > xBindingPropsInfo( xBindingProps.is() ? xBindingProps->getPropertySetInfo() : Reference< XPropertySetInfo >() );
- if ( xBindingPropsInfo.is() )
- {
- if ( xBindingPropsInfo->hasPropertyByName( PROPERTY_READONLY ) )
- {
- xBindingProps->addPropertyChangeListener( PROPERTY_READONLY, this );
- m_bBindingControlsRO = sal_True;
- }
- if ( xBindingPropsInfo->hasPropertyByName( PROPERTY_RELEVANT ) )
- {
- xBindingProps->addPropertyChangeListener( PROPERTY_RELEVANT, this );
- m_bBindingControlsEnable = sal_True;
- }
- }
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
-
- // propagate our new value
- transferExternalValueToControl( _rInstanceLock );
-
- // if the binding is also a validator, use it, too. This is a constraint of the
- // com.sun.star.form.binding.ValidatableBindableFormComponent service
- if ( m_bSupportsValidation )
- {
- try
- {
- Reference< XValidator > xAsValidator( _rxBinding, UNO_QUERY );
- if ( xAsValidator.is() )
- setValidator( xAsValidator );
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- }
-}
-
-//--------------------------------------------------------------------
-void OBoundControlModel::disconnectExternalValueBinding( )
-{
- try
- {
- // not listening at the binding anymore
- Reference< XModifyBroadcaster > xModifiable( m_xExternalBinding, UNO_QUERY );
- if ( xModifiable.is() )
- xModifiable->removeModifyListener( this );
-
- // remove as property change listener
- Reference< XPropertySet > xBindingProps( m_xExternalBinding, UNO_QUERY );
- if ( m_bBindingControlsRO )
- xBindingProps->removePropertyChangeListener( PROPERTY_READONLY, this );
- if ( m_bBindingControlsEnable )
- xBindingProps->removePropertyChangeListener( PROPERTY_RELEVANT, this );
- }
- catch( const Exception& )
- {
- OSL_FAIL( "OBoundControlModel::disconnectExternalValueBinding: caught an exception!" );
- }
-
- // if the binding also acts as our validator, disconnect the validator, too
- if ( ( m_xExternalBinding == m_xValidator ) && m_xValidator.is() )
- disconnectValidator( );
-
- // no binding anymore
- m_xExternalBinding.clear();
-
- // be a load listener at our form, again. This was suspended while we had
- // an external value binding in place.
- doFormListening( true );
-
- // re-connect to database column of the new parent
- if ( m_xAmbientForm.is() && m_xAmbientForm->isLoaded() )
- impl_connectDatabaseColumn_noNotify( false );
-
- // tell the derivee
- onDisconnectedExternalValue();
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OBoundControlModel::setValueBinding( const Reference< XValueBinding >& _rxBinding ) throw (IncompatibleTypesException, RuntimeException)
-{
- OSL_PRECOND( m_bSupportsExternalBinding, "OBoundControlModel::setValueBinding: How did you reach this method?" );
- // the interface for this method should not have been exposed if we do not
- // support binding to external data
- // allow reset
- if ( _rxBinding.is() && !impl_approveValueBinding_nolock( _rxBinding ) )
- {
- throw IncompatibleTypesException(
- FRM_RES_STRING( RID_STR_INCOMPATIBLE_TYPES ),
- *this
- );
- }
-
- ControlModelLock aLock( *this );
-
- // since a ValueBinding overrules any potentially active database binding, the change in a ValueBinding
- // might trigger a change in our BoundField.
- FieldChangeNotifier aBoundFieldNotifier( aLock );
-
- // disconnect from the old binding
- if ( hasExternalValueBinding() )
- disconnectExternalValueBinding( );
-
- // connect to the new binding
- if ( _rxBinding.is() )
- connectExternalValueBinding( _rxBinding, aLock );
-}
-
-//--------------------------------------------------------------------
-Reference< XValueBinding > SAL_CALL OBoundControlModel::getValueBinding( ) throw (RuntimeException)
-{
- ::osl::MutexGuard aGuard( m_aMutex );
- OSL_PRECOND( m_bSupportsExternalBinding, "OBoundControlModel::getValueBinding: How did you reach this method?" );
- // the interface for this method should not have been exposed if we do not
- // support binding to external data
-
- return m_xExternalBinding;
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OBoundControlModel::modified( const EventObject& _rEvent ) throw ( RuntimeException )
-{
- ControlModelLock aLock( *this );
-
- OSL_PRECOND( hasExternalValueBinding(), "OBoundControlModel::modified: Where did this come from?" );
- if ( !m_bTransferingValue && ( m_xExternalBinding == _rEvent.Source ) && m_xExternalBinding.is() )
- {
- transferExternalValueToControl( aLock );
- }
-}
-
-//--------------------------------------------------------------------
-void OBoundControlModel::transferDbValueToControl( )
-{
- try
- {
- setControlValue( translateDbColumnToControlValue(), eDbColumnBinding );
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::transferExternalValueToControl( ControlModelLock& _rInstanceLock )
-{
- Reference< XValueBinding > xExternalBinding( m_xExternalBinding );
- Type aValueExchangeType( getExternalValueType() );
-
- _rInstanceLock.release();
- // >>>>>>>> ----- UNSAFE ----- >>>>>>>>
- Any aExternalValue;
- try
- {
- aExternalValue = xExternalBinding->getValue( aValueExchangeType );
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- // <<<<<<<< ----- UNSAFE ----- <<<<<<<<
- _rInstanceLock.acquire();
-
- setControlValue( translateExternalValueToControlValue( aExternalValue ), eExternalBinding );
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::transferControlValueToExternal( ControlModelLock& _rInstanceLock )
-{
- OSL_PRECOND( m_bSupportsExternalBinding && hasExternalValueBinding(),
- "OBoundControlModel::transferControlValueToExternal: precondition not met!" );
-
- if ( m_xExternalBinding.is() )
- {
- Any aExternalValue( translateControlValueToExternalValue() );
- m_bTransferingValue = sal_True;
-
- _rInstanceLock.release();
- // >>>>>>>> ----- UNSAFE ----- >>>>>>>>
- try
- {
- m_xExternalBinding->setValue( aExternalValue );
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- // <<<<<<<< ----- UNSAFE ----- <<<<<<<<
- _rInstanceLock.acquire();
-
- m_bTransferingValue = sal_False;
- }
-}
-
-// -----------------------------------------------------------------------------
-Sequence< Type > OBoundControlModel::getSupportedBindingTypes()
-{
- return Sequence< Type >( &m_aValuePropertyType, 1 );
-}
-
-//-----------------------------------------------------------------------------
-void OBoundControlModel::calculateExternalValueType()
-{
- m_aExternalValueType = Type();
- if ( !m_xExternalBinding.is() )
- return;
-
- Sequence< Type > aTypeCandidates( getSupportedBindingTypes() );
- for ( const Type* pTypeCandidate = aTypeCandidates.getConstArray();
- pTypeCandidate != aTypeCandidates.getConstArray() + aTypeCandidates.getLength();
- ++pTypeCandidate
- )
- {
- if ( m_xExternalBinding->supportsType( *pTypeCandidate ) )
- {
- m_aExternalValueType = *pTypeCandidate;
- break;
- }
- }
-}
-
-//-----------------------------------------------------------------------------
-Any OBoundControlModel::translateExternalValueToControlValue( const Any& _rExternalValue ) const
-{
- OSL_PRECOND( m_bSupportsExternalBinding && hasExternalValueBinding(),
- "OBoundControlModel::translateExternalValueToControlValue: precondition not met!" );
-
- Any aControlValue( _rExternalValue );
-
- // if the external value is VOID, and our value property is not allowed to be VOID,
- // then default-construct a value
- if ( !aControlValue.hasValue() && !m_bValuePropertyMayBeVoid )
- aControlValue.setValue( NULL, m_aValuePropertyType );
-
- // outta here
- return aControlValue;
-}
-
-//------------------------------------------------------------------------------
-Any OBoundControlModel::translateControlValueToExternalValue( ) const
-{
- return getControlValue( );
-}
-
-//------------------------------------------------------------------------------
-Any OBoundControlModel::translateControlValueToValidatableValue( ) const
-{
- OSL_PRECOND( m_xValidator.is(), "OBoundControlModel::translateControlValueToValidatableValue: no validator, so why should I?" );
- if ( ( m_xValidator == m_xExternalBinding ) && m_xValidator.is() )
- return translateControlValueToExternalValue();
- return getControlValue();
-}
-
-//------------------------------------------------------------------------------
-Any OBoundControlModel::getControlValue( ) const
-{
- OSL_PRECOND( m_xAggregateFastSet.is() && m_xAggregateSet.is(),
- "OBoundControlModel::getControlValue: invalid aggregate !" );
- OSL_PRECOND( m_sValuePropertyName.getLength() || ( m_nValuePropertyAggregateHandle != -1 ),
- "OBoundControlModel::getControlValue: please override if you have own value property handling!" );
-
- // determine the current control value
- Any aControlValue;
- if ( ( m_nValuePropertyAggregateHandle != -1 ) && m_xAggregateFastSet.is() )
- {
- aControlValue = m_xAggregateFastSet->getFastPropertyValue( m_nValuePropertyAggregateHandle );
- }
- else if ( m_sValuePropertyName.getLength() && m_xAggregateSet.is() )
- {
- aControlValue = m_xAggregateSet->getPropertyValue( m_sValuePropertyName );
- }
-
- return aControlValue;
-}
-
-//--------------------------------------------------------------------
-void OBoundControlModel::connectValidator( const Reference< XValidator >& _rxValidator )
-{
- OSL_PRECOND( _rxValidator.is(), "OBoundControlModel::connectValidator: invalid validator instance!" );
- OSL_PRECOND( !hasValidator( ), "OBoundControlModel::connectValidator: precond not met (have a validator currently)!" );
-
- m_xValidator = _rxValidator;
-
- // add as value listener so we get notified when the value changes
- if ( m_xValidator.is() )
- {
- try
- {
- m_xValidator->addValidityConstraintListener( this );
- }
- catch( const RuntimeException& )
- {
- }
- }
-
- onConnectedValidator( );
-}
-
-//--------------------------------------------------------------------
-void OBoundControlModel::disconnectValidator( )
-{
- OSL_PRECOND( hasValidator( ), "OBoundControlModel::connectValidator: precond not met (don't have a validator currently)!" );
-
- // add as value listener so we get notified when the value changes
- if ( m_xValidator.is() )
- {
- try
- {
- m_xValidator->removeValidityConstraintListener( this );
- }
- catch( const RuntimeException& )
- {
- }
- }
-
- m_xValidator.clear();
-
- onDisconnectedValidator( );
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OBoundControlModel::setValidator( const Reference< XValidator >& _rxValidator ) throw (VetoException,RuntimeException)
-{
- ::osl::ClearableMutexGuard aGuard( m_aMutex );
- OSL_PRECOND( m_bSupportsValidation, "OBoundControlModel::setValidator: How did you reach this method?" );
- // the interface for this method should not have been exposed if we do not
- // support validation
-
- // early out if the validator does not change
- if( _rxValidator == m_xValidator )
- return;
-
- if ( m_xValidator.is() && ( m_xValidator == m_xExternalBinding ) )
- throw VetoException(
- FRM_RES_STRING( RID_STR_INVALID_VALIDATOR ),
- *this
- );
-
- // disconnect from the old validator
- if ( hasValidator() )
- disconnectValidator( );
-
- // connect to the new validator
- if ( _rxValidator.is() )
- connectValidator( _rxValidator );
-}
-
-//--------------------------------------------------------------------
-Reference< XValidator > SAL_CALL OBoundControlModel::getValidator( ) throw (RuntimeException)
-{
- ::osl::MutexGuard aGuard( m_aMutex );
- OSL_PRECOND( m_bSupportsValidation, "OBoundControlModel::getValidator: How did you reach this method?" );
- // the interface for this method should not have been exposed if we do not
- // support validation
-
- return m_xValidator;
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OBoundControlModel::validityConstraintChanged( const EventObject& /*Source*/ ) throw (RuntimeException)
-{
- ::osl::ClearableMutexGuard aGuard( m_aMutex );
- OSL_PRECOND( m_bSupportsValidation, "OBoundControlModel::validityConstraintChanged: How did you reach this method?" );
- // the interface for this method should not have been exposed if we do not
- // support validation
-
- recheckValidity( false );
-}
-
-//--------------------------------------------------------------------
-sal_Bool SAL_CALL OBoundControlModel::isValid( ) throw (RuntimeException)
-{
- return m_bIsCurrentValueValid;
-}
-
-//--------------------------------------------------------------------
-::com::sun::star::uno::Any OBoundControlModel::getCurrentFormComponentValue() const
-{
- if ( hasValidator() )
- return translateControlValueToValidatableValue();
- return getControlValue();
-}
-
-//--------------------------------------------------------------------
-Any SAL_CALL OBoundControlModel::getCurrentValue( ) throw (RuntimeException)
-{
- ::osl::MutexGuard aGuard( m_aMutex );
- return getCurrentFormComponentValue();
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OBoundControlModel::addFormComponentValidityListener( const Reference< validation::XFormComponentValidityListener >& Listener ) throw (NullPointerException, RuntimeException)
-{
- if ( Listener.is() )
- m_aFormComponentListeners.addInterface( Listener );
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OBoundControlModel::removeFormComponentValidityListener( const Reference< validation::XFormComponentValidityListener >& Listener ) throw (NullPointerException, RuntimeException)
-{
- if ( Listener.is() )
- m_aFormComponentListeners.removeInterface( Listener );
-}
-
-//--------------------------------------------------------------------
-void OBoundControlModel::recheckValidity( bool _bForceNotification )
-{
- try
- {
- sal_Bool bIsCurrentlyValid = sal_True;
- if ( hasValidator() )
- bIsCurrentlyValid = m_xValidator->isValid( translateControlValueToValidatableValue() );
-
- if ( ( bIsCurrentlyValid != m_bIsCurrentValueValid ) || _bForceNotification )
- {
- m_bIsCurrentValueValid = bIsCurrentlyValid;
-
- // release our mutex for the notifications
- MutexRelease aRelease( m_aMutex );
- m_aFormComponentListeners.notifyEach( &validation::XFormComponentValidityListener::componentValidityChanged, EventObject( *this ) );
- }
- }
- catch( const Exception& )
- {
- OSL_FAIL( "OBoundControlModel::recheckValidity: caught an exception!" );
- }
-}
-
-//------------------------------------------------------------------------------
-void OBoundControlModel::describeFixedProperties( Sequence< Property >& _rProps ) const
-{
- BEGIN_DESCRIBE_PROPERTIES( 5, OControlModel )
- DECL_PROP1 ( CONTROLSOURCE, ::rtl::OUString, BOUND );
- DECL_IFACE_PROP3( BOUNDFIELD, XPropertySet, BOUND, READONLY, TRANSIENT );
- DECL_IFACE_PROP2( CONTROLLABEL, XPropertySet, BOUND, MAYBEVOID );
- DECL_PROP2 ( CONTROLSOURCEPROPERTY, ::rtl::OUString, READONLY, TRANSIENT );
- DECL_BOOL_PROP1 ( INPUT_REQUIRED, BOUND );
- END_DESCRIBE_PROPERTIES()
-}
-
-// -----------------------------------------------------------------------------
-
-//.........................................................................
-}
-//... namespace frm .......................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/FormattedField.cxx b/forms/source/component/FormattedField.cxx
deleted file mode 100644
index 21abaf123..000000000
--- a/forms/source/component/FormattedField.cxx
+++ /dev/null
@@ -1,1257 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-
-#include "FormattedField.hxx"
-#include "services.hxx"
-#include "property.hrc"
-#include "property.hxx"
-#include "frm_resource.hxx"
-#include "frm_resource.hrc"
-#include "propertybaghelper.hxx"
-#include <comphelper/sequence.hxx>
-#include <comphelper/numbers.hxx>
-#include <connectivity/dbtools.hxx>
-#include <connectivity/dbconversion.hxx>
-#include <svl/zforlist.hxx>
-#include <svl/numuno.hxx>
-#include <vcl/svapp.hxx>
-#include <tools/debug.hxx>
-#include <tools/wintypes.hxx>
-#include <i18npool/mslangid.hxx>
-#include <rtl/textenc.h>
-#include <com/sun/star/sdbc/DataType.hpp>
-#include <com/sun/star/util/NumberFormat.hpp>
-#include <com/sun/star/util/Date.hpp>
-#include <com/sun/star/util/Time.hpp>
-#include <com/sun/star/awt/MouseEvent.hpp>
-#include <com/sun/star/form/XSubmit.hpp>
-#include <com/sun/star/awt/XWindow.hpp>
-#include <com/sun/star/awt/XKeyListener.hpp>
-#include <com/sun/star/form/FormComponentType.hpp>
-#include <com/sun/star/util/XNumberFormatsSupplier.hpp>
-#include <com/sun/star/util/XNumberFormatTypes.hpp>
-#include <com/sun/star/form/XForm.hpp>
-#include <com/sun/star/container/XIndexAccess.hpp>
-#include <osl/mutex.hxx>
- // needed as long as we use the SolarMutex
-#include <comphelper/streamsection.hxx>
-#include <cppuhelper/weakref.hxx>
-#include <unotools/desktopterminationobserver.hxx>
-
-#include <list>
-#include <algorithm>
-
-using namespace dbtools;
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::sdb;
-using namespace ::com::sun::star::sdbc;
-using namespace ::com::sun::star::sdbcx;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::io;
-using namespace ::com::sun::star::lang;
-using namespace ::com::sun::star::util;
-using namespace ::com::sun::star::form::binding;
-
-namespace
-{
- typedef com::sun::star::util::Date UNODate;
- typedef com::sun::star::util::Time UNOTime;
- typedef com::sun::star::util::DateTime UNODateTime;
-}
-
-//.........................................................................
-namespace frm
-{
-
-/*************************************************************************/
-
-class StandardFormatsSupplier : protected SvNumberFormatsSupplierObj, public ::utl::ITerminationListener
-{
-protected:
- SvNumberFormatter* m_pMyPrivateFormatter;
- static WeakReference< XNumberFormatsSupplier > s_xDefaultFormatsSupplier;
-
-public:
- static Reference< XNumberFormatsSupplier > get( const Reference< XMultiServiceFactory >& _rxORB );
-
- using SvNumberFormatsSupplierObj::operator new;
- using SvNumberFormatsSupplierObj::operator delete;
-
-protected:
- StandardFormatsSupplier(const Reference<XMultiServiceFactory>& _rxFactory,LanguageType _eSysLanguage);
- ~StandardFormatsSupplier();
-
-protected:
- virtual bool queryTermination() const;
- virtual void notifyTermination();
-};
-
-//------------------------------------------------------------------
-WeakReference< XNumberFormatsSupplier > StandardFormatsSupplier::s_xDefaultFormatsSupplier;
-
-//------------------------------------------------------------------
-StandardFormatsSupplier::StandardFormatsSupplier(const Reference< XMultiServiceFactory > & _rxFactory,LanguageType _eSysLanguage)
- :SvNumberFormatsSupplierObj()
- ,m_pMyPrivateFormatter(new SvNumberFormatter(_rxFactory, _eSysLanguage))
-{
- SetNumberFormatter(m_pMyPrivateFormatter);
-
- // #i29147#
- ::utl::DesktopTerminationObserver::registerTerminationListener( this );
-}
-
-//------------------------------------------------------------------
-StandardFormatsSupplier::~StandardFormatsSupplier()
-{
- ::utl::DesktopTerminationObserver::revokeTerminationListener( this );
-
- DELETEZ( m_pMyPrivateFormatter );
-}
-
-//------------------------------------------------------------------
-Reference< XNumberFormatsSupplier > StandardFormatsSupplier::get( const Reference< XMultiServiceFactory >& _rxORB )
-{
- LanguageType eSysLanguage = LANGUAGE_SYSTEM;
- {
- ::osl::MutexGuard aGuard( ::osl::Mutex::getGlobalMutex() );
- Reference< XNumberFormatsSupplier > xSupplier = s_xDefaultFormatsSupplier;
- if ( xSupplier.is() )
- return xSupplier;
-
- // get the Office's locale
- const Locale& rSysLocale = SvtSysLocale().GetLocaleData().getLocale();
- // translate
- eSysLanguage = MsLangId::convertLocaleToLanguage( rSysLocale );
- }
-
- StandardFormatsSupplier* pSupplier = new StandardFormatsSupplier( _rxORB, eSysLanguage );
- Reference< XNumberFormatsSupplier > xNewlyCreatedSupplier( pSupplier );
-
- {
- ::osl::MutexGuard aGuard( ::osl::Mutex::getGlobalMutex() );
- Reference< XNumberFormatsSupplier > xSupplier = s_xDefaultFormatsSupplier;
- if ( xSupplier.is() )
- // somebody used the small time frame where the mutex was not locked to create and set
- // the supplier
- return xSupplier;
-
- s_xDefaultFormatsSupplier = xNewlyCreatedSupplier;
- }
-
- return xNewlyCreatedSupplier;
-}
-
-//------------------------------------------------------------------
-bool StandardFormatsSupplier::queryTermination() const
-{
- return true;
-}
-
-//------------------------------------------------------------------
-void StandardFormatsSupplier::notifyTermination()
-{
- Reference< XNumberFormatsSupplier > xKeepAlive = this;
- // when the application is terminating, release our static reference so that we are cleared/destructed
- // earlier than upon unloading the library
- // #i29147#
- s_xDefaultFormatsSupplier = WeakReference< XNumberFormatsSupplier >( );
-
- SetNumberFormatter( NULL );
- DELETEZ( m_pMyPrivateFormatter );
-}
-
-/*************************************************************************/
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OFormattedControl_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new OFormattedControl(_rxFactory));
-}
-
-//------------------------------------------------------------------
-Sequence<Type> OFormattedControl::_getTypes()
-{
- return ::comphelper::concatSequences(
- OFormattedControl_BASE::getTypes(),
- OBoundControl::_getTypes()
- );
-}
-
-//------------------------------------------------------------------
-Any SAL_CALL OFormattedControl::queryAggregation(const Type& _rType) throw (RuntimeException)
-{
- Any aReturn = OBoundControl::queryAggregation(_rType);
- if (!aReturn.hasValue())
- aReturn = OFormattedControl_BASE::queryInterface(_rType);
- return aReturn;
-}
-
-
-DBG_NAME(OFormattedControl);
-//------------------------------------------------------------------------------
-OFormattedControl::OFormattedControl(const Reference<XMultiServiceFactory>& _rxFactory)
- :OBoundControl(_rxFactory, VCL_CONTROL_FORMATTEDFIELD)
- ,m_nKeyEvent(0)
-{
- DBG_CTOR(OFormattedControl,NULL);
-
- increment(m_refCount);
- {
- Reference<XWindow> xComp;
- if (query_aggregation(m_xAggregate, xComp))
- {
- xComp->addKeyListener(this);
- }
- }
- decrement(m_refCount);
-}
-
-//------------------------------------------------------------------------------
-OFormattedControl::~OFormattedControl()
-{
- if( m_nKeyEvent )
- Application::RemoveUserEvent( m_nKeyEvent );
-
- if (!OComponentHelper::rBHelper.bDisposed)
- {
- acquire();
- dispose();
- }
-
- DBG_DTOR(OFormattedControl,NULL);
-}
-
-// XKeyListener
-//------------------------------------------------------------------------------
-void OFormattedControl::disposing(const EventObject& _rSource) throw(RuntimeException)
-{
- OBoundControl::disposing(_rSource);
-}
-
-//------------------------------------------------------------------------------
-void OFormattedControl::keyPressed(const ::com::sun::star::awt::KeyEvent& e) throw ( ::com::sun::star::uno::RuntimeException)
-{
- if( e.KeyCode != KEY_RETURN || e.Modifiers != 0 )
- return;
-
- // Steht das Control in einem Formular mit einer Submit-URL?
- Reference<com::sun::star::beans::XPropertySet> xSet(getModel(), UNO_QUERY);
- if( !xSet.is() )
- return;
-
- Reference<XFormComponent> xFComp(xSet, UNO_QUERY);
- InterfaceRef xParent = xFComp->getParent();
- if( !xParent.is() )
- return;
-
- Reference<com::sun::star::beans::XPropertySet> xFormSet(xParent, UNO_QUERY);
- if( !xFormSet.is() )
- return;
-
- Any aTmp(xFormSet->getPropertyValue( PROPERTY_TARGET_URL ));
- if (!isA(aTmp, static_cast< ::rtl::OUString* >(NULL)) ||
- !getString(aTmp).getLength() )
- return;
-
- Reference<XIndexAccess> xElements(xParent, UNO_QUERY);
- sal_Int32 nCount = xElements->getCount();
- if( nCount > 1 )
- {
-
- Reference<com::sun::star::beans::XPropertySet> xFCSet;
- for( sal_Int32 nIndex=0; nIndex < nCount; nIndex++ )
- {
- // Any aElement(xElements->getByIndex(nIndex));
- xElements->getByIndex(nIndex) >>= xFCSet;
-
- if (hasProperty(PROPERTY_CLASSID, xFCSet) &&
- getINT16(xFCSet->getPropertyValue(PROPERTY_CLASSID)) == FormComponentType::TEXTFIELD)
- {
- // Noch ein weiteres Edit gefunden ==> dann nicht submitten
- if (xFCSet != xSet)
- return;
- }
- }
- }
-
- // Da wir noch im Haender stehen, submit asynchron ausloesen
- if( m_nKeyEvent )
- Application::RemoveUserEvent( m_nKeyEvent );
- m_nKeyEvent = Application::PostUserEvent( LINK(this, OFormattedControl,
- OnKeyPressed) );
-}
-
-//------------------------------------------------------------------------------
-void OFormattedControl::keyReleased(const ::com::sun::star::awt::KeyEvent& /*e*/) throw ( ::com::sun::star::uno::RuntimeException)
-{
-}
-
-//------------------------------------------------------------------------------
-IMPL_LINK(OFormattedControl, OnKeyPressed, void*, /*EMPTYARG*/)
-{
- m_nKeyEvent = 0;
-
- Reference<XFormComponent> xFComp(getModel(), UNO_QUERY);
- InterfaceRef xParent = xFComp->getParent();
- Reference<XSubmit> xSubmit(xParent, UNO_QUERY);
- if (xSubmit.is())
- xSubmit->submit( Reference<XControl> (), ::com::sun::star::awt::MouseEvent() );
- return 0L;
-}
-
-//------------------------------------------------------------------------------
-StringSequence OFormattedControl::getSupportedServiceNames() throw()
-{
- StringSequence aSupported = OBoundControl::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 1);
-
- ::rtl::OUString*pArray = aSupported.getArray();
- pArray[aSupported.getLength()-1] = FRM_SUN_CONTROL_FORMATTEDFIELD;
- return aSupported;
-}
-
-//------------------------------------------------------------------------------
-void OFormattedControl::setDesignMode(sal_Bool bOn) throw ( ::com::sun::star::uno::RuntimeException)
-{
- OBoundControl::setDesignMode(bOn);
-}
-
-/*************************************************************************/
-DBG_NAME(OFormattedModel)
-//------------------------------------------------------------------
-void OFormattedModel::implConstruct()
-{
- // members
- m_bOriginalNumeric = sal_False;
- m_bNumeric = sal_False;
- m_xOriginalFormatter = NULL;
- m_nKeyType = NumberFormat::UNDEFINED;
- m_aNullDate = DBTypeConversion::getStandardDate();
- m_nFieldType = DataType::OTHER;
-
- // default our formats supplier
- increment(m_refCount);
- setPropertyToDefaultByHandle(PROPERTY_ID_FORMATSSUPPLIER);
- decrement(m_refCount);
-
- startAggregatePropertyListening( PROPERTY_FORMATKEY );
- startAggregatePropertyListening( PROPERTY_FORMATSSUPPLIER );
-}
-
-//------------------------------------------------------------------
-OFormattedModel::OFormattedModel(const Reference<XMultiServiceFactory>& _rxFactory)
- :OEditBaseModel(_rxFactory, VCL_CONTROLMODEL_FORMATTEDFIELD, FRM_SUN_CONTROL_FORMATTEDFIELD, sal_True, sal_True )
- // use the old control name for compytibility reasons
- ,OErrorBroadcaster( OComponentHelper::rBHelper )
-{
- DBG_CTOR(OFormattedModel, NULL);
-
- implConstruct();
-
- m_nClassId = FormComponentType::TEXTFIELD;
- initValueProperty( PROPERTY_EFFECTIVE_VALUE, PROPERTY_ID_EFFECTIVE_VALUE );
-}
-
-//------------------------------------------------------------------
-OFormattedModel::OFormattedModel( const OFormattedModel* _pOriginal, const Reference< XMultiServiceFactory >& _rxFactory )
- :OEditBaseModel( _pOriginal, _rxFactory )
- ,OErrorBroadcaster( OComponentHelper::rBHelper )
-{
- DBG_CTOR(OFormattedModel, NULL);
-
- implConstruct();
-}
-
-//------------------------------------------------------------------------------
-OFormattedModel::~OFormattedModel()
-{
- DBG_DTOR(OFormattedModel, NULL);
-}
-
-// XCloneable
-//------------------------------------------------------------------------------
-IMPLEMENT_DEFAULT_CLONING( OFormattedModel )
-
-//------------------------------------------------------------------------------
-void SAL_CALL OFormattedModel::disposing()
-{
- OErrorBroadcaster::disposing();
- OEditBaseModel::disposing();
-}
-
-// XServiceInfo
-//------------------------------------------------------------------------------
-StringSequence OFormattedModel::getSupportedServiceNames() throw()
-{
- StringSequence aSupported = OEditBaseModel::getSupportedServiceNames();
-
- sal_Int32 nOldLen = aSupported.getLength();
- aSupported.realloc( nOldLen + 8 );
- ::rtl::OUString* pStoreTo = aSupported.getArray() + nOldLen;
-
- *pStoreTo++ = BINDABLE_CONTROL_MODEL;
- *pStoreTo++ = DATA_AWARE_CONTROL_MODEL;
- *pStoreTo++ = VALIDATABLE_CONTROL_MODEL;
-
- *pStoreTo++ = BINDABLE_DATA_AWARE_CONTROL_MODEL;
- *pStoreTo++ = VALIDATABLE_BINDABLE_CONTROL_MODEL;
-
- *pStoreTo++ = FRM_SUN_COMPONENT_FORMATTEDFIELD;
- *pStoreTo++ = FRM_SUN_COMPONENT_DATABASE_FORMATTEDFIELD;
- *pStoreTo++ = BINDABLE_DATABASE_FORMATTED_FIELD;
-
- return aSupported;
-}
-
-// XAggregation
-//------------------------------------------------------------------------------
-Any SAL_CALL OFormattedModel::queryAggregation(const Type& _rType) throw(RuntimeException)
-{
- Any aReturn = OEditBaseModel::queryAggregation( _rType );
- return aReturn.hasValue() ? aReturn : OErrorBroadcaster::queryInterface( _rType );
-}
-
-// XTypeProvider
-//------------------------------------------------------------------------------
-Sequence< Type > OFormattedModel::_getTypes()
-{
- return ::comphelper::concatSequences(
- OEditBaseModel::_getTypes(),
- OErrorBroadcaster::getTypes()
- );
-}
-
-// XPersistObject
-//------------------------------------------------------------------------------
-::rtl::OUString SAL_CALL OFormattedModel::getServiceName() throw ( ::com::sun::star::uno::RuntimeException)
-{
- return ::rtl::OUString(FRM_COMPONENT_EDIT);
-}
-
-// XPropertySet
-//------------------------------------------------------------------------------
-void OFormattedModel::describeFixedProperties( Sequence< Property >& _rProps ) const
-{
- BEGIN_DESCRIBE_PROPERTIES( 3, OEditBaseModel )
- DECL_BOOL_PROP1(EMPTY_IS_NULL, BOUND);
- DECL_PROP1(TABINDEX, sal_Int16, BOUND);
- DECL_BOOL_PROP2(FILTERPROPOSAL, BOUND, MAYBEDEFAULT);
- END_DESCRIBE_PROPERTIES();
-}
-
-//------------------------------------------------------------------------------
-void OFormattedModel::describeAggregateProperties( Sequence< Property >& _rAggregateProps ) const
-{
- OEditBaseModel::describeAggregateProperties( _rAggregateProps );
-
- // TreatAsNumeric nicht transient : wir wollen es an der UI anbinden (ist noetig, um dem EffectiveDefault
- // - der kann Text oder Zahl sein - einen Sinn zu geben)
- ModifyPropertyAttributes(_rAggregateProps, PROPERTY_TREATASNUMERIC, 0, PropertyAttribute::TRANSIENT);
- // same for FormatKey
- // (though the paragraph above for the TreatAsNumeric does not hold anymore - we do not have an UI for this.
- // But we have for the format key ...)
- ModifyPropertyAttributes(_rAggregateProps, PROPERTY_FORMATKEY, 0, PropertyAttribute::TRANSIENT);
-
- RemoveProperty(_rAggregateProps, PROPERTY_STRICTFORMAT);
- // no strict format property for formatted fields: it does not make sense, 'cause
- // there is no general way to decide which characters/sub strings are allowed during the input of an
- // arbitraryly formatted control
-}
-
-//------------------------------------------------------------------------------
-void OFormattedModel::getFastPropertyValue(Any& rValue, sal_Int32 nHandle) const
-{
- OEditBaseModel::getFastPropertyValue(rValue, nHandle);
-}
-
-//------------------------------------------------------------------------------
-void OFormattedModel::setFastPropertyValue_NoBroadcast(sal_Int32 nHandle, const Any& rValue) throw ( ::com::sun::star::uno::Exception)
-{
- OEditBaseModel::setFastPropertyValue_NoBroadcast(nHandle, rValue);
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OFormattedModel::convertFastPropertyValue(Any& rConvertedValue, Any& rOldValue, sal_Int32 nHandle, const Any& rValue)
- throw( IllegalArgumentException )
-{
- return OEditBaseModel::convertFastPropertyValue(rConvertedValue, rOldValue, nHandle, rValue);
-}
-
-//------------------------------------------------------------------------------
-void OFormattedModel::setPropertyToDefaultByHandle(sal_Int32 nHandle)
-{
- if (nHandle == PROPERTY_ID_FORMATSSUPPLIER)
- {
- Reference<XNumberFormatsSupplier> xSupplier = calcDefaultFormatsSupplier();
- DBG_ASSERT(m_xAggregateSet.is(), "OFormattedModel::setPropertyToDefaultByHandle(FORMATSSUPPLIER) : have no aggregate !");
- if (m_xAggregateSet.is())
- m_xAggregateSet->setPropertyValue(PROPERTY_FORMATSSUPPLIER, makeAny(xSupplier));
- }
- else
- OEditBaseModel::setPropertyToDefaultByHandle(nHandle);
-}
-
-//------------------------------------------------------------------------------
-void OFormattedModel::setPropertyToDefault(const ::rtl::OUString& aPropertyName) throw( com::sun::star::beans::UnknownPropertyException, RuntimeException )
-{
- OPropertyArrayAggregationHelper& rPH = m_aPropertyBagHelper.getInfoHelper();
- sal_Int32 nHandle = rPH.getHandleByName( aPropertyName );
-
- if (nHandle == PROPERTY_ID_FORMATSSUPPLIER)
- setPropertyToDefaultByHandle(PROPERTY_ID_FORMATSSUPPLIER);
- else
- OEditBaseModel::setPropertyToDefault(aPropertyName);
-}
-
-//------------------------------------------------------------------------------
-Any OFormattedModel::getPropertyDefaultByHandle( sal_Int32 nHandle ) const
-{
- if (nHandle == PROPERTY_ID_FORMATSSUPPLIER)
- {
- Reference<XNumberFormatsSupplier> xSupplier = calcDefaultFormatsSupplier();
- return makeAny(xSupplier);
- }
- else
- return OEditBaseModel::getPropertyDefaultByHandle(nHandle);
-}
-
-//------------------------------------------------------------------------------
-Any SAL_CALL OFormattedModel::getPropertyDefault( const ::rtl::OUString& aPropertyName ) throw( com::sun::star::beans::UnknownPropertyException, RuntimeException )
-{
- OPropertyArrayAggregationHelper& rPH = m_aPropertyBagHelper.getInfoHelper();
- sal_Int32 nHandle = rPH.getHandleByName( aPropertyName );
-
- if (nHandle == PROPERTY_ID_FORMATSSUPPLIER)
- return getPropertyDefaultByHandle(PROPERTY_ID_FORMATSSUPPLIER);
- else
- return OEditBaseModel::getPropertyDefault(aPropertyName);
-}
-
-//------------------------------------------------------------------------------
-void OFormattedModel::_propertyChanged( const com::sun::star::beans::PropertyChangeEvent& evt ) throw(RuntimeException)
-{
- // TODO: check how this works with external bindings
-
- OSL_ENSURE( evt.Source == m_xAggregateSet, "OFormattedModel::_propertyChanged: where did this come from?" );
- if ( evt.Source == m_xAggregateSet )
- {
- Reference< XPropertySet > xSourceSet( evt.Source, UNO_QUERY );
- if ( evt.PropertyName.equals( PROPERTY_FORMATKEY ) )
- {
- if ( evt.NewValue.getValueType().getTypeClass() == TypeClass_LONG )
- {
- try
- {
- ::osl::MutexGuard aGuard( m_aMutex );
-
- Reference<XNumberFormatsSupplier> xSupplier( calcFormatsSupplier() );
- m_nKeyType = getNumberFormatType(xSupplier->getNumberFormats(), getINT32( evt.NewValue ) );
-
- // as m_aSaveValue (which is used by commitControlValueToDbColumn) is format dependent we have
- // to recalc it, which is done by translateDbColumnToControlValue
- if ( m_xColumn.is() && m_xAggregateFastSet.is() && !m_xCursor->isBeforeFirst() && !m_xCursor->isAfterLast())
- {
- setControlValue( translateDbColumnToControlValue(), eOther );
- }
-
- // if we're connected to an external value binding, then re-calculate the type
- // used to exchange the value - it depends on the format, too
- if ( hasExternalValueBinding() )
- {
- calculateExternalValueType();
- }
- }
- catch(Exception&)
- {
- }
- }
- return;
- }
-
- if ( evt.PropertyName.equals( PROPERTY_FORMATSSUPPLIER ) )
- {
- updateFormatterNullDate();
- return;
- }
-
- OBoundControlModel::_propertyChanged( evt );
- }
-}
-
-//------------------------------------------------------------------------------
-void OFormattedModel::updateFormatterNullDate()
-{
- // calc the current NULL date
- Reference< XNumberFormatsSupplier > xSupplier( calcFormatsSupplier() );
- if ( xSupplier.is() )
- xSupplier->getNumberFormatSettings()->getPropertyValue( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "NullDate" ) ) ) >>= m_aNullDate;
-}
-
-//------------------------------------------------------------------------------
-Reference< XNumberFormatsSupplier > OFormattedModel::calcFormatsSupplier() const
-{
- Reference<XNumberFormatsSupplier> xSupplier;
-
- DBG_ASSERT(m_xAggregateSet.is(), "OFormattedModel::calcFormatsSupplier : have no aggregate !");
- // hat mein aggregiertes Model einen FormatSupplier ?
- if( m_xAggregateSet.is() )
- m_xAggregateSet->getPropertyValue(PROPERTY_FORMATSSUPPLIER) >>= xSupplier;
-
- if (!xSupplier.is())
- // check if my parent form has a supplier
- xSupplier = calcFormFormatsSupplier();
-
- if (!xSupplier.is())
- xSupplier = calcDefaultFormatsSupplier();
-
- DBG_ASSERT(xSupplier.is(), "OFormattedModel::calcFormatsSupplier : no supplier !");
- // jetzt sollte aber einer da sein
- return xSupplier;
-}
-
-//------------------------------------------------------------------------------
-Reference<XNumberFormatsSupplier> OFormattedModel::calcFormFormatsSupplier() const
-{
- Reference<XChild> xMe;
- query_interface(static_cast<XWeak*>(const_cast<OFormattedModel*>(this)), xMe);
- // damit stellen wir sicher, dass wir auch fuer den Fall der Aggregation das richtige
- // Objekt bekommen
- DBG_ASSERT(xMe.is(), "OFormattedModel::calcFormFormatsSupplier : I should have a content interface !");
-
- // jetzt durchhangeln nach oben, bis wir auf eine starform treffen (angefangen mit meinem eigenen Parent)
- Reference<XChild> xParent(xMe->getParent(), UNO_QUERY);
- Reference<XForm> xNextParentForm(xParent, UNO_QUERY);
- while (!xNextParentForm.is() && xParent.is())
- {
- xParent = xParent.query( xParent->getParent() );
- xNextParentForm = xNextParentForm.query( xParent );
- }
-
- if (!xNextParentForm.is())
- {
- OSL_FAIL("OFormattedModel::calcFormFormatsSupplier : have no ancestor which is a form !");
- return NULL;
- }
-
- // den FormatSupplier von meinem Vorfahren (falls der einen hat)
- Reference< XRowSet > xRowSet( xNextParentForm, UNO_QUERY );
- Reference< XNumberFormatsSupplier > xSupplier;
- if (xRowSet.is())
- xSupplier = getNumberFormats( getConnection(xRowSet), sal_True, getContext().getLegacyServiceFactory() );
- return xSupplier;
-}
-
-//------------------------------------------------------------------------------
-Reference< XNumberFormatsSupplier > OFormattedModel::calcDefaultFormatsSupplier() const
-{
- return StandardFormatsSupplier::get( getContext().getLegacyServiceFactory() );
-}
-
-// XBoundComponent
-//------------------------------------------------------------------------------
-void OFormattedModel::loaded(const EventObject& rEvent) throw ( ::com::sun::star::uno::RuntimeException)
-{
- // HACK : our onConnectedDbColumn accesses our NumberFormatter which locks the solar mutex (as it doesn't have
- // an own one). To prevent deadlocks with other threads which may request a property from us in an
- // UI-triggered action (e.g. an tooltip) we lock the solar mutex _here_ before our base class locks
- // it's own muext (which is used for property requests)
- // alternative a): we use two mutexes, one which is passed to the OPropertysetHelper and used for
- // property requests and one for our own code. This would need a lot of code rewriting
- // alternative b): The NumberFormatter has to be really threadsafe (with an own mutex), which is
- // the only "clean" solution for me.
-
- SolarMutexGuard aGuard;
- OEditBaseModel::loaded(rEvent);
-}
-
-//------------------------------------------------------------------------------
-void OFormattedModel::onConnectedDbColumn( const Reference< XInterface >& _rxForm )
-{
- m_xOriginalFormatter = NULL;
-
- // get some properties of the field
- m_nFieldType = DataType::OTHER;
- Reference<XPropertySet> xField = getField();
- if ( xField.is() )
- xField->getPropertyValue( PROPERTY_FIELDTYPE ) >>= m_nFieldType;
-
- sal_Int32 nFormatKey = 0;
-
- DBG_ASSERT(m_xAggregateSet.is(), "OFormattedModel::onConnectedDbColumn : have no aggregate !");
- if (m_xAggregateSet.is())
- { // all the following doesn't make any sense if we have no aggregate ...
- Any aSupplier = m_xAggregateSet->getPropertyValue(PROPERTY_FORMATSSUPPLIER);
- DBG_ASSERT( aSupplier.hasValue(), "OFormattedModel::onConnectedDbColumn : invalid property value !" );
- // das sollte im Constructor oder im read auf was richtiges gesetzt worden sein
-
- Any aFmtKey = m_xAggregateSet->getPropertyValue(PROPERTY_FORMATKEY);
- if ( !(aFmtKey >>= nFormatKey ) )
- { // nobody gave us a format to use. So we examine the field we're bound to for a
- // format key, and use it ourself, too
- sal_Int32 nType = DataType::VARCHAR;
- if (xField.is())
- {
- aFmtKey = xField->getPropertyValue(PROPERTY_FORMATKEY);
- xField->getPropertyValue(PROPERTY_FIELDTYPE) >>= nType ;
- }
-
- Reference<XNumberFormatsSupplier> xSupplier = calcFormFormatsSupplier();
- DBG_ASSERT(xSupplier.is(), "OFormattedModel::onConnectedDbColumn : bound to a field but no parent with a formatter ? how this ?");
- if (xSupplier.is())
- {
- m_bOriginalNumeric = getBOOL(getPropertyValue(PROPERTY_TREATASNUMERIC));
-
- if (!aFmtKey.hasValue())
- { // we aren't bound to a field (or this field's format is invalid)
- // -> determine the standard text (or numeric) format of the supplier
- Reference<XNumberFormatTypes> xTypes(xSupplier->getNumberFormats(), UNO_QUERY);
- if (xTypes.is())
- {
- Locale aApplicationLocale = Application::GetSettings().GetUILocale();
-
- if (m_bOriginalNumeric)
- aFmtKey <<= (sal_Int32)xTypes->getStandardFormat(NumberFormat::NUMBER, aApplicationLocale);
- else
- aFmtKey <<= (sal_Int32)xTypes->getStandardFormat(NumberFormat::TEXT, aApplicationLocale);
- }
- }
-
- aSupplier >>= m_xOriginalFormatter;
- m_xAggregateSet->setPropertyValue(PROPERTY_FORMATSSUPPLIER, makeAny(xSupplier));
- m_xAggregateSet->setPropertyValue(PROPERTY_FORMATKEY, aFmtKey);
-
- // das Numeric-Flag an mein gebundenes Feld anpassen
- if (xField.is())
- {
- m_bNumeric = sal_False;
- switch (nType)
- {
- case DataType::BIT:
- case DataType::BOOLEAN:
- case DataType::TINYINT:
- case DataType::SMALLINT:
- case DataType::INTEGER:
- case DataType::BIGINT:
- case DataType::FLOAT:
- case DataType::REAL:
- case DataType::DOUBLE:
- case DataType::NUMERIC:
- case DataType::DECIMAL:
- case DataType::DATE:
- case DataType::TIME:
- case DataType::TIMESTAMP:
- m_bNumeric = sal_True;
- break;
- }
- }
- else
- m_bNumeric = m_bOriginalNumeric;
-
- setPropertyValue(PROPERTY_TREATASNUMERIC, makeAny((sal_Bool)m_bNumeric));
-
- OSL_VERIFY( aFmtKey >>= nFormatKey );
- }
- }
- }
-
- Reference<XNumberFormatsSupplier> xSupplier = calcFormatsSupplier();
- m_bNumeric = getBOOL( getPropertyValue( PROPERTY_TREATASNUMERIC ) );
- m_nKeyType = getNumberFormatType( xSupplier->getNumberFormats(), nFormatKey );
- xSupplier->getNumberFormatSettings()->getPropertyValue( ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("NullDate") ) ) >>= m_aNullDate;
-
- OEditBaseModel::onConnectedDbColumn( _rxForm );
-}
-
-//------------------------------------------------------------------------------
-void OFormattedModel::onDisconnectedDbColumn()
-{
- OEditBaseModel::onDisconnectedDbColumn();
- if (m_xOriginalFormatter.is())
- { // unser aggregiertes Model hatte keinerlei Format-Informationen
- m_xAggregateSet->setPropertyValue(PROPERTY_FORMATSSUPPLIER, makeAny(m_xOriginalFormatter));
- m_xAggregateSet->setPropertyValue(PROPERTY_FORMATKEY, Any());
- setPropertyValue(PROPERTY_TREATASNUMERIC, makeAny((sal_Bool)m_bOriginalNumeric));
- m_xOriginalFormatter = NULL;
- }
-
- m_nFieldType = DataType::OTHER;
- m_nKeyType = NumberFormat::UNDEFINED;
- m_aNullDate = DBTypeConversion::getStandardDate();
-}
-
-//------------------------------------------------------------------------------
-void OFormattedModel::write(const Reference<XObjectOutputStream>& _rxOutStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException)
-{
- OEditBaseModel::write(_rxOutStream);
- _rxOutStream->writeShort(0x0003);
-
- DBG_ASSERT(m_xAggregateSet.is(), "OFormattedModel::write : have no aggregate !");
-
- // mein Format (evtl. void) in ein persistentes Format bringen (der Supplier zusammen mit dem Key ist es zwar auch,
- // aber deswegen muessen wir ja nicht gleich den ganzen Supplier speichern, das waere ein klein wenig Overhead ;)
-
- Reference<XNumberFormatsSupplier> xSupplier;
- Any aFmtKey;
- sal_Bool bVoidKey = sal_True;
- if (m_xAggregateSet.is())
- {
- Any aSupplier = m_xAggregateSet->getPropertyValue(PROPERTY_FORMATSSUPPLIER);
- if (aSupplier.getValueType().getTypeClass() != TypeClass_VOID)
- {
- OSL_VERIFY( aSupplier >>= xSupplier );
- }
-
- aFmtKey = m_xAggregateSet->getPropertyValue(PROPERTY_FORMATKEY);
- bVoidKey = (!xSupplier.is() || !aFmtKey.hasValue()) || (isLoaded() && m_xOriginalFormatter.is());
- // (kein Fomatter und/oder Key) oder (loaded und faked Formatter)
- }
-
- _rxOutStream->writeBoolean(!bVoidKey);
- if (!bVoidKey)
- {
- // aus dem FormatKey und dem Formatter persistente Angaben basteln
-
- Any aKey = m_xAggregateSet->getPropertyValue(PROPERTY_FORMATKEY);
- sal_Int32 nKey = aKey.hasValue() ? getINT32(aKey) : 0;
-
- Reference<XNumberFormats> xFormats = xSupplier->getNumberFormats();
-
- ::rtl::OUString sFormatDescription;
- LanguageType eFormatLanguage = LANGUAGE_DONTKNOW;
-
- static const ::rtl::OUString s_aLocaleProp (RTL_CONSTASCII_USTRINGPARAM("Locale") );
- Reference<com::sun::star::beans::XPropertySet> xFormat = xFormats->getByKey(nKey);
- if (hasProperty(s_aLocaleProp, xFormat))
- {
- Any aLocale = xFormat->getPropertyValue(s_aLocaleProp);
- DBG_ASSERT(isA(aLocale, static_cast<Locale*>(NULL)), "OFormattedModel::write : invalid language property !");
- if (isA(aLocale, static_cast<Locale*>(NULL)))
- {
- Locale* pLocale = (Locale*)aLocale.getValue();
- eFormatLanguage = MsLangId::convertLocaleToLanguage( *pLocale );
- }
- }
-
- static const ::rtl::OUString s_aFormatStringProp (RTL_CONSTASCII_USTRINGPARAM("FormatString") );
- if (hasProperty(s_aFormatStringProp, xFormat))
- xFormat->getPropertyValue(s_aFormatStringProp) >>= sFormatDescription;
-
- _rxOutStream->writeUTF(sFormatDescription);
- _rxOutStream->writeLong((sal_Int32)eFormatLanguage);
- }
-
- // version 2 : write the properties common to all OEditBaseModels
- writeCommonEditProperties(_rxOutStream);
-
- // version 3 : write the effective value property of the aggregate
- // Due to a bug within the UnoControlFormattedFieldModel implementation (our default aggregate) this props value isn't correctly read
- // and this can't be corrected without being incompatible.
- // so we have our own handling.
-
- // and to be a little bit more compatible we make the following section skippable
- {
- Reference< XDataOutputStream > xOut(_rxOutStream, UNO_QUERY);
- OStreamSection aDownCompat(xOut);
-
- // a sub version within the skippable block
- _rxOutStream->writeShort(0x0000);
-
- // version 0: the effective value of the aggregate
- Any aEffectiveValue;
- if (m_xAggregateSet.is())
- {
- try { aEffectiveValue = m_xAggregateSet->getPropertyValue(PROPERTY_EFFECTIVE_VALUE); } catch(Exception&) { }
- }
-
- {
- OStreamSection aDownCompat2(xOut);
- switch (aEffectiveValue.getValueType().getTypeClass())
- {
- case TypeClass_STRING:
- _rxOutStream->writeShort(0x0000);
- _rxOutStream->writeUTF(::comphelper::getString(aEffectiveValue));
- break;
- case TypeClass_DOUBLE:
- _rxOutStream->writeShort(0x0001);
- _rxOutStream->writeDouble(::comphelper::getDouble(aEffectiveValue));
- break;
- default: // void and all unknown states
- DBG_ASSERT(!aEffectiveValue.hasValue(), "FmXFormattedModel::write : unknown property value type !");
- _rxOutStream->writeShort(0x0002);
- break;
- }
- }
- }
-}
-
-//------------------------------------------------------------------------------
-void OFormattedModel::read(const Reference<XObjectInputStream>& _rxInStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException)
-{
- OEditBaseModel::read(_rxInStream);
- sal_uInt16 nVersion = _rxInStream->readShort();
-
- Reference<XNumberFormatsSupplier> xSupplier;
- sal_Int32 nKey = -1;
- switch (nVersion)
- {
- case 0x0001 :
- case 0x0002 :
- case 0x0003 :
- {
- sal_Bool bNonVoidKey = _rxInStream->readBoolean();
- if (bNonVoidKey)
- {
- // den String und die Language lesen ....
- ::rtl::OUString sFormatDescription = _rxInStream->readUTF();
- LanguageType eDescriptionLanguage = (LanguageType)_rxInStream->readLong();
-
- // und daraus von einem Formatter zu einem Key zusammenwuerfeln lassen ...
- xSupplier = calcFormatsSupplier();
- // calcFormatsSupplier nimmt erst den vom Model, dann einen von der starform, dann einen ganz neuen ....
- Reference<XNumberFormats> xFormats = xSupplier->getNumberFormats();
-
- if (xFormats.is())
- {
- Locale aDescriptionLanguage( MsLangId::convertLanguageToLocale(eDescriptionLanguage));
-
- nKey = xFormats->queryKey(sFormatDescription, aDescriptionLanguage, sal_False);
- if (nKey == (sal_Int32)-1)
- { // noch nicht vorhanden in meinem Formatter ...
- nKey = xFormats->addNew(sFormatDescription, aDescriptionLanguage);
- }
- }
- }
- if ((nVersion == 0x0002) || (nVersion == 0x0003))
- readCommonEditProperties(_rxInStream);
-
- if (nVersion == 0x0003)
- { // since version 3 there is a "skippable" block at this position
- Reference< XDataInputStream > xIn(_rxInStream, UNO_QUERY);
- OStreamSection aDownCompat(xIn);
-
- sal_Int16 nSubVersion = _rxInStream->readShort();
- (void)nSubVersion;
-
- // version 0 and higher : the "effective value" property
- Any aEffectiveValue;
- {
- OStreamSection aDownCompat2(xIn);
- switch (_rxInStream->readShort())
- {
- case 0: // String
- aEffectiveValue <<= _rxInStream->readUTF();
- break;
- case 1: // double
- aEffectiveValue <<= (double)_rxInStream->readDouble();
- break;
- case 2:
- break;
- case 3:
- OSL_FAIL("FmXFormattedModel::read : unknown effective value type !");
- }
- }
-
- // this property is only to be set if we have no control source : in all other cases the base class did a
- // reset after it's read and this set the effective value to a default value
- if ( m_xAggregateSet.is() && ( getControlSource().getLength() == 0 ) )
- {
- try
- {
- m_xAggregateSet->setPropertyValue(PROPERTY_EFFECTIVE_VALUE, aEffectiveValue);
- }
- catch(Exception&)
- {
- }
- }
- }
- }
- break;
- default :
- OSL_FAIL("OFormattedModel::read : unknown version !");
- // dann bleibt das Format des aggregierten Sets, wie es bei der Erzeugung ist : void
- defaultCommonEditProperties();
- break;
- }
-
- if ((nKey != -1) && m_xAggregateSet.is())
- {
- m_xAggregateSet->setPropertyValue(PROPERTY_FORMATSSUPPLIER, makeAny(xSupplier));
- m_xAggregateSet->setPropertyValue(PROPERTY_FORMATKEY, makeAny((sal_Int32)nKey));
- }
- else
- {
- setPropertyToDefault(PROPERTY_FORMATSSUPPLIER);
- setPropertyToDefault(PROPERTY_FORMATKEY);
- }
-}
-
-//------------------------------------------------------------------------------
-sal_uInt16 OFormattedModel::getPersistenceFlags() const
-{
- return (OEditBaseModel::getPersistenceFlags() & ~PF_HANDLE_COMMON_PROPS);
- // a) we do our own call to writeCommonEditProperties
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OFormattedModel::commitControlValueToDbColumn( bool /*_bPostReset*/ )
-{
- Any aControlValue( m_xAggregateFastSet->getFastPropertyValue( getValuePropertyAggHandle() ) );
- if ( aControlValue != m_aSaveValue )
- {
- // Leerstring + EmptyIsNull = void
- if ( !aControlValue.hasValue()
- || ( ( aControlValue.getValueType().getTypeClass() == TypeClass_STRING )
- && ( getString( aControlValue ).getLength() == 0 )
- && m_bEmptyIsNull
- )
- )
- m_xColumnUpdate->updateNull();
- else
- {
- try
- {
- double f = 0.0;
- if ( aControlValue.getValueType().getTypeClass() == TypeClass_DOUBLE || (aControlValue >>= f)) // #i110323
- {
- DBTypeConversion::setValue( m_xColumnUpdate, m_aNullDate, getDouble( aControlValue ), m_nKeyType );
- }
- else
- {
- DBG_ASSERT( aControlValue.getValueType().getTypeClass() == TypeClass_STRING, "OFormattedModel::commitControlValueToDbColumn: invalud value type !" );
- m_xColumnUpdate->updateString( getString( aControlValue ) );
- }
- }
- catch(Exception&)
- {
- return sal_False;
- }
- }
- m_aSaveValue = aControlValue;
- }
- return sal_True;
-}
-
-//------------------------------------------------------------------------------
-void OFormattedModel::onConnectedExternalValue( )
-{
- OEditBaseModel::onConnectedExternalValue();
- updateFormatterNullDate();
-}
-
-//------------------------------------------------------------------------------
-Any OFormattedModel::translateExternalValueToControlValue( const Any& _rExternalValue ) const
-{
- Any aControlValue;
- switch( _rExternalValue.getValueTypeClass() )
- {
- case TypeClass_VOID:
- break;
-
- case TypeClass_STRING:
- aControlValue = _rExternalValue;
- break;
-
- case TypeClass_BOOLEAN:
- {
- sal_Bool bExternalValue = sal_False;
- _rExternalValue >>= bExternalValue;
- aControlValue <<= (double)( bExternalValue ? 1 : 0 );
- }
- break;
-
- default:
- {
- if ( _rExternalValue.getValueType().equals( ::getCppuType( static_cast< UNODate* >( NULL ) ) ) )
- {
- UNODate aDate;
- _rExternalValue >>= aDate;
- aControlValue <<= DBTypeConversion::toDouble( aDate, m_aNullDate );
- }
- else if ( _rExternalValue.getValueType().equals( ::getCppuType( static_cast< UNOTime* >( NULL ) ) ) )
- {
- UNOTime aTime;
- _rExternalValue >>= aTime;
- aControlValue <<= DBTypeConversion::toDouble( aTime );
- }
- else if ( _rExternalValue.getValueType().equals( ::getCppuType( static_cast< UNODateTime* >( NULL ) ) ) )
- {
- UNODateTime aDateTime;
- _rExternalValue >>= aDateTime;
- aControlValue <<= DBTypeConversion::toDouble( aDateTime, m_aNullDate );
- }
- else
- {
- OSL_ENSURE( _rExternalValue.getValueTypeClass() == TypeClass_DOUBLE,
- "OFormattedModel::translateExternalValueToControlValue: don't know how to translate this type!" );
- double fValue = 0;
- OSL_VERIFY( _rExternalValue >>= fValue );
- aControlValue <<= fValue;
- }
- }
- }
-
- return aControlValue;
-}
-
-//------------------------------------------------------------------------------
-Any OFormattedModel::translateControlValueToExternalValue( ) const
-{
- OSL_PRECOND( hasExternalValueBinding(),
- "OFormattedModel::translateControlValueToExternalValue: precondition not met!" );
-
- Any aControlValue( getControlValue() );
- if ( !aControlValue.hasValue() )
- return aControlValue;
-
- Any aExternalValue;
-
- // translate into the the external value type
- Type aExternalValueType( getExternalValueType() );
- switch ( aExternalValueType.getTypeClass() )
- {
- case TypeClass_STRING:
- {
- ::rtl::OUString sString;
- if ( aControlValue >>= sString )
- {
- aExternalValue <<= sString;
- break;
- }
- }
- // NO break here!
-
- case TypeClass_BOOLEAN:
- {
- double fValue = 0;
- OSL_VERIFY( aControlValue >>= fValue );
- // if this asserts ... well, the somebody set the TreatAsNumeric property to false,
- // and the control value is a string. This implies some weird misconfiguration
- // of the FormattedModel, so we won't care for it for the moment.
- aExternalValue <<= (sal_Bool)( fValue ? sal_True : sal_False );
- }
- break;
-
- default:
- {
- double fValue = 0;
- OSL_VERIFY( aControlValue >>= fValue );
- // if this asserts ... well, the somebody set the TreatAsNumeric property to false,
- // and the control value is a string. This implies some weird misconfiguration
- // of the FormattedModel, so we won't care for it for the moment.
-
- if ( aExternalValueType.equals( ::getCppuType( static_cast< UNODate* >( NULL ) ) ) )
- {
- aExternalValue <<= DBTypeConversion::toDate( fValue, m_aNullDate );
- }
- else if ( aExternalValueType.equals( ::getCppuType( static_cast< UNOTime* >( NULL ) ) ) )
- {
- aExternalValue <<= DBTypeConversion::toTime( fValue );
- }
- else if ( aExternalValueType.equals( ::getCppuType( static_cast< UNODateTime* >( NULL ) ) ) )
- {
- aExternalValue <<= DBTypeConversion::toDateTime( fValue, m_aNullDate );
- }
- else
- {
- OSL_ENSURE( aExternalValueType.equals( ::getCppuType( static_cast< double* >( NULL ) ) ),
- "OFormattedModel::translateControlValueToExternalValue: don't know how to translate this type!" );
- aExternalValue <<= fValue;
- }
- }
- break;
- }
- return aExternalValue;
-}
-
-//------------------------------------------------------------------------------
-Any OFormattedModel::translateDbColumnToControlValue()
-{
- if ( m_bNumeric )
- m_aSaveValue <<= DBTypeConversion::getValue( m_xColumn, m_aNullDate ); // #100056# OJ
- else
- m_aSaveValue <<= m_xColumn->getString();
-
- if ( m_xColumn->wasNull() )
- m_aSaveValue.clear();
-
- return m_aSaveValue;
-}
-
-// -----------------------------------------------------------------------------
-Sequence< Type > OFormattedModel::getSupportedBindingTypes()
-{
- ::std::list< Type > aTypes;
- aTypes.push_back( ::getCppuType( static_cast< double* >( NULL ) ) );
-
- switch ( m_nKeyType & ~NumberFormat::DEFINED )
- {
- case NumberFormat::DATE:
- aTypes.push_front(::getCppuType( static_cast< UNODate* >( NULL ) ) );
- break;
- case NumberFormat::TIME:
- aTypes.push_front(::getCppuType( static_cast< UNOTime* >( NULL ) ) );
- break;
- case NumberFormat::DATETIME:
- aTypes.push_front(::getCppuType( static_cast< UNODateTime* >( NULL ) ) );
- break;
- case NumberFormat::TEXT:
- aTypes.push_front(::getCppuType( static_cast< ::rtl::OUString* >( NULL ) ) );
- break;
- case NumberFormat::LOGICAL:
- aTypes.push_front(::getCppuType( static_cast< sal_Bool* >( NULL ) ) );
- break;
- }
-
- Sequence< Type > aTypesRet( aTypes.size() );
- ::std::copy( aTypes.begin(), aTypes.end(), aTypesRet.getArray() );
- return aTypesRet;
-}
-
-//------------------------------------------------------------------------------
-Any OFormattedModel::getDefaultForReset() const
-{
- return m_xAggregateSet->getPropertyValue( PROPERTY_EFFECTIVE_DEFAULT );
-}
-
-//------------------------------------------------------------------------------
-void OFormattedModel::resetNoBroadcast()
-{
- OEditBaseModel::resetNoBroadcast();
- m_aSaveValue.clear();
-}
-
-//.........................................................................
-}
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/FormattedField.hxx b/forms/source/component/FormattedField.hxx
deleted file mode 100644
index a2cdf4285..000000000
--- a/forms/source/component/FormattedField.hxx
+++ /dev/null
@@ -1,200 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FORMS_FORMATTEDFIELD_HXX_
-#define _FORMS_FORMATTEDFIELD_HXX_
-
-#include "EditBase.hxx"
-#include <comphelper/propmultiplex.hxx>
-#include <cppuhelper/implbase1.hxx>
-#include "errorbroadcaster.hxx"
-
-//.........................................................................
-namespace frm
-{
-
- //==================================================================
- //= OFormattedModel
- //==================================================================
-
- class OFormattedModel
- :public OEditBaseModel
- ,public OErrorBroadcaster
- {
- // das Original, falls ich die Format-Properties meines aggregierten Models gefaket, d.h. von dem Feld, an das
- // ich gebunden bin, weitergereicht habe (nur gueltig wenn loaded)
- ::com::sun::star::uno::Reference< ::com::sun::star::util::XNumberFormatsSupplier> m_xOriginalFormatter;
- ::com::sun::star::util::Date m_aNullDate;
- ::com::sun::star::uno::Any m_aSaveValue;
-
- sal_Int32 m_nFieldType;
- sal_Int16 m_nKeyType;
- sal_Bool m_bOriginalNumeric : 1,
- m_bNumeric : 1; // analog fuer TreatAsNumeric-Property
-
- protected:
- ::com::sun::star::uno::Reference< ::com::sun::star::util::XNumberFormatsSupplier> calcDefaultFormatsSupplier() const;
- ::com::sun::star::uno::Reference< ::com::sun::star::util::XNumberFormatsSupplier> calcFormFormatsSupplier() const;
- ::com::sun::star::uno::Reference< ::com::sun::star::util::XNumberFormatsSupplier> calcFormatsSupplier() const;
-
- DECLARE_DEFAULT_LEAF_XTOR( OFormattedModel );
-
- friend class OFormattedFieldWrapper;
-
- protected:
- // XInterface
- DECLARE_UNO3_AGG_DEFAULTS( OFormattedModel, OEditBaseModel );
-
- // XTypeProvider
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
- // XAggregation
- virtual ::com::sun::star::uno::Any SAL_CALL queryAggregation(const ::com::sun::star::uno::Type& _rType) throw(::com::sun::star::uno::RuntimeException);
-
- // OComponentHelper
- virtual void SAL_CALL disposing();
-
- // XServiceInfo
- IMPLEMENTATION_NAME(OFormattedModel);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw();
-
- // XPersistObject
- virtual void SAL_CALL write(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectOutputStream>& _rxOutStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL read(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectInputStream>& _rxInStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
- virtual ::rtl::OUString SAL_CALL getServiceName() throw ( ::com::sun::star::uno::RuntimeException);
-
- // XPropertySet
- virtual void SAL_CALL getFastPropertyValue(::com::sun::star::uno::Any& rValue, sal_Int32 nHandle ) const;
- virtual sal_Bool SAL_CALL convertFastPropertyValue(::com::sun::star::uno::Any& rConvertedValue, ::com::sun::star::uno::Any& rOldValue,
- sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue )
- throw(::com::sun::star::lang::IllegalArgumentException);
- virtual void SAL_CALL setFastPropertyValue_NoBroadcast(sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue) throw ( ::com::sun::star::uno::Exception);
-
- // XLoadListener
- virtual void SAL_CALL loaded(const ::com::sun::star::lang::EventObject& rEvent) throw ( ::com::sun::star::uno::RuntimeException);
-
- // XPropertyState
- void setPropertyToDefaultByHandle(sal_Int32 nHandle);
- ::com::sun::star::uno::Any getPropertyDefaultByHandle(sal_Int32 nHandle) const;
-
- void SAL_CALL setPropertyToDefault(const ::rtl::OUString& aPropertyName) throw(::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::uno::RuntimeException);
- ::com::sun::star::uno::Any SAL_CALL getPropertyDefault( const ::rtl::OUString& aPropertyName ) throw(::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::uno::RuntimeException);
-
- // OControlModel's property handling
- virtual void describeFixedProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
- virtual void describeAggregateProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rAggregateProps
- ) const;
-
- // XPropertyChangeListener
- virtual void _propertyChanged(const ::com::sun::star::beans::PropertyChangeEvent& evt) throw(::com::sun::star::uno::RuntimeException);
-
- // prevent method hiding
- using OEditBaseModel::disposing;
- using OEditBaseModel::getFastPropertyValue;
-
- protected:
- virtual sal_uInt16 getPersistenceFlags() const;
- // as we have an own version handling for persistence
-
- // OBoundControlModel overridables
- virtual ::com::sun::star::uno::Any
- translateDbColumnToControlValue( );
- virtual sal_Bool commitControlValueToDbColumn( bool _bPostReset );
-
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type >
- getSupportedBindingTypes();
- virtual ::com::sun::star::uno::Any
- translateExternalValueToControlValue( const ::com::sun::star::uno::Any& _rExternalValue ) const;
- virtual ::com::sun::star::uno::Any
- translateControlValueToExternalValue( ) const;
- virtual void onConnectedExternalValue( );
-
- virtual ::com::sun::star::uno::Any
- getDefaultForReset() const;
- virtual void resetNoBroadcast();
-
- virtual void onConnectedDbColumn( const ::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >& _rxForm );
- virtual void onDisconnectedDbColumn();
-
- private:
- DECLARE_XCLONEABLE();
-
- void implConstruct();
-
- void updateFormatterNullDate();
- };
-
- //==================================================================
- //= OFormattedControl
- //==================================================================
- typedef ::cppu::ImplHelper1< ::com::sun::star::awt::XKeyListener> OFormattedControl_BASE;
- class OFormattedControl : public OBoundControl
- ,public OFormattedControl_BASE
- {
- sal_uInt32 m_nKeyEvent;
-
- public:
- OFormattedControl(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory);
- virtual ~OFormattedControl();
-
- DECLARE_UNO3_AGG_DEFAULTS(OFormattedControl, OBoundControl);
- virtual ::com::sun::star::uno::Any SAL_CALL queryAggregation(const ::com::sun::star::uno::Type& _rType) throw(::com::sun::star::uno::RuntimeException);
-
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
- // ::com::sun::star::lang::XServiceInfo
- IMPLEMENTATION_NAME(OFormattedControl);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw();
-
- // ::com::sun::star::lang::XEventListener
- virtual void SAL_CALL disposing(const ::com::sun::star::lang::EventObject& _rSource) throw(::com::sun::star::uno::RuntimeException);
-
- // ::com::sun::star::awt::XKeyListener
- virtual void SAL_CALL keyPressed(const ::com::sun::star::awt::KeyEvent& e) throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL keyReleased(const ::com::sun::star::awt::KeyEvent& e) throw ( ::com::sun::star::uno::RuntimeException);
-
- // ::com::sun::star::awt::XControl
- virtual void SAL_CALL setDesignMode(sal_Bool bOn) throw ( ::com::sun::star::uno::RuntimeException);
-
- // disambiguation
- using OBoundControl::disposing;
-
- private:
- DECL_LINK( OnKeyPressed, void* );
- };
-
-//.........................................................................
-}
-//.........................................................................
-
-#endif // _FORMS_FORMATTEDFIELD_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/FormattedFieldWrapper.cxx b/forms/source/component/FormattedFieldWrapper.cxx
deleted file mode 100644
index f027e22ad..000000000
--- a/forms/source/component/FormattedFieldWrapper.cxx
+++ /dev/null
@@ -1,400 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "FormattedFieldWrapper.hxx"
-#include "Edit.hxx"
-#include "FormattedField.hxx"
-#include <tools/debug.hxx>
-#include "EditBase.hxx"
-#include "services.hxx"
-#include <connectivity/dbtools.hxx>
-#include <vcl/svapp.hxx>
-
-//.........................................................................
-namespace frm
-{
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::sdb;
-using namespace ::com::sun::star::sdbc;
-using namespace ::com::sun::star::sdbcx;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::io;
-using namespace ::com::sun::star::lang;
-using namespace ::com::sun::star::util;
-
-//==================================================================
-// OFormattedFieldWrapper
-//==================================================================
-DBG_NAME(OFormattedFieldWrapper)
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OFormattedFieldWrapper_CreateInstance_ForceFormatted(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new OFormattedFieldWrapper(_rxFactory, sal_True));
-}
-
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OFormattedFieldWrapper_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new OFormattedFieldWrapper(_rxFactory, sal_False));
-}
-
-//------------------------------------------------------------------
-OFormattedFieldWrapper::OFormattedFieldWrapper(const Reference<XMultiServiceFactory>& _rxFactory, sal_Bool _bActAsFormatted)
- :m_xServiceFactory(_rxFactory)
- ,m_pEditPart(NULL)
-{
- DBG_CTOR(OFormattedFieldWrapper, NULL);
-
- if (_bActAsFormatted)
- {
- increment(m_refCount);
- {
- // instantiate an FormattedModel
- InterfaceRef xFormattedModel;
- // (instantiate it directly ..., as the OFormattedModel isn't registered for any service names anymore)
- OFormattedModel* pModel = new OFormattedModel(m_xServiceFactory);
- query_interface(static_cast<XWeak*>(pModel), xFormattedModel);
-
- m_xAggregate = Reference<XAggregation> (xFormattedModel, UNO_QUERY);
- DBG_ASSERT(m_xAggregate.is(), "OFormattedFieldWrapper::OFormattedFieldWrapper : the OFormattedModel didn't have an XAggregation interface !");
-
- // _before_ setting the delegator, give it to the member references
- query_interface(xFormattedModel, m_xFormattedPart);
- m_pEditPart = new OEditModel(m_xServiceFactory);
- m_pEditPart->acquire();
- }
- if (m_xAggregate.is())
- { // has to be in it's own block because of the temporary variable created by *this
- m_xAggregate->setDelegator(static_cast<XWeak*>(this));
- }
- decrement(m_refCount);
- }
-}
-
-//------------------------------------------------------------------
-OFormattedFieldWrapper::OFormattedFieldWrapper( const OFormattedFieldWrapper* _pCloneSource )
- :m_xServiceFactory( _pCloneSource->m_xServiceFactory )
- ,m_pEditPart( NULL )
-{
- Reference< XCloneable > xCloneAccess;
- query_aggregation( _pCloneSource->m_xAggregate, xCloneAccess );
-
- // clone the aggregate
- if ( xCloneAccess.is() )
- {
- increment( m_refCount );
- {
- Reference< XCloneable > xClone = xCloneAccess->createClone();
- m_xAggregate = Reference< XAggregation >( xClone, UNO_QUERY );
- DBG_ASSERT(m_xAggregate.is(), "OFormattedFieldWrapper::OFormattedFieldWrapper : invalid aggregate clone!");
-
- query_interface( Reference< XInterface >( xClone.get() ), m_xFormattedPart );
-
- if ( _pCloneSource->m_pEditPart )
- {
- m_pEditPart = new OEditModel( _pCloneSource->m_pEditPart, _pCloneSource->m_xServiceFactory );
- m_pEditPart->acquire();
- }
- }
- if ( m_xAggregate.is() )
- { // has to be in it's own block because of the temporary variable created by *this
- m_xAggregate->setDelegator( static_cast< XWeak* >( this ) );
- }
- decrement( m_refCount );
- }
- else
- { // the clone source does not yet have an aggregate -> we don't yet need one, too
- }
-}
-
-//------------------------------------------------------------------
-OFormattedFieldWrapper::~OFormattedFieldWrapper()
-{
- // release the aggregated object (if any)
- if (m_xAggregate.is())
- m_xAggregate->setDelegator(InterfaceRef ());
-
- if (m_pEditPart)
- m_pEditPart->release();
-
- DBG_DTOR(OFormattedFieldWrapper, NULL);
-}
-
-//------------------------------------------------------------------
-Any SAL_CALL OFormattedFieldWrapper::queryAggregation(const Type& _rType) throw (RuntimeException)
-{
- Any aReturn;
-
- if (_rType.equals( ::getCppuType( static_cast< Reference< XTypeProvider >* >(NULL) ) ) )
- { // a XTypeProvider interface needs a working aggregate - we don't want to give the type provider
- // of our base class (OFormattedFieldWrapper_Base) to the caller as it supplies nearly nothing
- ensureAggregate();
- if (m_xAggregate.is())
- aReturn = m_xAggregate->queryAggregation(_rType);
- }
-
- if (!aReturn.hasValue())
- {
- aReturn = OFormattedFieldWrapper_Base::queryAggregation(_rType);
-
- if ((_rType.equals( ::getCppuType( static_cast< Reference< XServiceInfo >* >(NULL) ) ) ) && aReturn.hasValue())
- { // somebody requested an XServiceInfo interface and our base class provided it
- // check our aggregate if it has one, too
- ensureAggregate();
- }
-
- if (!aReturn.hasValue())
- {
- aReturn = ::cppu::queryInterface( _rType,
- static_cast< XPersistObject* >( this ),
- static_cast< XCloneable* >( this )
- );
-
- if (!aReturn.hasValue())
- {
- // somebody requests an interface other than the basics (XInterface) and other than
- // the two we can supply without an aggregate. So ensure
- // the aggregate exists.
- ensureAggregate();
- if (m_xAggregate.is())
- aReturn = m_xAggregate->queryAggregation(_rType);
- }
- }
- }
-
- return aReturn;
-}
-
-//------------------------------------------------------------------
-::rtl::OUString SAL_CALL OFormattedFieldWrapper::getServiceName() throw(RuntimeException)
-{
- // return the old compatibility name for an EditModel
- return FRM_COMPONENT_EDIT;
-}
-
-//------------------------------------------------------------------
-::rtl::OUString SAL_CALL OFormattedFieldWrapper::getImplementationName( ) throw (RuntimeException)
-{
- return ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.comp.forms.OFormattedFieldWrapper") );
-}
-
-//------------------------------------------------------------------
-sal_Bool SAL_CALL OFormattedFieldWrapper::supportsService( const ::rtl::OUString& _rServiceName ) throw (RuntimeException)
-{
- DBG_ASSERT(m_xAggregate.is(), "OFormattedFieldWrapper::supportsService: should never have made it 'til here without an aggregate!");
- Reference< XServiceInfo > xSI;
- m_xAggregate->queryAggregation(::getCppuType(static_cast< Reference< XServiceInfo >* >(NULL))) >>= xSI;
- return xSI->supportsService(_rServiceName);
-}
-
-//------------------------------------------------------------------
-Sequence< ::rtl::OUString > SAL_CALL OFormattedFieldWrapper::getSupportedServiceNames( ) throw (RuntimeException)
-{
- DBG_ASSERT(m_xAggregate.is(), "OFormattedFieldWrapper::getSupportedServiceNames: should never have made it 'til here without an aggregate!");
- Reference< XServiceInfo > xSI;
- m_xAggregate->queryAggregation(::getCppuType(static_cast< Reference< XServiceInfo >* >(NULL))) >>= xSI;
- return xSI->getSupportedServiceNames();
-}
-
-//------------------------------------------------------------------
-void SAL_CALL OFormattedFieldWrapper::write(const Reference<XObjectOutputStream>& _rxOutStream) throw( IOException, RuntimeException )
-{
- // can't write myself
- ensureAggregate();
-
- // if we act as real edit field, we can simple forward this write request
- if (!m_xFormattedPart.is())
- {
- Reference<XPersistObject> xAggregatePersistence;
- query_aggregation(m_xAggregate, xAggregatePersistence);
- DBG_ASSERT(xAggregatePersistence.is(), "OFormattedFieldWrapper::write : don't know how to handle this : can't write !");
- // oops ... We gave an XPersistObject interface to the caller but now we aren't an XPersistObject ...
- if (xAggregatePersistence.is())
- xAggregatePersistence->write(_rxOutStream);
- return;
- }
-
- // else we have to write an edit part first
- DBG_ASSERT(m_pEditPart, "OFormattedFieldWrapper::write : formatted part without edit part ?");
- if ( !m_pEditPart )
- throw RuntimeException( ::rtl::OUString(), *this );
-
- // for this we transfer the current props of the formatted part to the edit part
- Reference<XPropertySet> xFormatProps(m_xFormattedPart, UNO_QUERY);
- Reference<XPropertySet> xEditProps;
- query_interface(static_cast<XWeak*>(m_pEditPart), xEditProps);
-
- Locale aAppLanguage = Application::GetSettings().GetUILocale();
- dbtools::TransferFormComponentProperties(xFormatProps, xEditProps, aAppLanguage);
-
- // then write the edit part, after switching to "fake mode"
- m_pEditPart->enableFormattedWriteFake();
- m_pEditPart->write(_rxOutStream);
- m_pEditPart->disableFormattedWriteFake();
-
- // and finally write the formatted part we're really interested in
- m_xFormattedPart->write(_rxOutStream);
-}
-
-//------------------------------------------------------------------
-void SAL_CALL OFormattedFieldWrapper::read(const Reference<XObjectInputStream>& _rxInStream) throw( IOException, RuntimeException )
-{
- if (m_xAggregate.is())
- { // we alread did a decision if we're an EditModel or a FormattedModel
-
- // if we act as formatted, we have to read the edit part first
- if (m_xFormattedPart.is())
- {
- // two possible cases:
- // a) the stuff was written by a version which didn't work with an Edit header (all intermediate
- // versions >5.1 && <=568)
- // b) it was written by a version using edit headers
- // as we can distinguish a) from b) only after we have read the edit part, we need to remember the
- // position
- Reference<XMarkableStream> xInMarkable(_rxInStream, UNO_QUERY);
- DBG_ASSERT(xInMarkable.is(), "OFormattedFieldWrapper::read : can only work with markable streams !");
- sal_Int32 nBeforeEditPart = xInMarkable->createMark();
-
- m_pEditPart->read(_rxInStream);
- // this only works because an edit model can read the stuff written by a formatted model (maybe with
- // some assertions) , but not vice versa
- if (!m_pEditPart->lastReadWasFormattedFake())
- { // case a), written with a version without the edit part fake, so seek to the start position, again
- xInMarkable->jumpToMark(nBeforeEditPart);
- }
- xInMarkable->deleteMark(nBeforeEditPart);
- }
-
- Reference<XPersistObject> xAggregatePersistence;
- query_aggregation(m_xAggregate, xAggregatePersistence);
- DBG_ASSERT(xAggregatePersistence.is(), "OFormattedFieldWrapper::read : don't know how to handle this : can't read !");
- // oops ... We gave an XPersistObject interface to the caller but now we aren't an XPersistObject ...
-
- if (xAggregatePersistence.is())
- xAggregatePersistence->read(_rxInStream);
- return;
- }
-
- // we have to decide from the data within the stream whether we should be an EditModel or a FormattedModel
- OEditBaseModel* pNewAggregate = NULL;
-
- // let an OEditModel do the reading
- OEditModel* pBasicReader = new OEditModel(m_xServiceFactory);
- Reference< XInterface > xHoldBasicReaderAlive( *pBasicReader );
- pBasicReader->read(_rxInStream);
-
- // was it really an edit model ?
- if (!pBasicReader->lastReadWasFormattedFake())
- // yes -> all fine
- pNewAggregate = pBasicReader;
- else
- { // no -> substitute it with a formatted model
-
- // let the formmatted model do the reading
- OFormattedModel* pFormattedReader = new OFormattedModel(m_xServiceFactory);
- Reference< XInterface > xHoldAliveWhileRead( *pFormattedReader );
- pFormattedReader->read(_rxInStream);
-
- // for the next write (if any) : the FormattedModel and the EditModel parts
- query_interface(static_cast<XWeak*>(pFormattedReader), m_xFormattedPart);
- m_pEditPart = pBasicReader;
- m_pEditPart->acquire();
-
- // aggregate the formatted part below
- pNewAggregate = pFormattedReader;
- }
-
- // do the aggregation
- increment(m_refCount);
- {
- query_interface(static_cast<XWeak*>(pNewAggregate), m_xAggregate);
- DBG_ASSERT(m_xAggregate.is(), "OFormattedFieldWrapper::read : the OEditModel didn't have an XAggregation interface !");
- }
- if (m_xAggregate.is())
- { // has to be in it's own block because of the temporary variable created by *this
- m_xAggregate->setDelegator(static_cast<XWeak*>(this));
- }
- decrement(m_refCount);
-}
-
-//------------------------------------------------------------------
-Reference< XCloneable > SAL_CALL OFormattedFieldWrapper::createClone( ) throw (RuntimeException)
-{
- ensureAggregate();
-
- return new OFormattedFieldWrapper( this );
-}
-
-//------------------------------------------------------------------
-void OFormattedFieldWrapper::ensureAggregate()
-{
- if (m_xAggregate.is())
- return;
-
- increment(m_refCount);
- {
- // instantiate an EditModel (the only place where we are allowed to decide that we're an FormattedModel
- // is in ::read)
- InterfaceRef xEditModel = m_xServiceFactory->createInstance(FRM_SUN_COMPONENT_TEXTFIELD);
- if (!xEditModel.is())
- {
- // arghhh ... instantiate it directly ... it's dirty, but we really need this aggregate
- OEditModel* pModel = new OEditModel(m_xServiceFactory);
- query_interface(static_cast<XWeak*>(pModel), xEditModel);
- }
-
- m_xAggregate = Reference<XAggregation> (xEditModel, UNO_QUERY);
- DBG_ASSERT(m_xAggregate.is(), "OFormattedFieldWrapper::ensureAggregate : the OEditModel didn't have an XAggregation interface !");
-
- {
- Reference< XServiceInfo > xSI(m_xAggregate, UNO_QUERY);
- if (!xSI.is())
- {
- OSL_FAIL("OFormattedFieldWrapper::ensureAggregate: the aggregate has no XServiceInfo!");
- m_xAggregate.clear();
- }
- }
- }
- if (m_xAggregate.is())
- { // has to be in it's own block because of the temporary variable created by *this
- m_xAggregate->setDelegator(static_cast<XWeak*>(this));
- }
- decrement(m_refCount);
-}
-
-//.........................................................................
-}
-//.........................................................................
-
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/FormattedFieldWrapper.hxx b/forms/source/component/FormattedFieldWrapper.hxx
deleted file mode 100644
index 42f861d30..000000000
--- a/forms/source/component/FormattedFieldWrapper.hxx
+++ /dev/null
@@ -1,101 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FRM_FORMATTED_FIELD_WRAPPER_HXX_
-#define _FRM_FORMATTED_FIELD_WRAPPER_HXX_
-
-#include "FormComponent.hxx"
-#include <cppuhelper/implbase3.hxx>
-#include <com/sun/star/lang/XServiceInfo.hpp>
-#include <com/sun/star/util/XCloneable.hpp>
-
-//.........................................................................
-namespace frm
-{
-
-class OEditModel;
-//==================================================================
-//= OFormattedFieldWrapper
-//==================================================================
-typedef ::cppu::WeakAggImplHelper3 < ::com::sun::star::io::XPersistObject
- , ::com::sun::star::lang::XServiceInfo
- , ::com::sun::star::util::XCloneable
- > OFormattedFieldWrapper_Base;
-
-class OFormattedFieldWrapper : public OFormattedFieldWrapper_Base
-{
- ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory> m_xServiceFactory;
-
-protected:
- ::com::sun::star::uno::Reference< ::com::sun::star::uno::XAggregation> m_xAggregate;
-
- OEditModel* m_pEditPart;
- // if we act as formatted this is used to write the EditModel part
- ::com::sun::star::uno::Reference< ::com::sun::star::io::XPersistObject> m_xFormattedPart;
- // if we act as formatted, this is the PersistObject interface of our aggregate, used
- // to read and write the FormattedModel part
-
- OFormattedFieldWrapper(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory, sal_Bool _bActAsFormatted);
- // if _bActAsFormatted is sal_False, the state is undetermined until somebody calls ::read or does
- // anything which requires a living aggregate
- OFormattedFieldWrapper( const OFormattedFieldWrapper* _pCloneSource );
- virtual ~OFormattedFieldWrapper();
-
- friend InterfaceRef SAL_CALL OFormattedFieldWrapper_CreateInstance_ForceFormatted(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory);
- friend InterfaceRef SAL_CALL OFormattedFieldWrapper_CreateInstance(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory);
-
-public:
- // UNO
- DECLARE_UNO3_AGG_DEFAULTS(OFormattedFieldWrapper, OWeakAggObject);
- virtual ::com::sun::star::uno::Any SAL_CALL queryAggregation(const ::com::sun::star::uno::Type& _rType) throw(::com::sun::star::uno::RuntimeException);
-
- // XServiceInfo
- virtual ::rtl::OUString SAL_CALL getImplementationName( ) throw (::com::sun::star::uno::RuntimeException);
- virtual sal_Bool SAL_CALL supportsService( const ::rtl::OUString& ServiceName ) throw (::com::sun::star::uno::RuntimeException);
- virtual ::com::sun::star::uno::Sequence< ::rtl::OUString > SAL_CALL getSupportedServiceNames( ) throw (::com::sun::star::uno::RuntimeException);
-
- // XPersistObject
- virtual ::rtl::OUString SAL_CALL getServiceName() throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL write(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectOutputStream>& _rxOutStream) throw(::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL read(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectInputStream>& _rxInStream) throw(::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
-
- // XCloneable
- virtual ::com::sun::star::uno::Reference< ::com::sun::star::util::XCloneable > SAL_CALL createClone( ) throw (::com::sun::star::uno::RuntimeException);
-
-protected:
- /// ensure we're in a defined state, which means a FormattedModel _OR_ an EditModel
- void ensureAggregate();
-};
-
-//.........................................................................
-}
-//.........................................................................
-
-#endif // _FRM_FORMATTED_FIELD_WRAPPER_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/FormsCollection.cxx b/forms/source/component/FormsCollection.cxx
deleted file mode 100644
index c2152a28d..000000000
--- a/forms/source/component/FormsCollection.cxx
+++ /dev/null
@@ -1,188 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-
-#include "FormsCollection.hxx"
-#include "services.hxx"
-#include <comphelper/sequence.hxx>
-#include <tools/debug.hxx>
-#include <com/sun/star/form/XForm.hpp>
-#include <rtl/logfile.hxx>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-using namespace ::com::sun::star::lang;
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::util;
-
-//------------------------------------------------------------------
-DBG_NAME(OFormsCollection)
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OFormsCollection_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new OFormsCollection(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-::rtl::OUString SAL_CALL OFormsCollection::getServiceName() throw(RuntimeException)
-{
- return FRM_SUN_FORMS_COLLECTION;
-}
-
-//------------------------------------------------------------------------------
-Sequence< sal_Int8 > SAL_CALL OFormsCollection::getImplementationId( ) throw(RuntimeException)
-{
- return OImplementationIds::getImplementationId(getTypes());
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> SAL_CALL OFormsCollection::getTypes() throw(RuntimeException)
-{
- return concatSequences(OInterfaceContainer::getTypes(), FormsCollectionComponentBase::getTypes(), OFormsCollection_BASE::getTypes());
-}
-
-//------------------------------------------------------------------
-OFormsCollection::OFormsCollection(const Reference<XMultiServiceFactory>& _rxFactory)
- :FormsCollectionComponentBase( m_aMutex )
- ,OInterfaceContainer( _rxFactory, m_aMutex, XForm::static_type() )
- ,OFormsCollection_BASE()
-{
- DBG_CTOR(OFormsCollection, NULL);
-}
-
-//------------------------------------------------------------------------------
-OFormsCollection::OFormsCollection( const OFormsCollection& _cloneSource )
- :FormsCollectionComponentBase( m_aMutex )
- ,OInterfaceContainer( m_aMutex, _cloneSource )
- ,OFormsCollection_BASE()
-{
- DBG_CTOR( OFormsCollection, NULL );
-}
-
-//------------------------------------------------------------------------------
-OFormsCollection::~OFormsCollection()
-{
- DBG_DTOR(OFormsCollection, NULL);
- if (!FormsCollectionComponentBase::rBHelper.bDisposed)
- {
- acquire();
- dispose();
- }
-}
-
-//------------------------------------------------------------------------------
-Any SAL_CALL OFormsCollection::queryAggregation(const Type& _rType) throw(RuntimeException)
-{
- Any aReturn = OFormsCollection_BASE::queryInterface(_rType);
- if (!aReturn.hasValue())
- {
- aReturn = OInterfaceContainer::queryInterface(_rType);
-
- if (!aReturn.hasValue())
- aReturn = FormsCollectionComponentBase::queryAggregation(_rType);
- }
-
- return aReturn;
-}
-
-//------------------------------------------------------------------------------
-::rtl::OUString SAL_CALL OFormsCollection::getImplementationName() throw(RuntimeException)
-{
- return ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.comp.forms.OFormsCollection") );
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL OFormsCollection::supportsService( const ::rtl::OUString& _rServiceName ) throw(RuntimeException)
-{
- Sequence<rtl::OUString> aSupported = getSupportedServiceNames();
- const rtl::OUString* pSupported = aSupported.getConstArray();
- for (sal_Int32 i=0; i<aSupported.getLength(); ++i, ++pSupported)
- if (pSupported->equals(_rServiceName))
- return sal_True;
- return sal_False;
-}
-
-//------------------------------------------------------------------------------
-StringSequence SAL_CALL OFormsCollection::getSupportedServiceNames() throw(RuntimeException)
-{
- StringSequence aReturn(2);
-
- aReturn.getArray()[0] = FRM_SUN_FORMS_COLLECTION;
- aReturn.getArray()[1] = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.form.FormComponents") );
-
- return aReturn;
-}
-
-// XCloneable
-//------------------------------------------------------------------------------
-Reference< XCloneable > SAL_CALL OFormsCollection::createClone( ) throw (RuntimeException)
-{
- OFormsCollection* pClone = new OFormsCollection( *this );
- osl_incrementInterlockedCount( &pClone->m_refCount );
- pClone->clonedFrom( *this );
- osl_decrementInterlockedCount( &pClone->m_refCount );
- return pClone;
-}
-
-// OComponentHelper
-//------------------------------------------------------------------------------
-void OFormsCollection::disposing()
-{
- {
- RTL_LOGFILE_CONTEXT( aLogger, "forms::OFormsCollection::disposing" );
- OInterfaceContainer::disposing();
- }
- FormsCollectionComponentBase::disposing();
- m_xParent = NULL;
-}
-
-//XChild
-//------------------------------------------------------------------------------
-void OFormsCollection::setParent(const InterfaceRef& Parent) throw( NoSupportException, RuntimeException )
-{
- ::osl::MutexGuard aGuard( m_aMutex );
- m_xParent = Parent;
-}
-
-//------------------------------------------------------------------------------
-InterfaceRef OFormsCollection::getParent() throw( RuntimeException )
-{
- return m_xParent;
-}
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/FormsCollection.hxx b/forms/source/component/FormsCollection.hxx
deleted file mode 100644
index 8a9ef988a..000000000
--- a/forms/source/component/FormsCollection.hxx
+++ /dev/null
@@ -1,102 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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 "InterfaceContainer.hxx"
-#include "ids.hxx"
-#include <cppuhelper/component.hxx>
-#include <cppuhelper/implbase2.hxx>
-#include <comphelper/uno3.hxx>
-#include <com/sun/star/lang/XServiceInfo.hpp>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
-//==================================================================
-// OFormsCollection
-// Implementiert den UNO-Container fuer Formulare
-// enthaelt alle zugeordneten Forms
-// dieses Container kann selbst den Context fuer Formulare darstellen
-// oder aussen einen Context uebergeben bekommen
-//==================================================================
-typedef ::cppu::OComponentHelper FormsCollectionComponentBase;
-typedef ::cppu::ImplHelper2< ::com::sun::star::container::XChild
- ,::com::sun::star::lang::XServiceInfo > OFormsCollection_BASE;
-
- // else MSVC kills itself on some statements
-class OFormsCollection
- :public FormsCollectionComponentBase
- ,public OInterfaceContainer
- ,public OFormsCollection_BASE
-{
- ::osl::Mutex m_aMutex;
- OImplementationIdsRef m_aHoldIdHelper;
- ::comphelper::InterfaceRef m_xParent; // Parent
-
-public:
- OFormsCollection(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory);
- OFormsCollection( const OFormsCollection& _cloneSource );
- virtual ~OFormsCollection();
-
-public:
- DECLARE_UNO3_AGG_DEFAULTS(OFormsCollection, FormsCollectionComponentBase);
-
- virtual ::com::sun::star::uno::Any SAL_CALL queryAggregation(const ::com::sun::star::uno::Type& _rType) throw(::com::sun::star::uno::RuntimeException);
-
- // XTypeProvider
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type > SAL_CALL getTypes( ) throw(::com::sun::star::uno::RuntimeException);
- virtual ::com::sun::star::uno::Sequence< sal_Int8 > SAL_CALL getImplementationId( ) throw(::com::sun::star::uno::RuntimeException);
-
- // XPersistObject
- virtual ::rtl::OUString SAL_CALL getServiceName() throw(::com::sun::star::uno::RuntimeException);
-
- // XServiceInfo
- virtual ::rtl::OUString SAL_CALL getImplementationName( ) throw(::com::sun::star::uno::RuntimeException);
- virtual sal_Bool SAL_CALL supportsService( const ::rtl::OUString& ServiceName ) throw(::com::sun::star::uno::RuntimeException);
- virtual StringSequence SAL_CALL getSupportedServiceNames( ) throw(::com::sun::star::uno::RuntimeException);
-
- // XCloneable
- virtual ::com::sun::star::uno::Reference< ::com::sun::star::util::XCloneable > SAL_CALL createClone( ) throw (::com::sun::star::uno::RuntimeException);
-
- // OComponentHelper
- virtual void SAL_CALL disposing();
-
- // ::com::sun::star::container::XChild
- virtual ::comphelper::InterfaceRef SAL_CALL getParent() throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setParent(const ::comphelper::InterfaceRef& Parent) throw(::com::sun::star::lang::NoSupportException, ::com::sun::star::uno::RuntimeException);
-
- // prevent method hiding
- using OInterfaceContainer::disposing;
-};
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Grid.cxx b/forms/source/component/Grid.cxx
deleted file mode 100644
index 3b68a88a0..000000000
--- a/forms/source/component/Grid.cxx
+++ /dev/null
@@ -1,1165 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-
-#include "Columns.hxx"
-#include "findpos.hxx"
-#include "Grid.hxx"
-#include "property.hrc"
-#include "property.hxx"
-#include "services.hxx"
-
-/** === begin UNO includes === **/
-#include <com/sun/star/form/FormComponentType.hpp>
-#include <com/sun/star/form/XForm.hpp>
-#include <com/sun/star/form/XLoadable.hpp>
-#include <com/sun/star/text/WritingMode2.hpp>
-/** === end UNO includes === **/
-
-#include <comphelper/basicio.hxx>
-#include <comphelper/container.hxx>
-#include <comphelper/extract.hxx>
-#include <cppuhelper/queryinterface.hxx>
-#include <toolkit/helper/vclunohelper.hxx>
-#include <vcl/svapp.hxx>
-
-using namespace ::com::sun::star::uno;
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-using namespace ::com::sun::star;
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::sdb;
-using namespace ::com::sun::star::sdbc;
-using namespace ::com::sun::star::sdbcx;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::io;
-using namespace ::com::sun::star::lang;
-using namespace ::com::sun::star::util;
-using namespace ::com::sun::star::view;
-
-namespace WritingMode2 = ::com::sun::star::text::WritingMode2;
-
-const sal_uInt16 ROWHEIGHT = 0x0001;
-const sal_uInt16 FONTTYPE = 0x0002;
-const sal_uInt16 FONTSIZE = 0x0004;
-const sal_uInt16 FONTATTRIBS = 0x0008;
-const sal_uInt16 TABSTOP = 0x0010;
-const sal_uInt16 TEXTCOLOR = 0x0020;
-const sal_uInt16 FONTDESCRIPTOR = 0x0040;
-const sal_uInt16 RECORDMARKER = 0x0080;
-const sal_uInt16 BACKGROUNDCOLOR = 0x0100;
-
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OGridControlModel_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new OGridControlModel(_rxFactory));
-}
-
-DBG_NAME(OGridControlModel);
-//------------------------------------------------------------------
-OGridControlModel::OGridControlModel(const Reference<XMultiServiceFactory>& _rxFactory)
- :OControlModel(_rxFactory, ::rtl::OUString())
- ,OInterfaceContainer(_rxFactory, m_aMutex, ::getCppuType(static_cast<Reference<XPropertySet>*>(NULL)))
- ,OErrorBroadcaster( OComponentHelper::rBHelper )
- ,FontControlModel( false )
- ,m_aSelectListeners(m_aMutex)
- ,m_aResetListeners(m_aMutex)
- ,m_aRowSetChangeListeners(m_aMutex)
- ,m_aDefaultControl( FRM_SUN_CONTROL_GRIDCONTROL )
- ,m_nBorder(1)
- ,m_nWritingMode( WritingMode2::CONTEXT )
- ,m_nContextWritingMode( WritingMode2::CONTEXT )
- ,m_bEnableVisible(sal_True)
- ,m_bEnable(sal_True)
- ,m_bNavigation(sal_True)
- ,m_bRecordMarker(sal_True)
- ,m_bPrintable(sal_True)
- ,m_bAlwaysShowCursor(sal_False)
- ,m_bDisplaySynchron(sal_True)
-{
- DBG_CTOR(OGridControlModel,NULL);
-
- m_nClassId = FormComponentType::GRIDCONTROL;
-}
-
-//------------------------------------------------------------------
-OGridControlModel::OGridControlModel( const OGridControlModel* _pOriginal, const Reference< XMultiServiceFactory >& _rxFactory )
- :OControlModel( _pOriginal, _rxFactory )
- ,OInterfaceContainer( _rxFactory, m_aMutex, ::getCppuType( static_cast<Reference<XPropertySet>*>( NULL ) ) )
- ,OErrorBroadcaster( OComponentHelper::rBHelper )
- ,FontControlModel( _pOriginal )
- ,m_aSelectListeners( m_aMutex )
- ,m_aResetListeners( m_aMutex )
- ,m_aRowSetChangeListeners( m_aMutex )
-{
- DBG_CTOR(OGridControlModel,NULL);
-
- m_aDefaultControl = _pOriginal->m_aDefaultControl;
- m_bEnable = _pOriginal->m_bEnable;
- m_bEnableVisible = _pOriginal->m_bEnableVisible;
- m_bNavigation = _pOriginal->m_bNavigation;
- m_nBorder = _pOriginal->m_nBorder;
- m_nWritingMode = _pOriginal->m_nWritingMode;
- m_nContextWritingMode = _pOriginal->m_nContextWritingMode;
- m_bRecordMarker = _pOriginal->m_bRecordMarker;
- m_bPrintable = _pOriginal->m_bPrintable;
- m_bAlwaysShowCursor = _pOriginal->m_bAlwaysShowCursor;
- m_bDisplaySynchron = _pOriginal->m_bDisplaySynchron;
-
- // clone the columns
- cloneColumns( _pOriginal );
-
- // TODO: clone the events?
-}
-
-//------------------------------------------------------------------
-OGridControlModel::~OGridControlModel()
-{
- if (!OComponentHelper::rBHelper.bDisposed)
- {
- acquire();
- dispose();
- }
-
- DBG_DTOR(OGridControlModel,NULL);
-}
-
-// XCloneable
-//------------------------------------------------------------------------------
-Reference< XCloneable > SAL_CALL OGridControlModel::createClone( ) throw (RuntimeException)
-{
- OGridControlModel* pClone = new OGridControlModel( this, getContext().getLegacyServiceFactory() );
- osl_incrementInterlockedCount( &pClone->m_refCount );
- pClone->OControlModel::clonedFrom( this );
- // do not call OInterfaceContainer::clonedFrom, it would clone the elements aka columns, which is
- // already done in the ctor
- //pClone->OInterfaceContainer::clonedFrom( *this );
- osl_decrementInterlockedCount( &pClone->m_refCount );
- return static_cast< XCloneable* >( static_cast< OControlModel* >( pClone ) );
-}
-
-//------------------------------------------------------------------------------
-void OGridControlModel::cloneColumns( const OGridControlModel* _pOriginalContainer )
-{
- try
- {
- Reference< XCloneable > xColCloneable;
-
- const OInterfaceArray::const_iterator pColumnStart = _pOriginalContainer->m_aItems.begin();
- const OInterfaceArray::const_iterator pColumnEnd = _pOriginalContainer->m_aItems.end();
- for ( OInterfaceArray::const_iterator pColumn = pColumnStart; pColumn != pColumnEnd; ++pColumn )
- {
- // ask the col for a factory for the clone
- xColCloneable = xColCloneable.query( *pColumn );
- DBG_ASSERT( xColCloneable.is(), "OGridControlModel::cloneColumns: column is not cloneable!" );
-
- if ( xColCloneable.is() )
- {
- // create a clone of the column
- Reference< XCloneable > xColClone( xColCloneable->createClone() );
- DBG_ASSERT( xColClone.is(), "OGridControlModel::cloneColumns: invalid column clone!" );
-
- if ( xColClone.is() )
- {
- // insert this clone into our own container
- insertByIndex( pColumn - pColumnStart, xColClone->queryInterface( m_aElementType ) );
- }
-
- }
- }
- }
- catch( const Exception& )
- {
- OSL_FAIL( "OGridControlModel::cloneColumns: caught an exception while cloning the columns!" );
- }
-}
-
-// XServiceInfo
-//------------------------------------------------------------------------------
-StringSequence OGridControlModel::getSupportedServiceNames() throw(RuntimeException)
-{
- StringSequence aSupported = OControlModel::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 2);
-
- ::rtl::OUString*pArray = aSupported.getArray();
- pArray[aSupported.getLength()-2] = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.awt.UnoControlModel"));
- pArray[aSupported.getLength()-1] = FRM_SUN_COMPONENT_GRIDCONTROL;
- return aSupported;
-}
-
-//------------------------------------------------------------------------------
-Any SAL_CALL OGridControlModel::queryAggregation( const Type& _rType ) throw (RuntimeException)
-{
- Any aReturn = OGridControlModel_BASE::queryInterface(_rType);
-
- if ( !aReturn.hasValue() )
- {
- aReturn = OControlModel::queryAggregation( _rType );
- if ( !aReturn.hasValue() )
- {
- aReturn = OInterfaceContainer::queryInterface( _rType );
- if ( !aReturn.hasValue() )
- aReturn = OErrorBroadcaster::queryInterface( _rType );
- }
- }
- return aReturn;
-}
-
-// XSQLErrorListener
-//------------------------------------------------------------------------------
-void SAL_CALL OGridControlModel::errorOccured( const SQLErrorEvent& _rEvent ) throw (RuntimeException)
-{
- // forward the errors which happened to my columns to my own listeners
- onError( _rEvent );
-}
-
-// XRowSetSupplier
-//------------------------------------------------------------------------------
-Reference< XRowSet > SAL_CALL OGridControlModel::getRowSet( ) throw (RuntimeException)
-{
- return Reference< XRowSet >( getParent(), UNO_QUERY );
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OGridControlModel::setRowSet( const Reference< XRowSet >& /*_rxDataSource*/ ) throw (RuntimeException)
-{
- OSL_FAIL( "OGridControlModel::setRowSet: not supported!" );
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OGridControlModel::addRowSetChangeListener( const Reference< XRowSetChangeListener >& i_Listener ) throw (RuntimeException)
-{
- if ( i_Listener.is() )
- m_aRowSetChangeListeners.addInterface( i_Listener );
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OGridControlModel::removeRowSetChangeListener( const Reference< XRowSetChangeListener >& i_Listener ) throw (RuntimeException)
-{
- m_aRowSetChangeListeners.removeInterface( i_Listener );
-}
-
-// XChild
-//------------------------------------------------------------------------------
-void SAL_CALL OGridControlModel::setParent( const InterfaceRef& i_Parent ) throw(NoSupportException, RuntimeException)
-{
- ::osl::ClearableMutexGuard aGuard( m_aMutex );
- if ( i_Parent == getParent() )
- return;
-
- OControlModel::setParent( i_Parent );
-
- EventObject aEvent( *this );
- aGuard.clear();
- m_aRowSetChangeListeners.notifyEach( &XRowSetChangeListener::onRowSetChanged, aEvent );
-}
-
-//------------------------------------------------------------------------------
-Sequence< Type > SAL_CALL OGridControlModel::getTypes( ) throw(RuntimeException)
-{
- return concatSequences(
- concatSequences(
- OControlModel::getTypes(),
- OInterfaceContainer::getTypes(),
- OErrorBroadcaster::getTypes()
- ),
- OGridControlModel_BASE::getTypes()
- );
-}
-
-// OComponentHelper
-//------------------------------------------------------------------------------
-void OGridControlModel::disposing()
-{
- OControlModel::disposing();
- OErrorBroadcaster::disposing();
- OInterfaceContainer::disposing();
-
- setParent(NULL);
-
- EventObject aEvt(static_cast<XWeak*>(this));
- m_aSelectListeners.disposeAndClear(aEvt);
- m_aResetListeners.disposeAndClear(aEvt);
- m_aRowSetChangeListeners.disposeAndClear(aEvt);
-}
-
-// XEventListener
-//------------------------------------------------------------------------------
-void OGridControlModel::disposing(const EventObject& _rEvent) throw( RuntimeException )
-{
- OControlModel::disposing( _rEvent );
- OInterfaceContainer::disposing( _rEvent );
-}
-
-// XSelectionSupplier
-//-----------------------------------------------------------------------------
-sal_Bool SAL_CALL OGridControlModel::select(const Any& rElement) throw(IllegalArgumentException, RuntimeException)
-{
- ::osl::ClearableMutexGuard aGuard( m_aMutex );
-
- Reference<XPropertySet> xSel;
- if (rElement.hasValue() && !::cppu::extractInterface(xSel, rElement))
- {
- throw IllegalArgumentException();
- }
- InterfaceRef xMe = static_cast<XWeak*>(this);
-
- if (xSel.is())
- {
- Reference<XChild> xAsChild(xSel, UNO_QUERY);
- if (!xAsChild.is() || (xAsChild->getParent() != xMe))
- {
- throw IllegalArgumentException();
- }
- }
-
- if ( xSel != m_xSelection )
- {
- m_xSelection = xSel;
- aGuard.clear();
- m_aSelectListeners.notifyEach( &XSelectionChangeListener::selectionChanged, EventObject( *this ) );
- return sal_True;
- }
- return sal_False;
-}
-
-//-----------------------------------------------------------------------------
-Any SAL_CALL OGridControlModel::getSelection() throw(RuntimeException)
-{
- return makeAny(m_xSelection);
-}
-
-//-----------------------------------------------------------------------------
-void OGridControlModel::addSelectionChangeListener(const Reference< XSelectionChangeListener >& _rxListener) throw( RuntimeException )
-{
- m_aSelectListeners.addInterface(_rxListener);
-}
-
-//-----------------------------------------------------------------------------
-void OGridControlModel::removeSelectionChangeListener(const Reference< XSelectionChangeListener >& _rxListener) throw( RuntimeException )
-{
- m_aSelectListeners.removeInterface(_rxListener);
-}
-
-// XGridColumnFactory
-//------------------------------------------------------------------------------
-Reference<XPropertySet> SAL_CALL OGridControlModel::createColumn(const ::rtl::OUString& ColumnType) throw ( :: com::sun::star::lang::IllegalArgumentException, ::com::sun::star::uno::RuntimeException)
-{
- const Sequence< ::rtl::OUString >& rColumnTypes = frm::getColumnTypes();
- return createColumn( detail::findPos( ColumnType, rColumnTypes ) );
-}
-
-//------------------------------------------------------------------------------
-Reference<XPropertySet> OGridControlModel::createColumn(sal_Int32 nTypeId) const
-{
- Reference<XPropertySet> xReturn;
- switch (nTypeId)
- {
- case TYPE_CHECKBOX: xReturn = new CheckBoxColumn( getContext() ); break;
- case TYPE_COMBOBOX: xReturn = new ComboBoxColumn( getContext() ); break;
- case TYPE_CURRENCYFIELD: xReturn = new CurrencyFieldColumn( getContext() ); break;
- case TYPE_DATEFIELD: xReturn = new DateFieldColumn( getContext() ); break;
- case TYPE_LISTBOX: xReturn = new ListBoxColumn( getContext() ); break;
- case TYPE_NUMERICFIELD: xReturn = new NumericFieldColumn( getContext() ); break;
- case TYPE_PATTERNFIELD: xReturn = new PatternFieldColumn( getContext() ); break;
- case TYPE_TEXTFIELD: xReturn = new TextFieldColumn( getContext() ); break;
- case TYPE_TIMEFIELD: xReturn = new TimeFieldColumn( getContext() ); break;
- case TYPE_FORMATTEDFIELD: xReturn = new FormattedFieldColumn( getContext() ); break;
- default:
- OSL_FAIL("OGridControlModel::createColumn: Unknown Column");
- break;
- }
- return xReturn;
-}
-
-//------------------------------------------------------------------------------
-StringSequence SAL_CALL OGridControlModel::getColumnTypes() throw ( ::com::sun::star::uno::RuntimeException)
-{
- return frm::getColumnTypes();
-}
-
-// XReset
-//-----------------------------------------------------------------------------
-void SAL_CALL OGridControlModel::reset() throw ( ::com::sun::star::uno::RuntimeException)
-{
- ::cppu::OInterfaceIteratorHelper aIter(m_aResetListeners);
- EventObject aEvt(static_cast<XWeak*>(this));
- sal_Bool bContinue = sal_True;
- while (aIter.hasMoreElements() && bContinue)
- bContinue =((XResetListener*)aIter.next())->approveReset(aEvt);
-
- if (bContinue)
- {
- _reset();
- m_aResetListeners.notifyEach( &XResetListener::resetted, aEvt );
- }
-}
-
-//-----------------------------------------------------------------------------
-void SAL_CALL OGridControlModel::addResetListener(const Reference<XResetListener>& _rxListener) throw ( ::com::sun::star::uno::RuntimeException)
-{
- m_aResetListeners.addInterface(_rxListener);
-}
-
-//-----------------------------------------------------------------------------
-void SAL_CALL OGridControlModel::removeResetListener(const Reference<XResetListener>& _rxListener) throw ( ::com::sun::star::uno::RuntimeException)
-{
- m_aResetListeners.removeInterface(_rxListener);
-}
-
-//-----------------------------------------------------------------------------
-void OGridControlModel::_reset()
-{
- Reference<XReset> xReset;
- sal_Int32 nCount = getCount();
- for (sal_Int32 nIndex=0; nIndex < nCount; nIndex++)
- {
- getByIndex( nIndex ) >>= xReset;
- if (xReset.is())
- xReset->reset();
- }
-}
-
-// XPropertySet
-//------------------------------------------------------------------------------
-void OGridControlModel::describeFixedProperties( Sequence< Property >& _rProps ) const
-{
- BEGIN_DESCRIBE_BASE_PROPERTIES( 37 )
- DECL_PROP1(NAME, ::rtl::OUString, BOUND);
- DECL_PROP2(CLASSID, sal_Int16, READONLY, TRANSIENT);
- DECL_PROP1(TAG, ::rtl::OUString, BOUND);
- DECL_PROP1(TABINDEX, sal_Int16, BOUND);
- DECL_PROP3(TABSTOP, sal_Bool, BOUND, MAYBEDEFAULT, MAYBEVOID);
- DECL_PROP2(HASNAVIGATION, sal_Bool, BOUND, MAYBEDEFAULT);
- DECL_PROP1(ENABLED, sal_Bool, BOUND);
- DECL_PROP2(ENABLEVISIBLE, sal_Bool, BOUND, MAYBEDEFAULT);
- DECL_PROP1(BORDER, sal_Int16, BOUND);
- DECL_PROP2(BORDERCOLOR, sal_Int16, BOUND, MAYBEVOID);
- DECL_PROP1(DEFAULTCONTROL, ::rtl::OUString, BOUND);
- DECL_PROP3(TEXTCOLOR, sal_Int32, BOUND, MAYBEDEFAULT, MAYBEVOID);
- DECL_PROP3(BACKGROUNDCOLOR, sal_Int32, BOUND, MAYBEDEFAULT, MAYBEVOID);
- DECL_PROP2(FONT, FontDescriptor, BOUND, MAYBEDEFAULT);
- DECL_PROP3(ROWHEIGHT, sal_Int32, BOUND, MAYBEDEFAULT, MAYBEVOID);
- DECL_PROP1(HELPTEXT, ::rtl::OUString, BOUND);
- DECL_PROP1(FONT_NAME, ::rtl::OUString, MAYBEDEFAULT);
- DECL_PROP1(FONT_STYLENAME, ::rtl::OUString, MAYBEDEFAULT);
- DECL_PROP1(FONT_FAMILY, sal_Int16, MAYBEDEFAULT);
- DECL_PROP1(FONT_CHARSET, sal_Int16, MAYBEDEFAULT);
- DECL_PROP1(FONT_HEIGHT, float, MAYBEDEFAULT);
- DECL_PROP1(FONT_WEIGHT, float, MAYBEDEFAULT);
- DECL_PROP1(FONT_SLANT, sal_Int16, MAYBEDEFAULT);
- DECL_PROP1(FONT_UNDERLINE, sal_Int16, MAYBEDEFAULT);
- DECL_BOOL_PROP1(FONT_WORDLINEMODE, MAYBEDEFAULT);
- DECL_PROP3(TEXTLINECOLOR, sal_Int32, BOUND, MAYBEDEFAULT, MAYBEVOID);
- DECL_PROP2(FONTEMPHASISMARK, sal_Int16, BOUND, MAYBEDEFAULT);
- DECL_PROP2(FONTRELIEF, sal_Int16, BOUND, MAYBEDEFAULT);
- DECL_PROP1(FONT_STRIKEOUT, sal_Int16, MAYBEDEFAULT);
- DECL_PROP2(RECORDMARKER, sal_Bool, BOUND, MAYBEDEFAULT );
- DECL_PROP2(PRINTABLE, sal_Bool, BOUND, MAYBEDEFAULT );
- DECL_PROP4(CURSORCOLOR, sal_Int32, BOUND, MAYBEDEFAULT, MAYBEVOID , TRANSIENT);
- DECL_PROP3(ALWAYSSHOWCURSOR, sal_Bool, BOUND, MAYBEDEFAULT, TRANSIENT);
- DECL_PROP3(DISPLAYSYNCHRON, sal_Bool, BOUND, MAYBEDEFAULT, TRANSIENT);
- DECL_PROP2(HELPURL, ::rtl::OUString, BOUND, MAYBEDEFAULT);
- DECL_PROP2(WRITING_MODE, sal_Int16, BOUND, MAYBEDEFAULT);
- DECL_PROP3(CONTEXT_WRITING_MODE,sal_Int16, BOUND, MAYBEDEFAULT, TRANSIENT);
- END_DESCRIBE_PROPERTIES();
-}
-
-//------------------------------------------------------------------------------
-void OGridControlModel::getFastPropertyValue(Any& rValue, sal_Int32 nHandle ) const
-{
- switch (nHandle)
- {
- case PROPERTY_ID_CONTEXT_WRITING_MODE:
- rValue <<= m_nContextWritingMode;
- break;
- case PROPERTY_ID_WRITING_MODE:
- rValue <<= m_nWritingMode;
- break;
- case PROPERTY_ID_HELPTEXT:
- rValue <<= m_sHelpText;
- break;
- case PROPERTY_ID_HELPURL:
- rValue <<= m_sHelpURL;
- break;
- case PROPERTY_ID_DISPLAYSYNCHRON:
- setBOOL(rValue, m_bDisplaySynchron);
- break;
- case PROPERTY_ID_ALWAYSSHOWCURSOR:
- setBOOL(rValue, m_bAlwaysShowCursor);
- break;
- case PROPERTY_ID_CURSORCOLOR:
- rValue = m_aCursorColor;
- break;
- case PROPERTY_ID_PRINTABLE:
- setBOOL(rValue, m_bPrintable);
- break;
- case PROPERTY_ID_TABSTOP:
- rValue = m_aTabStop;
- break;
- case PROPERTY_ID_HASNAVIGATION:
- setBOOL(rValue, m_bNavigation);
- break;
- case PROPERTY_ID_RECORDMARKER:
- setBOOL(rValue, m_bRecordMarker);
- break;
- case PROPERTY_ID_ENABLED:
- setBOOL(rValue, m_bEnable);
- break;
- case PROPERTY_ID_ENABLEVISIBLE:
- setBOOL(rValue, m_bEnableVisible);
- break;
- case PROPERTY_ID_BORDER:
- rValue <<= (sal_Int16)m_nBorder;
- break;
- case PROPERTY_ID_BORDERCOLOR:
- rValue <<= m_aBorderColor;
- break;
- case PROPERTY_ID_DEFAULTCONTROL:
- rValue <<= m_aDefaultControl;
- break;
- case PROPERTY_ID_BACKGROUNDCOLOR:
- rValue = m_aBackgroundColor;
- break;
- case PROPERTY_ID_ROWHEIGHT:
- rValue = m_aRowHeight;
- break;
-
- default:
- if ( isFontRelatedProperty( nHandle ) )
- FontControlModel::getFastPropertyValue( rValue, nHandle );
- else
- OControlModel::getFastPropertyValue( rValue, nHandle );
- }
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OGridControlModel::convertFastPropertyValue( Any& rConvertedValue, Any& rOldValue,
- sal_Int32 nHandle, const Any& rValue )throw( IllegalArgumentException )
-{
- sal_Bool bModified(sal_False);
- switch (nHandle)
- {
- case PROPERTY_ID_CONTEXT_WRITING_MODE:
- bModified = tryPropertyValue( rConvertedValue, rOldValue, rValue, m_nContextWritingMode );
- break;
- case PROPERTY_ID_WRITING_MODE:
- bModified = tryPropertyValue( rConvertedValue, rOldValue, rValue, m_nWritingMode );
- break;
- case PROPERTY_ID_HELPTEXT:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_sHelpText);
- break;
- case PROPERTY_ID_HELPURL:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_sHelpURL);
- break;
- case PROPERTY_ID_DISPLAYSYNCHRON:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_bDisplaySynchron);
- break;
- case PROPERTY_ID_ALWAYSSHOWCURSOR:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_bAlwaysShowCursor);
- break;
- case PROPERTY_ID_CURSORCOLOR:
- if (!rValue.hasValue() || !m_aCursorColor.hasValue())
- {
- if (rValue.hasValue() && (TypeClass_LONG != rValue.getValueType().getTypeClass()))
- {
- throw IllegalArgumentException();
- }
- rOldValue = m_aCursorColor;
- rConvertedValue = rValue;
- bModified = (rOldValue.getValue() != rConvertedValue.getValue());
- }
- else
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, getINT32(m_aCursorColor));
- break;
- case PROPERTY_ID_PRINTABLE:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_bPrintable);
- break;
- case PROPERTY_ID_TABSTOP:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_aTabStop, ::getBooleanCppuType());
- break;
- case PROPERTY_ID_HASNAVIGATION:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_bNavigation);
- break;
- case PROPERTY_ID_RECORDMARKER:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_bRecordMarker);
- break;
- case PROPERTY_ID_ENABLED:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_bEnable);
- break;
- case PROPERTY_ID_ENABLEVISIBLE:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_bEnableVisible);
- break;
- case PROPERTY_ID_BORDER:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_nBorder);
- break;
- case PROPERTY_ID_BORDERCOLOR:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_aBorderColor, ::getCppuType((const sal_Int32*)NULL));
- break;
- case PROPERTY_ID_DEFAULTCONTROL:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_aDefaultControl);
- break;
- case PROPERTY_ID_BACKGROUNDCOLOR:
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_aBackgroundColor, ::getCppuType((const sal_Int32*)NULL));
- break;
- case PROPERTY_ID_ROWHEIGHT:
- {
- bModified = tryPropertyValue(rConvertedValue, rOldValue, rValue, m_aRowHeight, ::getCppuType((const sal_Int32*)NULL));
-
- sal_Int32 nNewVal( 0 );
- if ( ( rConvertedValue >>= nNewVal ) && ( nNewVal <= 0 ) )
- {
- rConvertedValue.clear();
- bModified = m_aRowHeight.hasValue();
- }
- }
- break;
- default:
- if ( isFontRelatedProperty( nHandle ) )
- bModified = FontControlModel::convertFastPropertyValue( rConvertedValue, rOldValue, nHandle, rValue );
- else
- bModified = OControlModel::convertFastPropertyValue( rConvertedValue, rOldValue, nHandle, rValue);
- }
- return bModified;
-}
-
-//------------------------------------------------------------------------------
-void OGridControlModel::setFastPropertyValue_NoBroadcast( sal_Int32 nHandle, const Any& rValue ) throw ( ::com::sun::star::uno::Exception)
-{
- switch (nHandle)
- {
- case PROPERTY_ID_CONTEXT_WRITING_MODE:
- rValue >>= m_nContextWritingMode;
- break;
- case PROPERTY_ID_WRITING_MODE:
- rValue >>= m_nWritingMode;
- break;
- case PROPERTY_ID_HELPTEXT:
- rValue >>= m_sHelpText;
- break;
- case PROPERTY_ID_HELPURL:
- rValue >>= m_sHelpURL;
- break;
- case PROPERTY_ID_DISPLAYSYNCHRON:
- m_bDisplaySynchron = getBOOL(rValue);
- break;
- case PROPERTY_ID_ALWAYSSHOWCURSOR:
- m_bAlwaysShowCursor = getBOOL(rValue);
- break;
- case PROPERTY_ID_CURSORCOLOR:
- m_aCursorColor = rValue;
- break;
- case PROPERTY_ID_PRINTABLE:
- m_bPrintable = getBOOL(rValue);
- break;
- case PROPERTY_ID_TABSTOP:
- m_aTabStop = rValue;
- break;
- case PROPERTY_ID_HASNAVIGATION:
- m_bNavigation = getBOOL(rValue);
- break;
- case PROPERTY_ID_ENABLED:
- m_bEnable = getBOOL(rValue);
- break;
- case PROPERTY_ID_ENABLEVISIBLE:
- m_bEnableVisible = getBOOL(rValue);
- break;
- case PROPERTY_ID_RECORDMARKER:
- m_bRecordMarker = getBOOL(rValue);
- break;
- case PROPERTY_ID_BORDER:
- rValue >>= m_nBorder;
- break;
- case PROPERTY_ID_BORDERCOLOR:
- m_aBorderColor = rValue;
- break;
- case PROPERTY_ID_DEFAULTCONTROL:
- rValue >>= m_aDefaultControl;
- break;
- case PROPERTY_ID_BACKGROUNDCOLOR:
- m_aBackgroundColor = rValue;
- break;
- case PROPERTY_ID_ROWHEIGHT:
- m_aRowHeight = rValue;
- break;
-
- default:
- if ( isFontRelatedProperty( nHandle ) )
- {
- FontDescriptor aOldFont( getFont() );
-
- FontControlModel::setFastPropertyValue_NoBroadcast( nHandle, rValue );
-
- if ( isFontAggregateProperty( nHandle ) )
- firePropertyChange( PROPERTY_ID_FONT, makeAny( getFont() ), makeAny( aOldFont ) );
- }
- else
- OControlModel::setFastPropertyValue_NoBroadcast( nHandle, rValue );
- }
-
-}
-
-//XPropertyState
-
-//------------------------------------------------------------------------------
-Any OGridControlModel::getPropertyDefaultByHandle( sal_Int32 nHandle ) const
-{
- Any aReturn;
- switch (nHandle)
- {
- case PROPERTY_ID_CONTEXT_WRITING_MODE:
- case PROPERTY_ID_WRITING_MODE:
- aReturn <<= WritingMode2::CONTEXT;
- break;
-
- case PROPERTY_ID_DEFAULTCONTROL:
- aReturn <<= ::rtl::OUString( STARDIV_ONE_FORM_CONTROL_GRID );
- break;
-
- case PROPERTY_ID_PRINTABLE:
- case PROPERTY_ID_HASNAVIGATION:
- case PROPERTY_ID_RECORDMARKER:
- case PROPERTY_ID_DISPLAYSYNCHRON:
- case PROPERTY_ID_ENABLED:
- case PROPERTY_ID_ENABLEVISIBLE:
- aReturn = makeBoolAny(sal_True);
- break;
-
- case PROPERTY_ID_ALWAYSSHOWCURSOR:
- aReturn = makeBoolAny(sal_False);
- break;
-
- case PROPERTY_ID_HELPURL:
- case PROPERTY_ID_HELPTEXT:
- aReturn <<= ::rtl::OUString();
- break;
-
- case PROPERTY_ID_BORDER:
- aReturn <<= (sal_Int16)1;
- break;
-
- case PROPERTY_ID_BORDERCOLOR:
- case PROPERTY_ID_TABSTOP:
- case PROPERTY_ID_BACKGROUNDCOLOR:
- case PROPERTY_ID_ROWHEIGHT:
- case PROPERTY_ID_CURSORCOLOR:
- // void
- break;
-
- default:
- if ( isFontRelatedProperty( nHandle ) )
- aReturn = FontControlModel::getPropertyDefaultByHandle( nHandle );
- else
- aReturn = OControlModel::getPropertyDefaultByHandle(nHandle);
- }
- return aReturn;
-}
-
-//------------------------------------------------------------------------------
-OGridColumn* OGridControlModel::getColumnImplementation(const InterfaceRef& _rxIFace) const
-{
- OGridColumn* pImplementation = NULL;
- Reference< XUnoTunnel > xUnoTunnel( _rxIFace, UNO_QUERY );
- if ( xUnoTunnel.is() )
- pImplementation = reinterpret_cast<OGridColumn*>(xUnoTunnel->getSomething(OGridColumn::getUnoTunnelImplementationId()));
-
- return pImplementation;
-}
-
-//------------------------------------------------------------------------------
-void OGridControlModel::gotColumn( const Reference< XInterface >& _rxColumn )
-{
- Reference< XSQLErrorBroadcaster > xBroadcaster( _rxColumn, UNO_QUERY );
- if ( xBroadcaster.is() )
- xBroadcaster->addSQLErrorListener( this );
-}
-
-//------------------------------------------------------------------------------
-void OGridControlModel::lostColumn(const Reference< XInterface >& _rxColumn)
-{
- if ( m_xSelection == _rxColumn )
- { // the currently selected element was replaced
- m_xSelection.clear();
- EventObject aEvt( static_cast< XWeak* >( this ) );
- m_aSelectListeners.notifyEach( &XSelectionChangeListener::selectionChanged, aEvt );
- }
-
- Reference< XSQLErrorBroadcaster > xBroadcaster( _rxColumn, UNO_QUERY );
- if ( xBroadcaster.is() )
- xBroadcaster->removeSQLErrorListener( this );
-}
-
-//------------------------------------------------------------------------------
-void OGridControlModel::implRemoved(const InterfaceRef& _rxObject)
-{
- OInterfaceContainer::implRemoved(_rxObject);
- lostColumn(_rxObject);
-}
-
-//------------------------------------------------------------------------------
-void OGridControlModel::implInserted( const ElementDescription* _pElement )
-{
- OInterfaceContainer::implInserted( _pElement );
- gotColumn( _pElement->xInterface );
-}
-
-//------------------------------------------------------------------------------
-void OGridControlModel::impl_replacedElement( const ContainerEvent& _rEvent, ::osl::ClearableMutexGuard& _rInstanceLock )
-{
- Reference< XInterface > xOldColumn( _rEvent.ReplacedElement, UNO_QUERY );
- Reference< XInterface > xNewColumn( _rEvent.Element, UNO_QUERY );
-
- bool bNewSelection = ( xOldColumn == m_xSelection );
-
- lostColumn( xOldColumn );
- gotColumn( xNewColumn );
-
- if ( bNewSelection )
- m_xSelection.set( xNewColumn, UNO_QUERY );
-
- OInterfaceContainer::impl_replacedElement( _rEvent, _rInstanceLock );
- // <<---- SYNCHRONIZED
-
- if ( bNewSelection )
- {
- m_aSelectListeners.notifyEach( &XSelectionChangeListener::selectionChanged, EventObject( *this ) );
- }
-}
-
-//------------------------------------------------------------------------------
-ElementDescription* OGridControlModel::createElementMetaData( )
-{
- return new ColumnDescription;
-}
-
-//------------------------------------------------------------------------------
-void OGridControlModel::approveNewElement( const Reference< XPropertySet >& _rxObject, ElementDescription* _pElement )
-{
- OGridColumn* pCol = getColumnImplementation( _rxObject );
- if ( !pCol )
- throw IllegalArgumentException();
-
- OInterfaceContainer::approveNewElement( _rxObject, _pElement );
-
- // if we're here, the object passed all tests
- if ( _pElement )
- static_cast< ColumnDescription* >( _pElement )->pColumn = pCol;
-}
-
-// XPersistObject
-//------------------------------------------------------------------------------
-::rtl::OUString SAL_CALL OGridControlModel::getServiceName() throw ( ::com::sun::star::uno::RuntimeException)
-{
- return FRM_COMPONENT_GRID; // old (non-sun) name for compatibility !
-}
-
-//------------------------------------------------------------------------------
-void OGridControlModel::write(const Reference<XObjectOutputStream>& _rxOutStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException)
-{
- OControlModel::write(_rxOutStream);
-
- Reference<XMarkableStream> xMark(_rxOutStream, UNO_QUERY);
-
- // 1. Version
- _rxOutStream->writeShort(0x0008);
-
- // 2. Columns
- sal_Int32 nLen = getCount();
- _rxOutStream->writeLong(nLen);
- OGridColumn* pCol;
- for (sal_Int32 i = 0; i < nLen; i++)
- {
- // zuerst den Servicenamen fuer das darunterliegende Model
- pCol = getColumnImplementation(m_aItems[i]);
- DBG_ASSERT(pCol != NULL, "OGridControlModel::write : such items should never reach it into my container !");
-
- _rxOutStream << pCol->getModelName();
-
- // dann das Object selbst
- sal_Int32 nMark = xMark->createMark();
- sal_Int32 nObjLen = 0;
- _rxOutStream->writeLong(nObjLen);
-
- // schreiben der Col
- pCol->write(_rxOutStream);
-
- // feststellen der Laenge
- nObjLen = xMark->offsetToMark(nMark) - 4;
- xMark->jumpToMark(nMark);
- _rxOutStream->writeLong(nObjLen);
- xMark->jumpToFurthest();
- xMark->deleteMark(nMark);
- }
-
- // 3. Events
- writeEvents(_rxOutStream);
-
- // 4. Attribute
- // Maskierung fuer alle any Typen
- sal_uInt16 nAnyMask = 0;
- if (m_aRowHeight.getValueType().getTypeClass() == TypeClass_LONG)
- nAnyMask |= ROWHEIGHT;
- if ( getFont() != getDefaultFont() )
- nAnyMask |= FONTATTRIBS | FONTSIZE | FONTTYPE | FONTDESCRIPTOR;
- if (m_aTabStop.getValueType().getTypeClass() == TypeClass_BOOLEAN)
- nAnyMask |= TABSTOP;
- if ( hasTextColor() )
- nAnyMask |= TEXTCOLOR;
- if (m_aBackgroundColor.getValueType().getTypeClass() == TypeClass_LONG)
- nAnyMask |= BACKGROUNDCOLOR;
- if (!m_bRecordMarker)
- nAnyMask |= RECORDMARKER;
-
- _rxOutStream->writeShort(nAnyMask);
-
- if (nAnyMask & ROWHEIGHT)
- _rxOutStream->writeLong(getINT32(m_aRowHeight));
-
- // old structures
- const FontDescriptor& aFont = getFont();
- if ( nAnyMask & FONTDESCRIPTOR )
- {
- // Attrib
- _rxOutStream->writeShort( sal::static_int_cast< sal_Int16 >( VCLUnoHelper::ConvertFontWeight( aFont.Weight ) ) );
- _rxOutStream->writeShort( sal::static_int_cast< sal_Int16 >( aFont.Slant ) );
- _rxOutStream->writeShort( aFont.Underline );
- _rxOutStream->writeShort( aFont.Strikeout );
- _rxOutStream->writeShort( sal_Int16(aFont.Orientation * 10) );
- _rxOutStream->writeBoolean( aFont.Kerning );
- _rxOutStream->writeBoolean( aFont.WordLineMode );
-
- // Size
- _rxOutStream->writeLong( aFont.Width );
- _rxOutStream->writeLong( aFont.Height );
- _rxOutStream->writeShort( sal::static_int_cast< sal_Int16 >( VCLUnoHelper::ConvertFontWidth( aFont.CharacterWidth ) ) );
-
- // Type
- _rxOutStream->writeUTF( aFont.Name );
- _rxOutStream->writeUTF( aFont.StyleName );
- _rxOutStream->writeShort( aFont.Family );
- _rxOutStream->writeShort( aFont.CharSet );
- _rxOutStream->writeShort( aFont.Pitch );
- }
-
- _rxOutStream << m_aDefaultControl;
-
- _rxOutStream->writeShort(m_nBorder);
- _rxOutStream->writeBoolean(m_bEnable);
-
- if (nAnyMask & TABSTOP)
- _rxOutStream->writeBoolean(getBOOL(m_aTabStop));
-
- _rxOutStream->writeBoolean(m_bNavigation);
-
- if (nAnyMask & TEXTCOLOR)
- _rxOutStream->writeLong( getTextColor() );
-
- // neu ab Version 6
- _rxOutStream << m_sHelpText;
-
- if (nAnyMask & FONTDESCRIPTOR)
- _rxOutStream << getFont();
-
- if (nAnyMask & RECORDMARKER)
- _rxOutStream->writeBoolean(m_bRecordMarker);
-
- // neu ab Version 7
- _rxOutStream->writeBoolean(m_bPrintable);
-
- // new since 8
- if (nAnyMask & BACKGROUNDCOLOR)
- _rxOutStream->writeLong(getINT32(m_aBackgroundColor));
-}
-
-//------------------------------------------------------------------------------
-void OGridControlModel::read(const Reference<XObjectInputStream>& _rxInStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException)
-{
- OControlModel::read(_rxInStream);
-
- Reference<XMarkableStream> xMark(_rxInStream, UNO_QUERY);
-
- // 1. Version
- sal_Int16 nVersion = _rxInStream->readShort();
-
- // 2. Einlesen der Spalten
- sal_Int32 nLen = _rxInStream->readLong();
- if (nLen)
- {
- for (sal_Int32 i = 0; i < nLen; i++)
- {
- // Lesen des Modelnamen
-
- ::rtl::OUString sModelName;
- _rxInStream >> sModelName;
-
- Reference<XPropertySet> xCol(createColumn(getColumnTypeByModelName(sModelName)));
- DBG_ASSERT(xCol.is(), "OGridControlModel::read : unknown column type !");
- sal_Int32 nObjLen = _rxInStream->readLong();
- if (nObjLen)
- {
- sal_Int32 nMark = xMark->createMark();
- if (xCol.is())
- {
- OGridColumn* pCol = getColumnImplementation(xCol);
- pCol->read(_rxInStream);
- }
- xMark->jumpToMark(nMark);
- _rxInStream->skipBytes(nObjLen);
- xMark->deleteMark(nMark);
- }
-
- if ( xCol.is() )
- implInsert( i, xCol, sal_False, NULL, sal_False );
- }
- }
-
- // In der Basisimplementierung werden die Events nur gelesen, Elemente im Container existieren
- // da aber vor TF_ONE fuer das GridControl immer Events geschrieben wurden, muessen sie auch immer
- // mit gelesen werden
- sal_Int32 nObjLen = _rxInStream->readLong();
- if (nObjLen)
- {
- sal_Int32 nMark = xMark->createMark();
- Reference<XPersistObject> xObj(m_xEventAttacher, UNO_QUERY);
- if (xObj.is())
- xObj->read(_rxInStream);
- xMark->jumpToMark(nMark);
- _rxInStream->skipBytes(nObjLen);
- xMark->deleteMark(nMark);
- }
-
- // Attachement lesen
- for (sal_Int32 i = 0; i < nLen; i++)
- {
- InterfaceRef xIfc(m_aItems[i], UNO_QUERY);
- Reference<XPropertySet> xSet(xIfc, UNO_QUERY);
- Any aHelper;
- aHelper <<= xSet;
- m_xEventAttacher->attach( i, xIfc, aHelper );
- }
-
- // 4. Einlesen der Attribute
- if (nVersion == 1)
- return;
-
- // Maskierung fuer any
- sal_uInt16 nAnyMask = _rxInStream->readShort();
-
- if (nAnyMask & ROWHEIGHT)
- {
- sal_Int32 nValue = _rxInStream->readLong();
- m_aRowHeight <<= (sal_Int32)nValue;
- }
-
- FontDescriptor aFont( getFont() );
- if ( nAnyMask & FONTATTRIBS )
- {
- aFont.Weight = (float)VCLUnoHelper::ConvertFontWeight( _rxInStream->readShort() );
-
- aFont.Slant = (FontSlant)_rxInStream->readShort();
- aFont.Underline = _rxInStream->readShort();
- aFont.Strikeout = _rxInStream->readShort();
- aFont.Orientation = ( (float)_rxInStream->readShort() ) / 10;
- aFont.Kerning = _rxInStream->readBoolean();
- aFont.WordLineMode = _rxInStream->readBoolean();
- }
- if ( nAnyMask & FONTSIZE )
- {
- aFont.Width = (sal_Int16)_rxInStream->readLong();
- aFont.Height = (sal_Int16)_rxInStream->readLong();
- aFont.CharacterWidth = (float)VCLUnoHelper::ConvertFontWidth( _rxInStream->readShort() );
- }
- if ( nAnyMask & FONTTYPE )
- {
- aFont.Name = _rxInStream->readUTF();
- aFont.StyleName = _rxInStream->readUTF();
- aFont.Family = _rxInStream->readShort();
- aFont.CharSet = _rxInStream->readShort();
- aFont.Pitch = _rxInStream->readShort();
- }
-
- if ( nAnyMask & ( FONTATTRIBS | FONTSIZE | FONTTYPE ) )
- setFont( aFont );
-
- // Name
- _rxInStream >> m_aDefaultControl;
- m_nBorder = _rxInStream->readShort();
- m_bEnable = _rxInStream->readBoolean();
-
- if (nAnyMask & TABSTOP)
- {
- m_aTabStop = makeBoolAny(_rxInStream->readBoolean());
- }
-
- if (nVersion > 3)
- m_bNavigation = _rxInStream->readBoolean();
-
- if (nAnyMask & TEXTCOLOR)
- {
- sal_Int32 nValue = _rxInStream->readLong();
- setTextColor( (sal_Int32)nValue );
- }
-
- // neu ab Version 6
- if (nVersion > 5)
- _rxInStream >> m_sHelpText;
-
- if (nAnyMask & FONTDESCRIPTOR)
- {
- FontDescriptor aUNOFont;
- _rxInStream >> aUNOFont;
- setFont( aFont );
- }
-
- if (nAnyMask & RECORDMARKER)
- m_bRecordMarker = _rxInStream->readBoolean();
-
- // neu ab Version 7
- if (nVersion > 6)
- m_bPrintable = _rxInStream->readBoolean();
-
- if (nAnyMask & BACKGROUNDCOLOR)
- {
- sal_Int32 nValue = _rxInStream->readLong();
- m_aBackgroundColor <<= (sal_Int32)nValue;
- }
-}
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Grid.hxx b/forms/source/component/Grid.hxx
deleted file mode 100644
index 7077ffc59..000000000
--- a/forms/source/component/Grid.hxx
+++ /dev/null
@@ -1,221 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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 "errorbroadcaster.hxx"
-#include "FormComponent.hxx"
-#include "formcontrolfont.hxx"
-#include "InterfaceContainer.hxx"
-
-/** === begin UNO includes === **/
-#include <com/sun/star/form/XGridColumnFactory.hpp>
-#include <com/sun/star/form/XLoadable.hpp>
-#include <com/sun/star/sdb/XRowSetSupplier.hpp>
-#include <com/sun/star/sdb/XRowSetChangeBroadcaster.hpp>
-#include <com/sun/star/view/XSelectionSupplier.hpp>
-/** === end UNO includes === **/
-
-#include <comphelper/proparrhlp.hxx>
-#include <cppuhelper/implbase7.hxx>
-#include <tools/link.hxx>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
-class OGridColumn;
-
-//==================================================================
-// ColumnDescription
-//==================================================================
-
- struct ColumnDescription : public ElementDescription
- {
- public:
- OGridColumn* pColumn; // not owned by this instance! only to prevent duplicate XUnoTunnel usage
- };
-
-//==================================================================
-// OGridControlModel
-//==================================================================
-typedef ::cppu::ImplHelper7 < ::com::sun::star::awt::XControlModel
- , ::com::sun::star::form::XGridColumnFactory
- , ::com::sun::star::form::XReset
- , ::com::sun::star::view::XSelectionSupplier
- , ::com::sun::star::sdb::XSQLErrorListener
- , ::com::sun::star::sdb::XRowSetSupplier
- , ::com::sun::star::sdb::XRowSetChangeBroadcaster
- > OGridControlModel_BASE;
-
-class OGridControlModel :public OControlModel
- ,public OInterfaceContainer
- ,public OErrorBroadcaster
- ,public FontControlModel
- ,public OGridControlModel_BASE
-{
- ::cppu::OInterfaceContainerHelper m_aSelectListeners,
- m_aResetListeners,
- m_aRowSetChangeListeners;
-
-// [properties]
- ::com::sun::star::uno::Any m_aRowHeight; // Zeilenhoehe
- ::com::sun::star::uno::Any m_aTabStop;
- ::com::sun::star::uno::Any m_aBackgroundColor;
- ::com::sun::star::uno::Any m_aCursorColor; // transient
- ::com::sun::star::uno::Any m_aBorderColor;
- ::rtl::OUString m_aDefaultControl;
- ::rtl::OUString m_sHelpText;
-// [properties]
-
- ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet > m_xSelection;
-
-// [properties]
- ::rtl::OUString m_sHelpURL; // URL
- sal_Int16 m_nBorder;
- sal_Int16 m_nWritingMode;
- sal_Int16 m_nContextWritingMode;
- sal_Bool m_bEnableVisible : 1;
- sal_Bool m_bEnable : 1;
- sal_Bool m_bNavigation : 1;
- sal_Bool m_bRecordMarker : 1;
- sal_Bool m_bPrintable : 1;
- sal_Bool m_bAlwaysShowCursor : 1; // transient
- sal_Bool m_bDisplaySynchron : 1; // transient
-// [properties]
-
-protected:
- void _reset();
-
-public:
- DECLARE_DEFAULT_LEAF_XTOR( OGridControlModel );
-
- // UNO Anbindung
- DECLARE_UNO3_AGG_DEFAULTS(OGridControlModel, OControlModel);
- virtual ::com::sun::star::uno::Any SAL_CALL queryAggregation( const ::com::sun::star::uno::Type& _rType ) throw (::com::sun::star::uno::RuntimeException);
-
- // XChild
- virtual void SAL_CALL setParent(const InterfaceRef& Parent) throw(::com::sun::star::lang::NoSupportException, ::com::sun::star::uno::RuntimeException);
-
- // XServiceInfo
- IMPLEMENTATION_NAME(OGridControlModel);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException);
-
- // XTypeProvider
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type > SAL_CALL getTypes( ) throw(::com::sun::star::uno::RuntimeException);
-
- // OComponentHelper
- virtual void SAL_CALL disposing();
-
- // XEventListener
- virtual void SAL_CALL disposing(const ::com::sun::star::lang::EventObject& _rSource) throw(::com::sun::star::uno::RuntimeException);
-
- // XReset
- virtual void SAL_CALL reset() throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL addResetListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XResetListener>& _rxListener) throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeResetListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XResetListener>& _rxListener) throw ( ::com::sun::star::uno::RuntimeException);
-
- // XSelectionSupplier
- virtual sal_Bool SAL_CALL select(const ::com::sun::star::uno::Any& aElement) throw(::com::sun::star::lang::IllegalArgumentException, ::com::sun::star::uno::RuntimeException);
- virtual ::com::sun::star::uno::Any SAL_CALL getSelection() throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL addSelectionChangeListener(const ::com::sun::star::uno::Reference< ::com::sun::star::view::XSelectionChangeListener >& xListener) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeSelectionChangeListener(const ::com::sun::star::uno::Reference< ::com::sun::star::view::XSelectionChangeListener >& xListener) throw(::com::sun::star::uno::RuntimeException);
-
- // XGridColumnFactory
- virtual ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet> SAL_CALL createColumn(const ::rtl::OUString& ColumnType) throw ( :: com::sun::star::lang::IllegalArgumentException, ::com::sun::star::uno::RuntimeException);
- virtual StringSequence SAL_CALL getColumnTypes() throw ( ::com::sun::star::uno::RuntimeException);
-
- // XPersistObject
- virtual ::rtl::OUString SAL_CALL getServiceName() throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL write(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectOutputStream>& _rxOutStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL read(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectInputStream>& _rxInStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
-
- // XPropertySet
- virtual void SAL_CALL getFastPropertyValue(::com::sun::star::uno::Any& rValue, sal_Int32 nHandle ) const;
- virtual sal_Bool SAL_CALL convertFastPropertyValue(::com::sun::star::uno::Any& rConvertedValue, ::com::sun::star::uno::Any& rOldValue,
- sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue )
- throw(::com::sun::star::lang::IllegalArgumentException);
- virtual void SAL_CALL setFastPropertyValue_NoBroadcast(sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue) throw ( ::com::sun::star::uno::Exception);
-
- // XPropertyState
- virtual ::com::sun::star::uno::Any getPropertyDefaultByHandle( sal_Int32 nHandle ) const;
-
- // XSQLErrorListener
- virtual void SAL_CALL errorOccured( const ::com::sun::star::sdb::SQLErrorEvent& _rEvent ) throw (::com::sun::star::uno::RuntimeException);
-
- // XRowSetSupplier
- virtual ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XRowSet > SAL_CALL getRowSet( ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setRowSet( const ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XRowSet >& xDataSource ) throw (::com::sun::star::uno::RuntimeException);
-
- // XRowSetChangeBroadcaster
- virtual void SAL_CALL addRowSetChangeListener( const ::com::sun::star::uno::Reference< ::com::sun::star::sdb::XRowSetChangeListener >& i_Listener ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeRowSetChangeListener( const ::com::sun::star::uno::Reference< ::com::sun::star::sdb::XRowSetChangeListener >& i_Listener ) throw (::com::sun::star::uno::RuntimeException);
-
- // OControlModel's property handling
- virtual void describeFixedProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
-
- // prevent method hiding
- using OControlModel::disposing;
- using OControlModel::getFastPropertyValue;
-
-protected:
- DECLARE_XCLONEABLE();
-
-protected:
- virtual void approveNewElement(
- const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet >& _rxObject,
- ElementDescription* _pElement
- );
-
- ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet> createColumn(sal_Int32 nTypeId) const;
-
- OGridColumn* getColumnImplementation(const InterfaceRef& _rxIFace) const;
-
- virtual ElementDescription* createElementMetaData( );
-
-protected:
- virtual void implRemoved(const InterfaceRef& _rxObject);
- virtual void implInserted( const ElementDescription* _pElement );
- virtual void impl_replacedElement(
- const ::com::sun::star::container::ContainerEvent& _rEvent,
- ::osl::ClearableMutexGuard& _rInstanceLock
- );
-
- void gotColumn(const ::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >& _rxColumn);
- void lostColumn(const ::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >& _rxColumn);
-
- void cloneColumns( const OGridControlModel* _pOriginalContainer );
-};
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/GroupBox.cxx b/forms/source/component/GroupBox.cxx
deleted file mode 100644
index ba3da3576..000000000
--- a/forms/source/component/GroupBox.cxx
+++ /dev/null
@@ -1,175 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "GroupBox.hxx"
-#include "property.hxx"
-#include "property.hrc"
-#include "services.hxx"
-#include <tools/debug.hxx>
-
-//.........................................................................
-namespace frm
-{
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::sdb;
-using namespace ::com::sun::star::sdbc;
-using namespace ::com::sun::star::sdbcx;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::io;
-using namespace ::com::sun::star::lang;
-using namespace ::com::sun::star::util;
-
-//==================================================================
-// OGroupBoxModel
-//==================================================================
-
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OGroupBoxModel_CreateInstance(const Reference<starlang::XMultiServiceFactory>& _rxFactory) throw (RuntimeException)
-{
- return *(new OGroupBoxModel(_rxFactory));
-}
-
-//------------------------------------------------------------------
-DBG_NAME( OGroupBoxModel )
-//------------------------------------------------------------------
-OGroupBoxModel::OGroupBoxModel(const Reference<starlang::XMultiServiceFactory>& _rxFactory)
- :OControlModel(_rxFactory, VCL_CONTROLMODEL_GROUPBOX, VCL_CONTROL_GROUPBOX)
-{
- DBG_CTOR( OGroupBoxModel, NULL );
- m_nClassId = FormComponentType::GROUPBOX;
-}
-
-//------------------------------------------------------------------
-OGroupBoxModel::OGroupBoxModel( const OGroupBoxModel* _pOriginal, const Reference<starlang::XMultiServiceFactory>& _rxFactory )
- :OControlModel( _pOriginal, _rxFactory )
-{
- DBG_CTOR( OGroupBoxModel, NULL );
-}
-
-// XServiceInfo
-//------------------------------------------------------------------------------
-StringSequence SAL_CALL OGroupBoxModel::getSupportedServiceNames() throw(RuntimeException)
-{
- StringSequence aSupported = OControlModel::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 1);
-
- ::rtl::OUString* pArray = aSupported.getArray();
- pArray[aSupported.getLength()-1] = FRM_SUN_COMPONENT_GROUPBOX;
- return aSupported;
-}
-
-//------------------------------------------------------------------
-OGroupBoxModel::~OGroupBoxModel()
-{
- DBG_DTOR( OGroupBoxModel, NULL );
-}
-
-//------------------------------------------------------------------------------
-IMPLEMENT_DEFAULT_CLONING( OGroupBoxModel )
-
-//------------------------------------------------------------------------------
-void OGroupBoxModel::describeAggregateProperties( Sequence< Property >& _rAggregateProps ) const
-{
- OControlModel::describeAggregateProperties( _rAggregateProps );
- // don't want to have the TabStop property
- RemoveProperty(_rAggregateProps, PROPERTY_TABSTOP);
-}
-
-//------------------------------------------------------------------------------
-::rtl::OUString SAL_CALL OGroupBoxModel::getServiceName() throw(RuntimeException)
-{
- return FRM_COMPONENT_GROUPBOX; // old (non-sun) name for compatibility !
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OGroupBoxModel::write(const Reference< XObjectOutputStream>& _rxOutStream)
- throw(IOException, RuntimeException)
-{
- OControlModel::write(_rxOutStream);
-
- // Version
- _rxOutStream->writeShort(0x0002);
- writeHelpTextCompatibly(_rxOutStream);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OGroupBoxModel::read(const Reference< XObjectInputStream>& _rxInStream) throw(IOException, RuntimeException)
-{
- OControlModel::read( _rxInStream );
-
- // Version
- sal_uInt16 nVersion = _rxInStream->readShort();
- DBG_ASSERT(nVersion > 0, "OGroupBoxModel::read : version 0 ? this should never have been written !");
- // ups, ist das Englisch richtig ? ;)
-
- if (nVersion == 2)
- readHelpTextCompatibly(_rxInStream);
-
- if (nVersion > 0x0002)
- {
- OSL_FAIL("OGroupBoxModel::read : unknown version !");
- }
-};
-
-//==================================================================
-// OGroupBoxControl
-//==================================================================
-
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OGroupBoxControl_CreateInstance(const Reference<starlang::XMultiServiceFactory>& _rxFactory) throw (RuntimeException)
-{
- return *(new OGroupBoxControl(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-OGroupBoxControl::OGroupBoxControl(const Reference<starlang::XMultiServiceFactory>& _rxFactory)
- :OControl(_rxFactory, VCL_CONTROL_GROUPBOX)
-{
-}
-
-//------------------------------------------------------------------------------
-StringSequence SAL_CALL OGroupBoxControl::getSupportedServiceNames() throw(RuntimeException)
-{
- StringSequence aSupported = OControl::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 1);
-
- ::rtl::OUString* pArray = aSupported.getArray();
- pArray[aSupported.getLength()-1] = FRM_SUN_CONTROL_GROUPBOX;
- return aSupported;
-}
-
-//.........................................................................
-}
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/GroupBox.hxx b/forms/source/component/GroupBox.hxx
deleted file mode 100644
index 1c0af9dc1..000000000
--- a/forms/source/component/GroupBox.hxx
+++ /dev/null
@@ -1,86 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FORMS_GROUPBOX_HXX_
-#define _FORMS_GROUPBOX_HXX_
-
-#include "FormComponent.hxx"
-
-//.........................................................................
-namespace frm
-{
-
-//==================================================================
-// OGroupBoxModel
-//==================================================================
-class OGroupBoxModel
- :public OControlModel
-{
-public:
- DECLARE_DEFAULT_LEAF_XTOR( OGroupBoxModel );
-
- // XServiceInfo
- IMPLEMENTATION_NAME(OGroupBoxModel);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException);
-
- // XPersistObject
- virtual ::rtl::OUString SAL_CALL getServiceName() throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL
- write(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectOutputStream>& _rxOutStream) throw(::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL
- read(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectInputStream>& _rxInStream) throw(::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
-
- // OControlModel's property handling
- virtual void describeAggregateProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rAggregateProps
- ) const;
-
-protected:
- DECLARE_XCLONEABLE();
-};
-
-//==================================================================
-// OGroupBoxControl (nur aus Kompatibilitaet zur 5.0)
-//==================================================================
-class OGroupBoxControl : public OControl
-{
-public:
- OGroupBoxControl(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory);
-
- // XServiceInfo
- IMPLEMENTATION_NAME(OGroupBoxControl);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException);
-};
-
-//.........................................................................
-}
-//.........................................................................
-
-#endif // _FORMS_GROUPBOX_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/GroupManager.cxx b/forms/source/component/GroupManager.cxx
deleted file mode 100644
index 299d752ac..000000000
--- a/forms/source/component/GroupManager.cxx
+++ /dev/null
@@ -1,533 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "GroupManager.hxx"
-#include <com/sun/star/beans/XFastPropertySet.hpp>
-#include <com/sun/star/form/FormComponentType.hpp>
-#include <comphelper/property.hxx>
-#include <comphelper/uno3.hxx>
-#include <tools/solar.h>
-#include <tools/debug.hxx>
-
-#include "property.hrc"
-
-#include <algorithm>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::sdbc;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::lang;
-using namespace ::com::sun::star::form;
-
-namespace
-{
- bool isRadioButton( const Reference< XPropertySet >& _rxComponent )
- {
- bool bIs = false;
- if ( hasProperty( PROPERTY_CLASSID, _rxComponent ) )
- {
- sal_Int16 nClassId = FormComponentType::CONTROL;
- _rxComponent->getPropertyValue( PROPERTY_CLASSID ) >>= nClassId;
- if ( nClassId == FormComponentType::RADIOBUTTON )
- bIs = true;
- }
- return bIs;
- }
-}
-
-//========================================================================
-// class OGroupCompAcc
-//========================================================================
-//------------------------------------------------------------------
-OGroupCompAcc::OGroupCompAcc(const Reference<XPropertySet>& rxElement, const OGroupComp& _rGroupComp )
- :m_xComponent( rxElement )
- ,m_aGroupComp( _rGroupComp )
-{
-}
-
-//------------------------------------------------------------------
-sal_Bool OGroupCompAcc::operator==( const OGroupCompAcc& rCompAcc ) const
-{
- return (m_xComponent == rCompAcc.GetComponent());
-}
-
-//------------------------------------------------------------------
-class OGroupCompAccLess : public ::std::binary_function<OGroupCompAcc, OGroupCompAcc, sal_Bool>
-{
-public:
- sal_Bool operator() (const OGroupCompAcc& lhs, const OGroupCompAcc& rhs) const
- {
- return
- reinterpret_cast<sal_Int64>(lhs.m_xComponent.get())
- < reinterpret_cast<sal_Int64>(rhs.m_xComponent.get());
- }
-};
-
-//========================================================================
-// class OGroupComp
-//========================================================================
-
-//------------------------------------------------------------------
-OGroupComp::OGroupComp()
- :m_nPos( -1 )
- ,m_nTabIndex( 0 )
-{
-}
-
-//------------------------------------------------------------------
-OGroupComp::OGroupComp(const OGroupComp& _rSource)
- :m_aName( _rSource.m_aName )
- ,m_xComponent( _rSource.m_xComponent )
- ,m_xControlModel(_rSource.m_xControlModel)
- ,m_nPos( _rSource.m_nPos )
- ,m_nTabIndex( _rSource.m_nTabIndex )
-{
-}
-
-//------------------------------------------------------------------
-OGroupComp::OGroupComp(const Reference<XPropertySet>& rxSet, sal_Int32 nInsertPos )
- : m_aName( OGroupManager::GetGroupName( rxSet ) )
- , m_xComponent( rxSet )
- , m_xControlModel(rxSet,UNO_QUERY)
- , m_nPos( nInsertPos )
- , m_nTabIndex(0)
-{
- if (m_xComponent.is())
- {
- if (hasProperty( PROPERTY_TABINDEX, m_xComponent ) )
- // Indices kleiner 0 werden wie 0 behandelt
- m_nTabIndex = Max(getINT16(m_xComponent->getPropertyValue( PROPERTY_TABINDEX )) , sal_Int16(0));
- }
-}
-
-//------------------------------------------------------------------
-sal_Bool OGroupComp::operator==( const OGroupComp& rComp ) const
-{
- return m_nTabIndex == rComp.GetTabIndex() && m_nPos == rComp.GetPos();
-}
-
-//------------------------------------------------------------------
-class OGroupCompLess : public ::std::binary_function<OGroupComp, OGroupComp, sal_Bool>
-{
-public:
- sal_Bool operator() (const OGroupComp& lhs, const OGroupComp& rhs) const
- {
- sal_Bool bResult;
- // TabIndex von 0 wird hinten einsortiert
- if (lhs.m_nTabIndex == rhs.GetTabIndex())
- bResult = lhs.m_nPos < rhs.GetPos();
- else if (lhs.m_nTabIndex && rhs.GetTabIndex())
- bResult = lhs.m_nTabIndex < rhs.GetTabIndex();
- else
- bResult = lhs.m_nTabIndex != 0;
- return bResult;
- }
-};
-
-//========================================================================
-// class OGroup
-//========================================================================
-
-DBG_NAME(OGroup)
-//------------------------------------------------------------------
-OGroup::OGroup( const ::rtl::OUString& rGroupName )
- :m_aGroupName( rGroupName )
- ,m_nInsertPos(0)
-{
- DBG_CTOR(OGroup,NULL);
-}
-
-#ifdef DBG_UTIL
-//------------------------------------------------------------------
-OGroup::OGroup( const OGroup& _rSource )
-:m_aCompArray(_rSource.m_aCompArray)
- ,m_aCompAccArray(_rSource.m_aCompAccArray)
- ,m_aGroupName(_rSource.m_aGroupName)
- ,m_nInsertPos(_rSource.m_nInsertPos)
-{
- DBG_CTOR(OGroup,NULL);
-}
-#endif
-
-//------------------------------------------------------------------
-OGroup::~OGroup()
-{
- DBG_DTOR(OGroup,NULL);
-}
-
-//------------------------------------------------------------------
-void OGroup::InsertComponent( const Reference<XPropertySet>& xSet )
-{
- OGroupComp aNewGroupComp( xSet, m_nInsertPos );
- sal_Int32 nPosInserted = insert_sorted(m_aCompArray, aNewGroupComp, OGroupCompLess());
-
- OGroupCompAcc aNewGroupCompAcc( xSet, m_aCompArray[nPosInserted] );
- insert_sorted(m_aCompAccArray, aNewGroupCompAcc, OGroupCompAccLess());
- m_nInsertPos++;
-}
-
-//------------------------------------------------------------------
-void OGroup::RemoveComponent( const Reference<XPropertySet>& rxElement )
-{
- sal_Int32 nGroupCompAccPos;
- OGroupCompAcc aSearchCompAcc( rxElement, OGroupComp() );
- if ( seek_entry(m_aCompAccArray, aSearchCompAcc, nGroupCompAccPos, OGroupCompAccLess()) )
- {
- OGroupCompAcc& aGroupCompAcc = m_aCompAccArray[nGroupCompAccPos];
- const OGroupComp& aGroupComp = aGroupCompAcc.GetGroupComponent();
-
- sal_Int32 nGroupCompPos;
- if ( seek_entry(m_aCompArray, aGroupComp, nGroupCompPos, OGroupCompLess()) )
- {
- m_aCompAccArray.erase( m_aCompAccArray.begin() + nGroupCompAccPos );
- m_aCompArray.erase( m_aCompArray.begin() + nGroupCompPos );
-
- /*============================================================
- Durch das Entfernen der GroupComp ist die Einfuegeposition
- ungueltig geworden. Sie braucht hier aber nicht angepasst werden,
- da sie fortlaufend vergeben wird und damit immer
- aufsteigend eindeutig ist.
- ============================================================*/
- }
- else
- {
- OSL_FAIL( "OGroup::RemoveComponent: Component nicht in Gruppe" );
- }
- }
- else
- {
- OSL_FAIL( "OGroup::RemoveComponent: Component nicht in Gruppe" );
- }
-}
-
-//------------------------------------------------------------------
-sal_Bool OGroup::operator==( const OGroup& rGroup ) const
-{
- return m_aGroupName.equals(rGroup.GetGroupName());
-}
-
-//------------------------------------------------------------------
-class OGroupLess : public ::std::binary_function<OGroup, OGroup, sal_Bool>
-{
-public:
- sal_Bool operator() (const OGroup& lhs, const OGroup& rhs) const
- {
- return lhs.m_aGroupName < rhs.m_aGroupName;
- }
-};
-
-//------------------------------------------------------------------
-Sequence< Reference<XControlModel> > OGroup::GetControlModels() const
-{
- sal_Int32 nLen = m_aCompArray.size();
- Sequence<Reference<XControlModel> > aControlModelSeq( nLen );
- Reference<XControlModel>* pModels = aControlModelSeq.getArray();
-
- ConstOGroupCompArrIterator aGroupComps = m_aCompArray.begin();
- for (sal_Int32 i = 0; i < nLen; ++i, ++pModels, ++aGroupComps)
- {
- *pModels = aGroupComps->GetControlModel();
- }
- return aControlModelSeq;
-}
-
-DBG_NAME(OGroupManager);
-//------------------------------------------------------------------
-OGroupManager::OGroupManager(const Reference< XContainer >& _rxContainer)
- :m_pCompGroup( new OGroup( ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("AllComponentGroup") ) ) )
- ,m_xContainer(_rxContainer)
-{
- DBG_CTOR(OGroupManager,NULL);
-
- increment(m_refCount);
- {
- _rxContainer->addContainerListener(this);
- }
- decrement(m_refCount);
-}
-
-//------------------------------------------------------------------
-OGroupManager::~OGroupManager()
-{
- DBG_DTOR(OGroupManager,NULL);
- // Alle Components und CompGroup loeschen
- delete m_pCompGroup;
-}
-
-// XPropertyChangeListener
-//------------------------------------------------------------------
-void OGroupManager::disposing(const EventObject& evt) throw( RuntimeException )
-{
- Reference<XContainer> xContainer(evt.Source, UNO_QUERY);
- if (xContainer.get() == m_xContainer.get())
- {
- DELETEZ(m_pCompGroup);
-
- ////////////////////////////////////////////////////////////////
- // Gruppen loeschen
- m_aGroupArr.clear();
- m_xContainer.clear();
- }
-}
-// -----------------------------------------------------------------------------
-void OGroupManager::removeFromGroupMap(const ::rtl::OUString& _sGroupName,const Reference<XPropertySet>& _xSet)
-{
- // Component aus CompGroup entfernen
- m_pCompGroup->RemoveComponent( _xSet );
-
- OGroupArr::iterator aFind = m_aGroupArr.find(_sGroupName);
-
- if ( aFind != m_aGroupArr.end() )
- {
- // Gruppe vorhanden
- aFind->second.RemoveComponent( _xSet );
-
- // Wenn Anzahl der Gruppenelemente == 1 ist, Gruppe deaktivieren
- sal_Int32 nCount = aFind->second.Count();
- if ( nCount == 1 || nCount == 0 )
- {
- OActiveGroups::iterator aActiveFind = ::std::find(
- m_aActiveGroupMap.begin(),
- m_aActiveGroupMap.end(),
- aFind
- );
- if ( aActiveFind != m_aActiveGroupMap.end() )
- {
- // the group is active. Deactivate it if the remaining component
- // is *no* radio button
- if ( nCount == 0 || !isRadioButton( aFind->second.GetObject( 0 ) ) )
- m_aActiveGroupMap.erase( aActiveFind );
- }
- }
- }
-
-
- // Bei Component als PropertyChangeListener abmelden
- _xSet->removePropertyChangeListener( PROPERTY_NAME, this );
- if (hasProperty(PROPERTY_GROUP_NAME, _xSet))
- _xSet->removePropertyChangeListener( PROPERTY_GROUP_NAME, this );
- if (hasProperty(PROPERTY_TABINDEX, _xSet))
- _xSet->removePropertyChangeListener( PROPERTY_TABINDEX, this );
-}
-//------------------------------------------------------------------
-void SAL_CALL OGroupManager::propertyChange(const PropertyChangeEvent& evt) throw ( ::com::sun::star::uno::RuntimeException)
-{
- Reference<XPropertySet> xSet(evt.Source, UNO_QUERY);
-
- // Component aus Gruppe entfernen
- ::rtl::OUString sGroupName;
- if (hasProperty( PROPERTY_GROUP_NAME, xSet ))
- xSet->getPropertyValue( PROPERTY_GROUP_NAME ) >>= sGroupName;
- if (evt.PropertyName == PROPERTY_NAME) {
- if (sGroupName.getLength() > 0)
- return; // group hasn't changed; ignore this name change.
- // no GroupName; use Name as GroupNme
- evt.OldValue >>= sGroupName;
- }
- else if (evt.PropertyName == PROPERTY_GROUP_NAME) {
- evt.OldValue >>= sGroupName;
- if (sGroupName.getLength() == 0) {
- // No prior GroupName; fallback to Nme
- xSet->getPropertyValue( PROPERTY_NAME ) >>= sGroupName;
- }
- }
- else
- sGroupName = GetGroupName( xSet );
-
- removeFromGroupMap(sGroupName,xSet);
-
- // Component neu einordnen
- InsertElement( xSet );
-}
-
-// XContainerListener
-//------------------------------------------------------------------
-void SAL_CALL OGroupManager::elementInserted(const ContainerEvent& Event) throw ( ::com::sun::star::uno::RuntimeException)
-{
- Reference< XPropertySet > xProps;
- Event.Element >>= xProps;
- if ( xProps.is() )
- InsertElement( xProps );
-}
-
-//------------------------------------------------------------------
-void SAL_CALL OGroupManager::elementRemoved(const ContainerEvent& Event) throw ( ::com::sun::star::uno::RuntimeException)
-{
- Reference<XPropertySet> xProps;
- Event.Element >>= xProps;
- if ( xProps.is() )
- RemoveElement( xProps );
-}
-
-//------------------------------------------------------------------
-void SAL_CALL OGroupManager::elementReplaced(const ContainerEvent& Event) throw ( ::com::sun::star::uno::RuntimeException)
-{
- Reference<XPropertySet> xProps;
- Event.ReplacedElement >>= xProps;
- if ( xProps.is() )
- RemoveElement( xProps );
-
- xProps.clear();
- Event.Element >>= xProps;
- if ( xProps.is() )
- InsertElement( xProps );
-}
-
-// Other functions
-//------------------------------------------------------------------
-Sequence<Reference<XControlModel> > OGroupManager::getControlModels()
-{
- return m_pCompGroup->GetControlModels();
-}
-
-//------------------------------------------------------------------
-sal_Int32 OGroupManager::getGroupCount()
-{
- return m_aActiveGroupMap.size();
-}
-
-//------------------------------------------------------------------
-void OGroupManager::getGroup(sal_Int32 nGroup, Sequence< Reference<XControlModel> >& _rGroup, ::rtl::OUString& _rName)
-{
- OSL_ENSURE(nGroup >= 0 && (size_t)nGroup < m_aActiveGroupMap.size(),"OGroupManager::getGroup: Invalid group index!");
- OGroupArr::iterator aGroupPos = m_aActiveGroupMap[nGroup];
- _rName = aGroupPos->second.GetGroupName();
- _rGroup = aGroupPos->second.GetControlModels();
-}
-
-//------------------------------------------------------------------
-void OGroupManager::getGroupByName(const ::rtl::OUString& _rName, Sequence< Reference<XControlModel> >& _rGroup)
-{
- OGroupArr::iterator aFind = m_aGroupArr.find(_rName);
- if ( aFind != m_aGroupArr.end() )
- _rGroup = aFind->second.GetControlModels();
-}
-
-//------------------------------------------------------------------
-void OGroupManager::InsertElement( const Reference<XPropertySet>& xSet )
-{
- // Nur ControlModels
- Reference<XControlModel> xControl(xSet, UNO_QUERY);
- if (!xControl.is() )
- return;
-
- // Component in CompGroup aufnehmen
- m_pCompGroup->InsertComponent( xSet );
-
- // Component in Gruppe aufnehmen
- ::rtl::OUString sGroupName( GetGroupName( xSet ) );
-
- OGroupArr::iterator aFind = m_aGroupArr.find(sGroupName);
-
- if ( aFind == m_aGroupArr.end() )
- {
- aFind = m_aGroupArr.insert(OGroupArr::value_type(sGroupName,OGroup(sGroupName))).first;
- }
-
- aFind->second.InsertComponent( xSet );
-
- // if we have at least 2 elements in the group, then this is an "active group"
- bool bActivateGroup = aFind->second.Count() == 2;
-
- // Additionally, if the component is a radio button, then it's group becomes active,
- // too. With this, we ensure that in a container with n radio buttons which all are
- // in different groups the selection still works reliably (means that all radios can be
- // clicked independently)
- if ( aFind->second.Count() == 1 )
- {
- if ( isRadioButton( xSet ) )
- bActivateGroup = true;
- }
-
- if ( bActivateGroup )
- {
- OActiveGroups::iterator aAlreadyExistent = ::std::find(
- m_aActiveGroupMap.begin(),
- m_aActiveGroupMap.end(),
- aFind
- );
- if ( aAlreadyExistent == m_aActiveGroupMap.end() )
- m_aActiveGroupMap.push_back( aFind );
- }
-
-
- // Bei Component als PropertyChangeListener anmelden
- xSet->addPropertyChangeListener( PROPERTY_NAME, this );
- if (hasProperty(PROPERTY_GROUP_NAME, xSet))
- xSet->addPropertyChangeListener( PROPERTY_GROUP_NAME, this );
-
- // Tabindex muss nicht jeder unterstuetzen
- if (hasProperty(PROPERTY_TABINDEX, xSet))
- xSet->addPropertyChangeListener( PROPERTY_TABINDEX, this );
-
-}
-
-//------------------------------------------------------------------
-void OGroupManager::RemoveElement( const Reference<XPropertySet>& xSet )
-{
- // Nur ControlModels
- Reference<XControlModel> xControl(xSet, UNO_QUERY);
- if (!xControl.is() )
- return;
-
- // Component aus Gruppe entfernen
- ::rtl::OUString sGroupName( GetGroupName( xSet ) );
-
- removeFromGroupMap(sGroupName,xSet);
-}
-
-::rtl::OUString OGroupManager::GetGroupName( ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet> xComponent )
-{
- if (!xComponent.is())
- return ::rtl::OUString();
- ::rtl::OUString sGroupName;
- if (hasProperty( PROPERTY_GROUP_NAME, xComponent )) {
- xComponent->getPropertyValue( PROPERTY_GROUP_NAME ) >>= sGroupName;
- if (sGroupName.getLength() == 0)
- xComponent->getPropertyValue( PROPERTY_NAME ) >>= sGroupName;
- }
- else
- xComponent->getPropertyValue( PROPERTY_NAME ) >>= sGroupName;
- return sGroupName;
-}
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/GroupManager.hxx b/forms/source/component/GroupManager.hxx
deleted file mode 100644
index 312151ac2..000000000
--- a/forms/source/component/GroupManager.hxx
+++ /dev/null
@@ -1,234 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FRM_GROUPMANAGER_HXX_
-#define _FRM_GROUPMANAGER_HXX_
-
-#include <com/sun/star/sdbc/XRowSet.hpp>
-#include <com/sun/star/awt/XControlModel.hpp>
-#include <com/sun/star/beans/XPropertySet.hpp>
-#include <com/sun/star/beans/XPropertyChangeListener.hpp>
-#include <com/sun/star/container/XContainerListener.hpp>
-#include <com/sun/star/container/XContainer.hpp>
-#include <cppuhelper/implbase2.hxx>
-#include <comphelper/stl_types.hxx>
-#include <comphelper/types.hxx>
-
-#include <algorithm>
-
-using namespace comphelper;
-
-/*========================================================================
-Funktionsweise GroupManager:
-
-Der GroupManager horcht an der starform, ob FormComponents eingefuegt oder entfernt
-werden. Zusaetzlich horcht er bei den FormComponents an den Properties
-"Name" und "TabIndex". Mit diesen Infos aktualisiert er seine Gruppen.
-
-Der GroupManager verwaltet eine Gruppe, in der alle Controls nach TabIndex
-geordnet sind, und ein Array von Gruppen, in dem jede FormComponent noch
-einmal einer Gruppe dem Namen nach zugeordnet wird.
-Die einzelnen Gruppen werden ueber eine Map aktiviert, wenn sie mehr als
-ein Element besitzen.
-
-Die Gruppen verwalten intern die FormComponents in zwei Arrays. In dem
-GroupCompArray werden die Components nach TabIndex und Einfuegepostion
-sortiert. Da auf dieses Array ueber die FormComponent zugegriffen
-wird, gibt es noch das GroupCompAccessArray, in dem die FormComponents
-nach ihrer Speicheradresse sortiert sind. Jedes Element des
-GroupCompAccessArrays ist mit einem Element des GroupCompArrays verpointert.
-
-========================================================================*/
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
-//========================================================================
- template <class ELEMENT, class LESS_COMPARE>
- sal_Int32 insert_sorted(::std::vector<ELEMENT>& _rArray, const ELEMENT& _rNewElement, const LESS_COMPARE& _rCompareOp)
- {
- typename ::std::vector<ELEMENT>::iterator aInsertPos = ::std::lower_bound(
- _rArray.begin(),
- _rArray.end(),
- _rNewElement,
- _rCompareOp
- );
- aInsertPos = _rArray.insert(aInsertPos, _rNewElement);
- return aInsertPos - _rArray.begin();
- }
-
- template <class ELEMENT, class LESS_COMPARE>
- sal_Bool seek_entry(const ::std::vector<ELEMENT>& _rArray, const ELEMENT& _rNewElement, sal_Int32& nPos, const LESS_COMPARE& _rCompareOp)
- {
- typename ::std::vector<ELEMENT>::const_iterator aExistentPos = ::std::lower_bound(
- _rArray.begin(),
- _rArray.end(),
- _rNewElement,
- _rCompareOp
- );
- if ((aExistentPos != _rArray.end()) && (*aExistentPos == _rNewElement))
- { // we have a valid "lower or equal" element and it's really "equal"
- nPos = aExistentPos - _rArray.begin();
- return sal_True;
- }
- nPos = -1;
- return sal_False;
- }
-
-//========================================================================
-class OGroupComp
-{
- ::rtl::OUString m_aName;
- ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet> m_xComponent;
- ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControlModel> m_xControlModel;
- sal_Int32 m_nPos;
- sal_Int16 m_nTabIndex;
-
- friend class OGroupCompLess;
-
-public:
- OGroupComp(const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet>& rxElement, sal_Int32 nInsertPos );
- OGroupComp(const OGroupComp& _rSource);
- OGroupComp();
-
- sal_Bool operator==( const OGroupComp& rComp ) const;
-
- inline const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet>& GetComponent() const { return m_xComponent; }
- inline const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControlModel>& GetControlModel() const { return m_xControlModel; }
-
- sal_Int32 GetPos() const { return m_nPos; }
- sal_Int16 GetTabIndex() const { return m_nTabIndex; }
- ::rtl::OUString GetName() const { return m_aName; }
-};
-
-DECLARE_STL_VECTOR(OGroupComp, OGroupCompArr);
-
-//========================================================================
-class OGroupComp;
-class OGroupCompAcc
-{
- ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet> m_xComponent;
-
- OGroupComp m_aGroupComp;
-
- friend class OGroupCompAccLess;
-
-public:
- OGroupCompAcc(const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet>& rxElement, const OGroupComp& _rGroupComp );
-
- sal_Bool operator==( const OGroupCompAcc& rCompAcc ) const;
-
- inline const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet>& GetComponent() const { return m_xComponent; }
- const OGroupComp& GetGroupComponent() const { return m_aGroupComp; }
-};
-
-DECLARE_STL_VECTOR(OGroupCompAcc, OGroupCompAccArr);
-
-//========================================================================
-class OGroup
-{
- OGroupCompArr m_aCompArray;
- OGroupCompAccArr m_aCompAccArray;
-
- ::rtl::OUString m_aGroupName;
- sal_uInt16 m_nInsertPos; // Die Einfugeposition der GroupComps wird von der Gruppe bestimmt.
-
- friend class OGroupLess;
-
-public:
- OGroup( const ::rtl::OUString& rGroupName );
-#ifdef DBG_UTIL
- OGroup( const OGroup& _rSource ); // just to ensure the DBG_CTOR call
-#endif
- virtual ~OGroup();
-
- sal_Bool operator==( const OGroup& rGroup ) const;
-
- ::rtl::OUString GetGroupName() const { return m_aGroupName; }
- ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControlModel> > GetControlModels() const;
-
- void InsertComponent( const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet>& rxElement );
- void RemoveComponent( const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet>& rxElement );
- sal_uInt16 Count() const { return sal::static_int_cast< sal_uInt16 >(m_aCompArray.size()); }
- const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet>& GetObject( sal_uInt16 nP ) const
- { return m_aCompArray[nP].GetComponent(); }
-};
-
-DECLARE_STL_USTRINGACCESS_MAP(OGroup, OGroupArr);
-DECLARE_STL_VECTOR(OGroupArr::iterator, OActiveGroups);
-
-//========================================================================
-class OGroupManager : public ::cppu::WeakImplHelper2< ::com::sun::star::beans::XPropertyChangeListener, ::com::sun::star::container::XContainerListener>
-{
- OGroup* m_pCompGroup; // Alle Components nach TabIndizes sortiert
- OGroupArr m_aGroupArr; // Alle Components nach Gruppen sortiert
- OActiveGroups m_aActiveGroupMap; // In dieser Map werden die Indizes aller Gruppen gehalten,
- // die mehr als 1 Element haben
-
- ::com::sun::star::uno::Reference< ::com::sun::star::container::XContainer >
- m_xContainer;
-
- // Helper functions
- void InsertElement( const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet>& rxElement );
- void RemoveElement( const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet>& rxElement );
- void removeFromGroupMap(const ::rtl::OUString& _sGroupName,const ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet>& _xSet);
-
-public:
- OGroupManager(const ::com::sun::star::uno::Reference< ::com::sun::star::container::XContainer >& _rxContainer);
- virtual ~OGroupManager();
-
-// ::com::sun::star::lang::XEventListener
- virtual void SAL_CALL disposing(const ::com::sun::star::lang::EventObject& _rSource) throw(::com::sun::star::uno::RuntimeException);
-
-// ::com::sun::star::beans::XPropertyChangeListener
- virtual void SAL_CALL propertyChange(const ::com::sun::star::beans::PropertyChangeEvent& evt) throw ( ::com::sun::star::uno::RuntimeException);
-
-// ::com::sun::star::container::XContainerListener
- virtual void SAL_CALL elementInserted(const ::com::sun::star::container::ContainerEvent& _rEvent) throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL elementRemoved(const ::com::sun::star::container::ContainerEvent& _rEvent) throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL elementReplaced(const ::com::sun::star::container::ContainerEvent& _rEvent) throw ( ::com::sun::star::uno::RuntimeException);
-
-// Other functions
- sal_Int32 getGroupCount();
- void getGroup(sal_Int32 nGroup, ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControlModel> >& _rGroup, ::rtl::OUString& Name);
- void getGroupByName(const ::rtl::OUString& Name, ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControlModel> >& _rGroup);
- ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControlModel> > getControlModels();
-
- static ::rtl::OUString GetGroupName( ::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySet> xComponent );
-};
-
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-#endif // _FRM_GROUPMANAGER_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Hidden.cxx b/forms/source/component/Hidden.cxx
deleted file mode 100644
index 75193f08f..000000000
--- a/forms/source/component/Hidden.cxx
+++ /dev/null
@@ -1,190 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "Hidden.hxx"
-#include "property.hxx"
-#include "property.hrc"
-#include "services.hxx"
-#include <tools/debug.hxx>
-#include <comphelper/basicio.hxx>
-
-//.........................................................................
-namespace frm
-{
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::sdb;
-using namespace ::com::sun::star::sdbc;
-using namespace ::com::sun::star::sdbcx;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::io;
-using namespace ::com::sun::star::lang;
-using namespace ::com::sun::star::util;
-
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OHiddenModel_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory) throw (RuntimeException)
-{
- return *(new OHiddenModel(_rxFactory));
-}
-
-//------------------------------------------------------------------
-DBG_NAME( OHiddenModel )
-//------------------------------------------------------------------
-OHiddenModel::OHiddenModel(const Reference<XMultiServiceFactory>& _rxFactory)
- :OControlModel(_rxFactory, ::rtl::OUString())
-{
- DBG_CTOR( OHiddenModel, NULL );
- m_nClassId = FormComponentType::HIDDENCONTROL;
-}
-
-//------------------------------------------------------------------
-OHiddenModel::OHiddenModel( const OHiddenModel* _pOriginal, const Reference<XMultiServiceFactory>& _rxFactory )
- :OControlModel( _pOriginal, _rxFactory )
-{
- DBG_CTOR( OHiddenModel, NULL );
- m_sHiddenValue = _pOriginal->m_sHiddenValue;
-}
-
-//------------------------------------------------------------------------------
-OHiddenModel::~OHiddenModel( )
-{
- DBG_CTOR( OHiddenModel, NULL );
-}
-
-//------------------------------------------------------------------------------
-IMPLEMENT_DEFAULT_CLONING( OHiddenModel )
-
-//------------------------------------------------------------------------------
-void OHiddenModel::getFastPropertyValue(Any& _rValue, sal_Int32 _nHandle) const
-{
- switch (_nHandle)
- {
- case PROPERTY_ID_HIDDEN_VALUE : _rValue <<= m_sHiddenValue; break;
- default:
- OControlModel::getFastPropertyValue(_rValue, _nHandle);
- }
-}
-
-//------------------------------------------------------------------------------
-void OHiddenModel::setFastPropertyValue_NoBroadcast(sal_Int32 _nHandle, const Any& _rValue) throw (com::sun::star::uno::Exception)
-{
- switch (_nHandle)
- {
- case PROPERTY_ID_HIDDEN_VALUE :
- DBG_ASSERT(_rValue.getValueType().getTypeClass() == TypeClass_STRING, "OHiddenModel::setFastPropertyValue_NoBroadcast : invalid type !" );
- _rValue >>= m_sHiddenValue;
- break;
- default:
- OControlModel::setFastPropertyValue_NoBroadcast(_nHandle, _rValue);
- }
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OHiddenModel::convertFastPropertyValue(
- Any& _rConvertedValue, Any& _rOldValue, sal_Int32 _nHandle, const Any& _rValue)
- throw (IllegalArgumentException)
-{
- sal_Bool bModified(sal_False);
- switch (_nHandle)
- {
- case PROPERTY_ID_HIDDEN_VALUE :
- bModified = tryPropertyValue(_rConvertedValue, _rOldValue, _rValue, m_sHiddenValue);
- break;
- default:
- bModified = OControlModel::convertFastPropertyValue(_rConvertedValue, _rOldValue, _nHandle, _rValue);
- break;
- }
- return bModified;
-}
-
-//------------------------------------------------------------------------------
-void OHiddenModel::describeFixedProperties( Sequence< Property >& _rProps ) const
-{
- BEGIN_DESCRIBE_BASE_PROPERTIES(4)
- DECL_PROP2(CLASSID, sal_Int16, READONLY, TRANSIENT);
- DECL_PROP1(HIDDEN_VALUE, ::rtl::OUString, BOUND);
- DECL_PROP1(NAME, ::rtl::OUString, BOUND);
- DECL_PROP1(TAG, ::rtl::OUString, BOUND);
- END_DESCRIBE_PROPERTIES();
-}
-
-// XServiceInfo
-//------------------------------------------------------------------------------
-StringSequence SAL_CALL OHiddenModel::getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException)
-{
- StringSequence aSupported( 2 );
- aSupported[ 0 ] = FRM_SUN_COMPONENT_HIDDENCONTROL;
- aSupported[ 1 ] = FRM_SUN_FORMCOMPONENT;
- return aSupported;
-}
-
-//------------------------------------------------------------------------------
-::rtl::OUString SAL_CALL OHiddenModel::getServiceName() throw(RuntimeException)
-{
- return FRM_COMPONENT_HIDDEN; // old (non-sun) name for compatibility !
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OHiddenModel::write(const Reference<XObjectOutputStream>& _rxOutStream)
- throw(IOException, RuntimeException)
-{
- // Version
- _rxOutStream->writeShort(0x0002);
-
- // Wert
- _rxOutStream << m_sHiddenValue;
-
- OControlModel::write(_rxOutStream);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OHiddenModel::read(const Reference<XObjectInputStream>& _rxInStream) throw(IOException, RuntimeException)
-{
- // Version
- sal_uInt16 nVersion = _rxInStream->readShort();
-
- // Name
- DBG_ASSERT(nVersion != 1, "OHiddenModel::read : this version is obsolete !");
- switch (nVersion)
- {
- case 1 : { ::rtl::OUString sDummy; _rxInStream >> sDummy; _rxInStream >> m_sHiddenValue; } break;
- case 2 : _rxInStream >> m_sHiddenValue; break;
- default : OSL_FAIL("OHiddenModel::read : unknown version !"); m_sHiddenValue = ::rtl::OUString();
- }
- OControlModel::read(_rxInStream);
-}
-
-//.........................................................................
-}
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Hidden.hxx b/forms/source/component/Hidden.hxx
deleted file mode 100644
index 98bbcdd6c..000000000
--- a/forms/source/component/Hidden.hxx
+++ /dev/null
@@ -1,86 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FORMS_HIDDEN_HXX_
-#define _FORMS_HIDDEN_HXX_
-
-#include "FormComponent.hxx"
-
-//.........................................................................
-namespace frm
-{
-
-//==================================================================
-// OHiddenModel
-//==================================================================
-class OHiddenModel
- :public OControlModel
-{
- ::rtl::OUString m_sHiddenValue;
-
-public:
- DECLARE_DEFAULT_LEAF_XTOR( OHiddenModel );
-
- // OPropertySetHelper
- virtual void SAL_CALL getFastPropertyValue(::com::sun::star::uno::Any& rValue, sal_Int32 nHandle) const;
- virtual void SAL_CALL setFastPropertyValue_NoBroadcast( sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue )
- throw (::com::sun::star::uno::Exception);
- virtual sal_Bool SAL_CALL convertFastPropertyValue(
- ::com::sun::star::uno::Any& _rConvertedValue, ::com::sun::star::uno::Any& _rOldValue, sal_Int32 _nHandle, const ::com::sun::star::uno::Any& _rValue )
- throw (::com::sun::star::lang::IllegalArgumentException);
-
- // XServiceInfo
- IMPLEMENTATION_NAME(OHiddenModel);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException);
-
- // XPersistObject
- virtual ::rtl::OUString SAL_CALL getServiceName() throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL
- write(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectOutputStream>& _rxOutStream) throw(::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL
- read(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectInputStream>& _rxInStream) throw(::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
-
- // OControlModel's property handling
- virtual void describeFixedProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
-
- // prevent method hiding
- using OControlModel::getFastPropertyValue;
-
-protected:
- DECLARE_XCLONEABLE( );
-};
-
-#endif // _FORMS_HIDDEN_HXX_
-
-//.........................................................................
-}
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/ImageButton.cxx b/forms/source/component/ImageButton.cxx
deleted file mode 100644
index 470ddefc2..000000000
--- a/forms/source/component/ImageButton.cxx
+++ /dev/null
@@ -1,275 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "ImageButton.hxx"
-#include <tools/debug.hxx>
-#include <tools/urlobj.hxx>
-#include <vcl/svapp.hxx>
-#include <osl/mutex.hxx>
-#include <comphelper/basicio.hxx>
-#include <com/sun/star/awt/MouseButton.hpp>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-using namespace ::com::sun::star;
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::sdb;
-using namespace ::com::sun::star::sdbc;
-using namespace ::com::sun::star::sdbcx;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::io;
-using namespace ::com::sun::star::lang;
-using namespace ::com::sun::star::util;
-
-//==================================================================
-//= OImageButtonModel
-//==================================================================
-DBG_NAME(OImageButtonModel)
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OImageButtonModel_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new OImageButtonModel(_rxFactory));
-}
-
-//------------------------------------------------------------------
-OImageButtonModel::OImageButtonModel(const Reference<XMultiServiceFactory>& _rxFactory)
- :OClickableImageBaseModel( _rxFactory, VCL_CONTROLMODEL_IMAGEBUTTON, FRM_SUN_CONTROL_IMAGEBUTTON )
- // use the old control name for compytibility reasons
-{
- DBG_CTOR(OImageButtonModel, NULL);
- m_nClassId = FormComponentType::IMAGEBUTTON;
-}
-
-//------------------------------------------------------------------
-OImageButtonModel::OImageButtonModel( const OImageButtonModel* _pOriginal, const Reference<XMultiServiceFactory>& _rxFactory)
- :OClickableImageBaseModel( _pOriginal, _rxFactory )
-{
- DBG_CTOR(OImageButtonModel, NULL);
- implInitializeImageURL();
-}
-
-//------------------------------------------------------------------------------
-IMPLEMENT_DEFAULT_CLONING( OImageButtonModel )
-
-//------------------------------------------------------------------------------
-OImageButtonModel::~OImageButtonModel()
-{
- DBG_DTOR(OImageButtonModel, NULL);
-}
-
-// XServiceInfo
-//------------------------------------------------------------------------------
-StringSequence OImageButtonModel::getSupportedServiceNames() throw()
-{
- StringSequence aSupported = OClickableImageBaseModel::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 1);
-
- ::rtl::OUString*pArray = aSupported.getArray();
- pArray[aSupported.getLength()-1] = FRM_SUN_COMPONENT_IMAGEBUTTON;
- return aSupported;
-}
-
-//------------------------------------------------------------------------------
-void OImageButtonModel::describeFixedProperties( Sequence< Property >& _rProps ) const
-{
- BEGIN_DESCRIBE_PROPERTIES( 5, OClickableImageBaseModel )
- DECL_PROP1(BUTTONTYPE, FormButtonType, BOUND);
- DECL_PROP1(DISPATCHURLINTERNAL, sal_Bool, BOUND);
- DECL_PROP1(TARGET_URL, ::rtl::OUString, BOUND);
- DECL_PROP1(TARGET_FRAME, ::rtl::OUString, BOUND);
- DECL_PROP1(TABINDEX, sal_Int16, BOUND);
- END_DESCRIBE_PROPERTIES();
-}
-
-//------------------------------------------------------------------------------
-::rtl::OUString OImageButtonModel::getServiceName() throw ( ::com::sun::star::uno::RuntimeException)
-{
- return FRM_COMPONENT_IMAGEBUTTON; // old (non-sun) name for compatibility !
-}
-
-//------------------------------------------------------------------------------
-void OImageButtonModel::write(const Reference<XObjectOutputStream>& _rxOutStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException)
-{
- OControlModel::write(_rxOutStream);
-
- // Version
- _rxOutStream->writeShort(0x0003);
- _rxOutStream->writeShort((sal_uInt16)m_eButtonType);
-
- ::rtl::OUString sTmp(INetURLObject::decode( m_sTargetURL, '%', INetURLObject::DECODE_UNAMBIGUOUS));
- _rxOutStream << sTmp;
- _rxOutStream << m_sTargetFrame;
- writeHelpTextCompatibly(_rxOutStream);
-}
-
-//------------------------------------------------------------------------------
-void OImageButtonModel::read(const Reference<XObjectInputStream>& _rxInStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException)
-{
- OControlModel::read(_rxInStream);
-
- // Version
- sal_uInt16 nVersion = _rxInStream->readShort();
-
- switch (nVersion)
- {
- case 0x0001:
- {
- m_eButtonType = (FormButtonType)_rxInStream->readShort();
- }
- break;
- case 0x0002:
- {
- m_eButtonType = (FormButtonType)_rxInStream->readShort();
- _rxInStream >> m_sTargetURL;
- _rxInStream >> m_sTargetFrame;
- }
- break;
- case 0x0003:
- {
- m_eButtonType = (FormButtonType)_rxInStream->readShort();
- _rxInStream >> m_sTargetURL;
- _rxInStream >> m_sTargetFrame;
- readHelpTextCompatibly(_rxInStream);
- }
- break;
-
- default :
- OSL_FAIL("OImageButtonModel::read : unknown version !");
- m_eButtonType = FormButtonType_PUSH;
- m_sTargetURL = ::rtl::OUString();
- m_sTargetFrame = ::rtl::OUString();
- break;
- }
-}
-
-//==================================================================
-// OImageButtonControl
-//==================================================================
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OImageButtonControl_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new OImageButtonControl(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> OImageButtonControl::_getTypes()
-{
- static Sequence<Type> aTypes;
- if (!aTypes.getLength())
- aTypes = concatSequences(OClickableImageBaseControl::_getTypes(), OImageButtonControl_BASE::getTypes());
- return aTypes;
-}
-
-//------------------------------------------------------------------------------
-StringSequence OImageButtonControl::getSupportedServiceNames() throw()
-{
- StringSequence aSupported = OClickableImageBaseControl::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 1);
-
- ::rtl::OUString*pArray = aSupported.getArray();
- pArray[aSupported.getLength()-1] = FRM_SUN_CONTROL_IMAGEBUTTON;
- return aSupported;
-}
-
-//------------------------------------------------------------------------------
-OImageButtonControl::OImageButtonControl(const Reference<XMultiServiceFactory>& _rxFactory)
- :OClickableImageBaseControl(_rxFactory, VCL_CONTROL_IMAGEBUTTON)
-{
- increment(m_refCount);
- {
- // als MouseListener anmelden
- Reference< awt::XWindow > xComp;
- query_aggregation( m_xAggregate, xComp);
- if (xComp.is())
- xComp->addMouseListener( static_cast< awt::XMouseListener* >( this ) );
- }
- decrement(m_refCount);
-}
-
-// UNO Anbindung
-//------------------------------------------------------------------------------
-Any SAL_CALL OImageButtonControl::queryAggregation(const Type& _rType) throw (RuntimeException)
-{
- Any aReturn = OClickableImageBaseControl::queryAggregation(_rType);
- if (!aReturn.hasValue())
- aReturn = OImageButtonControl_BASE::queryInterface(_rType);
-
- return aReturn;
-}
-
-//------------------------------------------------------------------------------
-void OImageButtonControl::mousePressed(const awt::MouseEvent& e) throw ( ::com::sun::star::uno::RuntimeException)
-{
- SolarMutexGuard aSolarGuard;
-
- if (e.Buttons != awt::MouseButton::LEFT)
- return;
-
- ::osl::ClearableMutexGuard aGuard( m_aMutex );
- if( m_aApproveActionListeners.getLength() )
- {
- // if there are listeners, start the action in an own thread, to not allow
- // them to block us here (we're in the application's main thread)
- getImageProducerThread()->OComponentEventThread::addEvent( &e );
- }
- else
- {
- // Sonst nicht. Dann darf man aber auf keinen Fal die Listener
- // benachrichtigen, auch dann nicht, wenn er spaeter hinzukommt.
- aGuard.clear();
- actionPerformed_Impl( sal_False, e );
- }
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OImageButtonControl::mouseReleased(const awt::MouseEvent& /*e*/) throw ( RuntimeException)
-{
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OImageButtonControl::mouseEntered(const awt::MouseEvent& /*e*/) throw ( RuntimeException)
-{
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OImageButtonControl::mouseExited(const awt::MouseEvent& /*e*/) throw ( RuntimeException)
-{
-}
-
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/ImageButton.hxx b/forms/source/component/ImageButton.hxx
deleted file mode 100644
index 2507e3666..000000000
--- a/forms/source/component/ImageButton.hxx
+++ /dev/null
@@ -1,109 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FRM_IMAGE_BUTTON_HXX_
-#define _FRM_IMAGE_BUTTON_HXX_
-
-#include "clickableimage.hxx"
-#include <com/sun/star/awt/XMouseListener.hpp>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
-//==================================================================
-// OImageButtonModel
-//==================================================================
-class OImageButtonModel
- :public OClickableImageBaseModel
-{
-public:
- DECLARE_DEFAULT_LEAF_XTOR( OImageButtonModel );
-
-// ::com::sun::star::lang::XServiceInfo
- IMPLEMENTATION_NAME(OImageButtonModel);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw();
-
-// ::com::sun::star::io::XPersistObject
- virtual ::rtl::OUString SAL_CALL getServiceName() throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL write(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectOutputStream>& _rxOutStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL read(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectInputStream>& _rxInStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
-
- // OControlModel's property handling
- virtual void describeFixedProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
-
-protected:
- DECLARE_XCLONEABLE();
-};
-
-//==================================================================
-// OImageButtonControl
-//==================================================================
-typedef ::cppu::ImplHelper1< ::com::sun::star::awt::XMouseListener> OImageButtonControl_BASE;
-class OImageButtonControl : public OClickableImageBaseControl,
- public OImageButtonControl_BASE
-{
-protected:
- // UNO Anbindung
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
-public:
- OImageButtonControl(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory);
-
- // XServiceInfo
- IMPLEMENTATION_NAME(OImageButtonControl);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw();
-
- // UNO Anbindung
- DECLARE_UNO3_AGG_DEFAULTS(OImageButtonControl, OClickableImageBaseControl);
- virtual ::com::sun::star::uno::Any SAL_CALL queryAggregation(const ::com::sun::star::uno::Type& _rType) throw(::com::sun::star::uno::RuntimeException);
-
- // XEventListener
- virtual void SAL_CALL disposing(const ::com::sun::star::lang::EventObject& _rSource) throw(::com::sun::star::uno::RuntimeException)
- { OControl::disposing(_rSource); }
-
- // XMouseListener
- virtual void SAL_CALL mousePressed(const ::com::sun::star::awt::MouseEvent& e) throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL mouseReleased(const ::com::sun::star::awt::MouseEvent& e) throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL mouseEntered(const ::com::sun::star::awt::MouseEvent& e) throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL mouseExited(const ::com::sun::star::awt::MouseEvent& e) throw ( ::com::sun::star::uno::RuntimeException);
-
- // prevent method hiding
- using OClickableImageBaseControl::disposing;
-};
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-#endif // _FRM_IMAGE_BUTTON_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/ImageControl.cxx b/forms/source/component/ImageControl.cxx
deleted file mode 100644
index 05a676d0e..000000000
--- a/forms/source/component/ImageControl.cxx
+++ /dev/null
@@ -1,1021 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "ImageControl.hxx"
-
-#include "property.hrc"
-#include "frm_resource.hrc"
-#include "frm_resource.hxx"
-#include "services.hxx"
-#include "componenttools.hxx"
-
-#include <svtools/imageresourceaccess.hxx>
-#include <unotools/ucblockbytes.hxx>
-#include <sfx2/filedlghelper.hxx>
-#include <com/sun/star/awt/XPopupMenu.hpp>
-#include <com/sun/star/awt/PopupMenuDirection.hpp>
-#include <com/sun/star/ui/dialogs/TemplateDescription.hpp>
-#include <com/sun/star/ui/dialogs/ExtendedFilePickerElementIds.hpp>
-#include <com/sun/star/ui/dialogs/XFilePickerControlAccess.hpp>
-#include <com/sun/star/ui/dialogs/XFilePicker.hpp>
-#include <com/sun/star/sdbc/DataType.hpp>
-#include <com/sun/star/awt/MouseButton.hpp>
-#include <com/sun/star/awt/XWindow.hpp>
-#include <com/sun/star/awt/XDialog.hpp>
-#include <com/sun/star/io/XActiveDataSink.hpp>
-#include <com/sun/star/io/NotConnectedException.hpp>
-#include <com/sun/star/beans/PropertyValue.hpp>
-#include <com/sun/star/graphic/XGraphic.hpp>
-#include <com/sun/star/graphic/GraphicObject.hpp>
-#include <tools/urlobj.hxx>
-#include <tools/stream.hxx>
-#include <tools/debug.hxx>
-#include <tools/diagnose_ex.h>
-#include <vcl/svapp.hxx>
-#include <unotools/streamhelper.hxx>
-#include <comphelper/extract.hxx>
-#include <comphelper/guarding.hxx>
-#include <unotools/ucbstreamhelper.hxx>
-#include <svl/urihelper.hxx>
-
-#include <memory>
-
-#define ID_OPEN_GRAPHICS 1
-#define ID_CLEAR_GRAPHICS 2
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-using namespace ::com::sun::star;
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::sdb;
-using namespace ::com::sun::star::sdbc;
-using namespace ::com::sun::star::sdbcx;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::io;
-using namespace ::com::sun::star::ui::dialogs;
-using namespace ::com::sun::star::lang;
-using namespace ::com::sun::star::util;
-using namespace ::com::sun::star::graphic;
-using namespace ::com::sun::star::frame;
-
-//==============================================================================
-//= OImageControlModel
-//==============================================================================
-namespace
-{
- enum ImageStoreType
- {
- ImageStoreBinary,
- ImageStoreLink,
-
- ImageStoreInvalid
- };
-
- ImageStoreType lcl_getImageStoreType( const sal_Int32 _nFieldType )
- {
- // binary/longvarchar types could be used to store images in binary representation
- if ( ( _nFieldType == DataType::BINARY )
- || ( _nFieldType == DataType::VARBINARY )
- || ( _nFieldType == DataType::LONGVARBINARY )
- || ( _nFieldType == DataType::OTHER )
- || ( _nFieldType == DataType::OBJECT )
- || ( _nFieldType == DataType::BLOB )
- || ( _nFieldType == DataType::LONGVARCHAR )
- || ( _nFieldType == DataType::CLOB )
- )
- return ImageStoreBinary;
-
- // char types could be used to store links to images
- if ( ( _nFieldType == DataType::CHAR )
- || ( _nFieldType == DataType::VARCHAR )
- )
- return ImageStoreLink;
-
- return ImageStoreInvalid;
- }
-}
-
-//==============================================================================
-// OImageControlModel
-//==============================================================================
-
-//------------------------------------------------------------------------------
-InterfaceRef SAL_CALL OImageControlModel_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new OImageControlModel(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> OImageControlModel::_getTypes()
-{
- return concatSequences(
- OBoundControlModel::_getTypes(),
- OImageControlModel_Base::getTypes()
- );
-}
-
-DBG_NAME(OImageControlModel)
-//------------------------------------------------------------------
-OImageControlModel::OImageControlModel(const Reference<XMultiServiceFactory>& _rxFactory)
- :OBoundControlModel( _rxFactory, VCL_CONTROLMODEL_IMAGECONTROL, FRM_SUN_CONTROL_IMAGECONTROL, sal_False, sal_False, sal_False )
- // use the old control name for compytibility reasons
- ,m_pImageProducer( NULL )
- ,m_bExternalGraphic( true )
- ,m_bReadOnly( sal_False )
- ,m_sImageURL()
- ,m_xGraphicObject()
-{
- DBG_CTOR( OImageControlModel, NULL );
- m_nClassId = FormComponentType::IMAGECONTROL;
- initOwnValueProperty( PROPERTY_IMAGE_URL );
-
- implConstruct();
-}
-
-//------------------------------------------------------------------
-OImageControlModel::OImageControlModel( const OImageControlModel* _pOriginal, const Reference< XMultiServiceFactory >& _rxFactory )
- :OBoundControlModel( _pOriginal, _rxFactory )
- // use the old control name for compytibility reasons
- ,m_pImageProducer( NULL )
- ,m_bExternalGraphic( true )
- ,m_bReadOnly( _pOriginal->m_bReadOnly )
- ,m_sImageURL( _pOriginal->m_sImageURL )
- ,m_xGraphicObject( _pOriginal->m_xGraphicObject )
-{
- DBG_CTOR( OImageControlModel, NULL );
- implConstruct();
-
- osl_incrementInterlockedCount( &m_refCount );
- {
- // simulate a propertyChanged event for the ImageURL
- ::osl::MutexGuard aGuard( m_aMutex );
- impl_handleNewImageURL_lck( eOther );
- }
- osl_decrementInterlockedCount( &m_refCount );
-}
-
-//------------------------------------------------------------------
-void OImageControlModel::implConstruct()
-{
- m_pImageProducer = new ImageProducer;
- m_xImageProducer = m_pImageProducer;
- m_pImageProducer->SetDoneHdl( LINK( this, OImageControlModel, OnImageImportDone ) );
-}
-
-//------------------------------------------------------------------
-OImageControlModel::~OImageControlModel()
-{
- if (!OComponentHelper::rBHelper.bDisposed)
- {
- acquire();
- dispose();
- }
-
- DBG_DTOR(OImageControlModel,NULL);
-}
-
-// XCloneable
-//------------------------------------------------------------------------------
-IMPLEMENT_DEFAULT_CLONING( OImageControlModel )
-
-// XServiceInfo
-//------------------------------------------------------------------------------
-StringSequence OImageControlModel::getSupportedServiceNames() throw()
-{
- StringSequence aSupported = OBoundControlModel::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 1);
-
- ::rtl::OUString*pArray = aSupported.getArray();
- pArray[aSupported.getLength()-1] = FRM_SUN_COMPONENT_IMAGECONTROL;
- return aSupported;
-}
-
-//------------------------------------------------------------------------------
-Any SAL_CALL OImageControlModel::queryAggregation(const Type& _rType) throw (RuntimeException)
-{
- // oder matters: we want to "override" the XImageProducer interface of the aggreate with out
- // own XImageProducer interface, thus we need to query OImageControlModel_Base first
- Any aReturn = OImageControlModel_Base::queryInterface( _rType );
-
- // BUT: _don't_ let it feel responsible for the XTypeProvider interface
- // (as this is implemented by our base class in the proper way)
- if ( _rType.equals( ::getCppuType( static_cast< Reference< XTypeProvider >* >( NULL ) ) )
- || !aReturn.hasValue()
- )
- aReturn = OBoundControlModel::queryAggregation( _rType );
-
- return aReturn;
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OImageControlModel::approveDbColumnType( sal_Int32 _nColumnType )
-{
- return ImageStoreInvalid != lcl_getImageStoreType( _nColumnType );
-}
-
-//------------------------------------------------------------------------------
-void OImageControlModel::getFastPropertyValue(Any& rValue, sal_Int32 nHandle) const
-{
- switch (nHandle)
- {
- case PROPERTY_ID_READONLY:
- rValue <<= (sal_Bool)m_bReadOnly;
- break;
- case PROPERTY_ID_IMAGE_URL:
- rValue <<= m_sImageURL;
- break;
- case PROPERTY_ID_GRAPHIC:
- rValue <<= m_xGraphicObject.is() ? m_xGraphicObject->getGraphic() : Reference< XGraphic >();
- break;
- default:
- OBoundControlModel::getFastPropertyValue(rValue, nHandle);
- }
-}
-
-//------------------------------------------------------------------------------
-void OImageControlModel::setFastPropertyValue_NoBroadcast(sal_Int32 nHandle, const Any& rValue) throw ( ::com::sun::star::uno::Exception)
-{
- switch (nHandle)
- {
- case PROPERTY_ID_READONLY :
- DBG_ASSERT(rValue.getValueType().getTypeClass() == TypeClass_BOOLEAN, "OImageControlModel::setFastPropertyValue_NoBroadcast : invalid type !" );
- m_bReadOnly = getBOOL(rValue);
- break;
-
- case PROPERTY_ID_IMAGE_URL:
- OSL_VERIFY( rValue >>= m_sImageURL );
- impl_handleNewImageURL_lck( eOther );
- {
- ControlModelLock aLock( *this );
- // that's a fake ... onValuePropertyChange expects to receive the only lock to our instance,
- // but we're already called with our mutex locked ...
- onValuePropertyChange( aLock );
- }
- break;
-
- case PROPERTY_ID_GRAPHIC:
- {
- Reference< XGraphic > xGraphic;
- OSL_VERIFY( rValue >>= xGraphic );
- if ( !xGraphic.is() )
- m_xGraphicObject.clear();
- else
- {
- m_xGraphicObject = GraphicObject::create( m_aContext.getUNOContext() );
- m_xGraphicObject->setGraphic( xGraphic );
- }
-
- if ( m_bExternalGraphic )
- {
- // if that's an external graphic, i.e. one which has not been loaded by ourselves in response to a
- // new image URL, then also adjust our ImageURL.
- ::rtl::OUString sNewImageURL;
- if ( m_xGraphicObject.is() )
- {
- sNewImageURL = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "vnd.sun.star.GraphicObject:" ) );
- sNewImageURL = sNewImageURL + m_xGraphicObject->getUniqueID();
- }
- m_sImageURL = sNewImageURL;
- // TODO: speaking strictly, this would need to be notified, since ImageURL is a bound property. However,
- // this method here is called with a locked mutex, so we cannot simply call listeners ...
- // I think the missing notification (and thus clients which potentially cannot observe the change)
- // is less severe than the potential deadlock ...
- }
- }
- break;
-
- default:
- OBoundControlModel::setFastPropertyValue_NoBroadcast(nHandle, rValue);
- break;
- }
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OImageControlModel::convertFastPropertyValue(Any& rConvertedValue, Any& rOldValue, sal_Int32 nHandle, const Any& rValue)
- throw( IllegalArgumentException )
-{
- switch (nHandle)
- {
- case PROPERTY_ID_READONLY :
- return tryPropertyValue(rConvertedValue, rOldValue, rValue, m_bReadOnly);
-
- case PROPERTY_ID_IMAGE_URL:
- return tryPropertyValue( rConvertedValue, rOldValue, rValue, m_sImageURL );
-
- case PROPERTY_ID_GRAPHIC:
- {
- const Reference< XGraphic > xGraphic( getFastPropertyValue( PROPERTY_ID_GRAPHIC ), UNO_QUERY );
- return tryPropertyValue( rConvertedValue, rOldValue, rValue, xGraphic );
- }
-
- default:
- return OBoundControlModel::convertFastPropertyValue(rConvertedValue, rOldValue, nHandle, rValue);
- }
-}
-
-//------------------------------------------------------------------------------
-void OImageControlModel::describeFixedProperties( Sequence< Property >& _rProps ) const
-{
- BEGIN_DESCRIBE_PROPERTIES( 4, OBoundControlModel )
- DECL_IFACE_PROP2( GRAPHIC, XGraphic, BOUND, TRANSIENT );
- DECL_PROP1 ( IMAGE_URL, ::rtl::OUString, BOUND );
- DECL_BOOL_PROP1 ( READONLY, BOUND );
- DECL_PROP1 ( TABINDEX, sal_Int16, BOUND );
- END_DESCRIBE_PROPERTIES();
-}
-
-//------------------------------------------------------------------------------
-void OImageControlModel::describeAggregateProperties( Sequence< Property >& /* [out] */ o_rAggregateProperties ) const
-{
- OBoundControlModel::describeAggregateProperties( o_rAggregateProperties );
- // remove ImageULR and Graphic properties, we "overload" them. This is because our aggregate synchronizes those
- // two, but we have an own sychronization mechanism.
- RemoveProperty( o_rAggregateProperties, PROPERTY_IMAGE_URL );
- RemoveProperty( o_rAggregateProperties, PROPERTY_GRAPHIC );
-}
-
-//------------------------------------------------------------------------------
-::rtl::OUString OImageControlModel::getServiceName() throw ( ::com::sun::star::uno::RuntimeException)
-{
- return FRM_COMPONENT_IMAGECONTROL; // old (non-sun) name for compatibility !
-}
-
-//------------------------------------------------------------------------------
-void OImageControlModel::write(const Reference<XObjectOutputStream>& _rxOutStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException)
-{
- // Basisklasse
- OBoundControlModel::write(_rxOutStream);
- // Version
- _rxOutStream->writeShort(0x0003);
- // Name
- _rxOutStream->writeBoolean(m_bReadOnly);
- writeHelpTextCompatibly(_rxOutStream);
- // from version 0x0003 : common properties
- writeCommonProperties(_rxOutStream);
-}
-
-//------------------------------------------------------------------------------
-void OImageControlModel::read(const Reference<XObjectInputStream>& _rxInStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException)
-{
- OBoundControlModel::read(_rxInStream);
-
- // Version
- sal_uInt16 nVersion = _rxInStream->readShort();
- switch (nVersion)
- {
- case 0x0001:
- m_bReadOnly = _rxInStream->readBoolean();
- break;
- case 0x0002:
- m_bReadOnly = _rxInStream->readBoolean();
- readHelpTextCompatibly(_rxInStream);
- break;
- case 0x0003:
- m_bReadOnly = _rxInStream->readBoolean();
- readHelpTextCompatibly(_rxInStream);
- readCommonProperties(_rxInStream);
- break;
- default :
- OSL_FAIL("OImageControlModel::read : unknown version !");
- m_bReadOnly = sal_False;
- defaultCommonProperties();
- break;
- }
- // Nach dem Lesen die Defaultwerte anzeigen
- if ( getControlSource().getLength() )
- { // (not if we don't have a control source - the "State" property acts like it is persistent, then
- ::osl::MutexGuard aGuard(m_aMutex); // resetNoBroadcast expects this mutex guarding
- resetNoBroadcast();
- }
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OImageControlModel::impl_updateStreamForURL_lck( const ::rtl::OUString& _rURL, ValueChangeInstigator _eInstigator )
-{
- // create a stream for the image specified by the URL
- ::std::auto_ptr< SvStream > pImageStream;
- Reference< XInputStream > xImageStream;
-
- if ( ::svt::GraphicAccess::isSupportedURL( _rURL ) )
- {
- xImageStream = ::svt::GraphicAccess::getImageXStream( getContext().getLegacyServiceFactory(), _rURL );
- }
- else
- {
- pImageStream.reset( ::utl::UcbStreamHelper::CreateStream( _rURL, STREAM_READ ) );
- sal_Bool bSetNull = ( pImageStream.get() == NULL ) || ( ERRCODE_NONE != pImageStream->GetErrorCode() );
-
- if ( !bSetNull )
- {
- // get the size of the stream
- pImageStream->Seek(STREAM_SEEK_TO_END);
- sal_Int32 nSize = (sal_Int32)pImageStream->Tell();
- if (pImageStream->GetBufferSize() < 8192)
- pImageStream->SetBufferSize(8192);
- pImageStream->Seek(STREAM_SEEK_TO_BEGIN);
-
- xImageStream = new ::utl::OInputStreamHelper( new SvLockBytes( pImageStream.get(), sal_False ), nSize );
- }
- }
-
- if ( xImageStream.is() )
- {
- if ( m_xColumnUpdate.is() )
- m_xColumnUpdate->updateBinaryStream( xImageStream, xImageStream->available() );
- else
- setControlValue( makeAny( xImageStream ), _eInstigator );
- xImageStream->closeInput();
- return sal_True;
- }
-
- return sal_False;
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OImageControlModel::impl_handleNewImageURL_lck( ValueChangeInstigator _eInstigator )
-{
- switch ( lcl_getImageStoreType( getFieldType() ) )
- {
- case ImageStoreBinary:
- if ( impl_updateStreamForURL_lck( m_sImageURL, _eInstigator ) )
- return sal_True;
- break;
-
- case ImageStoreLink:
- {
- ::rtl::OUString sCommitURL( m_sImageURL );
- if ( m_sDocumentURL.getLength() )
- sCommitURL = URIHelper::simpleNormalizedMakeRelative( m_sDocumentURL, sCommitURL );
- OSL_ENSURE( m_xColumnUpdate.is(), "OImageControlModel::impl_handleNewImageURL_lck: no bound field, but ImageStoreLink?!" );
- if ( m_xColumnUpdate.is() )
- {
- m_xColumnUpdate->updateString( sCommitURL );
- return sal_True;
- }
- }
- break;
-
- case ImageStoreInvalid:
- OSL_FAIL( "OImageControlModel::impl_handleNewImageURL_lck: image storage type type!" );
- break;
- }
-
- // if we're here, then the above code was unable to update our field/control from the given URL
- // => fall back to NULL/VOID
- if ( m_xColumnUpdate.is() )
- m_xColumnUpdate->updateNull();
- else
- setControlValue( Any(), _eInstigator );
-
- return sal_True;
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OImageControlModel::commitControlValueToDbColumn( bool _bPostReset )
-{
- if ( _bPostReset )
- {
- // since this is a "commit after reset", we can simply update the column
- // with null - this is our "default" which we were just reset to
- if ( m_xColumnUpdate.is() )
- m_xColumnUpdate->updateNull();
- }
- else
- {
- ::osl::MutexGuard aGuard(m_aMutex);
- return impl_handleNewImageURL_lck( eDbColumnBinding );
- }
-
- return sal_True;
-}
-
-//------------------------------------------------------------------------------
-namespace
-{
- bool lcl_isValidDocumentURL( const ::rtl::OUString& _rDocURL )
- {
- return ( _rDocURL.getLength() && !_rDocURL.equalsAsciiL( RTL_CONSTASCII_STRINGPARAM( "private:object" ) ) );
- }
-}
-
-//------------------------------------------------------------------------------
-void OImageControlModel::onConnectedDbColumn( const Reference< XInterface >& _rxForm )
-{
- OBoundControlModel::onConnectedDbColumn( _rxForm );
-
- try
- {
- Reference< XModel > xDocument( getXModel( *this ) );
- if ( xDocument.is() )
- {
- m_sDocumentURL = xDocument->getURL();
- if ( !lcl_isValidDocumentURL( m_sDocumentURL ) )
- {
- Reference< XChild > xAsChild( xDocument, UNO_QUERY );
- while ( xAsChild.is() && !lcl_isValidDocumentURL( m_sDocumentURL ) )
- {
- xDocument.set( xAsChild->getParent(), UNO_QUERY );
- if ( xDocument.is() )
- m_sDocumentURL = xDocument->getURL();
- xAsChild.set( xDocument, UNO_QUERY );
- }
- }
- }
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
-}
-
-//------------------------------------------------------------------------------
-void OImageControlModel::onDisconnectedDbColumn()
-{
- OBoundControlModel::onDisconnectedDbColumn();
-
- m_sDocumentURL = ::rtl::OUString();
-}
-
-//------------------------------------------------------------------------------
-Any OImageControlModel::translateDbColumnToControlValue()
-{
- switch ( lcl_getImageStoreType( getFieldType() ) )
- {
- case ImageStoreBinary:
- {
- Reference< XInputStream > xImageStream( m_xColumn->getBinaryStream() );
- if ( m_xColumn->wasNull() )
- xImageStream.clear();
- return makeAny( xImageStream );
- }
- case ImageStoreLink:
- {
- ::rtl::OUString sImageLink( m_xColumn->getString() );
- if ( m_sDocumentURL.getLength() )
- sImageLink = INetURLObject::GetAbsURL( m_sDocumentURL, sImageLink );
- return makeAny( sImageLink );
- }
- case ImageStoreInvalid:
- OSL_FAIL( "OImageControlModel::translateDbColumnToControlValue: invalid field type!" );
- break;
- }
- return Any();
-}
-
-//------------------------------------------------------------------------------
-Any OImageControlModel::getControlValue( ) const
-{
- return makeAny( m_sImageURL );
-}
-
-//------------------------------------------------------------------------------
-void OImageControlModel::doSetControlValue( const Any& _rValue )
-{
- DBG_ASSERT( GetImageProducer() && m_xImageProducer.is(), "OImageControlModel::doSetControlValue: no image producer!" );
- if ( !GetImageProducer() || !m_xImageProducer.is() )
- return;
-
- bool bStartProduction = false;
- switch ( lcl_getImageStoreType( getFieldType() ) )
- {
- case ImageStoreBinary:
- {
- // give the image producer the stream
- Reference< XInputStream > xInStream;
- _rValue >>= xInStream;
- GetImageProducer()->setImage( xInStream );
- bStartProduction = true;
- }
- break;
-
- case ImageStoreLink:
- {
- ::rtl::OUString sImageURL;
- _rValue >>= sImageURL;
- GetImageProducer()->SetImage( sImageURL );
- bStartProduction = true;
- }
- break;
-
- case ImageStoreInvalid:
- OSL_FAIL( "OImageControlModel::doSetControlValue: invalid field type!" );
- break;
-
- } // switch ( lcl_getImageStoreType( getFieldType() ) )
-
- if ( bStartProduction )
- {
- // start production
- Reference< XImageProducer > xProducer = m_xImageProducer;
- {
- // release our mutex once (it's acquired in the calling method!), as starting the image production may
- // result in the locking of the solar mutex (unfortunally the default implementation of our aggregate,
- // VCLXImageControl, does this locking)
- MutexRelease aRelease(m_aMutex);
- xProducer->startProduction();
- }
- }
-}
-
-// OComponentHelper
-//------------------------------------------------------------------
-void SAL_CALL OImageControlModel::disposing()
-{
- OBoundControlModel::disposing();
-}
-
-//------------------------------------------------------------------------------
-void OImageControlModel::resetNoBroadcast()
-{
- if ( hasField() ) // only reset when we are connected to a column
- OBoundControlModel::resetNoBroadcast( );
-}
-
-//--------------------------------------------------------------------
-Reference< XImageProducer > SAL_CALL OImageControlModel::getImageProducer() throw ( RuntimeException)
-{
- return this;
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OImageControlModel::addConsumer( const Reference< XImageConsumer >& _rxConsumer ) throw (RuntimeException)
-{
- GetImageProducer()->addConsumer( _rxConsumer );
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OImageControlModel::removeConsumer( const Reference< XImageConsumer >& _rxConsumer ) throw (RuntimeException)
-{
- GetImageProducer()->removeConsumer( _rxConsumer );
-}
-
-//--------------------------------------------------------------------
-void SAL_CALL OImageControlModel::startProduction( ) throw (RuntimeException)
-{
- GetImageProducer()->startProduction();
-}
-
-//------------------------------------------------------------------------------
-IMPL_LINK( OImageControlModel, OnImageImportDone, ::Graphic*, i_pGraphic )
-{
- const Reference< XGraphic > xGraphic( i_pGraphic != NULL ? Image( i_pGraphic->GetBitmapEx() ).GetXGraphic() : NULL );
- m_bExternalGraphic = false;
- try
- {
- setPropertyValue( PROPERTY_GRAPHIC, makeAny( xGraphic ) );
- }
- catch ( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- m_bExternalGraphic = true;
- return 1L;
-}
-
-//==================================================================
-// OImageControlControl
-//==================================================================
-
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OImageControlControl_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new OImageControlControl(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> OImageControlControl::_getTypes()
-{
- return concatSequences(
- OBoundControl::_getTypes(),
- OImageControlControl_Base::getTypes()
- );
-}
-
-//------------------------------------------------------------------------------
-OImageControlControl::OImageControlControl(const Reference<XMultiServiceFactory>& _rxFactory)
- :OBoundControl(_rxFactory, VCL_CONTROL_IMAGECONTROL)
- ,m_aModifyListeners( m_aMutex )
-{
- increment(m_refCount);
- {
- // als Focus- und MouseListener anmelden
- Reference< XWindow > xComp;
- query_aggregation( m_xAggregate, xComp );
- if ( xComp.is() )
- xComp->addMouseListener( this );
- }
- decrement(m_refCount);
-}
-
-//------------------------------------------------------------------------------
-Any SAL_CALL OImageControlControl::queryAggregation(const Type& _rType) throw (RuntimeException)
-{
- Any aReturn = OBoundControl::queryAggregation( _rType );
- if ( !aReturn.hasValue() )
- aReturn = ::cppu::queryInterface(
- _rType,
- static_cast< XMouseListener* >( this ),
- static_cast< XModifyBroadcaster* >( this )
- );
-
- return aReturn;
-}
-
-//------------------------------------------------------------------------------
-StringSequence OImageControlControl::getSupportedServiceNames() throw()
-{
- StringSequence aSupported = OBoundControl::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 1);
-
- ::rtl::OUString*pArray = aSupported.getArray();
- pArray[aSupported.getLength()-1] = FRM_SUN_CONTROL_IMAGECONTROL;
- return aSupported;
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OImageControlControl::addModifyListener( const Reference< XModifyListener >& _Listener ) throw (RuntimeException)
-{
- m_aModifyListeners.addInterface( _Listener );
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OImageControlControl::removeModifyListener( const Reference< XModifyListener >& _Listener ) throw (RuntimeException)
-{
- m_aModifyListeners.removeInterface( _Listener );
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OImageControlControl::disposing()
-{
- EventObject aEvent( *this );
- m_aModifyListeners.disposeAndClear( aEvent );
-
- OBoundControl::disposing();
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OImageControlControl::disposing( const EventObject& _Event ) throw(RuntimeException)
-{
- OBoundControl::disposing( _Event );
-}
-
-//------------------------------------------------------------------------------
-void OImageControlControl::implClearGraphics( sal_Bool _bForce )
-{
- Reference< XPropertySet > xSet( getModel(), UNO_QUERY );
- if ( xSet.is() )
- {
- if ( _bForce )
- {
- ::rtl::OUString sOldImageURL;
- xSet->getPropertyValue( PROPERTY_IMAGE_URL ) >>= sOldImageURL;
-
- if ( !sOldImageURL.getLength() )
- // the ImageURL is already empty, so simply setting a new empty one would not suffice
- // (since it would be ignored)
- xSet->setPropertyValue( PROPERTY_IMAGE_URL, makeAny( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "private:emptyImage" ) ) ) );
- // (the concrete URL we're passing here doens't matter. It's important that
- // the model cannot resolve it to a a valid resource describing an image stream
- }
-
- xSet->setPropertyValue( PROPERTY_IMAGE_URL, makeAny( ::rtl::OUString() ) );
- }
-}
-
-//------------------------------------------------------------------------------
-bool OImageControlControl::implInsertGraphics()
-{
- Reference< XPropertySet > xSet( getModel(), UNO_QUERY );
- if ( !xSet.is() )
- return false;
-
- ::rtl::OUString sTitle = FRM_RES_STRING(RID_STR_IMPORT_GRAPHIC);
- // build some arguments for the upcoming dialog
- try
- {
- ::sfx2::FileDialogHelper aDialog( TemplateDescription::FILEOPEN_LINK_PREVIEW, SFXWB_GRAPHIC );
- aDialog.SetTitle( sTitle );
-
- Reference< XFilePickerControlAccess > xController( aDialog.GetFilePicker(), UNO_QUERY_THROW );
- xController->setValue(ExtendedFilePickerElementIds::CHECKBOX_PREVIEW, 0, ::cppu::bool2any(sal_True));
-
- Reference<XPropertySet> xBoundField;
- if ( hasProperty( PROPERTY_BOUNDFIELD, xSet ) )
- xSet->getPropertyValue( PROPERTY_BOUNDFIELD ) >>= xBoundField;
- sal_Bool bHasField = xBoundField.is();
-
- // if the control is bound to a DB field, then it's not possible to decide whether or not to link
- xController->enableControl(ExtendedFilePickerElementIds::CHECKBOX_LINK, !bHasField );
-
- // if the control is bound to a DB field, then linking of the image depends on the type of the field
- sal_Bool bImageIsLinked = sal_True;
- if ( bHasField )
- {
- sal_Int32 nFieldType = DataType::OTHER;
- OSL_VERIFY( xBoundField->getPropertyValue( PROPERTY_FIELDTYPE ) >>= nFieldType );
- bImageIsLinked = ( lcl_getImageStoreType( nFieldType ) == ImageStoreLink );
- }
- xController->setValue(ExtendedFilePickerElementIds::CHECKBOX_LINK, 0, makeAny( bImageIsLinked ) );
-
- if ( ERRCODE_NONE == aDialog.Execute() )
- {
- // reset the url property in case it already has the value we're about to set - in this case
- // our propertyChanged would not get called without this.
- implClearGraphics( sal_False );
- sal_Bool bIsLink = sal_False;
- xController->getValue(ExtendedFilePickerElementIds::CHECKBOX_LINK, 0) >>= bIsLink;
- // Force bIsLink to be sal_True if we're bound to a field. Though we initialized the file picker with IsLink=TRUE
- // in this case, and disabled the respective control, there might be picker implementations which do not
- // respect this, and return IsLink=FALSE here. In this case, "normalize" the flag.
- // #i112659#
- bIsLink |= bHasField;
- if ( !bIsLink )
- {
- Graphic aGraphic;
- aDialog.GetGraphic( aGraphic );
- xSet->setPropertyValue( PROPERTY_GRAPHIC, makeAny( aGraphic.GetXGraphic() ) );
- }
- else
- xSet->setPropertyValue( PROPERTY_IMAGE_URL, makeAny( ::rtl::OUString( aDialog.GetPath() ) ) );
-
- return true;
- }
- }
- catch(Exception&)
- {
- OSL_FAIL("OImageControlControl::implInsertGraphics: caught an exception while attempting to execute the FilePicker!");
- }
- return false;
-}
-
-//------------------------------------------------------------------------------
-bool OImageControlControl::impl_isEmptyGraphics_nothrow() const
-{
- bool bIsEmpty = true;
-
- try
- {
- Reference< XPropertySet > xModelProps( const_cast< OImageControlControl* >( this )->getModel(), UNO_QUERY_THROW );
- Reference< XGraphic > xGraphic;
- OSL_VERIFY( xModelProps->getPropertyValue( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "Graphic" ) ) ) >>= xGraphic );
- bIsEmpty = !xGraphic.is();
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
-
- return bIsEmpty;
-}
-
-// MouseListener
-//------------------------------------------------------------------------------
-void OImageControlControl::mousePressed(const ::com::sun::star::awt::MouseEvent& e) throw ( ::com::sun::star::uno::RuntimeException)
-{
- SolarMutexGuard aGuard;
-
- if (e.Buttons != MouseButton::LEFT)
- return;
-
- bool bModified = false;
- // is this a request for a context menu?
- if ( e.PopupTrigger )
- {
- Reference< XPopupMenu > xMenu( m_aContext.createComponent( "com.sun.star.awt.PopupMenu" ), UNO_QUERY );
- DBG_ASSERT( xMenu.is(), "OImageControlControl::mousePressed: could not create a popup menu!" );
-
- Reference< XWindowPeer > xWindowPeer = getPeer();
- DBG_ASSERT( xWindowPeer.is(), "OImageControlControl::mousePressed: no window!" );
-
- if ( xMenu.is() && xWindowPeer.is() )
- {
- xMenu->insertItem( ID_OPEN_GRAPHICS, FRM_RES_STRING( RID_STR_OPEN_GRAPHICS ), 0, 0 );
- xMenu->insertItem( ID_CLEAR_GRAPHICS, FRM_RES_STRING( RID_STR_CLEAR_GRAPHICS ), 0, 1 );
-
- // check if the ImageURL is empty
- if ( impl_isEmptyGraphics_nothrow() )
- xMenu->enableItem( ID_CLEAR_GRAPHICS, sal_False );
-
- awt::Rectangle aRect( e.X, e.Y, 0, 0 );
- if ( ( e.X < 0 ) || ( e.Y < 0 ) )
- { // context menu triggered by keyboard
- // position it in the center of the control
- Reference< XWindow > xWindow( static_cast< ::cppu::OWeakObject* >( this ), UNO_QUERY );
- OSL_ENSURE( xWindow.is(), "OImageControlControl::mousePressed: me not a window? How this?" );
- if ( xWindow.is() )
- {
- awt::Rectangle aPosSize = xWindow->getPosSize();
- aRect.X = aPosSize.Width / 2;
- aRect.Y = aPosSize.Height / 2;
- }
- }
-
- const sal_Int16 nResult = xMenu->execute( xWindowPeer, aRect, PopupMenuDirection::EXECUTE_DEFAULT );
-
- switch ( nResult )
- {
- case ID_OPEN_GRAPHICS:
- implInsertGraphics();
- bModified = true;
- break;
-
- case ID_CLEAR_GRAPHICS:
- implClearGraphics( sal_True );
- bModified = true;
- break;
- }
- }
- }
- else
- {
- //////////////////////////////////////////////////////////////////////
- // Doppelclick
- if (e.ClickCount == 2)
- {
-
- Reference<XPropertySet> xSet(getModel(), UNO_QUERY);
- if (!xSet.is())
- return;
-
- // wenn Control nicht gebunden ist, kein Dialog (da die zu schickende URL hinterher sowieso
- // versanden wuerde)
- Reference<XPropertySet> xBoundField;
- if (hasProperty(PROPERTY_BOUNDFIELD, xSet))
- ::cppu::extractInterface(xBoundField, xSet->getPropertyValue(PROPERTY_BOUNDFIELD));
- if (!xBoundField.is())
- {
- // but only if our IMAGE_URL property is handled as if it is transient, which is equivalent to
- // an empty control source
- if (!hasProperty(PROPERTY_CONTROLSOURCE, xSet) || (::comphelper::getString(xSet->getPropertyValue(PROPERTY_CONTROLSOURCE)).getLength() != 0))
- return;
- }
-
- sal_Bool bReadOnly = false;
- xSet->getPropertyValue(PROPERTY_READONLY) >>= bReadOnly;
- if (bReadOnly)
- return;
-
- if ( implInsertGraphics() )
- bModified = true;
- }
- }
-
- if ( bModified )
- {
- EventObject aEvent( *this );
- m_aModifyListeners.notifyEach( &XModifyListener::modified, aEvent );
- }
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OImageControlControl::mouseReleased(const awt::MouseEvent& /*e*/) throw ( RuntimeException )
-{
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OImageControlControl::mouseEntered(const awt::MouseEvent& /*e*/) throw ( RuntimeException )
-{
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OImageControlControl::mouseExited(const awt::MouseEvent& /*e*/) throw ( RuntimeException )
-{
-}
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/ImageControl.hxx b/forms/source/component/ImageControl.hxx
deleted file mode 100644
index 65f1a6a6a..000000000
--- a/forms/source/component/ImageControl.hxx
+++ /dev/null
@@ -1,212 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FRM_IMAGE_CONTROL_HXX_
-#define _FRM_IMAGE_CONTROL_HXX_
-
-#include "FormComponent.hxx"
-#include "imgprod.hxx"
-#include <com/sun/star/form/XImageProducerSupplier.hpp>
-#include <com/sun/star/awt/XMouseListener.hpp>
-#include <com/sun/star/util/XModifyBroadcaster.hpp>
-#include <com/sun/star/graphic/XGraphicObject.hpp>
-#include <comphelper/propmultiplex.hxx>
-#include <comphelper/implementationreference.hxx>
-#include <cppuhelper/implbase2.hxx>
-
-using namespace comphelper;
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
-//==================================================================
-// OImageControlModel
-//==================================================================
-typedef ::cppu::ImplHelper2 < ::com::sun::star::form::XImageProducerSupplier
- , ::com::sun::star::awt::XImageProducer
- > OImageControlModel_Base;
-
-class OImageControlModel
- :public OImageControlModel_Base
- ,public OBoundControlModel
-{
- ::com::sun::star::uno::Reference< ::com::sun::star::awt::XImageProducer> m_xImageProducer;
- ImageProducer* m_pImageProducer;
- bool m_bExternalGraphic;
- sal_Bool m_bReadOnly;
- ::rtl::OUString m_sImageURL;
- ::com::sun::star::uno::Reference< ::com::sun::star::graphic::XGraphicObject >
- m_xGraphicObject;
- ::rtl::OUString m_sDocumentURL;
-
-protected:
- // UNO Anbindung
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
- inline ImageProducer* GetImageProducer() { return m_pImageProducer; }
-
-public:
- DECLARE_DEFAULT_LEAF_XTOR( OImageControlModel );
-
- virtual void SAL_CALL getFastPropertyValue(::com::sun::star::uno::Any& rValue, sal_Int32 nHandle ) const;
- virtual void SAL_CALL setFastPropertyValue_NoBroadcast(sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue) throw ( ::com::sun::star::uno::Exception);
-
- virtual sal_Bool SAL_CALL convertFastPropertyValue(::com::sun::star::uno::Any& rConvertedValue, ::com::sun::star::uno::Any& rOldValue, sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue )
- throw(::com::sun::star::lang::IllegalArgumentException);
-
- // UNO Anbindung
- DECLARE_UNO3_AGG_DEFAULTS(OImageControlModel, OBoundControlModel);
- virtual ::com::sun::star::uno::Any SAL_CALL queryAggregation(const ::com::sun::star::uno::Type& _rType) throw(::com::sun::star::uno::RuntimeException);
-
- // XServiceInfo
- IMPLEMENTATION_NAME(OImageControlModel);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw();
-
- // OComponentHelper
- virtual void SAL_CALL disposing();
-
- // XPersistObject
- virtual ::rtl::OUString SAL_CALL getServiceName() throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL write(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectOutputStream>& _rxOutStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL read(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectInputStream>& _rxInStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
-
- // XImageProducerSupplier
- virtual ::com::sun::star::uno::Reference< ::com::sun::star::awt::XImageProducer> SAL_CALL getImageProducer() throw ( ::com::sun::star::uno::RuntimeException);
-
- // XImageProducer
- virtual void SAL_CALL addConsumer( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XImageConsumer >& xConsumer ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeConsumer( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XImageConsumer >& xConsumer ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL startProduction( ) throw (::com::sun::star::uno::RuntimeException);
-
- // OControlModel's property handling
- virtual void describeAggregateProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rAggregateProps
- ) const;
- virtual void describeFixedProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
-
- // prevent method hiding
- using OBoundControlModel::disposing;
- using OBoundControlModel::getFastPropertyValue;
-
-protected:
- // OBoundControlModel overridables
- virtual void onConnectedDbColumn( const ::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >& _rxForm );
- virtual void onDisconnectedDbColumn();
- virtual ::com::sun::star::uno::Any
- translateDbColumnToControlValue( );
- virtual sal_Bool commitControlValueToDbColumn( bool _bPostReset );
-
- virtual ::com::sun::star::uno::Any
- getControlValue( ) const;
- virtual void doSetControlValue( const ::com::sun::star::uno::Any& _rValue );
-
- virtual sal_Bool approveDbColumnType(sal_Int32 _nColumnType);
-
- virtual void resetNoBroadcast();
-
-protected:
- DECLARE_XCLONEABLE();
-
- void implConstruct();
-
- /** displays the image described by the given URL
- @precond
- our own mutex is locked
- */
- sal_Bool impl_handleNewImageURL_lck( ValueChangeInstigator _eInstigator );
-
- /** updates the binary stream, created from loading the file which the given URL points to, into our
- bound field, or the control itself if there is no bound field
- */
- sal_Bool impl_updateStreamForURL_lck( const ::rtl::OUString& _rURL, ValueChangeInstigator _eInstigator );
-
- DECL_LINK( OnImageImportDone, ::Graphic* );
-};
-
-//==================================================================
-//= OImageControlControl
-//==================================================================
-typedef ::cppu::ImplHelper2 < ::com::sun::star::awt::XMouseListener
- , ::com::sun::star::util::XModifyBroadcaster
- > OImageControlControl_Base;
-class OImageControlControl : public OBoundControl
- , public OImageControlControl_Base
-{
-private:
- ::cppu::OInterfaceContainerHelper m_aModifyListeners;
-
- // XTypeProvider
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
-public:
- OImageControlControl(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory);
-
- // UNO
- DECLARE_UNO3_AGG_DEFAULTS( OImageControlControl, OBoundControl );
- virtual ::com::sun::star::uno::Any SAL_CALL queryAggregation( const ::com::sun::star::uno::Type& _rType ) throw(::com::sun::star::uno::RuntimeException);
-
- // XEventListener
- virtual void SAL_CALL disposing(const ::com::sun::star::lang::EventObject& _rSource) throw(::com::sun::star::uno::RuntimeException);
-
- // XServiceInfo
- IMPLEMENTATION_NAME(OImageControlControl);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw();
-
- // XMouseListener
- virtual void SAL_CALL mousePressed(const ::com::sun::star::awt::MouseEvent& e) throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL mouseReleased(const ::com::sun::star::awt::MouseEvent& e) throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL mouseEntered(const ::com::sun::star::awt::MouseEvent& e) throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL mouseExited(const ::com::sun::star::awt::MouseEvent& e) throw ( ::com::sun::star::uno::RuntimeException);
-
- // XModifyBroadcaster
- virtual void SAL_CALL addModifyListener( const ::com::sun::star::uno::Reference< ::com::sun::star::util::XModifyListener >& aListener ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeModifyListener( const ::com::sun::star::uno::Reference< ::com::sun::star::util::XModifyListener >& aListener ) throw (::com::sun::star::uno::RuntimeException);
-
- // OComponentHelper
- virtual void SAL_CALL disposing();
-
-private:
- void implClearGraphics( sal_Bool _bForce );
- bool implInsertGraphics();
-
- /** determines whether the control does currently have an empty grahic set
- */
- bool impl_isEmptyGraphics_nothrow() const;
-};
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-#endif // _FRM_IMAGE_CONTROL_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/ListBox.cxx b/forms/source/component/ListBox.cxx
deleted file mode 100644
index b997c19f9..000000000
--- a/forms/source/component/ListBox.cxx
+++ /dev/null
@@ -1,1862 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
-*
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
-************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-
-#include "ListBox.hxx"
-#include "property.hxx"
-#include "property.hrc"
-#include "services.hxx"
-#include "frm_resource.hxx"
-#include "frm_resource.hrc"
-#include "BaseListBox.hxx"
-#include "listenercontainers.hxx"
-#include "componenttools.hxx"
-
-/** === begin UNO includes === **/
-#include <com/sun/star/util/XNumberFormatTypes.hpp>
-#include <com/sun/star/sdbc/XRowSet.hpp>
-#include <com/sun/star/container/XIndexAccess.hpp>
-#include <com/sun/star/sdb/XSQLQueryComposerFactory.hpp>
-#include <com/sun/star/sdb/XQueriesSupplier.hpp>
-#include <com/sun/star/util/NumberFormat.hpp>
-#include <com/sun/star/awt/XWindow.hpp>
-#include <com/sun/star/sdbc/XConnection.hpp>
-#include <com/sun/star/sdb/CommandType.hpp>
-/** === end UNO includes === **/
-
-#include <comphelper/basicio.hxx>
-#include <comphelper/container.hxx>
-#include <comphelper/numbers.hxx>
-#include <comphelper/listenernotification.hxx>
-#include <connectivity/dbtools.hxx>
-#include <connectivity/formattedcolumnvalue.hxx>
-#include <connectivity/dbconversion.hxx>
-#include <cppuhelper/queryinterface.hxx>
-#include <rtl/logfile.hxx>
-#include <tools/debug.hxx>
-#include <tools/diagnose_ex.h>
-#include <unotools/sharedunocomponent.hxx>
-#include <vcl/svapp.hxx>
-
-#include <boost/optional.hpp>
-
-#include <algorithm>
-#include <functional>
-
-
-//.........................................................................
-namespace frm
-{
- using namespace ::com::sun::star::uno;
- using namespace ::com::sun::star::sdb;
- using namespace ::com::sun::star::sdbc;
- using namespace ::com::sun::star::sdbcx;
- using namespace ::com::sun::star::beans;
- using namespace ::com::sun::star::container;
- using namespace ::com::sun::star::form;
- using namespace ::com::sun::star::awt;
- using namespace ::com::sun::star::io;
- using namespace ::com::sun::star::lang;
- using namespace ::com::sun::star::util;
- using namespace ::com::sun::star::form::binding;
- using namespace ::dbtools;
-
- using ::connectivity::ORowSetValue;
-
- //==============================================================================
- //= helper
- //==============================================================================
- namespace
- {
- //--------------------------------------------------------------------------
- struct RowSetValueToString : public ::std::unary_function< ORowSetValue, ::rtl::OUString >
- {
- ::rtl::OUString operator()( const ORowSetValue& _value ) const
- {
- return _value.getString();
- }
- };
-
- //--------------------------------------------------------------------------
- struct AppendRowSetValueString : public ::std::unary_function< ::rtl::OUString, void >
- {
- AppendRowSetValueString( ::rtl::OUString& _string )
- :m_string( _string )
- {
- }
-
- void operator()( const ::rtl::OUString _append )
- {
- m_string += _append;
- }
-
- private:
- ::rtl::OUString& m_string;
- };
-
- //--------------------------------------------------------------------------
- Sequence< ::rtl::OUString > lcl_convertToStringSequence( const ValueList& _values )
- {
- Sequence< ::rtl::OUString > aStrings( _values.size() );
- ::std::transform(
- _values.begin(),
- _values.end(),
- aStrings.getArray(),
- RowSetValueToString()
- );
- return aStrings;
- }
- }
-
- //==============================================================================
- //= ItemEventDescription
- //==============================================================================
- typedef ::comphelper::EventHolder< ItemEvent > ItemEventDescription;
-
- //==============================================================================
- //= OListBoxModel
- //==============================================================================
- //------------------------------------------------------------------
- InterfaceRef SAL_CALL OListBoxModel_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory) throw (RuntimeException)
- {
- return *(new OListBoxModel(_rxFactory));
- }
-
- //------------------------------------------------------------------------------
- Sequence< Type> OListBoxModel::_getTypes()
- {
- return TypeBag(
- OBoundControlModel::_getTypes(),
- OEntryListHelper::getTypes(),
- OErrorBroadcaster::getTypes()
- ).getTypes();
- }
-
-
- DBG_NAME(OListBoxModel);
- //------------------------------------------------------------------
- OListBoxModel::OListBoxModel(const Reference<XMultiServiceFactory>& _rxFactory)
- :OBoundControlModel( _rxFactory, VCL_CONTROLMODEL_LISTBOX, FRM_SUN_CONTROL_LISTBOX, sal_True, sal_True, sal_True )
- // use the old control name for compytibility reasons
- ,OEntryListHelper( (OControlModel&)*this )
- ,OErrorBroadcaster( OComponentHelper::rBHelper )
- ,m_aListRowSet( getContext() )
- ,m_nNULLPos(-1)
- ,m_nBoundColumnType( DataType::SQLNULL )
- {
- DBG_CTOR(OListBoxModel,NULL);
-
- m_nClassId = FormComponentType::LISTBOX;
- m_eListSourceType = ListSourceType_VALUELIST;
- m_aBoundColumn <<= (sal_Int16)1;
- initValueProperty( PROPERTY_SELECT_SEQ, PROPERTY_ID_SELECT_SEQ);
-
- startAggregatePropertyListening( PROPERTY_STRINGITEMLIST );
- }
-
- //------------------------------------------------------------------
- OListBoxModel::OListBoxModel( const OListBoxModel* _pOriginal, const Reference<XMultiServiceFactory>& _rxFactory )
- :OBoundControlModel( _pOriginal, _rxFactory )
- ,OEntryListHelper( *_pOriginal, (OControlModel&)*this )
- ,OErrorBroadcaster( OComponentHelper::rBHelper )
- ,m_aListRowSet( getContext() )
- ,m_eListSourceType( _pOriginal->m_eListSourceType )
- ,m_aBoundColumn( _pOriginal->m_aBoundColumn )
- ,m_aListSourceValues( _pOriginal->m_aListSourceValues )
- ,m_aBoundValues( _pOriginal->m_aBoundValues )
- ,m_aDefaultSelectSeq( _pOriginal->m_aDefaultSelectSeq )
- ,m_nNULLPos(-1)
- ,m_nBoundColumnType( DataType::SQLNULL )
- {
- DBG_CTOR(OListBoxModel,NULL);
-
- startAggregatePropertyListening( PROPERTY_STRINGITEMLIST );
- }
-
- //------------------------------------------------------------------
- OListBoxModel::~OListBoxModel()
- {
- if (!OComponentHelper::rBHelper.bDisposed)
- {
- acquire();
- dispose();
- }
-
- DBG_DTOR(OListBoxModel,NULL);
- }
-
- // XCloneable
- //------------------------------------------------------------------------------
- IMPLEMENT_DEFAULT_CLONING( OListBoxModel )
-
- // XServiceInfo
- //------------------------------------------------------------------------------
- StringSequence SAL_CALL OListBoxModel::getSupportedServiceNames() throw(RuntimeException)
- {
- StringSequence aSupported = OBoundControlModel::getSupportedServiceNames();
-
- sal_Int32 nOldLen = aSupported.getLength();
- aSupported.realloc( nOldLen + 8 );
- ::rtl::OUString* pStoreTo = aSupported.getArray() + nOldLen;
-
- *pStoreTo++ = BINDABLE_CONTROL_MODEL;
- *pStoreTo++ = DATA_AWARE_CONTROL_MODEL;
- *pStoreTo++ = VALIDATABLE_CONTROL_MODEL;
-
- *pStoreTo++ = BINDABLE_DATA_AWARE_CONTROL_MODEL;
- *pStoreTo++ = VALIDATABLE_BINDABLE_CONTROL_MODEL;
-
- *pStoreTo++ = FRM_SUN_COMPONENT_LISTBOX;
- *pStoreTo++ = FRM_SUN_COMPONENT_DATABASE_LISTBOX;
- *pStoreTo++ = BINDABLE_DATABASE_LIST_BOX;
-
- return aSupported;
- }
-
- //------------------------------------------------------------------------------
- Any SAL_CALL OListBoxModel::queryAggregation(const Type& _rType) throw (RuntimeException)
- {
- Any aReturn = OBoundControlModel::queryAggregation( _rType );
- if ( !aReturn.hasValue() )
- aReturn = OEntryListHelper::queryInterface( _rType );
- if ( !aReturn.hasValue() )
- aReturn = OErrorBroadcaster::queryInterface( _rType );
- return aReturn;
- }
-
- // OComponentHelper
- //------------------------------------------------------------------------------
- void OListBoxModel::disposing()
- {
- OBoundControlModel::disposing();
- OEntryListHelper::disposing();
- OErrorBroadcaster::disposing();
- }
-
- //------------------------------------------------------------------------------
- void OListBoxModel::getFastPropertyValue(Any& _rValue, sal_Int32 _nHandle) const
- {
- switch (_nHandle)
- {
- case PROPERTY_ID_BOUNDCOLUMN:
- _rValue <<= m_aBoundColumn;
- break;
-
- case PROPERTY_ID_LISTSOURCETYPE:
- _rValue <<= m_eListSourceType;
- break;
-
- case PROPERTY_ID_LISTSOURCE:
- _rValue <<= lcl_convertToStringSequence( m_aListSourceValues );
- break;
-
- case PROPERTY_ID_VALUE_SEQ:
- _rValue <<= lcl_convertToStringSequence( m_aBoundValues );
- break;
-
- case PROPERTY_ID_DEFAULT_SELECT_SEQ:
- _rValue <<= m_aDefaultSelectSeq;
- break;
-
- case PROPERTY_ID_STRINGITEMLIST:
- _rValue <<= getStringItemList();
- break;
-
- default:
- OBoundControlModel::getFastPropertyValue(_rValue, _nHandle);
- }
- }
-
- //------------------------------------------------------------------------------
- void OListBoxModel::setFastPropertyValue_NoBroadcast(sal_Int32 _nHandle, const Any& _rValue) throw (com::sun::star::uno::Exception)
- {
- switch (_nHandle)
- {
- case PROPERTY_ID_BOUNDCOLUMN :
- DBG_ASSERT((_rValue.getValueType().getTypeClass() == TypeClass_SHORT) || (_rValue.getValueType().getTypeClass() == TypeClass_VOID),
- "OListBoxModel::setFastPropertyValue_NoBroadcast : invalid type !" );
- m_aBoundColumn = _rValue;
- break;
-
- case PROPERTY_ID_LISTSOURCETYPE :
- DBG_ASSERT(_rValue.getValueType().equals(::getCppuType(reinterpret_cast<ListSourceType*>(NULL))),
- "OComboBoxModel::setFastPropertyValue_NoBroadcast : invalid type !" );
- _rValue >>= m_eListSourceType;
- break;
-
- case PROPERTY_ID_LISTSOURCE:
- {
- // extract
- Sequence< ::rtl::OUString > aListSource;
- OSL_VERIFY( _rValue >>= aListSource );
-
- // copy to member
- ValueList().swap(m_aListSourceValues);
- ::std::copy(
- aListSource.getConstArray(),
- aListSource.getConstArray() + aListSource.getLength(),
- ::std::insert_iterator< ValueList >( m_aListSourceValues, m_aListSourceValues.end() )
- );
-
- // propagate
- if ( m_eListSourceType == ListSourceType_VALUELIST )
- {
- m_aBoundValues = m_aListSourceValues;
- }
- else
- {
- if ( m_xCursor.is() && !hasField() && !hasExternalListSource() )
- // listbox is already connected to a database, and no external list source
- // data source changed -> refresh
- loadData( false );
- }
- }
- break;
-
- case PROPERTY_ID_VALUE_SEQ :
- OSL_FAIL( "ValueItemList is read-only!" );
- throw PropertyVetoException();
-
- case PROPERTY_ID_DEFAULT_SELECT_SEQ :
- DBG_ASSERT(_rValue.getValueType().equals(::getCppuType(reinterpret_cast< Sequence<sal_Int16>*>(NULL))),
- "OListBoxModel::setFastPropertyValue_NoBroadcast : invalid type !" );
- _rValue >>= m_aDefaultSelectSeq;
-
- DBG_ASSERT(m_xAggregateFastSet.is(), "OListBoxModel::setFastPropertyValue_NoBroadcast(DEFAULT_SELECT_SEQ) : invalid aggregate !");
- if ( m_xAggregateFastSet.is() )
- setControlValue( _rValue, eOther );
- break;
-
- case PROPERTY_ID_STRINGITEMLIST:
- {
- ControlModelLock aLock( *this );
- setNewStringItemList( _rValue, aLock );
- // TODO: this is bogus. setNewStringItemList expects a guard which has the *only*
- // lock to the mutex, but setFastPropertyValue_NoBroadcast is already called with
- // a lock - so we effectively has two locks here, of which setNewStringItemList can
- // only control one.
- }
- resetNoBroadcast();
- break;
-
- default:
- OBoundControlModel::setFastPropertyValue_NoBroadcast(_nHandle, _rValue);
- }
- }
-
- //------------------------------------------------------------------------------
- sal_Bool OListBoxModel::convertFastPropertyValue(
- Any& _rConvertedValue, Any& _rOldValue, sal_Int32 _nHandle, const Any& _rValue)
- throw (IllegalArgumentException)
- {
- sal_Bool bModified(sal_False);
- switch (_nHandle)
- {
- case PROPERTY_ID_BOUNDCOLUMN :
- bModified = tryPropertyValue(_rConvertedValue, _rOldValue, _rValue, m_aBoundColumn, ::getCppuType(reinterpret_cast<sal_Int16*>(NULL)));
- break;
-
- case PROPERTY_ID_LISTSOURCETYPE:
- bModified = tryPropertyValueEnum(_rConvertedValue, _rOldValue, _rValue, m_eListSourceType);
- break;
-
- case PROPERTY_ID_LISTSOURCE:
- bModified = tryPropertyValue(_rConvertedValue, _rOldValue, _rValue, lcl_convertToStringSequence( m_aListSourceValues ) );
- break;
-
- case PROPERTY_ID_VALUE_SEQ :
- OSL_FAIL( "ValueItemList is read-only!" );
- throw PropertyVetoException();
-
- case PROPERTY_ID_DEFAULT_SELECT_SEQ :
- bModified = tryPropertyValue(_rConvertedValue, _rOldValue, _rValue, m_aDefaultSelectSeq);
- break;
-
- case PROPERTY_ID_STRINGITEMLIST:
- bModified = convertNewListSourceProperty( _rConvertedValue, _rOldValue, _rValue );
- break;
-
- default:
- return OBoundControlModel::convertFastPropertyValue(_rConvertedValue, _rOldValue, _nHandle, _rValue);
- }
- return bModified;
- }
-
- //------------------------------------------------------------------------------
- void SAL_CALL OListBoxModel::setPropertyValues( const Sequence< ::rtl::OUString >& _rPropertyNames, const Sequence< Any >& _rValues ) throw(PropertyVetoException, IllegalArgumentException, WrappedTargetException, RuntimeException)
- {
- // if both SelectedItems and StringItemList are set, care for this
- // #i27024#
- const Any* pSelectSequenceValue = NULL;
-
- const ::rtl::OUString* pStartPos = _rPropertyNames.getConstArray();
- const ::rtl::OUString* pEndPos = _rPropertyNames.getConstArray() + _rPropertyNames.getLength();
- const ::rtl::OUString* pSelectedItemsPos = ::std::find_if(
- pStartPos, pEndPos,
- ::std::bind2nd( ::std::equal_to< ::rtl::OUString >(), PROPERTY_SELECT_SEQ )
- );
- const ::rtl::OUString* pStringItemListPos = ::std::find_if(
- pStartPos, pEndPos,
- ::std::bind2nd( ::std::equal_to< ::rtl::OUString >(), PROPERTY_STRINGITEMLIST )
- );
- if ( ( pSelectedItemsPos != pEndPos ) && ( pStringItemListPos != pEndPos ) )
- {
- // both properties are present
- // -> remember the value for the select sequence
- pSelectSequenceValue = _rValues.getConstArray() + ( pSelectedItemsPos - pStartPos );
- }
-
- OBoundControlModel::setPropertyValues( _rPropertyNames, _rValues );
-
- if ( pSelectSequenceValue )
- {
- setPropertyValue( PROPERTY_SELECT_SEQ, *pSelectSequenceValue );
- // Note that this is the only reliable way, since one of the properties is implemented
- // by ourself, and one is implemented by the aggregate, we cannot rely on any particular
- // results when setting them both - too many undocumented behavior in all the involved
- // classes
- }
- }
-
- //------------------------------------------------------------------------------
- void OListBoxModel::describeFixedProperties( Sequence< Property >& _rProps ) const
- {
- BEGIN_DESCRIBE_PROPERTIES( 7, OBoundControlModel )
- DECL_PROP1(TABINDEX, sal_Int16, BOUND);
- DECL_PROP2(BOUNDCOLUMN, sal_Int16, BOUND, MAYBEVOID);
- DECL_PROP1(LISTSOURCETYPE, ListSourceType, BOUND);
- DECL_PROP1(LISTSOURCE, StringSequence, BOUND);
- DECL_PROP3(VALUE_SEQ, StringSequence, BOUND, READONLY, TRANSIENT);
- DECL_PROP1(DEFAULT_SELECT_SEQ, Sequence<sal_Int16>, BOUND);
- DECL_PROP1(STRINGITEMLIST, Sequence< ::rtl::OUString >, BOUND);
- END_DESCRIBE_PROPERTIES();
- }
-
- //------------------------------------------------------------------------------
- void OListBoxModel::_propertyChanged( const PropertyChangeEvent& i_rEvent ) throw ( RuntimeException )
- {
- if ( i_rEvent.PropertyName == PROPERTY_STRINGITEMLIST )
- {
- ControlModelLock aLock( *this );
- // SYNCHRONIZED ----->
- // our aggregate internally changed its StringItemList property - reflect this in our "overridden"
- // version of the property
- setNewStringItemList( i_rEvent.NewValue, aLock );
- // <----- SYNCHRONIZED
- return;
- }
- OBoundControlModel::_propertyChanged( i_rEvent );
- }
-
- //------------------------------------------------------------------------------
- void OListBoxModel::describeAggregateProperties( Sequence< Property >& _rAggregateProps ) const
- {
- OBoundControlModel::describeAggregateProperties( _rAggregateProps );
-
- // superseded properties:
- RemoveProperty( _rAggregateProps, PROPERTY_STRINGITEMLIST );
- }
-
- //------------------------------------------------------------------------------
- ::rtl::OUString SAL_CALL OListBoxModel::getServiceName() throw(RuntimeException)
- {
- return FRM_COMPONENT_LISTBOX; // old (non-sun) name for compatibility !
- }
-
- //------------------------------------------------------------------------------
- void SAL_CALL OListBoxModel::write(const Reference<XObjectOutputStream>& _rxOutStream)
- throw(IOException, RuntimeException)
- {
- OBoundControlModel::write(_rxOutStream);
-
- // Dummy-Seq, um Kompatible zu bleiben, wenn SelectSeq nicht mehr gespeichert wird
- Sequence<sal_Int16> aDummySeq;
-
- // Version
- // Version 0x0002: ListSource wird StringSeq
- _rxOutStream->writeShort(0x0004);
-
- // Maskierung fuer any
- sal_uInt16 nAnyMask = 0;
- if (m_aBoundColumn.getValueType().getTypeClass() != TypeClass_VOID)
- nAnyMask |= BOUNDCOLUMN;
-
- _rxOutStream << nAnyMask;
-
- _rxOutStream << lcl_convertToStringSequence( m_aListSourceValues );
- _rxOutStream << (sal_Int16)m_eListSourceType;
- _rxOutStream << aDummySeq;
- _rxOutStream << m_aDefaultSelectSeq;
-
- if ((nAnyMask & BOUNDCOLUMN) == BOUNDCOLUMN)
- {
- sal_Int16 nBoundColumn = 0;
- m_aBoundColumn >>= nBoundColumn;
- _rxOutStream << nBoundColumn;
- }
- writeHelpTextCompatibly(_rxOutStream);
-
- // from version 0x0004 : common properties
- writeCommonProperties(_rxOutStream);
- }
-
- //------------------------------------------------------------------------------
- void SAL_CALL OListBoxModel::read(const Reference<XObjectInputStream>& _rxInStream) throw(IOException, RuntimeException)
- {
- // Bei manchen Variblen muessen Abhaengigkeiten beruecksichtigt werden.
- // Deshalb muessen sie explizit ueber setPropertyValue() gesetzt werden.
-
- OBoundControlModel::read(_rxInStream);
- ControlModelLock aLock( *this );
-
- // since we are "overwriting" the StringItemList of our aggregate (means we have
- // an own place to store the value, instead of relying on our aggregate storing it),
- // we need to respect what the aggregate just read for the StringItemList property.
- try
- {
- if ( m_xAggregateSet.is() )
- setNewStringItemList( m_xAggregateSet->getPropertyValue( PROPERTY_STRINGITEMLIST ), aLock );
- }
- catch( const Exception& )
- {
- OSL_FAIL( "OComboBoxModel::read: caught an exception while examining the aggregate's string item list!" );
- }
-
- // Version
- sal_uInt16 nVersion = _rxInStream->readShort();
- DBG_ASSERT(nVersion > 0, "OListBoxModel::read : version 0 ? this should never have been written !");
-
- if (nVersion > 0x0004)
- {
- OSL_FAIL("OListBoxModel::read : invalid (means unknown) version !");
- ValueList().swap(m_aListSourceValues);
- m_aBoundColumn <<= (sal_Int16)0;
- ValueList().swap(m_aBoundValues);
- m_eListSourceType = ListSourceType_VALUELIST;
- m_aDefaultSelectSeq.realloc(0);
- defaultCommonProperties();
- return;
- }
-
- // Maskierung fuer any
- sal_uInt16 nAnyMask;
- _rxInStream >> nAnyMask;
-
- // ListSourceSeq
- StringSequence aListSourceSeq;
- if (nVersion == 0x0001)
- {
- // ListSourceSeq aus String zusammenstellen;
- ::rtl::OUString sListSource;
- _rxInStream >> sListSource;
-
- sal_Int32 nTokens = 1;
- const sal_Unicode* pStr = sListSource.getStr();
- while ( *pStr )
- {
- if ( *pStr == ';' )
- nTokens++;
- pStr++;
- }
- aListSourceSeq.realloc( nTokens );
- for (sal_uInt16 i=0; i<nTokens; ++i)
- {
- sal_Int32 nTmp = 0;
- aListSourceSeq.getArray()[i] = sListSource.getToken(i,';',nTmp);
- }
- }
- else
- _rxInStream >> aListSourceSeq;
-
- sal_Int16 nListSourceType;
- _rxInStream >> nListSourceType;
- m_eListSourceType = (ListSourceType)nListSourceType;
- Any aListSourceSeqAny;
- aListSourceSeqAny <<= aListSourceSeq;
-
- setFastPropertyValue(PROPERTY_ID_LISTSOURCE, aListSourceSeqAny );
-
- // Dummy-Seq, um Kompatible zu bleiben, wenn SelectSeq nicht mehr gespeichert wird
- Sequence<sal_Int16> aDummySeq;
- _rxInStream >> aDummySeq;
-
- // DefaultSelectSeq
- Sequence<sal_Int16> aDefaultSelectSeq;
- _rxInStream >> aDefaultSelectSeq;
- Any aDefaultSelectSeqAny;
- aDefaultSelectSeqAny <<= aDefaultSelectSeq;
- setFastPropertyValue(PROPERTY_ID_DEFAULT_SELECT_SEQ, aDefaultSelectSeqAny);
-
- // BoundColumn
- if ((nAnyMask & BOUNDCOLUMN) == BOUNDCOLUMN)
- {
- sal_Int16 nValue;
- _rxInStream >> nValue;
- m_aBoundColumn <<= nValue;
- }
-
- if (nVersion > 2)
- readHelpTextCompatibly(_rxInStream);
-
- // if our string list is not filled from the value list, we must empty it
- // this can be the case when somebody saves in alive mode
- if ( ( m_eListSourceType != ListSourceType_VALUELIST )
- && !hasExternalListSource()
- )
- {
- setFastPropertyValue( PROPERTY_ID_STRINGITEMLIST, makeAny( StringSequence() ) );
- }
-
- if (nVersion > 3)
- readCommonProperties(_rxInStream);
-
- // Nach dem Lesen die Defaultwerte anzeigen
- if ( getControlSource().getLength() )
- // (not if we don't have a control source - the "State" property acts like it is persistent, then
- resetNoBroadcast();
- }
-
- //------------------------------------------------------------------------------
- void OListBoxModel::loadData( bool _bForce )
- {
- RTL_LOGFILE_CONTEXT( aLogContext, "OListBoxModel::loadData" );
- DBG_ASSERT( m_eListSourceType != ListSourceType_VALUELIST, "OListBoxModel::loadData: cannot load value list from DB!" );
- DBG_ASSERT( !hasExternalListSource(), "OListBoxModel::loadData: cannot load from DB when I have an external list source!" );
-
- const sal_Int16 nNULLPosBackup( m_nNULLPos );
- const sal_Int32 nBoundColumnTypeBackup( m_nBoundColumnType );
- m_nNULLPos = -1;
- m_nBoundColumnType = DataType::SQLNULL;
-
- // pre-requisites:
- // PRE1: connection
- Reference< XConnection > xConnection;
- // is the active connection of our form
- Reference< XPropertySet > xFormProps( m_xCursor, UNO_QUERY );
- if ( xFormProps.is() )
- xFormProps->getPropertyValue( PROPERTY_ACTIVE_CONNECTION ) >>= xConnection;
-
- // PRE2: list source
- ::rtl::OUString sListSource;
- // if our list source type is no value list, we need to concatenate
- // the single list source elements
- ::std::for_each(
- m_aListSourceValues.begin(),
- m_aListSourceValues.end(),
- AppendRowSetValueString( sListSource )
- );
-
- // outta here if we don't have all pre-requisites
- if ( !xConnection.is() || !sListSource.getLength() )
- {
- ValueList().swap(m_aBoundValues);
- return;
- }
-
- ::boost::optional< sal_Int16 > aBoundColumn;
- if ( m_aBoundColumn.getValueType().getTypeClass() == TypeClass_SHORT )
- {
- sal_Int16 nBoundColumn( 0 );
- m_aBoundColumn >>= nBoundColumn;
- aBoundColumn.reset( nBoundColumn );
- }
-
- ::utl::SharedUNOComponent< XResultSet > xListCursor;
- try
- {
- m_aListRowSet.setConnection( xConnection );
-
- sal_Bool bExecute = sal_False;
- switch (m_eListSourceType)
- {
- case ListSourceType_TABLEFIELDS:
- // don't work with a statement here, the fields will be collected below
- break;
-
- case ListSourceType_TABLE:
- {
- Reference<XNameAccess> xFieldsByName = getTableFields(xConnection, sListSource);
- Reference<XIndexAccess> xFieldsByIndex(xFieldsByName, UNO_QUERY);
-
- // do we have a bound column if yes we have to select it
- // and the displayed column is the first column othwhise we act as a combobox
- ::rtl::OUString aFieldName;
- ::rtl::OUString aBoundFieldName;
-
- if ( !!aBoundColumn && ( *aBoundColumn >= 0 ) && xFieldsByIndex.is() )
- {
- if ( *aBoundColumn >= xFieldsByIndex->getCount() )
- break;
-
- Reference<XPropertySet> xFieldAsSet(xFieldsByIndex->getByIndex( *aBoundColumn ),UNO_QUERY);
- xFieldAsSet->getPropertyValue(PROPERTY_NAME) >>= aBoundFieldName;
- aBoundColumn.reset( 1 );
-
- xFieldAsSet.set(xFieldsByIndex->getByIndex(0),UNO_QUERY);
- xFieldAsSet->getPropertyValue(PROPERTY_NAME) >>= aFieldName;
- }
- else if (xFieldsByName.is())
- {
- if ( xFieldsByName->hasByName( getControlSource() ) )
- aFieldName = getControlSource();
- else
- {
- // otherwise look for the alias
- Reference< XColumnsSupplier > xSupplyFields;
- xFormProps->getPropertyValue(::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("SingleSelectQueryComposer"))) >>= xSupplyFields;
-
- // search the field
- DBG_ASSERT(xSupplyFields.is(), "OListBoxModel::loadData : invalid query composer !");
-
- Reference<XNameAccess> xFieldNames = xSupplyFields->getColumns();
- if ( xFieldNames->hasByName( getControlSource() ) )
- {
- Reference<XPropertySet> xComposerFieldAsSet;
- xFieldNames->getByName( getControlSource() ) >>= xComposerFieldAsSet;
- if (hasProperty(PROPERTY_FIELDSOURCE, xComposerFieldAsSet))
- xComposerFieldAsSet->getPropertyValue(PROPERTY_FIELDSOURCE) >>= aFieldName;
- }
- }
- }
- if (!aFieldName.getLength())
- break;
-
- Reference<XDatabaseMetaData> xMeta = xConnection->getMetaData();
- ::rtl::OUString aQuote = xMeta->getIdentifierQuoteString();
- ::rtl::OUString aStatement(RTL_CONSTASCII_USTRINGPARAM("SELECT "));
- if (!aBoundFieldName.getLength()) // act like a combobox
- aStatement += ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("DISTINCT ") );
-
- aStatement += quoteName(aQuote,aFieldName);
- if (aBoundFieldName.getLength())
- {
- aStatement += ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(", ") );
- aStatement += quoteName(aQuote, aBoundFieldName);
- }
- aStatement += ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(" FROM ") );
-
- ::rtl::OUString sCatalog, sSchema, sTable;
- qualifiedNameComponents( xMeta, sListSource, sCatalog, sSchema, sTable, eInDataManipulation );
- aStatement += composeTableNameForSelect( xConnection, sCatalog, sSchema, sTable );
-
- m_aListRowSet.setEscapeProcessing( sal_False );
- m_aListRowSet.setCommand( aStatement );
- bExecute = sal_True;
- }
- break;
-
- case ListSourceType_QUERY:
- m_aListRowSet.setCommandFromQuery( sListSource );
- bExecute = sal_True;
- break;
-
- default:
- m_aListRowSet.setEscapeProcessing( ListSourceType_SQLPASSTHROUGH != m_eListSourceType );
- m_aListRowSet.setCommand( sListSource );
- bExecute = sal_True;
- break;
- }
-
- if (bExecute)
- {
- if ( !_bForce && !m_aListRowSet.isDirty() )
- {
- // if none of the settings of the row set changed, compared to the last
- // invocation of loadData, then don't re-fill the list. Instead, assume
- // the list entries are the same.
- m_nNULLPos = nNULLPosBackup;
- m_nBoundColumnType = nBoundColumnTypeBackup;
- return;
- }
- xListCursor.reset( m_aListRowSet.execute() );
- }
- }
- catch(SQLException& eSQL)
- {
- onError(eSQL, FRM_RES_STRING(RID_BASELISTBOX_ERROR_FILLLIST));
- return;
- }
- catch(const Exception& eUnknown)
- {
- (void)eUnknown;
- return;
- }
-
- // Anzeige- und Werteliste fuellen
- ValueList aDisplayList, aValueList;
- sal_Bool bUseNULL = hasField() && !isRequired();
-
- try
- {
- OSL_ENSURE( xListCursor.is() || ( ListSourceType_TABLEFIELDS == m_eListSourceType ),
- "OListBoxModel::loadData: logic error!" );
- if ( !xListCursor.is() && ( ListSourceType_TABLEFIELDS != m_eListSourceType ) )
- return;
-
- switch (m_eListSourceType)
- {
- case ListSourceType_SQL:
- case ListSourceType_SQLPASSTHROUGH:
- case ListSourceType_TABLE:
- case ListSourceType_QUERY:
- {
- // Feld der 1. Column des ResultSets holen
- Reference<XColumnsSupplier> xSupplyCols(xListCursor, UNO_QUERY);
- DBG_ASSERT(xSupplyCols.is(), "OListBoxModel::loadData : cursor supports the row set service but is no column supplier?!");
- Reference<XIndexAccess> xColumns;
- if (xSupplyCols.is())
- {
- xColumns = Reference<XIndexAccess>(xSupplyCols->getColumns(), UNO_QUERY);
- DBG_ASSERT(xColumns.is(), "OListBoxModel::loadData : no columns supplied by the row set !");
- }
-
- Reference< XPropertySet > xDataField;
- if ( xColumns.is() )
- xColumns->getByIndex(0) >>= xDataField;
- if ( !xDataField.is() )
- return;
-
- ::dbtools::FormattedColumnValue aValueFormatter( getContext(), m_xCursor, xDataField );
-
- // Feld der BoundColumn des ResultSets holen
- m_nBoundColumnType = DataType::SQLNULL;
- if ( !!aBoundColumn && ( *aBoundColumn >= 0 ) && m_xColumn.is() )
- { // don't look for a bound column if we're not connected to a field
- try
- {
- Reference< XPropertySet > xBoundField( xColumns->getByIndex( *aBoundColumn ), UNO_QUERY_THROW );
- OSL_VERIFY( xBoundField->getPropertyValue( ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("Type") ) ) >>= m_nBoundColumnType );
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- }
-
- // Ist die LB an ein Feld gebunden und sind Leereintraege zulaessig
- // dann wird die Position fuer einen Leereintrag gemerkt
-
- RTL_LOGFILE_CONTEXT( aLogContext, "OListBoxModel::loadData: string collection" );
- ::rtl::OUString aStr;
- sal_Int16 entryPos = 0;
- ORowSetValue aBoundValue;
- Reference< XRow > xCursorRow( xListCursor, UNO_QUERY_THROW );
- while ( xListCursor->next() && ( entryPos++ < SHRT_MAX ) ) // SHRT_MAX is the maximum number of entries
- {
- aStr = aValueFormatter.getFormattedValue();
- aDisplayList.push_back( aStr );
-
- if ( impl_hasBoundComponent() )
- {
- aBoundValue.fill( *aBoundColumn + 1, m_nBoundColumnType, xCursorRow );
- aValueList.push_back( aBoundValue );
- }
-
- if ( bUseNULL && ( m_nNULLPos == -1 ) && !aStr.getLength() )
- m_nNULLPos = sal_Int16( aDisplayList.size() - 1 );
- }
- }
- break;
-
- case ListSourceType_TABLEFIELDS:
- {
- Reference<XNameAccess> xFieldNames = getTableFields(xConnection, sListSource);
- if (xFieldNames.is())
- {
- StringSequence seqNames = xFieldNames->getElementNames();
- ::std::copy(
- seqNames.getConstArray(),
- seqNames.getConstArray() + seqNames.getLength(),
- ::std::insert_iterator< ValueList >( aDisplayList, aDisplayList.end() )
- );
- }
- }
- break;
- default:
- OSL_FAIL( "OListBoxModel::loadData: unreachable!" );
- break;
- }
- }
- catch(SQLException& eSQL)
- {
- onError(eSQL, FRM_RES_STRING(RID_BASELISTBOX_ERROR_FILLLIST));
- return;
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- return;
- }
-
-
- // Value-Sequence erzeugen
- // NULL eintrag hinzufuegen
- if (bUseNULL && m_nNULLPos == -1)
- {
- if ( impl_hasBoundComponent() )
- aValueList.insert( aValueList.begin(), ORowSetValue() );
-
- aDisplayList.insert( aDisplayList.begin(), ORowSetValue( ::rtl::OUString() ) );
- m_nNULLPos = 0;
- }
-
- m_aBoundValues = aValueList;
-
- setFastPropertyValue( PROPERTY_ID_STRINGITEMLIST, makeAny( lcl_convertToStringSequence( aDisplayList ) ) );
- }
-
- //------------------------------------------------------------------------------
- void OListBoxModel::onConnectedDbColumn( const Reference< XInterface >& /*_rxForm*/ )
- {
- // list boxes which are bound to a db column don't have multi selection
- // - this would be unable to reflect in the db column
- if ( hasField() )
- {
- setFastPropertyValue( PROPERTY_ID_MULTISELECTION, ::cppu::bool2any( ( sal_False ) ) );
- }
-
- if ( !hasExternalListSource() )
- impl_refreshDbEntryList( false );
- }
-
- //------------------------------------------------------------------------------
- void OListBoxModel::onDisconnectedDbColumn()
- {
- if ( m_eListSourceType != ListSourceType_VALUELIST )
- {
- ValueList().swap(m_aBoundValues);
- m_nNULLPos = -1;
- m_nBoundColumnType = DataType::SQLNULL;
-
- if ( !hasExternalListSource() )
- setFastPropertyValue( PROPERTY_ID_STRINGITEMLIST, makeAny( StringSequence() ) );
-
- m_aListRowSet.dispose();
- }
- }
-
- //------------------------------------------------------------------------------
- ValueList OListBoxModel::impl_getValues() const
- {
- if ( !m_aBoundValues.empty() )
- return m_aBoundValues;
-
- Sequence< ::rtl::OUString > aStringItems( getStringItemList() );
- ValueList aValues( aStringItems.getLength() );
- ::std::copy(
- aStringItems.getConstArray(),
- aStringItems.getConstArray() + aStringItems.getLength(),
- aValues.begin()
- );
-
- return aValues;
- }
- //------------------------------------------------------------------------------
- ORowSetValue OListBoxModel::getFirstSelectedValue() const
- {
- static const ORowSetValue s_aEmptyVaue;
-
- DBG_ASSERT( m_xAggregateFastSet.is(), "OListBoxModel::getFirstSelectedValue: invalid aggregate!" );
- if ( !m_xAggregateFastSet.is() )
- return s_aEmptyVaue;
-
- Sequence< sal_Int16 > aSelectedIndices;
- OSL_VERIFY( m_xAggregateFastSet->getFastPropertyValue( getValuePropertyAggHandle() ) >>= aSelectedIndices );
- if ( !aSelectedIndices.getLength() )
- // nothing selected at all
- return s_aEmptyVaue;
-
- if ( ( m_nNULLPos != -1 ) && ( aSelectedIndices[0] == m_nNULLPos ) )
- // the dedicated "NULL" entry is selected
- return s_aEmptyVaue;
-
- ValueList aValues( impl_getValues() );
-
- size_t selectedValue = aSelectedIndices[0];
- if ( selectedValue >= aValues.size() )
- {
- OSL_FAIL( "OListBoxModel::getFirstSelectedValue: inconsistent selection/valuelist!" );
- return s_aEmptyVaue;
- }
-
- return aValues[ selectedValue ];
- }
-
- //------------------------------------------------------------------------------
- sal_Bool OListBoxModel::commitControlValueToDbColumn( bool /*_bPostReset*/ )
- {
- // current selektion list
- const ORowSetValue aCurrentValue( getFirstSelectedValue() );
- if ( aCurrentValue != m_aSaveValue )
- {
- if ( aCurrentValue.isNull() )
- m_xColumnUpdate->updateNull();
- else
- {
- try
- {
- m_xColumnUpdate->updateObject( aCurrentValue.makeAny() );
- }
- catch ( const Exception& )
- {
- return sal_False;
- }
- }
- m_aSaveValue = aCurrentValue;
- }
- return sal_True;
- }
-
- // XPropertiesChangeListener
- //------------------------------------------------------------------------------
- Any OListBoxModel::translateDbColumnToControlValue()
- {
- Reference< XPropertySet > xBoundField( getField() );
- if ( !xBoundField.is() )
- {
- OSL_FAIL( "OListBoxModel::translateDbColumnToControlValue: no field? How could that happen?!" );
- return Any();
- }
-
- Sequence< sal_Int16 > aSelectionIndicies;
-
- ORowSetValue aCurrentValue;
- aCurrentValue.fill( impl_hasBoundComponent() ? m_nBoundColumnType : getFieldType(), m_xColumn );
-
- // reset selection for NULL values
- if ( aCurrentValue.isNull() )
- {
- if ( m_nNULLPos != -1 )
- {
- aSelectionIndicies.realloc(1);
- aSelectionIndicies[0] = m_nNULLPos;
- }
- }
- else
- {
- ValueList aValues( impl_getValues() );
- ValueList::const_iterator curValuePos = ::std::find( aValues.begin(), aValues.end(), aCurrentValue );
- if ( curValuePos != aValues.end() )
- {
- aSelectionIndicies.realloc( 1 );
- aSelectionIndicies[0] = curValuePos - aValues.begin();
- }
- }
-
- m_aSaveValue = aCurrentValue;
-
- return makeAny( aSelectionIndicies );
- }
-
- // XReset
- //------------------------------------------------------------------------------
- Any OListBoxModel::getDefaultForReset() const
- {
- Any aValue;
- if (m_aDefaultSelectSeq.getLength())
- aValue <<= m_aDefaultSelectSeq;
- else if (m_nNULLPos != -1) // gebundene Listbox
- {
- Sequence<sal_Int16> aSeq(1);
- aSeq.getArray()[0] = m_nNULLPos;
- aValue <<= aSeq;
- }
- else
- {
- Sequence<sal_Int16> aSeq;
- aValue <<= aSeq;
- }
-
- return aValue;
- }
-
- //--------------------------------------------------------------------
- void OListBoxModel::resetNoBroadcast()
- {
- OBoundControlModel::resetNoBroadcast();
- m_aSaveValue.setNull();
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OListBoxModel::disposing( const EventObject& _rSource ) throw ( RuntimeException )
- {
- if ( !OEntryListHelper::handleDisposing( _rSource ) )
- OBoundControlModel::disposing( _rSource );
- }
-
- //--------------------------------------------------------------------
- namespace
- {
- /** type how we should transfer our selection to external value bindings
- */
- enum ExchangeType
- {
- eIndexList, /// as list of indexes of selected entries
- eIndex, /// as index of the selected entry
- eEntryList, /// as list of string representations of selected entries
- eEntry /// as string representation of the selected entry
- };
-
- //--------------------------------------------------------------------
- ExchangeType lcl_getCurrentExchangeType( const Type& _rExchangeType )
- {
- switch ( _rExchangeType.getTypeClass() )
- {
- case TypeClass_STRING:
- return eEntry;
- case TypeClass_LONG:
- return eIndex;
- case TypeClass_SEQUENCE:
- {
- Type aElementType = ::comphelper::getSequenceElementType( _rExchangeType );
- switch ( aElementType.getTypeClass() )
- {
- case TypeClass_STRING:
- return eEntryList;
- case TypeClass_LONG:
- return eIndexList;
- default:
- break;
- }
- }
- default:
- break;
- }
- OSL_FAIL( "lcl_getCurrentExchangeType: unsupported (unexpected) exchange type!" );
- return eEntry;
- }
- }
-
- //--------------------------------------------------------------------
- Any OListBoxModel::translateExternalValueToControlValue( const Any& _rExternalValue ) const
- {
- Sequence< sal_Int16 > aSelectIndexes;
-
- switch ( lcl_getCurrentExchangeType( getExternalValueType() ) )
- {
- case eIndexList:
- {
- // unfortunately, our select sequence is a sequence<short>, while the external binding
- // supplies sequence<int> only -> transform this
- Sequence< sal_Int32 > aSelectIndexesPure;
- OSL_VERIFY( _rExternalValue >>= aSelectIndexesPure );
- aSelectIndexes.realloc( aSelectIndexesPure.getLength() );
- ::std::copy(
- aSelectIndexesPure.getConstArray(),
- aSelectIndexesPure.getConstArray() + aSelectIndexesPure.getLength(),
- aSelectIndexes.getArray()
- );
- }
- break;
-
- case eIndex:
- {
- sal_Int32 nSelectIndex = -1;
- OSL_VERIFY( _rExternalValue >>= nSelectIndex );
- if ( ( nSelectIndex >= 0 ) && ( nSelectIndex < getStringItemList().getLength() ) )
- {
- aSelectIndexes.realloc( 1 );
- aSelectIndexes[ 0 ] = static_cast< sal_Int16 >( nSelectIndex );
- }
- }
- break;
-
- case eEntryList:
- {
- // we can retrieve a string list from the binding for multiple selection
- Sequence< ::rtl::OUString > aSelectEntries;
- OSL_VERIFY( _rExternalValue >>= aSelectEntries );
-
- ::std::set< sal_Int16 > aSelectionSet;
-
- // find the selection entries in our item list
- const ::rtl::OUString* pSelectEntries = aSelectEntries.getArray();
- const ::rtl::OUString* pSelectEntriesEnd = pSelectEntries + aSelectEntries.getLength();
- while ( pSelectEntries != pSelectEntriesEnd )
- {
- // the indexes where the current string appears in our string items
- Sequence< sal_Int16 > aThisEntryIndexes;
- aThisEntryIndexes = findValue( getStringItemList(), *pSelectEntries++, sal_False );
-
- // insert all the indexes of this entry into our set
- ::std::copy(
- aThisEntryIndexes.getConstArray(),
- aThisEntryIndexes.getConstArray() + aThisEntryIndexes.getLength(),
- ::std::insert_iterator< ::std::set< sal_Int16 > >( aSelectionSet, aSelectionSet.begin() )
- );
- }
-
- // copy the indexes to the sequence
- aSelectIndexes.realloc( aSelectionSet.size() );
- ::std::copy(
- aSelectionSet.begin(),
- aSelectionSet.end(),
- aSelectIndexes.getArray()
- );
- }
- break;
-
- case eEntry:
- {
- ::rtl::OUString sStringToSelect;
- OSL_VERIFY( _rExternalValue >>= sStringToSelect );
-
- aSelectIndexes = findValue( getStringItemList(), sStringToSelect, sal_False );
- }
- break;
- }
-
- return makeAny( aSelectIndexes );
- }
-
- //--------------------------------------------------------------------
- namespace
- {
- //................................................................
- struct ExtractStringFromSequence_Safe : public ::std::unary_function< sal_Int16, ::rtl::OUString >
- {
- protected:
- const Sequence< ::rtl::OUString >& m_rList;
-
- public:
- ExtractStringFromSequence_Safe( const Sequence< ::rtl::OUString >& _rList ) : m_rList( _rList ) { }
-
- ::rtl::OUString operator ()( sal_Int16 _nIndex )
- {
- OSL_ENSURE( _nIndex < m_rList.getLength(), "ExtractStringFromSequence_Safe: inconsistence!" );
- if ( _nIndex < m_rList.getLength() )
- return m_rList[ _nIndex ];
- return ::rtl::OUString();
- }
- };
-
- //................................................................
- Any lcl_getSingleSelectedEntry( const Sequence< sal_Int16 >& _rSelectSequence, const Sequence< ::rtl::OUString >& _rStringList )
- {
- Any aReturn;
-
- // by definition, multiple selected entries are transfered as NULL if the
- // binding does not support string lists
- if ( _rSelectSequence.getLength() <= 1 )
- {
- ::rtl::OUString sSelectedEntry;
-
- if ( _rSelectSequence.getLength() == 1 )
- sSelectedEntry = ExtractStringFromSequence_Safe( _rStringList )( _rSelectSequence[0] );
-
- aReturn <<= sSelectedEntry;
- }
-
- return aReturn;
- }
-
- //................................................................
- Any lcl_getMultiSelectedEntries( const Sequence< sal_Int16 >& _rSelectSequence, const Sequence< ::rtl::OUString >& _rStringList )
- {
- Sequence< ::rtl::OUString > aSelectedEntriesTexts( _rSelectSequence.getLength() );
- ::std::transform(
- _rSelectSequence.getConstArray(),
- _rSelectSequence.getConstArray() + _rSelectSequence.getLength(),
- aSelectedEntriesTexts.getArray(),
- ExtractStringFromSequence_Safe( _rStringList )
- );
- return makeAny( aSelectedEntriesTexts );
- }
- }
-
- //--------------------------------------------------------------------
- Any OListBoxModel::translateControlValueToExternalValue( ) const
- {
- OSL_PRECOND( hasExternalValueBinding(), "OListBoxModel::translateControlValueToExternalValue: no binding!" );
-
- Sequence< sal_Int16 > aSelectSequence;
- const_cast< OListBoxModel* >( this )->getPropertyValue( PROPERTY_SELECT_SEQ ) >>= aSelectSequence;
-
- Any aReturn;
- switch ( lcl_getCurrentExchangeType( getExternalValueType() ) )
- {
- case eIndexList:
- {
- // unfortunately, the select sequence is a sequence<short>, but our binding
- // expects int's
- Sequence< sal_Int32 > aTransformed( aSelectSequence.getLength() );
- ::std::copy(
- aSelectSequence.getConstArray(),
- aSelectSequence.getConstArray() + aSelectSequence.getLength(),
- aTransformed.getArray()
- );
- aReturn <<= aTransformed;
- }
- break;
-
- case eIndex:
- if ( aSelectSequence.getLength() <= 1 )
- {
- sal_Int32 nIndex = -1;
-
- if ( aSelectSequence.getLength() == 1 )
- nIndex = aSelectSequence[0];
-
- aReturn <<= nIndex;
- }
- break;
-
- case eEntryList:
- aReturn = lcl_getMultiSelectedEntries( aSelectSequence, getStringItemList() );
- break;
-
- case eEntry:
- aReturn = lcl_getSingleSelectedEntry( aSelectSequence, getStringItemList() );
- break;
- }
-
- return aReturn;
- }
-
- //--------------------------------------------------------------------
- Any OListBoxModel::getCurrentFormComponentValue() const
- {
- if ( hasValidator() )
- return OBoundControlModel::getCurrentFormComponentValue();
-
- Any aCurretnValue;
-
- try
- {
- Sequence< sal_Int16 > aSelectSequence;
- OSL_VERIFY( const_cast< OListBoxModel* >( this )->getPropertyValue( PROPERTY_SELECT_SEQ ) >>= aSelectSequence );
-
- sal_Bool bMultiSelection( sal_False );
- OSL_VERIFY( const_cast< OListBoxModel* >( this )->getPropertyValue( PROPERTY_MULTISELECTION ) >>= bMultiSelection );
-
- if ( bMultiSelection )
- aCurretnValue = lcl_getMultiSelectedEntries( aSelectSequence, getStringItemList() );
- else
- aCurretnValue = lcl_getSingleSelectedEntry( aSelectSequence, getStringItemList() );
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
-
- return aCurretnValue;
- }
-
- //--------------------------------------------------------------------
- Sequence< Type > OListBoxModel::getSupportedBindingTypes()
- {
- Sequence< Type > aTypes(4);
- aTypes[0] = ::getCppuType( static_cast< Sequence< sal_Int32 >* >( NULL ) );
- aTypes[1] = ::getCppuType( static_cast< sal_Int32* >( NULL ) );
- aTypes[2] = ::getCppuType( static_cast< Sequence< ::rtl::OUString >* >( NULL ) );
- aTypes[3] = ::getCppuType( static_cast< ::rtl::OUString* >( NULL ) );
- return aTypes;
- }
-
- //--------------------------------------------------------------------
- void OListBoxModel::stringItemListChanged( ControlModelLock& _rInstanceLock )
- {
- if ( !m_xAggregateSet.is() )
- return;
-
- suspendValueListening();
- try
- {
- m_xAggregateSet->setPropertyValue( PROPERTY_STRINGITEMLIST, makeAny( getStringItemList() ) );
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- resumeValueListening();
-
- // update the selection here
- if ( hasExternalValueBinding( ) )
- transferExternalValueToControl( _rInstanceLock );
- else
- {
- if ( hasField() )
- {
- // TODO: update the selection in case we're bound to a database column
- }
- else
- {
- if ( m_aDefaultSelectSeq.getLength() )
- setControlValue( makeAny( m_aDefaultSelectSeq ), eOther );
- }
- }
- }
-
- //--------------------------------------------------------------------
- void OListBoxModel::connectedExternalListSource( )
- {
- // TODO?
- }
-
- //--------------------------------------------------------------------
- void OListBoxModel::disconnectedExternalListSource( )
- {
- // TODO: in case we're part of an already loaded form, we should probably simulate
- // an onConnectedDbColumn, so our list get's filled with the data as indicated
- // by our SQL-binding related properties
- }
-
- //--------------------------------------------------------------------
- void OListBoxModel::impl_refreshDbEntryList( bool _bForce )
- {
- DBG_ASSERT( !hasExternalListSource(), "OListBoxModel::impl_refreshDbEntryList: invalid call!" );
-
- if ( !hasExternalListSource( )
- && ( m_eListSourceType != ListSourceType_VALUELIST )
- && ( m_xCursor.is() )
- )
- {
- loadData( _bForce );
- }
- }
-
- //--------------------------------------------------------------------
- void OListBoxModel::refreshInternalEntryList()
- {
- impl_refreshDbEntryList( true );
- if ( hasField() && m_xCursor.is() )
- initFromField( m_xCursor );
- }
-
- //==================================================================
- // OListBoxControl
- //==================================================================
-
- //------------------------------------------------------------------
- InterfaceRef SAL_CALL OListBoxControl_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory) throw (RuntimeException)
- {
- return *(new OListBoxControl(_rxFactory));
- }
-
- //------------------------------------------------------------------------------
- Sequence< Type> OListBoxControl::_getTypes()
- {
- return TypeBag(
- OBoundControl::_getTypes(),
- OListBoxControl_BASE::getTypes()
- ).getTypes();
- }
-
- //------------------------------------------------------------------
- Any SAL_CALL OListBoxControl::queryAggregation(const Type& _rType) throw (RuntimeException)
- {
- Any aReturn = OListBoxControl_BASE::queryInterface( _rType );
-
- if ( !aReturn.hasValue()
- || _rType.equals( XTypeProvider::static_type() )
- )
- aReturn = OBoundControl::queryAggregation( _rType );
-
- return aReturn;
- }
-
- DBG_NAME(OListBoxControl);
- //------------------------------------------------------------------------------
- OListBoxControl::OListBoxControl(const Reference<XMultiServiceFactory>& _rxFactory)
- :OBoundControl( _rxFactory, VCL_CONTROL_LISTBOX, sal_False )
- ,m_aChangeListeners( m_aMutex )
- ,m_aItemListeners( m_aMutex )
- ,m_pItemBroadcaster( NULL )
- {
- DBG_CTOR(OListBoxControl,NULL);
-
- increment(m_refCount);
- {
- // als FocusListener anmelden
- Reference<XWindow> xComp;
- if (query_aggregation(m_xAggregate, xComp))
- xComp->addFocusListener(this);
-
- // als ItemListener anmelden
- if ( query_aggregation( m_xAggregate, m_xAggregateListBox ) )
- m_xAggregateListBox->addItemListener(this);
- }
- // Refcount bei 2 fuer angemeldete Listener
- decrement(m_refCount);
-
- doSetDelegator();
-
- m_aChangeTimer.SetTimeout(500);
- m_aChangeTimer.SetTimeoutHdl(LINK(this,OListBoxControl,OnTimeout));
- }
-
- //------------------------------------------------------------------------------
- OListBoxControl::~OListBoxControl()
- {
- if (!OComponentHelper::rBHelper.bDisposed)
- {
- acquire();
- dispose();
- }
-
- doResetDelegator();
- m_xAggregateListBox.clear();
-
- DBG_DTOR(OListBoxControl,NULL);
- }
-
- //------------------------------------------------------------------------------
- StringSequence SAL_CALL OListBoxControl::getSupportedServiceNames() throw(RuntimeException)
- {
- StringSequence aSupported = OBoundControl::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 1);
-
- ::rtl::OUString* pArray = aSupported.getArray();
- pArray[aSupported.getLength()-1] = FRM_SUN_CONTROL_LISTBOX;
- return aSupported;
- }
-
-
- // XFocusListener
- //------------------------------------------------------------------------------
- void SAL_CALL OListBoxControl::focusGained(const FocusEvent& /*_rEvent*/) throw(RuntimeException)
- {
- ::osl::MutexGuard aGuard(m_aMutex);
- if ( m_aChangeListeners.getLength() ) // only if there are listeners
- {
- Reference<XPropertySet> xSet(getModel(), UNO_QUERY);
- if (xSet.is())
- {
- // memorize the current selection for posting the change event
- m_aCurrentSelection = xSet->getPropertyValue(PROPERTY_SELECT_SEQ);
- }
- }
- }
-
- //------------------------------------------------------------------------------
- void SAL_CALL OListBoxControl::focusLost(const FocusEvent& /*_rEvent*/) throw(RuntimeException)
- {
- m_aCurrentSelection.clear();
- }
-
- // XItemListener
- //------------------------------------------------------------------------------
- void SAL_CALL OListBoxControl::itemStateChanged(const ItemEvent& _rEvent) throw(RuntimeException)
- {
- // forward this to our listeners
- Reference< XChild > xChild( getModel(), UNO_QUERY );
- if ( xChild.is() && xChild->getParent().is() )
- {
- ::osl::MutexGuard aGuard( m_aMutex );
- if ( m_aItemListeners.getLength() )
- {
- if ( !m_pItemBroadcaster.is() )
- {
- m_pItemBroadcaster.set( new ::comphelper::AsyncEventNotifier );
- m_pItemBroadcaster->create();
- }
- m_pItemBroadcaster->addEvent( new ItemEventDescription( _rEvent ), this );
- }
- }
- else
- m_aItemListeners.notifyEach( &XItemListener::itemStateChanged, _rEvent );
-
- // and do the handling for the ChangeListeners
- ::osl::ClearableMutexGuard aGuard(m_aMutex);
- if ( m_aChangeTimer.IsActive() )
- {
- Reference<XPropertySet> xSet(getModel(), UNO_QUERY);
- m_aCurrentSelection = xSet->getPropertyValue(PROPERTY_SELECT_SEQ);
-
- m_aChangeTimer.Stop();
- m_aChangeTimer.Start();
- }
- else
- {
- if ( m_aChangeListeners.getLength() && m_aCurrentSelection.hasValue() )
- {
- Reference<XPropertySet> xSet(getModel(), UNO_QUERY);
- if (xSet.is())
- {
- // Has the selection been changed?
- sal_Bool bModified(sal_False);
- Any aValue = xSet->getPropertyValue(PROPERTY_SELECT_SEQ);
-
- Sequence<sal_Int16>& rSelection = *(Sequence<sal_Int16> *)aValue.getValue();
- Sequence<sal_Int16>& rOldSelection = *(Sequence<sal_Int16> *)m_aCurrentSelection.getValue();
- sal_Int32 nLen = rSelection.getLength();
- if (nLen != rOldSelection.getLength())
- bModified = sal_True;
- else
- {
- const sal_Int16* pVal = rSelection.getConstArray();
- const sal_Int16* pCompVal = rOldSelection.getConstArray();
-
- while (nLen-- && !bModified)
- bModified = pVal[nLen] != pCompVal[nLen];
- }
-
- if (bModified)
- {
- m_aCurrentSelection = aValue;
- m_aChangeTimer.Start();
- }
- }
- }
- else if (m_aCurrentSelection.hasValue())
- m_aCurrentSelection.clear();
- }
- }
-
- // XEventListener
- //------------------------------------------------------------------------------
- void SAL_CALL OListBoxControl::disposing(const EventObject& _rSource) throw (RuntimeException)
- {
- OBoundControl::disposing(_rSource);
- }
-
- // XChangeBroadcaster
- //------------------------------------------------------------------------------
- void SAL_CALL OListBoxControl::addChangeListener(const Reference<XChangeListener>& _rxListener) throw(RuntimeException)
- {
- m_aChangeListeners.addInterface( _rxListener );
- }
-
- //------------------------------------------------------------------------------
- void SAL_CALL OListBoxControl::removeChangeListener(const Reference<XChangeListener>& _rxListener) throw(RuntimeException)
- {
- m_aChangeListeners.removeInterface( _rxListener );
- }
-
- // OComponentHelper
- //------------------------------------------------------------------------------
- void OListBoxControl::disposing()
- {
- if (m_aChangeTimer.IsActive())
- m_aChangeTimer.Stop();
-
- EventObject aEvent( *this );
- m_aChangeListeners.disposeAndClear( aEvent );
- m_aItemListeners.disposeAndClear( aEvent );
-
- {
- ::osl::MutexGuard aGuard( m_aMutex );
- if ( m_pItemBroadcaster.is() )
- {
- m_pItemBroadcaster->removeEventsForProcessor( this );
- m_pItemBroadcaster->terminate();
- m_pItemBroadcaster = NULL;
- }
- }
-
- OBoundControl::disposing();
- }
-
- //------------------------------------------------------------------------------
- void OListBoxControl::processEvent( const AnyEvent& _rEvent )
- {
- Reference< XListBox > xKeepAlive( this );
- {
- ::osl::MutexGuard aGuard( m_aMutex );
- if ( OComponentHelper::rBHelper.bDisposed )
- return;
- }
- const ItemEventDescription& rItemEvent = static_cast< const ItemEventDescription& >( _rEvent );
- m_aItemListeners.notifyEach( &XItemListener::itemStateChanged, rItemEvent.getEventObject() );
- }
-
- //------------------------------------------------------------------------------
- IMPL_LINK(OListBoxControl, OnTimeout, void*, /*EMPTYTAG*/)
- {
- m_aChangeListeners.notifyEach( &XChangeListener::changed, EventObject( *this ) );
- return 0L;
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OListBoxControl::addItemListener( const Reference< XItemListener >& l ) throw (RuntimeException)
- {
- m_aItemListeners.addInterface( l );
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OListBoxControl::removeItemListener( const Reference< XItemListener >& l ) throw (RuntimeException)
- {
- m_aItemListeners.removeInterface( l );
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OListBoxControl::addActionListener( const Reference< XActionListener >& l ) throw (RuntimeException)
- {
- if ( m_xAggregateListBox.is() )
- m_xAggregateListBox->addActionListener( l );
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OListBoxControl::removeActionListener( const Reference< XActionListener >& l ) throw (RuntimeException)
- {
- if ( m_xAggregateListBox.is() )
- m_xAggregateListBox->removeActionListener( l );
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OListBoxControl::addItem( const ::rtl::OUString& aItem, ::sal_Int16 nPos ) throw (RuntimeException)
- {
- if ( m_xAggregateListBox.is() )
- m_xAggregateListBox->addItem( aItem, nPos );
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OListBoxControl::addItems( const Sequence< ::rtl::OUString >& aItems, ::sal_Int16 nPos ) throw (RuntimeException)
- {
- if ( m_xAggregateListBox.is() )
- m_xAggregateListBox->addItems( aItems, nPos );
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OListBoxControl::removeItems( ::sal_Int16 nPos, ::sal_Int16 nCount ) throw (RuntimeException)
- {
- if ( m_xAggregateListBox.is() )
- m_xAggregateListBox->removeItems( nPos, nCount );
- }
-
- //--------------------------------------------------------------------
- ::sal_Int16 SAL_CALL OListBoxControl::getItemCount( ) throw (RuntimeException)
- {
- if ( m_xAggregateListBox.is() )
- return m_xAggregateListBox->getItemCount();
- return 0;
- }
-
- //--------------------------------------------------------------------
- ::rtl::OUString SAL_CALL OListBoxControl::getItem( ::sal_Int16 nPos ) throw (RuntimeException)
- {
- if ( m_xAggregateListBox.is() )
- return m_xAggregateListBox->getItem( nPos );
- return ::rtl::OUString( );
- }
-
- //--------------------------------------------------------------------
- Sequence< ::rtl::OUString > SAL_CALL OListBoxControl::getItems( ) throw (RuntimeException)
- {
- if ( m_xAggregateListBox.is() )
- return m_xAggregateListBox->getItems();
- return Sequence< ::rtl::OUString >( );
- }
-
- //--------------------------------------------------------------------
- ::sal_Int16 SAL_CALL OListBoxControl::getSelectedItemPos( ) throw (RuntimeException)
- {
- if ( m_xAggregateListBox.is() )
- return m_xAggregateListBox->getSelectedItemPos();
- return 0;
- }
-
- //--------------------------------------------------------------------
- Sequence< ::sal_Int16 > SAL_CALL OListBoxControl::getSelectedItemsPos( ) throw (RuntimeException)
- {
- if ( m_xAggregateListBox.is() )
- return m_xAggregateListBox->getSelectedItemsPos();
- return Sequence< ::sal_Int16 >( );
- }
-
- //--------------------------------------------------------------------
- ::rtl::OUString SAL_CALL OListBoxControl::getSelectedItem( ) throw (RuntimeException)
- {
- if ( m_xAggregateListBox.is() )
- return m_xAggregateListBox->getSelectedItem();
- return ::rtl::OUString( );
- }
-
- //--------------------------------------------------------------------
- Sequence< ::rtl::OUString > SAL_CALL OListBoxControl::getSelectedItems( ) throw (RuntimeException)
- {
- if ( m_xAggregateListBox.is() )
- return m_xAggregateListBox->getSelectedItems();
- return Sequence< ::rtl::OUString >( );
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OListBoxControl::selectItemPos( ::sal_Int16 nPos, ::sal_Bool bSelect ) throw (RuntimeException)
- {
- if ( m_xAggregateListBox.is() )
- m_xAggregateListBox->selectItemPos( nPos, bSelect );
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OListBoxControl::selectItemsPos( const Sequence< ::sal_Int16 >& aPositions, ::sal_Bool bSelect ) throw (RuntimeException)
- {
- if ( m_xAggregateListBox.is() )
- m_xAggregateListBox->selectItemsPos( aPositions, bSelect );
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OListBoxControl::selectItem( const ::rtl::OUString& aItem, ::sal_Bool bSelect ) throw (RuntimeException)
- {
- if ( m_xAggregateListBox.is() )
- m_xAggregateListBox->selectItem( aItem, bSelect );
- }
-
- //--------------------------------------------------------------------
- ::sal_Bool SAL_CALL OListBoxControl::isMutipleMode( ) throw (RuntimeException)
- {
- if ( m_xAggregateListBox.is() )
- return m_xAggregateListBox->isMutipleMode();
- return sal_False;
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OListBoxControl::setMultipleMode( ::sal_Bool bMulti ) throw (RuntimeException)
- {
- if ( m_xAggregateListBox.is() )
- m_xAggregateListBox->setMultipleMode( bMulti );
- }
-
- //--------------------------------------------------------------------
- ::sal_Int16 SAL_CALL OListBoxControl::getDropDownLineCount( ) throw (RuntimeException)
- {
- if ( m_xAggregateListBox.is() )
- return m_xAggregateListBox->getDropDownLineCount();
- return 0;
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OListBoxControl::setDropDownLineCount( ::sal_Int16 nLines ) throw (RuntimeException)
- {
- if ( m_xAggregateListBox.is() )
- m_xAggregateListBox->setDropDownLineCount( nLines );
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OListBoxControl::makeVisible( ::sal_Int16 nEntry ) throw (RuntimeException)
- {
- if ( m_xAggregateListBox.is() )
- m_xAggregateListBox->makeVisible( nEntry );
- }
-
-//.........................................................................
-}
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/ListBox.hxx b/forms/source/component/ListBox.hxx
deleted file mode 100644
index a46442ec5..000000000
--- a/forms/source/component/ListBox.hxx
+++ /dev/null
@@ -1,288 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FORMS_LISTBOX_HXX_
-#define _FORMS_LISTBOX_HXX_
-
-#include "FormComponent.hxx"
-#include "cachedrowset.hxx"
-#include "errorbroadcaster.hxx"
-#include "entrylisthelper.hxx"
-
-/** === begin UNO includes === **/
-#include <com/sun/star/util/XNumberFormatter.hpp>
-#include <com/sun/star/sdb/XSQLErrorBroadcaster.hpp>
-#include <com/sun/star/form/ListSourceType.hpp>
-#include <com/sun/star/awt/XItemListener.hpp>
-#include <com/sun/star/awt/XFocusListener.hpp>
-#include <com/sun/star/awt/XListBox.hpp>
-#include <com/sun/star/form/XChangeBroadcaster.hpp>
-#include <com/sun/star/sdbc/DataType.hpp>
-/** === end UNO includes === **/
-
-#include <comphelper/asyncnotification.hxx>
-#include <connectivity/FValue.hxx>
-#include <cppuhelper/interfacecontainer.hxx>
-#include <cppuhelper/implbase1.hxx>
-#include <vcl/timer.hxx>
-
-#include <vector>
-
-namespace dbtools
-{
- class FormattedColumnValue;
-}
-
-//.........................................................................
-namespace frm
-{
-
-//==================================================================
-//= OListBoxModel
-//==================================================================
-typedef ::std::vector< ::connectivity::ORowSetValue > ValueList;
-
-class OListBoxModel :public OBoundControlModel
- ,public OEntryListHelper
- ,public OErrorBroadcaster
-{
-
- CachedRowSet m_aListRowSet; // the row set to fill the list
- ::connectivity::ORowSetValue m_aSaveValue;
-
- // <properties>
- ::com::sun::star::form::ListSourceType m_eListSourceType; // type der list source
- ::com::sun::star::uno::Any m_aBoundColumn;
- ValueList m_aListSourceValues;
- ValueList m_aBoundValues;
- ::com::sun::star::uno::Sequence<sal_Int16> m_aDefaultSelectSeq; // DefaultSelected
- // </properties>
-
- sal_Int16 m_nNULLPos; // position of the NULL value in our list
- sal_Int32 m_nBoundColumnType;
-
-private:
- ::connectivity::ORowSetValue getFirstSelectedValue() const;
-
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
-public:
- DECLARE_DEFAULT_LEAF_XTOR( OListBoxModel );
-
-// XServiceInfo
- IMPLEMENTATION_NAME(OListBoxModel);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException);
-
-// UNO Anbindung
- DECLARE_UNO3_AGG_DEFAULTS(OListBoxModel, OBoundControlModel);
- virtual ::com::sun::star::uno::Any SAL_CALL queryAggregation( const ::com::sun::star::uno::Type& _rType ) throw (::com::sun::star::uno::RuntimeException);
-
-// OComponentHelper
- virtual void SAL_CALL disposing();
-
-// OPropertySetHelper
- virtual void SAL_CALL getFastPropertyValue(::com::sun::star::uno::Any& rValue, sal_Int32 nHandle) const;
- virtual void SAL_CALL setFastPropertyValue_NoBroadcast( sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue )
- throw (::com::sun::star::uno::Exception);
- virtual sal_Bool SAL_CALL convertFastPropertyValue(
- ::com::sun::star::uno::Any& _rConvertedValue, ::com::sun::star::uno::Any& _rOldValue, sal_Int32 _nHandle, const ::com::sun::star::uno::Any& _rValue )
- throw (::com::sun::star::lang::IllegalArgumentException);
-
-protected:
- // XMultiPropertySet
- virtual void SAL_CALL setPropertyValues(const ::com::sun::star::uno::Sequence< ::rtl::OUString >& PropertyNames, const ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Any >& Values) throw(::com::sun::star::beans::PropertyVetoException, ::com::sun::star::lang::IllegalArgumentException, ::com::sun::star::lang::WrappedTargetException, ::com::sun::star::uno::RuntimeException);
-
- // XPersistObject
- virtual ::rtl::OUString SAL_CALL getServiceName() throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL
- write(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectOutputStream>& _rxOutStream) throw(::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL
- read(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectInputStream>& _rxInStream) throw(::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
-
- // OControlModel's property handling
- virtual void describeFixedProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
- virtual void describeAggregateProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rAggregateProps
- ) const;
-
- // XEventListener
- virtual void SAL_CALL disposing(const ::com::sun::star::lang::EventObject& Source) throw (::com::sun::star::uno::RuntimeException);
-
- // OPropertyChangeListener
- virtual void _propertyChanged( const ::com::sun::star::beans::PropertyChangeEvent& _rEvt ) throw ( ::com::sun::star::uno::RuntimeException );
-
- // prevent method hiding
- using OBoundControlModel::getFastPropertyValue;
- using OBoundControlModel::setPropertyValues;
-
-protected:
- // OBoundControlModel overridables
- virtual ::com::sun::star::uno::Any
- translateDbColumnToControlValue( );
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type >
- getSupportedBindingTypes();
- virtual ::com::sun::star::uno::Any
- translateExternalValueToControlValue( const ::com::sun::star::uno::Any& _rExternalValue ) const;
- virtual ::com::sun::star::uno::Any
- translateControlValueToExternalValue( ) const;
- virtual sal_Bool commitControlValueToDbColumn( bool _bPostReset );
-
- virtual void onConnectedDbColumn( const ::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >& _rxForm );
- virtual void onDisconnectedDbColumn();
-
- virtual ::com::sun::star::uno::Any
- getDefaultForReset() const;
- virtual void resetNoBroadcast();
-
- virtual ::com::sun::star::uno::Any
- getCurrentFormComponentValue() const;
-
- // OEntryListHelper overriables
- virtual void stringItemListChanged( ControlModelLock& _rInstanceLock );
- virtual void connectedExternalListSource( );
- virtual void disconnectedExternalListSource( );
- virtual void refreshInternalEntryList();
-
-protected:
- DECLARE_XCLONEABLE();
-
-private:
- void loadData( bool _bForce );
-
- /** refreshes the list boxes list data
- @precond we don't actually have an external list source
- */
- void impl_refreshDbEntryList( bool _bForce );
-
- ValueList impl_getValues() const;
-
- bool impl_hasBoundComponent() const { return m_nBoundColumnType != ::com::sun::star::sdbc::DataType::SQLNULL; }
-};
-
-//==================================================================
-//= OListBoxControl
-//==================================================================
-typedef ::cppu::ImplHelper4 < ::com::sun::star::awt::XFocusListener
- , ::com::sun::star::awt::XItemListener
- , ::com::sun::star::awt::XListBox
- , ::com::sun::star::form::XChangeBroadcaster
- > OListBoxControl_BASE;
-
-class ChangeListeners;
-
-class OListBoxControl :public OBoundControl
- ,public OListBoxControl_BASE
- ,public IEventProcessor
-{
-private:
- ::cppu::OInterfaceContainerHelper m_aChangeListeners;
- ::cppu::OInterfaceContainerHelper m_aItemListeners;
-
- ::com::sun::star::uno::Any m_aCurrentSelection;
- Timer m_aChangeTimer;
-
- ::com::sun::star::uno::Reference< ::com::sun::star::awt::XListBox >
- m_xAggregateListBox;
-
- ::rtl::Reference< ::comphelper::AsyncEventNotifier >
- m_pItemBroadcaster;
-
-protected:
- // UNO Anbindung
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
-public:
- OListBoxControl(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory);
- virtual ~OListBoxControl();
-
- // UNO Anbindung
- DECLARE_UNO3_AGG_DEFAULTS(OListBoxControl, OBoundControl);
- virtual ::com::sun::star::uno::Any SAL_CALL queryAggregation( const ::com::sun::star::uno::Type& _rType ) throw (::com::sun::star::uno::RuntimeException);
-
-// XServiceInfo
- IMPLEMENTATION_NAME(OListBoxControl);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException);
-
-// XChangeBroadcaster
- virtual void SAL_CALL addChangeListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XChangeListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeChangeListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XChangeListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
-
-// XFocusListener
- virtual void SAL_CALL focusGained(const ::com::sun::star::awt::FocusEvent& _rEvent) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL focusLost(const ::com::sun::star::awt::FocusEvent& _rEvent) throw(::com::sun::star::uno::RuntimeException);
-
-// XItemListener
- virtual void SAL_CALL itemStateChanged(const ::com::sun::star::awt::ItemEvent& _rEvent) throw(::com::sun::star::uno::RuntimeException);
-
-// XEventListener
- virtual void SAL_CALL disposing(const ::com::sun::star::lang::EventObject& Source) throw (::com::sun::star::uno::RuntimeException);
-
-// OComponentHelper
- virtual void SAL_CALL disposing();
-
-// XListBox
- virtual void SAL_CALL addItemListener( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XItemListener >& l ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeItemListener( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XItemListener >& l ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL addActionListener( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XActionListener >& l ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeActionListener( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XActionListener >& l ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL addItem( const ::rtl::OUString& aItem, ::sal_Int16 nPos ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL addItems( const ::com::sun::star::uno::Sequence< ::rtl::OUString >& aItems, ::sal_Int16 nPos ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeItems( ::sal_Int16 nPos, ::sal_Int16 nCount ) throw (::com::sun::star::uno::RuntimeException);
- virtual ::sal_Int16 SAL_CALL getItemCount( ) throw (::com::sun::star::uno::RuntimeException);
- virtual ::rtl::OUString SAL_CALL getItem( ::sal_Int16 nPos ) throw (::com::sun::star::uno::RuntimeException);
- virtual ::com::sun::star::uno::Sequence< ::rtl::OUString > SAL_CALL getItems( ) throw (::com::sun::star::uno::RuntimeException);
- virtual ::sal_Int16 SAL_CALL getSelectedItemPos( ) throw (::com::sun::star::uno::RuntimeException);
- virtual ::com::sun::star::uno::Sequence< ::sal_Int16 > SAL_CALL getSelectedItemsPos( ) throw (::com::sun::star::uno::RuntimeException);
- virtual ::rtl::OUString SAL_CALL getSelectedItem( ) throw (::com::sun::star::uno::RuntimeException);
- virtual ::com::sun::star::uno::Sequence< ::rtl::OUString > SAL_CALL getSelectedItems( ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL selectItemPos( ::sal_Int16 nPos, ::sal_Bool bSelect ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL selectItemsPos( const ::com::sun::star::uno::Sequence< ::sal_Int16 >& aPositions, ::sal_Bool bSelect ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL selectItem( const ::rtl::OUString& aItem, ::sal_Bool bSelect ) throw (::com::sun::star::uno::RuntimeException);
- virtual ::sal_Bool SAL_CALL isMutipleMode( ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setMultipleMode( ::sal_Bool bMulti ) throw (::com::sun::star::uno::RuntimeException);
- virtual ::sal_Int16 SAL_CALL getDropDownLineCount( ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setDropDownLineCount( ::sal_Int16 nLines ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL makeVisible( ::sal_Int16 nEntry ) throw (::com::sun::star::uno::RuntimeException);
-
-protected:
- // IEventProcessor
- virtual void processEvent( const ::comphelper::AnyEvent& _rEvent );
-
-private:
- DECL_LINK( OnTimeout, void* );
-};
-
-//.........................................................................
-}
-//.........................................................................
-
-#endif // _FORMS_LISTBOX_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Numeric.cxx b/forms/source/component/Numeric.cxx
deleted file mode 100644
index 5dc45da96..000000000
--- a/forms/source/component/Numeric.cxx
+++ /dev/null
@@ -1,224 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "Numeric.hxx"
-#include <tools/debug.hxx>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::sdb;
-using namespace ::com::sun::star::sdbc;
-using namespace ::com::sun::star::sdbcx;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::io;
-using namespace ::com::sun::star::lang;
-using namespace ::com::sun::star::util;
-using namespace ::com::sun::star::form::binding;
-
-//==================================================================
-// ONumericControl
-//==================================================================
-
-//------------------------------------------------------------------
-ONumericControl::ONumericControl(const Reference<XMultiServiceFactory>& _rxFactory)
- :OBoundControl(_rxFactory, VCL_CONTROL_NUMERICFIELD)
-{
-}
-
-//------------------------------------------------------------------------------
-StringSequence ONumericControl::getSupportedServiceNames() throw()
-{
- StringSequence aSupported = OBoundControl::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 1);
-
- ::rtl::OUString*pArray = aSupported.getArray();
- pArray[aSupported.getLength()-1] = FRM_SUN_CONTROL_NUMERICFIELD;
- return aSupported;
-}
-
-
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL ONumericControl_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new ONumericControl(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> ONumericControl::_getTypes()
-{
- return OBoundControl::_getTypes();
-}
-
-//==================================================================
-// ONumericModel
-//==================================================================
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL ONumericModel_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new ONumericModel(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> ONumericModel::_getTypes()
-{
- return OEditBaseModel::_getTypes();
-}
-
-//------------------------------------------------------------------
-DBG_NAME( ONumericModel )
-//------------------------------------------------------------------
-ONumericModel::ONumericModel(const Reference<XMultiServiceFactory>& _rxFactory)
- :OEditBaseModel( _rxFactory, VCL_CONTROLMODEL_NUMERICFIELD, FRM_SUN_CONTROL_NUMERICFIELD, sal_True, sal_True )
- // use the old control name for compytibility reasons
-{
- DBG_CTOR( ONumericModel, NULL );
-
- m_nClassId = FormComponentType::NUMERICFIELD;
- initValueProperty( PROPERTY_VALUE, PROPERTY_ID_VALUE );
-}
-
-//------------------------------------------------------------------
-ONumericModel::ONumericModel( const ONumericModel* _pOriginal, const Reference<XMultiServiceFactory>& _rxFactory )
- :OEditBaseModel( _pOriginal, _rxFactory )
-{
- DBG_CTOR( ONumericModel, NULL );
-}
-
-//------------------------------------------------------------------
-ONumericModel::~ONumericModel()
-{
- DBG_DTOR( ONumericModel, NULL );
-}
-
-// XCloneable
-//------------------------------------------------------------------------------
-IMPLEMENT_DEFAULT_CLONING( ONumericModel )
-
-// XServiceInfo
-//------------------------------------------------------------------------------
-StringSequence ONumericModel::getSupportedServiceNames() throw()
-{
- StringSequence aSupported = OBoundControlModel::getSupportedServiceNames();
-
- sal_Int32 nOldLen = aSupported.getLength();
- aSupported.realloc( nOldLen + 8 );
- ::rtl::OUString* pStoreTo = aSupported.getArray() + nOldLen;
-
- *pStoreTo++ = BINDABLE_CONTROL_MODEL;
- *pStoreTo++ = DATA_AWARE_CONTROL_MODEL;
- *pStoreTo++ = VALIDATABLE_CONTROL_MODEL;
-
- *pStoreTo++ = BINDABLE_DATA_AWARE_CONTROL_MODEL;
- *pStoreTo++ = VALIDATABLE_BINDABLE_CONTROL_MODEL;
-
- *pStoreTo++ = FRM_SUN_COMPONENT_NUMERICFIELD;
- *pStoreTo++ = FRM_SUN_COMPONENT_DATABASE_NUMERICFIELD;
- *pStoreTo++ = BINDABLE_DATABASE_NUMERIC_FIELD;
-
- return aSupported;
-}
-
-//------------------------------------------------------------------------------
-void ONumericModel::describeFixedProperties( Sequence< Property >& _rProps ) const
-{
- BEGIN_DESCRIBE_PROPERTIES( 2, OEditBaseModel )
- DECL_PROP3(DEFAULT_VALUE, double, BOUND, MAYBEDEFAULT, MAYBEVOID);
- DECL_PROP1(TABINDEX, sal_Int16, BOUND);
- END_DESCRIBE_PROPERTIES();
-}
-
-//------------------------------------------------------------------------------
-::rtl::OUString SAL_CALL ONumericModel::getServiceName() throw ( ::com::sun::star::uno::RuntimeException)
-{
- return FRM_COMPONENT_NUMERICFIELD; // old (non-sun) name for compatibility !
-}
-
-//------------------------------------------------------------------------------
-sal_Bool ONumericModel::commitControlValueToDbColumn( bool /*_bPostReset*/ )
-{
- Any aControlValue( m_xAggregateFastSet->getFastPropertyValue( getValuePropertyAggHandle() ) );
- if ( !compare( aControlValue, m_aSaveValue ) )
- {
- if ( !aControlValue.hasValue() )
- m_xColumnUpdate->updateNull();
- else
- {
- try
- {
- m_xColumnUpdate->updateDouble( getDouble( aControlValue ) );
- }
- catch(Exception&)
- {
- return sal_False;
- }
- }
- m_aSaveValue = aControlValue;
- }
- return sal_True;
-}
-
-//------------------------------------------------------------------------------
-Any ONumericModel::translateDbColumnToControlValue()
-{
- m_aSaveValue <<= (double)m_xColumn->getDouble();
- if ( m_xColumn->wasNull() )
- m_aSaveValue.clear();
-
- return m_aSaveValue;
-}
-
-//------------------------------------------------------------------------------
-Any ONumericModel::getDefaultForReset() const
-{
- Any aValue;
- if (m_aDefault.getValueType().getTypeClass() == TypeClass_DOUBLE)
- aValue = m_aDefault;
-
- return aValue;
-}
-
-//------------------------------------------------------------------------------
-void ONumericModel::resetNoBroadcast()
-{
- OEditBaseModel::resetNoBroadcast();
- m_aSaveValue.clear();
-}
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Numeric.hxx b/forms/source/component/Numeric.hxx
deleted file mode 100644
index f87cf9008..000000000
--- a/forms/source/component/Numeric.hxx
+++ /dev/null
@@ -1,101 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FORMS_NUMERIC_HXX_
-#define _FORMS_NUMERIC_HXX_
-
-#include "EditBase.hxx"
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
-//==================================================================
-//= ONumericModel
-//==================================================================
-class ONumericModel
- :public OEditBaseModel
-{
-private:
- ::com::sun::star::uno::Any m_aSaveValue;
-protected:
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
-public:
- DECLARE_DEFAULT_LEAF_XTOR( ONumericModel );
-
- // ::com::sun::star::lang::XServiceInfo
- IMPLEMENTATION_NAME(ONumericModel);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw();
-
- // ::com::sun::star::io::XPersistObject
- virtual ::rtl::OUString SAL_CALL getServiceName() throw ( ::com::sun::star::uno::RuntimeException);
-
- // OControlModel's property handling
- virtual void describeFixedProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
-
-protected:
- // OBoundControlModel overridables
- virtual ::com::sun::star::uno::Any
- translateDbColumnToControlValue( );
- virtual sal_Bool commitControlValueToDbColumn( bool _bPostReset );
-
- virtual ::com::sun::star::uno::Any
- getDefaultForReset() const;
- virtual void resetNoBroadcast();
-
-protected:
- DECLARE_XCLONEABLE();
-};
-
-//==================================================================
-//= ONumericControl
-//==================================================================
-class ONumericControl: public OBoundControl
-{
-protected:
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
-public:
- ONumericControl(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory);
-
- // ::com::sun::star::lang::XServiceInfo
- IMPLEMENTATION_NAME(ONumericControl);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw();
-};
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-#endif // _FORMS_NUMERIC_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Pattern.cxx b/forms/source/component/Pattern.cxx
deleted file mode 100644
index b600553db..000000000
--- a/forms/source/component/Pattern.cxx
+++ /dev/null
@@ -1,264 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-
-#include "Pattern.hxx"
-
-/** === begin UNO includes === **/
-/** === end UNO includes === **/
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
- /** === begin UNO using === **/
- using ::com::sun::star::uno::Reference;
- using ::com::sun::star::lang::XMultiServiceFactory;
- using ::com::sun::star::uno::Sequence;
- using ::com::sun::star::uno::Type;
- using ::com::sun::star::beans::Property;
- using ::com::sun::star::uno::Exception;
- using ::com::sun::star::uno::XInterface;
- using ::com::sun::star::uno::Any;
- using ::com::sun::star::uno::makeAny;
- using ::com::sun::star::sdbc::XRowSet;
- using ::com::sun::star::uno::UNO_QUERY;
- /** === end UNO using === **/
- namespace FormComponentType = ::com::sun::star::form::FormComponentType;
-
-//==================================================================
-// OPatternControl
-//==================================================================
-//------------------------------------------------------------------
-OPatternControl::OPatternControl(const Reference<XMultiServiceFactory>& _rxFactory)
- :OBoundControl(_rxFactory, VCL_CONTROL_PATTERNFIELD)
-{
-}
-
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OPatternControl_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new OPatternControl(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> OPatternControl::_getTypes()
-{
- return OBoundControl::_getTypes();
-}
-
-//------------------------------------------------------------------------------
-StringSequence OPatternControl::getSupportedServiceNames() throw()
-{
- StringSequence aSupported = OBoundControl::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 1);
-
- ::rtl::OUString*pArray = aSupported.getArray();
- pArray[aSupported.getLength()-1] = FRM_SUN_CONTROL_PATTERNFIELD;
- return aSupported;
-}
-
-//==================================================================
-// OPatternModel
-//==================================================================
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OPatternModel_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new OPatternModel(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> OPatternModel::_getTypes()
-{
- return OEditBaseModel::_getTypes();
-}
-
-//------------------------------------------------------------------
-DBG_NAME( OPatternModel )
-//------------------------------------------------------------------
-OPatternModel::OPatternModel(const Reference<XMultiServiceFactory>& _rxFactory)
- :OEditBaseModel( _rxFactory, VCL_CONTROLMODEL_PATTERNFIELD, FRM_SUN_CONTROL_PATTERNFIELD, sal_False, sal_False )
- // use the old control name for compytibility reasons
-{
- DBG_CTOR( OPatternModel, NULL );
-
- m_nClassId = FormComponentType::PATTERNFIELD;
- initValueProperty( PROPERTY_TEXT, PROPERTY_ID_TEXT );
-}
-
-//------------------------------------------------------------------
-OPatternModel::OPatternModel( const OPatternModel* _pOriginal, const Reference<XMultiServiceFactory>& _rxFactory )
- :OEditBaseModel( _pOriginal, _rxFactory )
-{
- DBG_CTOR( OPatternModel, NULL );
-}
-
-//------------------------------------------------------------------
-OPatternModel::~OPatternModel()
-{
- DBG_DTOR( OPatternModel, NULL );
-}
-
-// XCloneable
-//------------------------------------------------------------------------------
-IMPLEMENT_DEFAULT_CLONING( OPatternModel )
-
-// XServiceInfo
-//------------------------------------------------------------------------------
-StringSequence SAL_CALL OPatternModel::getSupportedServiceNames() throw()
-{
- StringSequence aSupported = OBoundControlModel::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 2);
-
- ::rtl::OUString*pArray = aSupported.getArray();
- pArray[aSupported.getLength()-2] = FRM_SUN_COMPONENT_DATABASE_PATTERNFIELD;
- pArray[aSupported.getLength()-1] = FRM_SUN_COMPONENT_PATTERNFIELD;
- return aSupported;
-}
-
-
-//------------------------------------------------------------------------------
-void OPatternModel::describeFixedProperties( Sequence< Property >& _rProps ) const
-{
- BEGIN_DESCRIBE_PROPERTIES( 4, OEditBaseModel )
- DECL_PROP2(DEFAULT_TEXT, ::rtl::OUString, BOUND, MAYBEDEFAULT);
- DECL_BOOL_PROP1(EMPTY_IS_NULL, BOUND);
- DECL_PROP1(TABINDEX, sal_Int16, BOUND);
- DECL_PROP2(FILTERPROPOSAL, sal_Bool, BOUND, MAYBEDEFAULT);
- END_DESCRIBE_PROPERTIES();
-}
-
-//------------------------------------------------------------------------------
-::rtl::OUString SAL_CALL OPatternModel::getServiceName() throw ( ::com::sun::star::uno::RuntimeException)
-{
- return FRM_COMPONENT_PATTERNFIELD; // old (non-sun) name for compatibility !
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OPatternModel::commitControlValueToDbColumn( bool /*_bPostReset*/ )
-{
- Any aNewValue( m_xAggregateFastSet->getFastPropertyValue( getValuePropertyAggHandle() ) );
-
- if ( aNewValue != m_aLastKnownValue )
- {
- ::rtl::OUString sNewValue;
- aNewValue >>= sNewValue;
-
- if ( !aNewValue.hasValue()
- || ( !sNewValue.getLength() // an empty string
- && m_bEmptyIsNull // which should be interpreted as NULL
- )
- )
- {
- m_xColumnUpdate->updateNull();
- }
- else
- {
- OSL_ENSURE( m_pFormattedValue.get(), "OPatternModel::commitControlValueToDbColumn: no value helper!" );
- if ( !m_pFormattedValue.get() )
- return sal_False;
-
- if ( !m_pFormattedValue->setFormattedValue( sNewValue ) )
- return sal_False;
- }
-
- m_aLastKnownValue = aNewValue;
- }
-
- return sal_True;
-}
-
-//------------------------------------------------------------------------------
-void OPatternModel::onConnectedDbColumn( const Reference< XInterface >& _rxForm )
-{
- OEditBaseModel::onConnectedDbColumn( _rxForm );
-
- Reference< XPropertySet > xField( getField() );
- if ( !xField.is() )
- return;
-
- m_pFormattedValue.reset( new ::dbtools::FormattedColumnValue( getContext(), Reference< XRowSet >( _rxForm, UNO_QUERY ), xField ) );
-}
-
-//------------------------------------------------------------------------------
-void OPatternModel::onDisconnectedDbColumn()
-{
- OEditBaseModel::onDisconnectedDbColumn();
- m_pFormattedValue.reset();
-}
-
-// XPropertyChangeListener
-//------------------------------------------------------------------------------
-Any OPatternModel::translateDbColumnToControlValue()
-{
- OSL_PRECOND( m_pFormattedValue.get(), "OPatternModel::translateDbColumnToControlValue: no value helper!" );
-
- if ( m_pFormattedValue.get() )
- {
- ::rtl::OUString sValue( m_pFormattedValue->getFormattedValue() );
- if ( !sValue.getLength()
- && m_pFormattedValue->getColumn().is()
- && m_pFormattedValue->getColumn()->wasNull()
- )
- {
- m_aLastKnownValue.clear();
- }
- else
- {
- m_aLastKnownValue <<= sValue;
- }
- }
- else
- m_aLastKnownValue.clear();
-
- return m_aLastKnownValue.hasValue() ? m_aLastKnownValue : makeAny( ::rtl::OUString() );
- // (m_aLastKnownValue is alllowed to be VOID, the control value isn't)
-}
-
-// XReset
-//------------------------------------------------------------------------------
-Any OPatternModel::getDefaultForReset() const
-{
- return makeAny( m_aDefaultText );
-}
-
-//------------------------------------------------------------------------------
-void OPatternModel::resetNoBroadcast()
-{
- OEditBaseModel::resetNoBroadcast();
- m_aLastKnownValue.clear();
-}
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Pattern.hxx b/forms/source/component/Pattern.hxx
deleted file mode 100644
index d4d09a338..000000000
--- a/forms/source/component/Pattern.hxx
+++ /dev/null
@@ -1,110 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FORMS_PATTERN_HXX_
-#define _FORMS_PATTERN_HXX_
-
-#include "EditBase.hxx"
-
-#include <connectivity/formattedcolumnvalue.hxx>
-
-#include <memory>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
-//==================================================================
-//= OPatternModel
-//==================================================================
-class OPatternModel
- :public OEditBaseModel
-{
-private:
- ::com::sun::star::uno::Any m_aLastKnownValue;
- ::std::auto_ptr< ::dbtools::FormattedColumnValue >
- m_pFormattedValue;
-
-protected:
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
-public:
- DECLARE_DEFAULT_LEAF_XTOR( OPatternModel );
-
- // ::com::sun::star::lang::XServiceInfo
- IMPLEMENTATION_NAME(OPatternModel);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw();
-
- // ::com::sun::star::io::XPersistObject
- virtual ::rtl::OUString SAL_CALL getServiceName() throw ( ::com::sun::star::uno::RuntimeException);
-
- // OControlModel's property handling
- virtual void describeFixedProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
-
-protected:
- // OBoundControlModel overridables
- virtual ::com::sun::star::uno::Any
- translateDbColumnToControlValue( );
- virtual sal_Bool commitControlValueToDbColumn( bool _bPostReset );
- virtual void onConnectedDbColumn( const ::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >& _rxForm );
- virtual void onDisconnectedDbColumn();
-
- virtual ::com::sun::star::uno::Any
- getDefaultForReset() const;
- virtual void resetNoBroadcast();
-
-protected:
- DECLARE_XCLONEABLE();
-};
-
-//==================================================================
-//= OPatternControl
-//==================================================================
-class OPatternControl: public OBoundControl
-{
-protected:
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
-public:
- OPatternControl(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory);
-
- // ::com::sun::star::lang::XServiceInfo
- IMPLEMENTATION_NAME(OPatternControl);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw();
-};
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-#endif // _FORMS_PATTERN_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/RadioButton.cxx b/forms/source/component/RadioButton.cxx
deleted file mode 100644
index 1ff0a11a8..000000000
--- a/forms/source/component/RadioButton.cxx
+++ /dev/null
@@ -1,438 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "RadioButton.hxx"
-#include "GroupManager.hxx"
-#include "property.hxx"
-#include "property.hrc"
-#include "services.hxx"
-#include <tools/debug.hxx>
-#include <comphelper/extract.hxx>
-#include <comphelper/basicio.hxx>
-#include <com/sun/star/container/XIndexAccess.hpp>
-#include <com/sun/star/awt/XVclWindowPeer.hpp>
-
-//.........................................................................
-namespace frm
-{
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::sdb;
-using namespace ::com::sun::star::sdbc;
-using namespace ::com::sun::star::sdbcx;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::io;
-using namespace ::com::sun::star::lang;
-using namespace ::com::sun::star::util;
-using namespace ::com::sun::star::form::binding;
-
-//==================================================================
-//------------------------------------------------------------------------------
-InterfaceRef SAL_CALL ORadioButtonControl_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory) throw (RuntimeException)
-{
- return *(new ORadioButtonControl(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-StringSequence SAL_CALL ORadioButtonControl::getSupportedServiceNames() throw(RuntimeException)
-{
- StringSequence aSupported = OBoundControl::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 1);
-
- ::rtl::OUString* pArray = aSupported.getArray();
- pArray[aSupported.getLength()-1] = FRM_SUN_CONTROL_RADIOBUTTON;
- return aSupported;
-}
-
-
-//------------------------------------------------------------------
-ORadioButtonControl::ORadioButtonControl(const Reference<XMultiServiceFactory>& _rxFactory)
- :OBoundControl(_rxFactory, VCL_CONTROL_RADIOBUTTON)
-{
-}
-
-//------------------------------------------------------------------
-void SAL_CALL ORadioButtonControl::createPeer(const Reference<starawt::XToolkit>& _rxToolkit, const Reference<starawt::XWindowPeer>& _rxParent) throw (RuntimeException)
-{
- OBoundControl::createPeer(_rxToolkit, _rxParent);
-
- // switch off the auto-toggle, we do this ourself ....
- // (formerly this switch-off was done in the toolkit - but the correct place is here ...)
-// Reference< XVclWindowPeer > xVclWindowPeer( getPeer(), UNO_QUERY );
-// if (xVclWindowPeer.is())
-// xVclWindowPeer->setProperty(::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("AutoToggle")), ::cppu::bool2any(sal_False));
- // new order: do _not_ switch off the auto toggle because:
- // * today, it is not necessary anymore to handle the toggling ourself (everything works fine without it)
- // * without auto toggle, the AccessibleEvents as fired by the radio buttons are
- // a. newly checked button: "unchecked"->"checked"
- // b. previously checked button: "checked"->"unchecked"
- // This is deadly for AT-tools, which then get the "unchecked" event _immediately_ after the "checked" event,
- // and only read the latter. This makes radio buttons pretty unusable in form documents.
- // So we switched AutoToggle _on_, again, because then VCL can handle the notifications, and will send
- // them in the proper order.
-}
-
-//==================================================================
-InterfaceRef SAL_CALL ORadioButtonModel_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory) throw (RuntimeException)
-{
- return *(new ORadioButtonModel(_rxFactory));
-}
-
-//------------------------------------------------------------------
-DBG_NAME( ORadioButtonModel )
-//------------------------------------------------------------------
-ORadioButtonModel::ORadioButtonModel(const Reference<XMultiServiceFactory>& _rxFactory)
- :OReferenceValueComponent( _rxFactory, VCL_CONTROLMODEL_RADIOBUTTON, FRM_SUN_CONTROL_RADIOBUTTON,sal_True )
- // use the old control name for compytibility reasons
-{
- DBG_CTOR( ORadioButtonModel, NULL );
-
- m_nClassId = FormComponentType::RADIOBUTTON;
- m_aLabelServiceName = FRM_SUN_COMPONENT_GROUPBOX;
- initValueProperty( PROPERTY_STATE, PROPERTY_ID_STATE );
- startAggregatePropertyListening( PROPERTY_GROUP_NAME );
-}
-
-//------------------------------------------------------------------
-ORadioButtonModel::ORadioButtonModel( const ORadioButtonModel* _pOriginal, const Reference<XMultiServiceFactory>& _rxFactory )
- :OReferenceValueComponent( _pOriginal, _rxFactory )
-{
- DBG_CTOR( ORadioButtonModel, NULL );
-}
-
-//------------------------------------------------------------------------------
-ORadioButtonModel::~ORadioButtonModel()
-{
- DBG_DTOR( ORadioButtonModel, NULL );
-}
-
-// XCloneable
-//------------------------------------------------------------------------------
-IMPLEMENT_DEFAULT_CLONING( ORadioButtonModel )
-
-// XServiceInfo
-//------------------------------------------------------------------------------
-StringSequence SAL_CALL ORadioButtonModel::getSupportedServiceNames() throw(RuntimeException)
-{
- StringSequence aSupported = OReferenceValueComponent::getSupportedServiceNames();
-
- sal_Int32 nOldLen = aSupported.getLength();
- aSupported.realloc( nOldLen + 8 );
- ::rtl::OUString* pStoreTo = aSupported.getArray() + nOldLen;
-
- *pStoreTo++ = BINDABLE_CONTROL_MODEL;
- *pStoreTo++ = DATA_AWARE_CONTROL_MODEL;
- *pStoreTo++ = VALIDATABLE_CONTROL_MODEL;
-
- *pStoreTo++ = BINDABLE_DATA_AWARE_CONTROL_MODEL;
- *pStoreTo++ = VALIDATABLE_BINDABLE_CONTROL_MODEL;
-
- *pStoreTo++ = FRM_SUN_COMPONENT_RADIOBUTTON;
- *pStoreTo++ = FRM_SUN_COMPONENT_DATABASE_RADIOBUTTON;
- *pStoreTo++ = BINDABLE_DATABASE_RADIO_BUTTON;
-
- return aSupported;
-}
-
-//------------------------------------------------------------------------------
-void ORadioButtonModel::SetSiblingPropsTo(const ::rtl::OUString& rPropName, const Any& rValue)
-{
- // my name
- ::rtl::OUString sMyGroup;
- if (hasProperty(PROPERTY_GROUP_NAME, this))
- this->getPropertyValue(PROPERTY_GROUP_NAME) >>= sMyGroup;
- if (sMyGroup.getLength() == 0)
- sMyGroup = m_aName;
-
- // meine Siblings durchiterieren
- Reference<XIndexAccess> xIndexAccess(getParent(), UNO_QUERY);
- if (xIndexAccess.is())
- {
- Reference<XPropertySet> xMyProps;
- query_interface(static_cast<XWeak*>(this), xMyProps);
- ::rtl::OUString sCurrentGroup;
- sal_Int32 nNumSiblings = xIndexAccess->getCount();
- for (sal_Int32 i=0; i<nNumSiblings; ++i)
- {
- Reference<XPropertySet> xSiblingProperties(*(InterfaceRef*)xIndexAccess->getByIndex(i).getValue(), UNO_QUERY);
- if (!xSiblingProperties.is())
- continue;
- if (xMyProps == xSiblingProperties)
- continue; // mich selber nicht umsetzen
-
- // nur wenn es ein Radio-Button ist
- if (!hasProperty(PROPERTY_CLASSID, xSiblingProperties))
- continue;
- sal_Int16 nType = 0;
- xSiblingProperties->getPropertyValue(PROPERTY_CLASSID) >>= nType;
- if (nType != FormComponentType::RADIOBUTTON)
- continue;
-
- // das 'zur selben Gruppe gehoeren' wird am Namen festgemacht
- sCurrentGroup = OGroupManager::GetGroupName( xSiblingProperties );
- if (sCurrentGroup == sMyGroup)
- xSiblingProperties->setPropertyValue(rPropName, rValue);
- }
- }
-}
-
-//------------------------------------------------------------------------------
-void ORadioButtonModel::setFastPropertyValue_NoBroadcast(sal_Int32 nHandle, const Any& rValue) throw (Exception)
-{
- OReferenceValueComponent::setFastPropertyValue_NoBroadcast( nHandle, rValue );
-
- // if the label control changed ...
- if (nHandle == PROPERTY_ID_CONTROLLABEL)
- { // ... forward this to our siblings
- SetSiblingPropsTo(PROPERTY_CONTROLLABEL, rValue);
- }
-
- // wenn sich die ControlSource-Eigenschaft geaendert hat ...
- if (nHandle == PROPERTY_ID_CONTROLSOURCE)
- { // ... muss ich allen meinen Siblings, die in der selben RadioButton-Gruppe sind wie ich, auch die
- // neue ControlSource mitgeben
- SetSiblingPropsTo(PROPERTY_CONTROLSOURCE, rValue);
- }
-
- // die andere Richtung : wenn sich mein Name aendert ...
- if (nHandle == PROPERTY_ID_NAME)
- {
- setControlSource();
- }
-
- if (nHandle == PROPERTY_ID_DEFAULT_STATE)
- {
- sal_Int16 nValue;
- rValue >>= nValue;
- if (1 == nValue)
- { // bei allen Radios der selben Gruppe das 'default checked' ruecksetzen, denn wie schon der highlander wusste :
- // es kann nur einen geben.
- Any aZero;
- nValue = 0;
- aZero <<= nValue;
- SetSiblingPropsTo(PROPERTY_DEFAULT_STATE, aZero);
- }
- }
-}
-
-void ORadioButtonModel::setControlSource()
-{
- Reference<XIndexAccess> xIndexAccess(getParent(), UNO_QUERY);
- if (xIndexAccess.is())
- {
- ::rtl::OUString sName, sGroupName;
-
- if (hasProperty(PROPERTY_GROUP_NAME, this))
- this->getPropertyValue(PROPERTY_GROUP_NAME) >>= sGroupName;
- this->getPropertyValue(PROPERTY_NAME) >>= sName;
-
- Reference<XPropertySet> xMyProps;
- query_interface(static_cast<XWeak*>(this), xMyProps);
- for (sal_Int32 i=0; i<xIndexAccess->getCount(); ++i)
- {
- Reference<XPropertySet> xSiblingProperties(*(InterfaceRef*)xIndexAccess->getByIndex(i).getValue(), UNO_QUERY);
- if (!xSiblingProperties.is())
- continue;
-
- if (xMyProps == xSiblingProperties)
- // nur wenn ich nicht mich selber gefunden habe
- continue;
-
- sal_Int16 nType = 0;
- xSiblingProperties->getPropertyValue(PROPERTY_CLASSID) >>= nType;
- if (nType != FormComponentType::RADIOBUTTON)
- // nur Radio-Buttons
- continue;
-
- ::rtl::OUString sSiblingName, sSiblingGroupName;
- if (hasProperty(PROPERTY_GROUP_NAME, xSiblingProperties))
- xSiblingProperties->getPropertyValue(PROPERTY_GROUP_NAME) >>= sSiblingGroupName;
- xSiblingProperties->getPropertyValue(PROPERTY_NAME) >>= sSiblingName;
-
- if ((sGroupName.getLength() == 0 && sSiblingGroupName.getLength() == 0 && // (no group name
- sName == sSiblingName) || // names match) or
- (sGroupName.getLength() != 0 && sSiblingGroupName.getLength() != 0 && // (have group name
- sGroupName == sSiblingGroupName)) // they match)
- {
- setPropertyValue(PROPERTY_CONTROLSOURCE, xSiblingProperties->getPropertyValue(PROPERTY_CONTROLSOURCE));
- break;
- }
- }
- }
-}
-
-//------------------------------------------------------------------------------
-void ORadioButtonModel::describeFixedProperties( Sequence< Property >& _rProps ) const
-{
- BEGIN_DESCRIBE_PROPERTIES( 1, OReferenceValueComponent )
- DECL_PROP1(TABINDEX, sal_Int16, BOUND);
- END_DESCRIBE_PROPERTIES();
-}
-
-//------------------------------------------------------------------------------
-::rtl::OUString SAL_CALL ORadioButtonModel::getServiceName() throw(RuntimeException)
-{
- return FRM_COMPONENT_RADIOBUTTON; // old (non-sun) name for compatibility !
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ORadioButtonModel::write(const Reference<XObjectOutputStream>& _rxOutStream)
- throw(IOException, RuntimeException)
-{
- OReferenceValueComponent::write(_rxOutStream);
-
- // Version
- _rxOutStream->writeShort(0x0003);
-
- // Properties
- _rxOutStream << getReferenceValue();
- _rxOutStream << (sal_Int16)getDefaultChecked();
- writeHelpTextCompatibly(_rxOutStream);
-
- // from version 0x0003 : common properties
- writeCommonProperties(_rxOutStream);
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL ORadioButtonModel::read(const Reference<XObjectInputStream>& _rxInStream) throw(IOException, RuntimeException)
-{
- OReferenceValueComponent::read(_rxInStream);
- ::osl::MutexGuard aGuard(m_aMutex);
-
- // Version
- sal_uInt16 nVersion = _rxInStream->readShort();
-
- ::rtl::OUString sReferenceValue;
- sal_Int16 nDefaultChecked( 0 );
- switch (nVersion)
- {
- case 0x0001 :
- _rxInStream >> sReferenceValue;
- _rxInStream >> nDefaultChecked;
- break;
- case 0x0002 :
- _rxInStream >> sReferenceValue;
- _rxInStream >> nDefaultChecked;
- readHelpTextCompatibly(_rxInStream);
- break;
- case 0x0003 :
- _rxInStream >> sReferenceValue;
- _rxInStream >> nDefaultChecked;
- readHelpTextCompatibly(_rxInStream);
- readCommonProperties(_rxInStream);
- break;
- default :
- OSL_FAIL("ORadioButtonModel::read : unknown version !");
- defaultCommonProperties();
- break;
- }
-
- setReferenceValue( sReferenceValue );
- setDefaultChecked( (ToggleState)nDefaultChecked );
-
- // Nach dem Lesen die Defaultwerte anzeigen
- if ( getControlSource().getLength() )
- // (not if we don't have a control source - the "State" property acts like it is persistent, then
- resetNoBroadcast();
-}
-
-//------------------------------------------------------------------------------
-void ORadioButtonModel::_propertyChanged(const PropertyChangeEvent& _rEvent) throw(RuntimeException)
-{
- if ( _rEvent.PropertyName.equals( PROPERTY_STATE ) )
- {
- if ( _rEvent.NewValue == (sal_Int16)1 )
- {
- // wenn sich mein Status auf 'checked' geaendert hat, muss ich alle meine Siblings, die in der selben Gruppe
- // sind wie ich, entsprechend zuruecksetzen
- Any aZero;
- aZero <<= (sal_Int16)0;
- SetSiblingPropsTo( PROPERTY_STATE, aZero );
- }
- }
- else if ( _rEvent.PropertyName.equals( PROPERTY_GROUP_NAME ) )
- {
- setControlSource();
- // Can't call OReferenceValueComponent::_propertyChanged(), as it
- // doesn't know what to do with the GroupName property.
- return;
- }
-
- OReferenceValueComponent::_propertyChanged( _rEvent );
-}
-
-//------------------------------------------------------------------------------
-Any ORadioButtonModel::translateDbColumnToControlValue()
-{
- return makeAny( (sal_Int16)
- ( ( m_xColumn->getString() == getReferenceValue() ) ? STATE_CHECK : STATE_NOCHECK )
- );
-}
-
-//------------------------------------------------------------------------------
-Any ORadioButtonModel::translateExternalValueToControlValue( const Any& _rExternalValue ) const
-{
- Any aControlValue = OReferenceValueComponent::translateExternalValueToControlValue( _rExternalValue );
- sal_Int16 nState = STATE_NOCHECK;
- if ( ( aControlValue >>= nState ) && ( nState == STATE_DONTKNOW ) )
- // radio buttons do not have the DONTKNOW state
- aControlValue <<= (sal_Int16)STATE_NOCHECK;
- return aControlValue;
-}
-
-//-----------------------------------------------------------------------------
-sal_Bool ORadioButtonModel::commitControlValueToDbColumn( bool /*_bPostReset*/ )
-{
- Reference< XPropertySet > xField( getField() );
- OSL_PRECOND( xField.is(), "ORadioButtonModel::commitControlValueToDbColumn: not bound!" );
- if ( xField.is() )
- {
- try
- {
- sal_Int16 nValue = 0;
- m_xAggregateSet->getPropertyValue( PROPERTY_STATE ) >>= nValue;
- if ( nValue == 1 )
- xField->setPropertyValue( PROPERTY_VALUE, makeAny( getReferenceValue() ) );
- }
- catch(Exception&)
- {
- OSL_FAIL("ORadioButtonModel::commitControlValueToDbColumn: could not commit !");
- }
- }
- return sal_True;
-}
-
-//.........................................................................
-}
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/RadioButton.hxx b/forms/source/component/RadioButton.hxx
deleted file mode 100644
index d562152ed..000000000
--- a/forms/source/component/RadioButton.hxx
+++ /dev/null
@@ -1,115 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FORMS_RADIOBUTTON_HXX_
-#define _FORMS_RADIOBUTTON_HXX_
-
-#include "refvaluecomponent.hxx"
-
-//.........................................................................
-namespace frm
-{
-
-//==================================================================
-// ORadioButtonModel
-//==================================================================
-class ORadioButtonModel :public OReferenceValueComponent
-{
-public:
- DECLARE_DEFAULT_LEAF_XTOR( ORadioButtonModel );
-
- // XServiceInfo
- IMPLEMENTATION_NAME(ORadioButtonModel);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException);
-
- // OPropertySetHelper
- virtual void SAL_CALL setFastPropertyValue_NoBroadcast( sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue )
- throw (::com::sun::star::uno::Exception);
-
- // XPersistObject
- virtual ::rtl::OUString SAL_CALL getServiceName() throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL
- write(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectOutputStream>& _rxOutStream) throw(::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL
- read(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectInputStream>& _rxInStream) throw(::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
-
- // OPropertyChangeListener
- virtual void _propertyChanged(const ::com::sun::star::beans::PropertyChangeEvent& evt) throw(::com::sun::star::uno::RuntimeException);
-
- // OControlModel's property handling
- virtual void describeFixedProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
-
-protected:
- // OBoundControlModel overridables
- virtual ::com::sun::star::uno::Any
- translateDbColumnToControlValue( );
- virtual sal_Bool commitControlValueToDbColumn( bool _bPostReset );
- virtual ::com::sun::star::uno::Any
- translateExternalValueToControlValue( const ::com::sun::star::uno::Any& _rExternalValue ) const;
-
-protected:
- void SetSiblingPropsTo(const ::rtl::OUString& rPropName, const ::com::sun::star::uno::Any& rValue);
-
- DECLARE_XCLONEABLE( );
-
-private:
- /** sets the given value as new State at the aggregate
- @precond
- our mutex is aquired exactly once
- */
- void setNewAggregateState( const ::com::sun::star::uno::Any& _rValue );
-
- void setControlSource();
-};
-
-//==================================================================
-// ORadioButtonControl
-//==================================================================
-class ORadioButtonControl: public OBoundControl
-{
-public:
- ORadioButtonControl(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory);
-
- // XServiceInfo
- IMPLEMENTATION_NAME(ORadioButtonControl);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException);
-
-protected:
- // XControl
- virtual void SAL_CALL createPeer(const ::com::sun::star::uno::Reference<starawt::XToolkit>& Toolkit, const ::com::sun::star::uno::Reference<starawt::XWindowPeer>& Parent) throw (::com::sun::star::uno::RuntimeException);
-};
-
-//.........................................................................
-}
-//.........................................................................
-
-#endif // _FORMS_RADIOBUTTON_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Time.cxx b/forms/source/component/Time.cxx
deleted file mode 100644
index 5918dd201..000000000
--- a/forms/source/component/Time.cxx
+++ /dev/null
@@ -1,367 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "Time.hxx"
-#include <tools/debug.hxx>
-#include <tools/time.hxx>
-#include <connectivity/dbconversion.hxx>
-#include <com/sun/star/sdbc/DataType.hpp>
-
-using namespace dbtools;
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
-using namespace ::com::sun::star;
-using namespace ::com::sun::star::uno;
-using namespace ::com::sun::star::sdb;
-using namespace ::com::sun::star::sdbc;
-using namespace ::com::sun::star::sdbcx;
-using namespace ::com::sun::star::beans;
-using namespace ::com::sun::star::container;
-using namespace ::com::sun::star::form;
-using namespace ::com::sun::star::util;
-using namespace ::com::sun::star::awt;
-using namespace ::com::sun::star::io;
-using namespace ::com::sun::star::lang;
-
-//==================================================================
-//=
-//==================================================================
-
-//==================================================================
-//= OTimeControl
-//==================================================================
-//------------------------------------------------------------------
-OTimeControl::OTimeControl(const Reference<XMultiServiceFactory>& _rxFactory)
- :OBoundControl(_rxFactory, VCL_CONTROL_TIMEFIELD)
-{
-}
-
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OTimeControl_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new OTimeControl(_rxFactory));
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> OTimeControl::_getTypes()
-{
- return OBoundControl::_getTypes();
-}
-
-//------------------------------------------------------------------------------
-StringSequence SAL_CALL OTimeControl::getSupportedServiceNames() throw()
-{
- StringSequence aSupported = OBoundControl::getSupportedServiceNames();
- aSupported.realloc(aSupported.getLength() + 1);
-
- ::rtl::OUString*pArray = aSupported.getArray();
- pArray[aSupported.getLength()-1] = FRM_SUN_CONTROL_TIMEFIELD;
- return aSupported;
-}
-
-//==================================================================
-//= OTimeModel
-//==================================================================
-//------------------------------------------------------------------
-InterfaceRef SAL_CALL OTimeModel_CreateInstance(const Reference<XMultiServiceFactory>& _rxFactory)
-{
- return *(new OTimeModel(_rxFactory));
-}
-
-// XServiceInfo
-//------------------------------------------------------------------------------
-StringSequence SAL_CALL OTimeModel::getSupportedServiceNames() throw()
-{
- StringSequence aSupported = OBoundControlModel::getSupportedServiceNames();
-
- sal_Int32 nOldLen = aSupported.getLength();
- aSupported.realloc( nOldLen + 8 );
- ::rtl::OUString* pStoreTo = aSupported.getArray() + nOldLen;
-
- *pStoreTo++ = BINDABLE_CONTROL_MODEL;
- *pStoreTo++ = DATA_AWARE_CONTROL_MODEL;
- *pStoreTo++ = VALIDATABLE_CONTROL_MODEL;
-
- *pStoreTo++ = BINDABLE_DATA_AWARE_CONTROL_MODEL;
- *pStoreTo++ = VALIDATABLE_BINDABLE_CONTROL_MODEL;
-
- *pStoreTo++ = FRM_SUN_COMPONENT_TIMEFIELD;
- *pStoreTo++ = FRM_SUN_COMPONENT_DATABASE_TIMEFIELD;
- *pStoreTo++ = BINDABLE_DATABASE_TIME_FIELD;
-
- return aSupported;
-}
-
-//------------------------------------------------------------------------------
-Sequence<Type> OTimeModel::_getTypes()
-{
- return OBoundControlModel::_getTypes();
-}
-
-//------------------------------------------------------------------
-DBG_NAME( OTimeModel )
-//------------------------------------------------------------------
-OTimeModel::OTimeModel(const Reference<XMultiServiceFactory>& _rxFactory)
- :OEditBaseModel( _rxFactory, VCL_CONTROLMODEL_TIMEFIELD, FRM_SUN_CONTROL_TIMEFIELD, sal_True, sal_True )
- // use the old control name for compytibility reasons
- ,OLimitedFormats(_rxFactory, FormComponentType::TIMEFIELD)
-{
- DBG_CTOR( OTimeModel, NULL );
-
- m_nClassId = FormComponentType::TIMEFIELD;
- initValueProperty( PROPERTY_TIME, PROPERTY_ID_TIME );
-
- setAggregateSet(m_xAggregateFastSet, getOriginalHandle(PROPERTY_ID_TIMEFORMAT));
-}
-
-//------------------------------------------------------------------------------
-OTimeModel::OTimeModel( const OTimeModel* _pOriginal, const Reference<XMultiServiceFactory>& _rxFactory )
- :OEditBaseModel( _pOriginal, _rxFactory )
- ,OLimitedFormats( _rxFactory, FormComponentType::TIMEFIELD )
-{
- DBG_CTOR( OTimeModel, NULL );
-
- setAggregateSet( m_xAggregateFastSet, getOriginalHandle( PROPERTY_ID_TIMEFORMAT ) );
-}
-
-//------------------------------------------------------------------------------
-OTimeModel::~OTimeModel( )
-{
- setAggregateSet(Reference< XFastPropertySet >(), -1);
- DBG_DTOR( OTimeModel, NULL );
-}
-
-// XCloneable
-//------------------------------------------------------------------------------
-IMPLEMENT_DEFAULT_CLONING( OTimeModel )
-
-//------------------------------------------------------------------------------
-::rtl::OUString SAL_CALL OTimeModel::getServiceName() throw ( ::com::sun::star::uno::RuntimeException)
-{
- return FRM_COMPONENT_TIMEFIELD; // old (non-sun) name for compatibility !
-}
-
-// XPropertySet
-//------------------------------------------------------------------------------
-void OTimeModel::describeFixedProperties( Sequence< Property >& _rProps ) const
-{
- BEGIN_DESCRIBE_PROPERTIES( 4, OEditBaseModel )
- DECL_PROP3(DEFAULT_TIME, sal_Int32, BOUND, MAYBEDEFAULT, MAYBEVOID);
- DECL_PROP1(TABINDEX, sal_Int16, BOUND);
- DECL_PROP1(FORMATKEY, sal_Int32, TRANSIENT);
- DECL_IFACE_PROP2(FORMATSSUPPLIER, XNumberFormatsSupplier, READONLY, TRANSIENT);
- END_DESCRIBE_PROPERTIES();
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OTimeModel::getFastPropertyValue(Any& _rValue, sal_Int32 _nHandle ) const
-{
- switch (_nHandle)
- {
- case PROPERTY_ID_FORMATKEY:
- getFormatKeyPropertyValue(_rValue);
- break;
- case PROPERTY_ID_FORMATSSUPPLIER:
- _rValue <<= getFormatsSupplier();
- break;
- default:
- OEditBaseModel::getFastPropertyValue(_rValue, _nHandle);
- break;
- }
-}
-
-//------------------------------------------------------------------------------
-sal_Bool SAL_CALL OTimeModel::convertFastPropertyValue(Any& _rConvertedValue, Any& _rOldValue,
- sal_Int32 _nHandle, const Any& _rValue ) throw(IllegalArgumentException)
-{
- if (PROPERTY_ID_FORMATKEY == _nHandle)
- return convertFormatKeyPropertyValue(_rConvertedValue, _rOldValue, _rValue);
- else
- return OEditBaseModel::convertFastPropertyValue(_rConvertedValue, _rOldValue, _nHandle, _rValue );
-}
-
-//------------------------------------------------------------------------------
-void SAL_CALL OTimeModel::setFastPropertyValue_NoBroadcast(sal_Int32 _nHandle, const Any& _rValue) throw ( ::com::sun::star::uno::Exception)
-{
- if (PROPERTY_ID_FORMATKEY == _nHandle)
- setFormatKeyPropertyValue(_rValue);
- else
- OEditBaseModel::setFastPropertyValue_NoBroadcast(_nHandle, _rValue);
-}
-
-// XLoadListener
-//------------------------------------------------------------------------------
-void OTimeModel::onConnectedDbColumn( const Reference< XInterface >& _rxForm )
-{
- OBoundControlModel::onConnectedDbColumn( _rxForm );
- Reference<XPropertySet> xField = getField();
- if (xField.is())
- {
- m_bDateTimeField = sal_False;
- try
- {
- sal_Int32 nFieldType = 0;
- xField->getPropertyValue(PROPERTY_FIELDTYPE) >>= nFieldType;
- m_bDateTimeField = (nFieldType == DataType::TIMESTAMP);
- }
- catch(Exception&)
- {
- }
- }
-}
-
-//------------------------------------------------------------------------------
-sal_Bool OTimeModel::commitControlValueToDbColumn( bool /*_bPostReset*/ )
-{
- Any aControlValue( m_xAggregateFastSet->getFastPropertyValue( getValuePropertyAggHandle() ) );
- if ( !compare( aControlValue, m_aSaveValue ) )
- {
- if ( !aControlValue.hasValue() )
- m_xColumnUpdate->updateNull();
- else
- {
- try
- {
- util::Time aTime;
- if ( !( aControlValue >>= aTime ) )
- {
- sal_Int32 nAsInt(0);
- aControlValue >>= nAsInt;
- aTime = DBTypeConversion::toTime(nAsInt);
- }
-
- if (!m_bDateTimeField)
- m_xColumnUpdate->updateTime(aTime);
- else
- {
- util::DateTime aDateTime = m_xColumn->getTimestamp();
- aDateTime.HundredthSeconds = aTime.HundredthSeconds;
- aDateTime.Seconds = aTime.Seconds;
- aDateTime.Minutes = aTime.Minutes;
- aDateTime.Hours = aTime.Hours;
- m_xColumnUpdate->updateTimestamp(aDateTime);
- }
- }
- catch(Exception&)
- {
- return sal_False;
- }
- }
- m_aSaveValue = aControlValue;
- }
- return sal_True;
-}
-
-//------------------------------------------------------------------------------
-void OTimeModel::impl_translateControlValueToUNOTime( Any& _rUNOValue ) const
-{
- _rUNOValue = getControlValue();
- if ( _rUNOValue.hasValue() )
- {
- sal_Int32 nTime = 0;
- OSL_VERIFY( _rUNOValue >>= nTime );
- if ( nTime == ::Time( 99, 99, 99 ).GetTime() )
- // "invalid time" in VCL is different from "invalid time" in UNO
- _rUNOValue.clear();
- else
- _rUNOValue <<= DBTypeConversion::toTime( nTime );
- }
-}
-
-//------------------------------------------------------------------------------
-Any OTimeModel::translateControlValueToExternalValue( ) const
-{
- Any aExternalValue;
- impl_translateControlValueToUNOTime( aExternalValue );
- return aExternalValue;
-}
-
-//------------------------------------------------------------------------------
-Any OTimeModel::translateExternalValueToControlValue( const Any& _rExternalValue ) const
-{
- Any aControlValue;
- if ( _rExternalValue.hasValue() )
- {
- util::Time aTime;
- OSL_VERIFY( _rExternalValue >>= aTime );
- aControlValue <<= DBTypeConversion::toINT32( aTime );
- }
- return aControlValue;
-}
-
-//------------------------------------------------------------------------------
-Any OTimeModel::translateControlValueToValidatableValue( ) const
-{
- Any aValidatableValue;
- impl_translateControlValueToUNOTime( aValidatableValue );
- return aValidatableValue;
-}
-
-//------------------------------------------------------------------------------
-Any OTimeModel::translateDbColumnToControlValue()
-{
- util::Time aTime = m_xColumn->getTime();
- if ( m_xColumn->wasNull() )
- m_aSaveValue.clear();
- else
- // the aggregated set expects an Int32 as value ...
- m_aSaveValue <<= DBTypeConversion::toINT32( aTime );
-
- return m_aSaveValue;
-}
-
-//------------------------------------------------------------------------------
-Any OTimeModel::getDefaultForReset() const
-{
- return m_aDefault;
-}
-
-//------------------------------------------------------------------------------
-void OTimeModel::resetNoBroadcast()
-{
- OEditBaseModel::resetNoBroadcast();
- m_aSaveValue.clear();
-}
-
-//------------------------------------------------------------------------------
-Sequence< Type > OTimeModel::getSupportedBindingTypes()
-{
- return Sequence< Type >( &::getCppuType( static_cast< util::Time* >( NULL ) ), 1 );
-}
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/Time.hxx b/forms/source/component/Time.hxx
deleted file mode 100644
index 5d6a8a66e..000000000
--- a/forms/source/component/Time.hxx
+++ /dev/null
@@ -1,135 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _FORMS_TIME_HXX_
-#define _FORMS_TIME_HXX_
-
-#include "EditBase.hxx"
-#include "limitedformats.hxx"
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
-//==================================================================
-//= OTimeModel
-//==================================================================
-class OTimeModel
- :public OEditBaseModel
- ,public OLimitedFormats
-{
-private:
- ::com::sun::star::uno::Any m_aSaveValue;
- sal_Bool m_bDateTimeField;
-
-protected:
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
-public:
- DECLARE_DEFAULT_LEAF_XTOR( OTimeModel );
-
- // stario::XPersistObject
- virtual ::rtl::OUString SAL_CALL getServiceName() throw ( ::com::sun::star::uno::RuntimeException);
-
- // ::com::sun::star::beans::XPropertySet
- virtual void SAL_CALL getFastPropertyValue(::com::sun::star::uno::Any& rValue, sal_Int32 nHandle ) const;
- virtual sal_Bool SAL_CALL convertFastPropertyValue(::com::sun::star::uno::Any& rConvertedValue, ::com::sun::star::uno::Any& rOldValue,
- sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue )
- throw(::com::sun::star::lang::IllegalArgumentException);
- virtual void SAL_CALL setFastPropertyValue_NoBroadcast(sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue) throw ( ::com::sun::star::uno::Exception);
-
- // ::com::sun::star::lang::XServiceInfo
- IMPLEMENTATION_NAME(OTimeModel);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw();
-
- // OControlModel's property handling
- virtual void describeFixedProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
-
- // prevent method hiding
- using OBoundControlModel::getFastPropertyValue;
-
-protected:
- // OBoundControlModel overridables
- virtual ::com::sun::star::uno::Any
- translateDbColumnToControlValue( );
- virtual sal_Bool commitControlValueToDbColumn( bool _bPostReset );
-
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type >
- getSupportedBindingTypes();
- virtual ::com::sun::star::uno::Any
- translateControlValueToExternalValue( ) const;
- virtual ::com::sun::star::uno::Any
- translateExternalValueToControlValue( const ::com::sun::star::uno::Any& _rExternalValue ) const;
-
- virtual ::com::sun::star::uno::Any
- translateControlValueToValidatableValue( ) const;
-
- virtual ::com::sun::star::uno::Any
- getDefaultForReset() const;
- virtual void resetNoBroadcast();
-
- virtual void onConnectedDbColumn( const ::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >& _rxForm );
-
-protected:
- DECLARE_XCLONEABLE();
-
-private:
- /** translates the control value (the VCL-internal integer representation of a date) into
- a UNO-Date.
- */
- void impl_translateControlValueToUNOTime(
- ::com::sun::star::uno::Any& _rUNOValue ) const;
-};
-
-//==================================================================
-//= OTimeControl
-//==================================================================
-class OTimeControl: public OBoundControl
-{
-protected:
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
-
-public:
- OTimeControl(const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory);
- DECLARE_UNO3_AGG_DEFAULTS(OTimeControl, OBoundControl);
-
- // ::com::sun::star::lang::XServiceInfo
- IMPLEMENTATION_NAME(OTimeControl);
- virtual StringSequence SAL_CALL getSupportedServiceNames() throw();
-};
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-#endif // _FORMS_TIME_HXX_
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/cachedrowset.cxx b/forms/source/component/cachedrowset.cxx
deleted file mode 100644
index 8d4bc6b9e..000000000
--- a/forms/source/component/cachedrowset.cxx
+++ /dev/null
@@ -1,205 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-
-#include "cachedrowset.hxx"
-#include "services.hxx"
-#include "frm_strings.hxx"
-
-/** === begin UNO includes === **/
-#include <com/sun/star/lang/XComponent.hpp>
-#include <com/sun/star/beans/XPropertySet.hpp>
-#include <com/sun/star/sdb/XQueriesSupplier.hpp>
-#include <com/sun/star/sdbc/ResultSetType.hpp>
-/** === end UNO includes === **/
-
-#include <tools/diagnose_ex.h>
-
-//........................................................................
-namespace frm
-{
-//........................................................................
-
- /** === begin UNO using === **/
- using ::com::sun::star::uno::Reference;
- using ::com::sun::star::uno::UNO_QUERY;
- using ::com::sun::star::uno::UNO_QUERY_THROW;
- using ::com::sun::star::uno::UNO_SET_THROW;
- using ::com::sun::star::uno::Exception;
- using ::com::sun::star::uno::RuntimeException;
- using ::com::sun::star::sdbc::XConnection;
- using ::com::sun::star::lang::XComponent;
- using ::com::sun::star::beans::XPropertySet;
- using ::com::sun::star::uno::makeAny;
- using ::com::sun::star::sdbc::SQLException;
- using ::com::sun::star::uno::Any;
- using ::com::sun::star::sdb::XQueriesSupplier;
- using ::com::sun::star::container::XNameAccess;
- using ::com::sun::star::sdbc::XResultSet;
- using ::com::sun::star::sdbc::XStatement;
- /** === end UNO using === **/
- namespace ResultSetType = ::com::sun::star::sdbc::ResultSetType;
-
- //====================================================================
- //= CachedRowSet_Data
- //====================================================================
- struct CachedRowSet_Data
- {
- ::comphelper::ComponentContext aContext;
- ::rtl::OUString sCommand;
- sal_Bool bEscapeProcessing;
- Reference< XConnection > xConnection;
-
- bool bStatementDirty;
-
- CachedRowSet_Data( const ::comphelper::ComponentContext& _rContext )
- :aContext( _rContext )
- ,sCommand()
- ,bEscapeProcessing( sal_False )
- ,xConnection()
- ,bStatementDirty( true )
- {
- }
- };
-
- //====================================================================
- //= CachedRowSet
- //====================================================================
- //--------------------------------------------------------------------
- CachedRowSet::CachedRowSet( const ::comphelper::ComponentContext& _rContext )
- :m_pData( new CachedRowSet_Data( _rContext ) )
- {
- }
-
- //--------------------------------------------------------------------
- CachedRowSet::~CachedRowSet()
- {
- dispose();
- }
-
- //--------------------------------------------------------------------
- void CachedRowSet::setCommand( const ::rtl::OUString& _rCommand )
- {
- if ( m_pData->sCommand == _rCommand )
- return;
-
- m_pData->sCommand = _rCommand;
- m_pData->bStatementDirty = true;
- }
-
- //--------------------------------------------------------------------
- void CachedRowSet::setCommandFromQuery( const ::rtl::OUString& _rQueryName )
- {
- Reference< XQueriesSupplier > xSupplyQueries( m_pData->xConnection, UNO_QUERY_THROW );
- Reference< XNameAccess > xQueries ( xSupplyQueries->getQueries(), UNO_QUERY_THROW );
- Reference< XPropertySet > xQuery ( xQueries->getByName( _rQueryName ), UNO_QUERY_THROW );
-
- sal_Bool bEscapeProcessing( sal_False );
- OSL_VERIFY( xQuery->getPropertyValue( PROPERTY_ESCAPE_PROCESSING ) >>= bEscapeProcessing );
- setEscapeProcessing( bEscapeProcessing );
-
- ::rtl::OUString sCommand;
- OSL_VERIFY( xQuery->getPropertyValue( PROPERTY_COMMAND ) >>= sCommand );
- setCommand( sCommand );
- }
-
- //--------------------------------------------------------------------
- void CachedRowSet::setEscapeProcessing ( const sal_Bool _bEscapeProcessing )
- {
- if ( m_pData->bEscapeProcessing == _bEscapeProcessing )
- return;
-
- m_pData->bEscapeProcessing = _bEscapeProcessing;
- m_pData->bStatementDirty = true;
- }
-
- //--------------------------------------------------------------------
- void CachedRowSet::setConnection( const Reference< XConnection >& _rxConnection )
- {
- if ( m_pData->xConnection == _rxConnection )
- return;
-
- m_pData->xConnection = _rxConnection;
- m_pData->bStatementDirty = true;
- }
-
- //--------------------------------------------------------------------
- Reference< XResultSet > CachedRowSet::execute()
- {
- Reference< XResultSet > xResult;
- try
- {
- OSL_PRECOND( m_pData->xConnection.is(), "CachedRowSet::execute: how am I expected to do this without a connection?" );
- if ( !m_pData->xConnection.is() )
- return xResult;
-
- Reference< XStatement > xStatement( m_pData->xConnection->createStatement(), UNO_SET_THROW );
- Reference< XPropertySet > xStatementProps( xStatement, UNO_QUERY_THROW );
- xStatementProps->setPropertyValue( PROPERTY_ESCAPE_PROCESSING, makeAny( m_pData->bEscapeProcessing ) );
- xStatementProps->setPropertyValue( PROPERTY_RESULTSET_TYPE, makeAny( ResultSetType::FORWARD_ONLY ) );
-
- xResult.set( xStatement->executeQuery( m_pData->sCommand ), UNO_SET_THROW );
- m_pData->bStatementDirty = false;
- }
- catch( const SQLException& )
- {
- throw;
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- return xResult;
- }
-
- //--------------------------------------------------------------------
- bool CachedRowSet::isDirty() const
- {
- return m_pData->bStatementDirty;
- }
-
- //--------------------------------------------------------------------
- void CachedRowSet::dispose()
- {
- try
- {
- m_pData.reset( new CachedRowSet_Data( m_pData->aContext ) );
- }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- }
-
-//........................................................................
-} // namespace frm
-//........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/cachedrowset.hxx b/forms/source/component/cachedrowset.hxx
deleted file mode 100644
index 09f325091..000000000
--- a/forms/source/component/cachedrowset.hxx
+++ /dev/null
@@ -1,100 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef CACHEDROWSET_HXX
-#define CACHEDROWSET_HXX
-
-/** === begin UNO includes === **/
-#include <com/sun/star/sdbc/XResultSet.hpp>
-#include <com/sun/star/sdbc/XConnection.hpp>
-/** === end UNO includes === **/
-
-#include <comphelper/componentcontext.hxx>
-#include <unotools/sharedunocomponent.hxx>
-
-#include <memory>
-
-//........................................................................
-namespace frm
-{
-//........................................................................
-
- struct CachedRowSet_Data;
- //====================================================================
- //= CachedRowSet
- //====================================================================
- /** caches a result set obtained from a SQL statement
- */
- class CachedRowSet
- {
- public:
- CachedRowSet( const ::comphelper::ComponentContext& _rContext );
- ~CachedRowSet();
-
- public:
- /** executes the statement
-
- @return
- the result set produced by the statement. The caller takes ownership of the
- given object.
-
- @throws ::com::sun::star::sdbc::SQLException
- if such an exception is thrown when executing the statement
- */
- ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XResultSet >
- execute();
-
- /// determines whether the row set properties are dirty, i.e. have changed since the last call to execute
- bool isDirty() const;
-
- /// disposes the instance and frees all associated resources
- void dispose();
-
- /** sets the command of a query as command to be executed
-
- A connection must have been set before.
-
- @throws Exception
- */
- void setCommandFromQuery ( const ::rtl::OUString& _rQueryName );
-
- void setCommand ( const ::rtl::OUString& _rCommand );
- void setEscapeProcessing ( const sal_Bool _bEscapeProcessing );
- void setConnection ( const ::com::sun::star::uno::Reference< ::com::sun::star::sdbc::XConnection >& _rxConnection );
-
- private:
- ::std::auto_ptr< CachedRowSet_Data > m_pData;
- };
-
-//........................................................................
-} // namespace frm
-//........................................................................
-
-#endif // CACHEDROWSET_HXX
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/clickableimage.cxx b/forms/source/component/clickableimage.cxx
deleted file mode 100644
index 249094849..000000000
--- a/forms/source/component/clickableimage.cxx
+++ /dev/null
@@ -1,927 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "clickableimage.hxx"
-#include "controlfeatureinterception.hxx"
-#include "urltransformer.hxx"
-#include "componenttools.hxx"
-#include <com/sun/star/form/XSubmit.hpp>
-#include <com/sun/star/awt/SystemPointer.hpp>
-#include <com/sun/star/form/FormComponentType.hpp>
-#include <com/sun/star/frame/XDispatch.hpp>
-#include <com/sun/star/frame/XDispatchProvider.hpp>
-#include <com/sun/star/frame/FrameSearchFlag.hpp>
-#include <com/sun/star/frame/XController.hpp>
-#include <com/sun/star/frame/XFrame.hpp>
-#include <com/sun/star/awt/ActionEvent.hpp>
-#include <com/sun/star/awt/XActionListener.hpp>
-#include <tools/urlobj.hxx>
-#include <tools/debug.hxx>
-#include <vcl/svapp.hxx>
-#include <sfx2/docfile.hxx>
-#include <sfx2/objsh.hxx>
-#include <osl/mutex.hxx>
-#include "services.hxx"
-#include <comphelper/container.hxx>
-#include <comphelper/listenernotification.hxx>
-#include <svtools/imageresourceaccess.hxx>
-#define LOCAL_URL_PREFIX '#'
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
- using namespace ::com::sun::star::uno;
- using namespace ::com::sun::star::sdb;
- using namespace ::com::sun::star::sdbc;
- using namespace ::com::sun::star::sdbcx;
- using namespace ::com::sun::star::beans;
- using namespace ::com::sun::star::container;
- using namespace ::com::sun::star::form;
- using namespace ::com::sun::star::awt;
- using namespace ::com::sun::star::io;
- using namespace ::com::sun::star::lang;
- using namespace ::com::sun::star::util;
- using namespace ::com::sun::star::frame;
- using namespace ::com::sun::star::form::submission;
- using ::com::sun::star::awt::MouseEvent;
- using ::com::sun::star::task::XInteractionHandler;
-
- //==================================================================
- // OClickableImageBaseControl
- //==================================================================
- //------------------------------------------------------------------------------
- Sequence<Type> OClickableImageBaseControl::_getTypes()
- {
- static Sequence<Type> aTypes;
- if (!aTypes.getLength())
- aTypes = concatSequences(OControl::_getTypes(), OClickableImageBaseControl_BASE::getTypes());
- return aTypes;
- }
-
- //------------------------------------------------------------------------------
- OClickableImageBaseControl::OClickableImageBaseControl(const Reference<XMultiServiceFactory>& _rxFactory, const ::rtl::OUString& _aService)
- :OControl(_rxFactory, _aService)
- ,m_pThread(NULL)
- ,m_aSubmissionVetoListeners( m_aMutex )
- ,m_aApproveActionListeners( m_aMutex )
- ,m_aActionListeners( m_aMutex )
- {
- m_pFeatureInterception.reset( new ControlFeatureInterception( _rxFactory ) );
- }
-
- //------------------------------------------------------------------------------
- OClickableImageBaseControl::~OClickableImageBaseControl()
- {
- if (!OComponentHelper::rBHelper.bDisposed)
- {
- acquire();
- dispose();
- }
- }
-
- // UNO Anbindung
- //------------------------------------------------------------------------------
- Any SAL_CALL OClickableImageBaseControl::queryAggregation(const Type& _rType) throw (RuntimeException)
- {
- Any aReturn = OControl::queryAggregation(_rType);
- if (!aReturn.hasValue())
- aReturn = OClickableImageBaseControl_BASE::queryInterface(_rType);
- return aReturn;
- }
-
- // XApproveActionBroadcaster
- //------------------------------------------------------------------------------
- void OClickableImageBaseControl::addApproveActionListener(
- const Reference<XApproveActionListener>& l) throw( RuntimeException )
- {
- m_aApproveActionListeners.addInterface(l);
- }
-
- //------------------------------------------------------------------------------
- void OClickableImageBaseControl::removeApproveActionListener(
- const Reference<XApproveActionListener>& l) throw( RuntimeException )
- {
- m_aApproveActionListeners.removeInterface(l);
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OClickableImageBaseControl::registerDispatchProviderInterceptor( const Reference< XDispatchProviderInterceptor >& _rxInterceptor ) throw (RuntimeException)
- {
- m_pFeatureInterception->registerDispatchProviderInterceptor( _rxInterceptor );
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OClickableImageBaseControl::releaseDispatchProviderInterceptor( const Reference< XDispatchProviderInterceptor >& _rxInterceptor ) throw (RuntimeException)
- {
- m_pFeatureInterception->releaseDispatchProviderInterceptor( _rxInterceptor );
- }
-
- // OComponentHelper
- //------------------------------------------------------------------------------
- void OClickableImageBaseControl::disposing()
- {
- EventObject aEvent( static_cast< XWeak* >( this ) );
- m_aApproveActionListeners.disposeAndClear( aEvent );
- m_aActionListeners.disposeAndClear( aEvent );
- m_aSubmissionVetoListeners.disposeAndClear( aEvent );
- m_pFeatureInterception->dispose();
-
- {
- ::osl::MutexGuard aGuard( m_aMutex );
- if( m_pThread )
- {
- m_pThread->release();
- m_pThread = NULL;
- }
- }
-
- OControl::disposing();
- }
-
- //------------------------------------------------------------------------------
- OImageProducerThread_Impl* OClickableImageBaseControl::getImageProducerThread()
- {
- if ( !m_pThread )
- {
- m_pThread = new OImageProducerThread_Impl( this );
- m_pThread->acquire();
- m_pThread->create();
- }
- return m_pThread;
- }
-
- //------------------------------------------------------------------------------
- bool OClickableImageBaseControl::approveAction( )
- {
- sal_Bool bCancelled = sal_False;
- EventObject aEvent( static_cast< XWeak* >( this ) );
-
- ::cppu::OInterfaceIteratorHelper aIter( m_aApproveActionListeners );
- while( !bCancelled && aIter.hasMoreElements() )
- {
- // Jede approveAction-Methode muss thread-safe sein!!!
- if( !static_cast< XApproveActionListener* >( aIter.next() )->approveAction( aEvent ) )
- bCancelled = sal_True;
- }
-
- return !bCancelled;
- }
-
- //------------------------------------------------------------------------------
- // Diese Methode wird auch aus einem Thread gerufen und muss deshalb
- // thread-safe sein.
- void OClickableImageBaseControl::actionPerformed_Impl(sal_Bool bNotifyListener, const MouseEvent& rEvt)
- {
- if( bNotifyListener )
- {
- if ( !approveAction() )
- return;
- }
-
- // Ob der Rest des Codes Thread-Safe ist weiss man nicht genau. Deshalb
- // wird das meiste bei gelocktem Solar-Mutex erledigen.
- Reference<XPropertySet> xSet;
- Reference< XInterface > xModelsParent;
- FormButtonType eButtonType = FormButtonType_PUSH;
- {
- SolarMutexGuard aGuard;
-
- // Parent holen
- Reference<XFormComponent> xComp(getModel(), UNO_QUERY);
- if (!xComp.is())
- return;
-
- xModelsParent = xComp->getParent();
- if (!xModelsParent.is())
- return;
-
- // which button type?
- xSet = xSet.query( xComp );
- if ( !xSet.is() )
- return;
- xSet->getPropertyValue(PROPERTY_BUTTONTYPE) >>= eButtonType;
- }
-
- switch (eButtonType)
- {
- case FormButtonType_RESET:
- {
- // reset-Methoden muessen thread-safe sein!
- Reference<XReset> xReset(xModelsParent, UNO_QUERY);
- if (!xReset.is())
- return;
-
- xReset->reset();
- }
- break;
-
- case FormButtonType_SUBMIT:
- {
- // if some outer component can provide an interaction handler, use it
- Reference< XInteractionHandler > xHandler( m_pFeatureInterception->queryDispatch( "private:/InteractionHandler" ), UNO_QUERY );
- try
- {
- implSubmit( rEvt, xHandler );
- }
- catch( const Exception& )
- {
- // ignore
- }
- }
- break;
-
- case FormButtonType_URL:
- {
- SolarMutexGuard aGuard;
-
- Reference< XModel > xModel = getXModel(xModelsParent);
- if (!xModel.is())
- return;
-
- ///////////////////////////////////////////////////////////////////////
- // Jetzt URL ausfuehren
- Reference< XController > xController = xModel->getCurrentController();
- if (!xController.is())
- return;
-
- Reference< XFrame > xFrame = xController->getFrame();
- if( !xFrame.is() )
- return;
-
- URL aURL;
- aURL.Complete =
- getString(xSet->getPropertyValue(PROPERTY_TARGET_URL));
-
- if (aURL.Complete.getLength() && (LOCAL_URL_PREFIX == aURL.Complete.getStr()[0]))
- { // the URL contains a local URL only. Since the URLTransformer does not handle this case correctly
- // (it can't: it does not know the document URL), we have to take care for this ourself.
- // The real solution would be to not allow such relative URLs (there is a rule that at runtime, all
- // URLs have to be absolute), but for compatibility reasons this is no option.
- // The more as the user does not want to see a local URL as "file://<path>/<document>#mark" if it
- // could be "#mark" as well.
- // If we someday say that this hack (yes, it's kind of a hack) is not sustainable anymore, the complete
- // solutiuon would be:
- // * recognize URLs consisting of a mark only while _reading_ the document
- // * for this, allow the INetURLObject (which at the moment is invoked when reading URLs) to
- // transform such mark-only URLs into correct absolute URLs
- // * at the UI, show only the mark
- // * !!!! recognize every SAVEAS on the document, so the absolute URL can be adjusted. This seems
- // rather impossible !!!
- aURL.Mark = aURL.Complete;
- aURL.Complete = xModel->getURL();
- aURL.Complete += aURL.Mark;
- }
-
- sal_Bool bDispatchUrlInternal = sal_False;
- xSet->getPropertyValue(PROPERTY_DISPATCHURLINTERNAL) >>= bDispatchUrlInternal;
- if ( bDispatchUrlInternal )
- {
- m_pFeatureInterception->getTransformer().parseSmartWithAsciiProtocol( aURL, INET_FILE_SCHEME );
-
- ::rtl::OUString aTargetFrame;
- xSet->getPropertyValue(PROPERTY_TARGET_FRAME) >>= aTargetFrame;
-
- Reference< XDispatch > xDisp = Reference< XDispatchProvider > (xFrame,UNO_QUERY)->queryDispatch( aURL, aTargetFrame,
- FrameSearchFlag::SELF | FrameSearchFlag::PARENT |
- FrameSearchFlag::SIBLINGS | FrameSearchFlag::CREATE );
-
- Sequence<PropertyValue> aArgs(1);
- PropertyValue& rProp = aArgs.getArray()[0];
- rProp.Name = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("Referer") );
- rProp.Value <<= xModel->getURL();
-
- if (xDisp.is())
- xDisp->dispatch( aURL, aArgs );
- }
- else
- {
- URL aHyperLink = m_pFeatureInterception->getTransformer().getStrictURLFromAscii( ".uno:OpenHyperlink" );
-
- Reference< XDispatch > xDisp = Reference< XDispatchProvider > (xFrame,UNO_QUERY)->queryDispatch(aHyperLink, ::rtl::OUString() , 0);
-
- if ( xDisp.is() )
- {
- Sequence<PropertyValue> aProps(3);
- aProps[0].Name = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("URL"));
- aProps[0].Value <<= aURL.Complete;
-
- aProps[1].Name = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("FrameName"));
- aProps[1].Value = xSet->getPropertyValue(PROPERTY_TARGET_FRAME);
-
- aProps[2].Name = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("Referer"));
- aProps[2].Value <<= xModel->getURL();
-
- xDisp->dispatch( aHyperLink, aProps );
- }
- }
- } break;
- default:
- {
- // notify the action listeners for a push button
- ActionEvent aEvt(static_cast<XWeak*>(this), m_aActionCommand);
- m_aActionListeners.notifyEach( &XActionListener::actionPerformed, aEvt );
- }
- }
- }
-
-
- //--------------------------------------------------------------------
- void SAL_CALL OClickableImageBaseControl::addSubmissionVetoListener( const Reference< submission::XSubmissionVetoListener >& listener ) throw (NoSupportException, RuntimeException)
- {
- m_aSubmissionVetoListeners.addInterface( listener );
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OClickableImageBaseControl::removeSubmissionVetoListener( const Reference< submission::XSubmissionVetoListener >& listener ) throw (NoSupportException, RuntimeException)
- {
- m_aSubmissionVetoListeners.removeInterface( listener );
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OClickableImageBaseControl::submitWithInteraction( const Reference< XInteractionHandler >& _rxHandler ) throw (VetoException, WrappedTargetException, RuntimeException)
- {
- implSubmit( MouseEvent(), _rxHandler );
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OClickableImageBaseControl::submit( ) throw (VetoException, WrappedTargetException, RuntimeException)
- {
- implSubmit( MouseEvent(), NULL );
- }
-
- //--------------------------------------------------------------------
- Sequence< ::rtl::OUString > SAL_CALL OClickableImageBaseControl::getSupportedServiceNames( ) throw (RuntimeException)
- {
- Sequence< ::rtl::OUString > aSupported = OControl::getSupportedServiceNames();
- aSupported.realloc( aSupported.getLength() + 1 );
-
- ::rtl::OUString* pArray = aSupported.getArray();
- pArray[ aSupported.getLength() - 1 ] = FRM_SUN_CONTROL_SUBMITBUTTON;
-
- return aSupported;
- }
-
- //--------------------------------------------------------------------
- void OClickableImageBaseControl::implSubmit( const MouseEvent& _rEvent, const Reference< XInteractionHandler >& _rxHandler ) SAL_THROW((VetoException, WrappedTargetException, RuntimeException))
- {
- try
- {
- // allow the veto listeners to join the game
- m_aSubmissionVetoListeners.notifyEach( &XSubmissionVetoListener::submitting, EventObject( *this ) );
-
- // see whether there's an "submit interceptor" set at our model
- Reference< submission::XSubmissionSupplier > xSubmissionSupp( getModel(), UNO_QUERY );
- Reference< XSubmission > xSubmission;
- if ( xSubmissionSupp.is() )
- xSubmission = xSubmissionSupp->getSubmission();
-
- if ( xSubmission.is() )
- {
- if ( !_rxHandler.is() )
- xSubmission->submit();
- else
- xSubmission->submitWithInteraction( _rxHandler );
- }
- else
- {
- // no "interceptor" -> ordinary (old-way) submission
- Reference< XChild > xChild( getModel(), UNO_QUERY );
- Reference< XSubmit > xParentSubmission;
- if ( xChild.is() )
- xParentSubmission = xParentSubmission.query( xChild->getParent() );
- if ( xParentSubmission.is() )
- xParentSubmission->submit( this, _rEvent );
- }
- }
- catch( const VetoException& )
- {
- // allowed to leave
- throw;
- }
- catch( const RuntimeException& )
- {
- // allowed to leave
- throw;
- }
- catch( const WrappedTargetException& e )
- {
- // allowed to leave
- throw;
- }
- catch( const Exception& e )
- {
- OSL_FAIL( "OClickableImageBaseControl::implSubmit: caught an unknown exception!" );
- throw WrappedTargetException( ::rtl::OUString(), *this, makeAny( e ) );
- }
- }
-
- //==================================================================
- // OClickableImageBaseModel
- //==================================================================
- //------------------------------------------------------------------------------
- Sequence<Type> OClickableImageBaseModel::_getTypes()
- {
- return concatSequences(
- OControlModel::_getTypes(),
- OClickableImageBaseModel_Base::getTypes()
- );
- }
-
- //------------------------------------------------------------------
- DBG_NAME( OClickableImageBaseModel )
- //------------------------------------------------------------------
- OClickableImageBaseModel::OClickableImageBaseModel( const Reference< XMultiServiceFactory >& _rxFactory, const ::rtl::OUString& _rUnoControlModelTypeName,
- const ::rtl::OUString& rDefault )
- :OControlModel( _rxFactory, _rUnoControlModelTypeName, rDefault )
- ,OPropertyChangeListener(m_aMutex)
- ,m_pMedium(NULL)
- ,m_pProducer( NULL )
- ,m_bDispatchUrlInternal(sal_False)
- ,m_bDownloading(sal_False)
- ,m_bProdStarted(sal_False)
- {
- DBG_CTOR( OClickableImageBaseModel, NULL );
- implConstruct();
- m_eButtonType = FormButtonType_PUSH;
- }
-
- //------------------------------------------------------------------
- OClickableImageBaseModel::OClickableImageBaseModel( const OClickableImageBaseModel* _pOriginal, const Reference<XMultiServiceFactory>& _rxFactory )
- :OControlModel( _pOriginal, _rxFactory )
- ,OPropertyChangeListener( m_aMutex )
- ,m_pMedium( NULL )
- ,m_pProducer( NULL )
- ,m_bDispatchUrlInternal(sal_False)
- ,m_bDownloading( sal_False )
- ,m_bProdStarted( sal_False )
- {
- DBG_CTOR( OClickableImageBaseModel, NULL );
- implConstruct();
-
- // copy properties
- m_eButtonType = _pOriginal->m_eButtonType;
- m_sTargetURL = _pOriginal->m_sTargetURL;
- m_sTargetFrame = _pOriginal->m_sTargetFrame;
- m_bDispatchUrlInternal = _pOriginal->m_bDispatchUrlInternal;
- }
-
- //------------------------------------------------------------------------------
- void OClickableImageBaseModel::implInitializeImageURL( )
- {
- osl_incrementInterlockedCount( &m_refCount );
- {
- // simulate a propertyChanged event for the ImageURL
- Any aImageURL;
- getFastPropertyValue( aImageURL, PROPERTY_ID_IMAGE_URL );
- _propertyChanged( PropertyChangeEvent( *this, PROPERTY_IMAGE_URL, sal_False, PROPERTY_ID_IMAGE_URL, Any( ), aImageURL ) );
- }
- osl_decrementInterlockedCount( &m_refCount );
- }
-
- //------------------------------------------------------------------------------
- void OClickableImageBaseModel::implConstruct()
- {
- m_pProducer = new ImageProducer;
- increment( m_refCount );
- {
- m_xProducer = m_pProducer;
-
- if ( m_xAggregateSet.is() )
- {
- OPropertyChangeMultiplexer* pMultiplexer = new OPropertyChangeMultiplexer( this, m_xAggregateSet );
- pMultiplexer->addProperty( PROPERTY_IMAGE_URL );
- }
- }
- decrement(m_refCount);
- }
-
- //------------------------------------------------------------------------------
- OClickableImageBaseModel::~OClickableImageBaseModel()
- {
- if (!OComponentHelper::rBHelper.bDisposed)
- {
- acquire();
- dispose();
- }
- DBG_ASSERT(m_pMedium == NULL, "OClickableImageBaseModel::~OClickableImageBaseModel : leaving a memory leak ...");
- // spaetestens im dispose sollte das aufgeraeumt worden sein
-
- DBG_DTOR( OClickableImageBaseModel, NULL );
- }
-
- // XImageProducer
- //--------------------------------------------------------------------
- void SAL_CALL OClickableImageBaseModel::addConsumer( const Reference< XImageConsumer >& _rxConsumer ) throw (RuntimeException)
- {
- ImageModelMethodGuard aGuard( *this );
- GetImageProducer()->addConsumer( _rxConsumer );
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OClickableImageBaseModel::removeConsumer( const Reference< XImageConsumer >& _rxConsumer ) throw (RuntimeException)
- {
- ImageModelMethodGuard aGuard( *this );
- GetImageProducer()->removeConsumer( _rxConsumer );
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OClickableImageBaseModel::startProduction( ) throw (RuntimeException)
- {
- ImageModelMethodGuard aGuard( *this );
- GetImageProducer()->startProduction();
- }
-
- //--------------------------------------------------------------------
- Reference< submission::XSubmission > SAL_CALL OClickableImageBaseModel::getSubmission() throw (RuntimeException)
- {
- return m_xSubmissionDelegate;
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OClickableImageBaseModel::setSubmission( const Reference< submission::XSubmission >& _submission ) throw (RuntimeException)
- {
- m_xSubmissionDelegate = _submission;
- }
-
- //--------------------------------------------------------------------
- Sequence< ::rtl::OUString > SAL_CALL OClickableImageBaseModel::getSupportedServiceNames( ) throw (RuntimeException)
- {
- Sequence< ::rtl::OUString > aSupported = OControlModel::getSupportedServiceNames();
- aSupported.realloc( aSupported.getLength() + 1 );
-
- ::rtl::OUString* pArray = aSupported.getArray();
- pArray[ aSupported.getLength() - 1 ] = FRM_SUN_COMPONENT_SUBMITBUTTON;
-
- return aSupported;
- }
-
- // OComponentHelper
- //------------------------------------------------------------------------------
- void OClickableImageBaseModel::disposing()
- {
- OControlModel::disposing();
- if (m_pMedium)
- {
- delete m_pMedium;
- m_pMedium = NULL;
- }
-
- m_xProducer = NULL;
- m_pProducer = NULL;
- }
-
- //------------------------------------------------------------------------------
- Any SAL_CALL OClickableImageBaseModel::queryAggregation(const Type& _rType) throw (RuntimeException)
- {
- // order matters:
- // we definately want to "overload" the XImageProducer interface of our aggregate,
- // thus check OClickableImageBaseModel_Base (which provides this) first
- Any aReturn = OClickableImageBaseModel_Base::queryInterface( _rType );
-
- // BUT: _don't_ let it feel responsible for the XTypeProvider interface
- // (as this is implemented by our base class in the proper way)
- if ( _rType.equals( ::getCppuType( static_cast< Reference< XTypeProvider >* >( NULL ) ) )
- || !aReturn.hasValue()
- )
- aReturn = OControlModel::queryAggregation( _rType );
-
- return aReturn;
- }
-
- //------------------------------------------------------------------------------
- void OClickableImageBaseModel::getFastPropertyValue(Any& rValue, sal_Int32 nHandle) const
- {
- switch (nHandle)
- {
- case PROPERTY_ID_BUTTONTYPE : rValue <<= m_eButtonType; break;
- case PROPERTY_ID_TARGET_URL : rValue <<= m_sTargetURL; break;
- case PROPERTY_ID_TARGET_FRAME : rValue <<= m_sTargetFrame; break;
- case PROPERTY_ID_DISPATCHURLINTERNAL : rValue <<= m_bDispatchUrlInternal; break;
- default:
- OControlModel::getFastPropertyValue(rValue, nHandle);
- }
- }
-
- //------------------------------------------------------------------------------
- void OClickableImageBaseModel::setFastPropertyValue_NoBroadcast(sal_Int32 nHandle, const Any& rValue) throw ( Exception)
- {
- switch (nHandle)
- {
- case PROPERTY_ID_BUTTONTYPE :
- DBG_ASSERT(isA(rValue, static_cast<FormButtonType*>(NULL)), "OClickableImageBaseModel::setFastPropertyValue_NoBroadcast : invalid type !" );
- rValue >>= m_eButtonType;
- break;
-
- case PROPERTY_ID_TARGET_URL :
- DBG_ASSERT(rValue.getValueType().getTypeClass() == TypeClass_STRING, "OClickableImageBaseModel::setFastPropertyValue_NoBroadcast : invalid type !" );
- rValue >>= m_sTargetURL;
- break;
-
- case PROPERTY_ID_TARGET_FRAME :
- DBG_ASSERT(rValue.getValueType().getTypeClass() == TypeClass_STRING, "OClickableImageBaseModel::setFastPropertyValue_NoBroadcast : invalid type !" );
- rValue >>= m_sTargetFrame;
- break;
-
- case PROPERTY_ID_DISPATCHURLINTERNAL:
- DBG_ASSERT(rValue.getValueType().getTypeClass() == TypeClass_BOOLEAN, "OClickableImageBaseModel::setFastPropertyValue_NoBroadcast : invalid type !" );
- rValue >>= m_bDispatchUrlInternal;
- break;
-
- default:
- OControlModel::setFastPropertyValue_NoBroadcast(nHandle, rValue);
- }
- }
-
- //------------------------------------------------------------------------------
- sal_Bool OClickableImageBaseModel::convertFastPropertyValue(Any& rConvertedValue, Any& rOldValue, sal_Int32 nHandle, const Any& rValue)
- throw( IllegalArgumentException )
- {
- switch (nHandle)
- {
- case PROPERTY_ID_BUTTONTYPE :
- return tryPropertyValueEnum( rConvertedValue, rOldValue, rValue, m_eButtonType );
-
- case PROPERTY_ID_TARGET_URL :
- return tryPropertyValue(rConvertedValue, rOldValue, rValue, m_sTargetURL);
-
- case PROPERTY_ID_TARGET_FRAME :
- return tryPropertyValue(rConvertedValue, rOldValue, rValue, m_sTargetFrame);
-
- case PROPERTY_ID_DISPATCHURLINTERNAL :
- return tryPropertyValue(rConvertedValue, rOldValue, rValue, m_bDispatchUrlInternal);
-
- default:
- return OControlModel::convertFastPropertyValue(rConvertedValue, rOldValue, nHandle, rValue);
- }
- }
-
- //------------------------------------------------------------------------------
- void OClickableImageBaseModel::StartProduction()
- {
- ImageProducer *pImgProd = GetImageProducer();
- // grab the ImageURL
- rtl::OUString sURL;
- getPropertyValue( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("ImageURL") ) ) >>= sURL;
- if (!m_pMedium)
- {
- if ( ::svt::GraphicAccess::isSupportedURL( sURL ) )
- pImgProd->SetImage( sURL );
- else
- // caution: the medium may be NULL if somebody gave us a invalid URL to work with
- pImgProd->SetImage(String());
- m_bDownloading = sal_False;
- return;
- }
- if (m_pMedium->GetErrorCode()==0)
- {
- SvStream* pStream = m_pMedium->GetInStream();
-
- pImgProd->SetImage(*pStream);
- pImgProd->startProduction();
- m_bProdStarted = sal_True;
- }
- else
- {
- pImgProd->SetImage(String());
- delete m_pMedium;
- m_pMedium = 0;
- m_bDownloading = sal_False;
- }
- }
-
- //------------------------------------------------------------------------------
- void OClickableImageBaseModel::SetURL( const ::rtl::OUString& rURL )
- {
- if (m_pMedium || !rURL.getLength())
- {
- // Den Stream am Producer freigeben, bevor das Medium geloscht wird.
- GetImageProducer()->SetImage(String());
- delete m_pMedium;
- m_pMedium = NULL;
- }
-
- // the SfxMedium is not allowed to be created with an invalid URL, so we have to check this first
- INetURLObject aUrl(rURL);
- if (INET_PROT_NOT_VALID == aUrl.GetProtocol())
- // we treat an invalid URL like we would treat no URL
- return;
-
- if (rURL.getLength() && !::svt::GraphicAccess::isSupportedURL( rURL ) )
- {
- if (m_pMedium)
- delete m_pMedium;
-
- m_pMedium = new SfxMedium(rURL, STREAM_STD_READ, sal_False);
- m_pMedium->SetDataAvailableLink(
- STATIC_LINK(this, OClickableImageBaseModel, DataAvailableLink));
-
- // Das XModel suchen, um an die Object-Shell oder zumindest den
- // Referer zu gelangen.
- // Das Model findet man allerdings nur beim Laden von HTML-Dokumenten
- // und dann, wenn die URL in einem bereits geladenen Dokument
- // geaendert wird. Waehrend des Ladens kommt man nicht an das
- // Model ran.
- Reference< XModel > xModel;
- InterfaceRef xIfc( *this );
- while( !xModel.is() && xIfc.is() )
- {
- Reference<XChild> xChild( xIfc, UNO_QUERY );
- xIfc = xChild->getParent();
- query_interface(xIfc, xModel);
- }
-
- // Die Object-Shell suchen, indem wir
- // ueber alle Object-Shells iterieren und deren XModel mit dem
- // eigenen vergleichen. Als Optimierung probieren wir aber erstmal
- // die aktuelle Object-Shell.
- // wir unser XModel mit dem aller Object
- SfxObjectShell *pObjSh = 0;
-
- if( xModel.is() )
- {
- SfxObjectShell *pTestObjSh = SfxObjectShell::Current();
- if( pTestObjSh )
- {
- Reference< XModel > xTestModel = pTestObjSh->GetModel();
- if( xTestModel == xModel )
- pObjSh = pTestObjSh;
- }
- if( !pObjSh )
- {
- pTestObjSh = SfxObjectShell::GetFirst();
- while( !pObjSh && pTestObjSh )
- {
- Reference< XModel > xTestModel = pTestObjSh->GetModel();
- if( xTestModel == xModel )
- pObjSh = pTestObjSh;
- else
- pTestObjSh = SfxObjectShell::GetNext( *pTestObjSh );
- }
- }
- }
-
- #ifdef USE_REGISTER_TRANSFER
- if( pObjSh )
- {
- // Medium registrieren, damit abgebrochen werden kann
- pObjSh->RegisterTransfer( *m_pMedium );
-
- // Target-Frame uebertragen, damit auch javascript:-URLs
- // "geladen" werden koennen.
- const SfxMedium *pShMedium = pObjSh->GetMedium();
- if( pShMedium )
- m_pMedium->SetLoadTargetFrame(pShMedium->GetLoadTargetFrame());
- }
- else
- {
- // Keine Object-Shell, aber ein Medium? Dann uebernehmen wir
- // zumindest den Referer.
- if( xModel.is() )
- {
- ::rtl::OUString sReferer( xModel->getURL() );
- if( sReferer.getLength() )
- m_pMedium->SetReferer( OUStringToString(sReferer, CHARSET_SYSTEM) );
- }
- }
- #else
- if( pObjSh )
- {
- // Target-Frame uebertragen, damit auch javascript:-URLs
- // "geladen" werden koennen.
- const SfxMedium *pShMedium = pObjSh->GetMedium();
- if( pShMedium )
- m_pMedium->SetLoadTargetFrame(pShMedium->GetLoadTargetFrame());
- }
-
- if( xModel.is() )
- {
- ::rtl::OUString sReferer( xModel->getURL() );
- if( sReferer.getLength() )
- m_pMedium->SetReferer( sReferer );
- }
- #endif
-
- // Downloading-Flag auf sal_True setzen. Es werden dann auch
- // Data-Available-Links, wenn wir in den Pending-Staus gelangen.
- m_bDownloading = sal_True;
- m_bProdStarted = sal_False;
-
- // Download anstossen (Achtung: Kann auch synchron sein).
- m_pMedium->DownLoad(STATIC_LINK(this, OClickableImageBaseModel, DownloadDoneLink));
- }
- else
- {
- if ( ::svt::GraphicAccess::isSupportedURL( rURL ) )
- GetImageProducer()->SetImage( rURL );
- GetImageProducer()->startProduction();
- }
- }
-
- //------------------------------------------------------------------------------
- void OClickableImageBaseModel::DataAvailable()
- {
- if (!m_bProdStarted)
- StartProduction();
-
- GetImageProducer()->NewDataAvailable();
- }
-
- //------------------------------------------------------------------------------
- void OClickableImageBaseModel::DownloadDone()
- {
- DataAvailable();
- m_bDownloading = sal_False;
- }
-
- //------------------------------------------------------------------------------
- IMPL_STATIC_LINK( OClickableImageBaseModel, DownloadDoneLink, void*, EMPTYARG )
- {
- ::osl::MutexGuard aGuard( pThis->m_aMutex );
- pThis->DownloadDone();
- return 0;
- }
-
- //------------------------------------------------------------------------------
- IMPL_STATIC_LINK( OClickableImageBaseModel, DataAvailableLink, void*, EMPTYARG )
- {
- ::osl::MutexGuard aGuard( pThis->m_aMutex );
- pThis->DataAvailable();
- return 0;
- }
-
- //------------------------------------------------------------------------------
- void OClickableImageBaseModel::_propertyChanged( const PropertyChangeEvent& rEvt )
- throw( RuntimeException )
- {
- // Wenn eine URL gesetzt worden ist, muss die noch an den ImageProducer
- // weitergereicht werden.
- ::osl::MutexGuard aGuard(m_aMutex);
- SetURL( getString(rEvt.NewValue) );
- }
-
- // -----------------------------------------------------------------------------
- Any OClickableImageBaseModel::getPropertyDefaultByHandle( sal_Int32 nHandle ) const
- {
- switch (nHandle)
- {
- case PROPERTY_ID_BUTTONTYPE : return makeAny( FormButtonType_PUSH );
- case PROPERTY_ID_TARGET_URL :
- case PROPERTY_ID_TARGET_FRAME : return makeAny( ::rtl::OUString() );
- case PROPERTY_ID_DISPATCHURLINTERNAL : return makeAny( sal_False );
- default:
- return OControlModel::getPropertyDefaultByHandle(nHandle);
- }
- }
-
- //==================================================================
- // OImageProducerThread_Impl
- //==================================================================
- //------------------------------------------------------------------
- EventObject* OImageProducerThread_Impl::cloneEvent( const EventObject* _pEvt ) const
- {
- return new EventObject( *_pEvt );
- }
-
- //------------------------------------------------------------------
- void OImageProducerThread_Impl::processEvent( ::cppu::OComponentHelper *pCompImpl,
- const EventObject* pEvt,
- const Reference<XControl>&,
- sal_Bool )
- {
- ((OClickableImageBaseControl *)pCompImpl)->actionPerformed_Impl( sal_True, *(MouseEvent *)pEvt );
- }
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/clickableimage.hxx b/forms/source/component/clickableimage.hxx
deleted file mode 100644
index 9091d8b23..000000000
--- a/forms/source/component/clickableimage.hxx
+++ /dev/null
@@ -1,297 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef FORMS_SOURCE_CLICKABLEIMAGE_HXX
-#define FORMS_SOURCE_CLICKABLEIMAGE_HXX
-
-#include "FormComponent.hxx"
-#include "EventThread.hxx"
-#include "imgprod.hxx"
-#include <tools/link.hxx>
-#include <comphelper/propmultiplex.hxx>
-#include <com/sun/star/form/XImageProducerSupplier.hpp>
-#include <com/sun/star/form/FormButtonType.hpp>
-#include <com/sun/star/form/XApproveActionListener.hpp>
-#include <com/sun/star/form/XApproveActionBroadcaster.hpp>
-#include <com/sun/star/form/submission/XSubmissionSupplier.hpp>
-#include <com/sun/star/form/submission/XSubmission.hpp>
-#include <com/sun/star/frame/XModel.hpp>
-#include <com/sun/star/frame/XDispatchProviderInterception.hpp>
-#include <cppuhelper/implbase3.hxx>
-
-
-class SfxMedium;
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
- class OImageProducerThread_Impl;
- class ControlFeatureInterception;
- //==================================================================
- // OClickableImageBaseModel
- //==================================================================
- typedef ::cppu::ImplHelper3 < ::com::sun::star::form::XImageProducerSupplier
- , ::com::sun::star::awt::XImageProducer
- , ::com::sun::star::form::submission::XSubmissionSupplier
- > OClickableImageBaseModel_Base;
-
- class OClickableImageBaseModel :public OClickableImageBaseModel_Base
- ,public OControlModel
- ,public OPropertyChangeListener
- {
- protected:
- ::com::sun::star::form::FormButtonType m_eButtonType; // Art des Buttons (push,submit,reset)
- ::rtl::OUString m_sTargetURL; // URL fuer den URL-Button
- ::rtl::OUString m_sTargetFrame; // TargetFrame zum Oeffnen
-
- // ImageProducer stuff
- ::com::sun::star::uno::Reference< ::com::sun::star::awt::XImageProducer> m_xProducer;
- SfxMedium* m_pMedium; // Download-Medium
- ImageProducer* m_pProducer;
- sal_Bool m_bDispatchUrlInternal; // property: is not allowed to set : 1
- sal_Bool m_bDownloading : 1; // laeuft ein Download?
- sal_Bool m_bProdStarted : 1;
-
- // XSubmission stuff
- ::com::sun::star::uno::Reference< ::com::sun::star::form::submission::XSubmission >
- m_xSubmissionDelegate;
-
-
- DECL_STATIC_LINK( OClickableImageBaseModel, DataAvailableLink, void* );
- DECL_STATIC_LINK( OClickableImageBaseModel, DownloadDoneLink, void* );
-
- inline ImageProducer* GetImageProducer() { return m_pProducer; }
-
- void StartProduction();
- void SetURL(const ::rtl::OUString& rURL);
- void DataAvailable();
- void DownloadDone();
-
- ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type> _getTypes();
- inline sal_Bool isDispatchUrlInternal() const { return m_bDispatchUrlInternal; }
- inline void setDispatchUrlInternal(sal_Bool _bDispatch) { m_bDispatchUrlInternal = _bDispatch; }
-
- public:
- DECLARE_DEFAULT_XTOR( OClickableImageBaseModel );
-
- // UNO Anbindung
- DECLARE_UNO3_AGG_DEFAULTS(OClickableImageBaseModel, OControlModel);
- virtual ::com::sun::star::uno::Any SAL_CALL queryAggregation(const ::com::sun::star::uno::Type& _rType) throw(::com::sun::star::uno::RuntimeException);
-
- protected:
- // OComponentHelper
- virtual void SAL_CALL disposing();
-
- // ::com::sun::star::form::XImageProducerSupplier
- virtual ::com::sun::star::uno::Reference< ::com::sun::star::awt::XImageProducer> SAL_CALL getImageProducer() throw (::com::sun::star::uno::RuntimeException) { return m_xProducer; }
-
- // OPropertySetHelper
- virtual void SAL_CALL getFastPropertyValue(::com::sun::star::uno::Any& rValue, sal_Int32 nHandle ) const;
- virtual void SAL_CALL setFastPropertyValue_NoBroadcast(sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue) throw (::com::sun::star::uno::Exception);
-
- virtual sal_Bool SAL_CALL convertFastPropertyValue(::com::sun::star::uno::Any& rConvertedValue, ::com::sun::star::uno::Any& rOldValue, sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue )
- throw(::com::sun::star::lang::IllegalArgumentException);
-
- using ::cppu::OPropertySetHelper::getFastPropertyValue;
-
- // OPropertyChangeListener
- virtual void _propertyChanged(const ::com::sun::star::beans::PropertyChangeEvent&) throw(::com::sun::star::uno::RuntimeException);
-
- // XPropertyState
- virtual ::com::sun::star::uno::Any getPropertyDefaultByHandle( sal_Int32 nHandle ) const;
-
- // XImageProducer
- virtual void SAL_CALL addConsumer( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XImageConsumer >& xConsumer ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeConsumer( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XImageConsumer >& xConsumer ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL startProduction( ) throw (::com::sun::star::uno::RuntimeException);
-
- // XSubmissionSupplier
- virtual ::com::sun::star::uno::Reference< ::com::sun::star::form::submission::XSubmission > SAL_CALL getSubmission() throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL setSubmission( const ::com::sun::star::uno::Reference< ::com::sun::star::form::submission::XSubmission >& _submission ) throw (::com::sun::star::uno::RuntimeException);
-
- // XServiceInfo
- virtual ::com::sun::star::uno::Sequence< ::rtl::OUString > SAL_CALL getSupportedServiceNames( ) throw (::com::sun::star::uno::RuntimeException);
-
- // XEventListener
- using OControlModel::disposing;
-
- public:
- struct GuardAccess { friend class ImageModelMethodGuard; private: GuardAccess() { } };
- ::osl::Mutex& getMutex( GuardAccess ) { return m_aMutex; }
- ImageProducer* getImageProducer( GuardAccess ) { return m_pProducer; }
-
- protected:
- using OControlModel::getMutex;
-
- void implConstruct();
-
- // to be called from within the cloning-ctor of your derived class
- void implInitializeImageURL( );
- };
-
- //==================================================================
- // ImageModelMethodGuard
- //==================================================================
- class ImageModelMethodGuard : public ::osl::MutexGuard
- {
- private:
- typedef ::osl::MutexGuard GuardBase;
-
- public:
- ImageModelMethodGuard( OClickableImageBaseModel& _rModel )
- :GuardBase( _rModel.getMutex( OClickableImageBaseModel::GuardAccess() ) )
- {
- if ( NULL == _rModel.getImageProducer( OClickableImageBaseModel::GuardAccess() ) )
- throw ::com::sun::star::lang::DisposedException(
- ::rtl::OUString(),
- static_cast< ::com::sun::star::form::XImageProducerSupplier* >( &_rModel )
- );
- }
- };
-
- //==================================================================
- // OClickableImageBaseControl
- //==================================================================
- typedef ::cppu::ImplHelper3 < ::com::sun::star::form::XApproveActionBroadcaster
- , ::com::sun::star::form::submission::XSubmission
- , ::com::sun::star::frame::XDispatchProviderInterception
- > OClickableImageBaseControl_BASE;
-
- class OClickableImageBaseControl :public OClickableImageBaseControl_BASE
- ,public OControl
- {
- friend class OImageProducerThread_Impl;
-
- private:
- OImageProducerThread_Impl* m_pThread;
- ::cppu::OInterfaceContainerHelper m_aSubmissionVetoListeners;
- ::std::auto_ptr< ControlFeatureInterception >
- m_pFeatureInterception;
-
- protected:
- ::cppu::OInterfaceContainerHelper m_aApproveActionListeners;
- ::cppu::OInterfaceContainerHelper m_aActionListeners;
- ::rtl::OUString m_aActionCommand;
-
- // XSubmission
- virtual void SAL_CALL submit( ) throw (::com::sun::star::util::VetoException, ::com::sun::star::lang::WrappedTargetException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL submitWithInteraction( const ::com::sun::star::uno::Reference< ::com::sun::star::task::XInteractionHandler >& aHandler ) throw (::com::sun::star::util::VetoException, ::com::sun::star::lang::WrappedTargetException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL addSubmissionVetoListener( const ::com::sun::star::uno::Reference< ::com::sun::star::form::submission::XSubmissionVetoListener >& listener ) throw (::com::sun::star::lang::NoSupportException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeSubmissionVetoListener( const ::com::sun::star::uno::Reference< ::com::sun::star::form::submission::XSubmissionVetoListener >& listener ) throw (::com::sun::star::lang::NoSupportException, ::com::sun::star::uno::RuntimeException);
-
- // XServiceInfo
- virtual ::com::sun::star::uno::Sequence< ::rtl::OUString > SAL_CALL getSupportedServiceNames( ) throw (::com::sun::star::uno::RuntimeException);
-
- // XEventListener
- using OControl::disposing;
-
- public:
- OClickableImageBaseControl(
- const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory,
- const ::rtl::OUString& _aService);
- virtual ~OClickableImageBaseControl();
-
- protected:
- // UNO Anbindung
- DECLARE_UNO3_AGG_DEFAULTS(OClickableImageBaseControl, OControl);
- virtual ::com::sun::star::uno::Any SAL_CALL queryAggregation(const ::com::sun::star::uno::Type& _rType) throw(::com::sun::star::uno::RuntimeException);
-
- // OComponentHelper
- virtual void SAL_CALL disposing();
-
- // ::com::sun::star::form::XApproveActionBroadcaster
- virtual void SAL_CALL addApproveActionListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XApproveActionListener>& _rxListener)
- throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeApproveActionListener(const ::com::sun::star::uno::Reference< ::com::sun::star::form::XApproveActionListener>& _rxListener)
- throw(::com::sun::star::uno::RuntimeException);
-
- // XDispatchProviderInterception
- virtual void SAL_CALL registerDispatchProviderInterceptor( const ::com::sun::star::uno::Reference< ::com::sun::star::frame::XDispatchProviderInterceptor >& Interceptor ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL releaseDispatchProviderInterceptor( const ::com::sun::star::uno::Reference< ::com::sun::star::frame::XDispatchProviderInterceptor >& Interceptor ) throw (::com::sun::star::uno::RuntimeException);
-
- protected:
- virtual void actionPerformed_Impl( sal_Bool bNotifyListener, const ::com::sun::star::awt::MouseEvent& rEvt );
-
- ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type > _getTypes();
-
- /** approves the action by calling the approve listeners
- @return <TRUE/> if and only if the action has <em>not</em> been cancelled by a listener
- */
- bool approveAction( );
-
- /** retrieves (and if necessary creates) the image producer thread.
-
- Must be called with our mutex locked
- */
- OImageProducerThread_Impl* getImageProducerThread();
-
- private:
- void implSubmit(
- const ::com::sun::star::awt::MouseEvent& _rEvent,
- const ::com::sun::star::uno::Reference< ::com::sun::star::task::XInteractionHandler >& aHandler
- ) SAL_THROW((com::sun::star::util::VetoException, ::com::sun::star::lang::WrappedTargetException, ::com::sun::star::uno::RuntimeException));
- };
-
- //==================================================================
- // OImageProducerThread_Impl
- //==================================================================
- class OImageProducerThread_Impl: public OComponentEventThread
- {
- protected:
-
- // Die folgende Methode wrrd gerufen um das Event unter Beruecksichtigung
- // seines Typs zu duplizieren
- virtual ::com::sun::star::lang::EventObject* cloneEvent( const ::com::sun::star::lang::EventObject* _pEvt ) const;
-
- // Ein Event bearbeiten. Der Mutex ist dabei nicht gelockt, pCompImpl
- // bleibt aber in jedem Fall gueltig.
- virtual void processEvent( ::cppu::OComponentHelper *pCompImpl,
- const ::com::sun::star::lang::EventObject*,
- const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XControl>&,
- sal_Bool );
-
- public:
- OImageProducerThread_Impl( OClickableImageBaseControl *pControl ) :
- OComponentEventThread( pControl )
- {}
-
- void addEvent() { ::com::sun::star::lang::EventObject aEvt; OComponentEventThread::addEvent( &aEvt ); }
-
- protected:
- using OComponentEventThread::addEvent;
- };
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-#endif // FORMS_SOURCE_CLICKABLEIMAGE_HXX
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/cloneable.cxx b/forms/source/component/cloneable.cxx
deleted file mode 100644
index 8b876f631..000000000
--- a/forms/source/component/cloneable.cxx
+++ /dev/null
@@ -1,70 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "cloneable.hxx"
-#include <com/sun/star/util/XCloneable.hpp>
-#include <comphelper/uno3.hxx>
-#include <tools/debug.hxx>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
- using namespace ::comphelper;
- using namespace ::com::sun::star::uno;
- using namespace ::com::sun::star::util;
-
- //====================================================================
- //= OCloneableAggregation
- //====================================================================
- //------------------------------------------------------------------
- Reference< XAggregation > OCloneableAggregation::createAggregateClone( const OCloneableAggregation* _pOriginal )
- {
- Reference< XCloneable > xAggregateCloneable; // will be the aggregate's XCloneable
- Reference< XAggregation > xAggregateClone; // will be the aggregate's clone
-
- if ( query_aggregation( _pOriginal->m_xAggregate, xAggregateCloneable ) )
- {
- xAggregateClone = xAggregateClone.query( xAggregateCloneable->createClone() );
- DBG_ASSERT( xAggregateClone.is(), "OCloneableAggregation::createAggregateClone: invalid clone returned by the aggregate!" );
- }
- else {
- DBG_ASSERT( !_pOriginal->m_xAggregate.is(), "OCloneableAggregation::createAggregateClone: aggregate is not cloneable!" );
- }
-
- return xAggregateClone;
- }
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/entrylisthelper.cxx b/forms/source/component/entrylisthelper.cxx
deleted file mode 100644
index 1d24c6867..000000000
--- a/forms/source/component/entrylisthelper.cxx
+++ /dev/null
@@ -1,324 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "entrylisthelper.hxx"
-#include "FormComponent.hxx"
-
-#include <osl/diagnose.h>
-#include <comphelper/sequence.hxx>
-#include <comphelper/property.hxx>
-#include <algorithm>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
- using namespace ::com::sun::star::uno;
- using namespace ::com::sun::star::lang;
- using namespace ::com::sun::star::util;
- using namespace ::com::sun::star::form::binding;
-
- //=====================================================================
- //= OEntryListHelper
- //=====================================================================
- //---------------------------------------------------------------------
- OEntryListHelper::OEntryListHelper( OControlModel& _rControlModel )
- :m_rControlModel( _rControlModel )
- ,m_aRefreshListeners( _rControlModel.getInstanceMutex() )
- {
- }
-
- //---------------------------------------------------------------------
- OEntryListHelper::OEntryListHelper( const OEntryListHelper& _rSource, OControlModel& _rControlModel )
- :m_rControlModel( _rControlModel )
- ,m_xListSource ( _rSource.m_xListSource )
- ,m_aStringItems( _rSource.m_aStringItems )
- ,m_aRefreshListeners( _rControlModel.getInstanceMutex() )
- {
- }
-
- //---------------------------------------------------------------------
- OEntryListHelper::~OEntryListHelper( )
- {
- }
-
- //---------------------------------------------------------------------
- void SAL_CALL OEntryListHelper::setListEntrySource( const Reference< XListEntrySource >& _rxSource ) throw (RuntimeException)
- {
- ControlModelLock aLock( m_rControlModel );
-
- // disconnect from the current external list source
- disconnectExternalListSource();
-
- // and connect to the new one
- if ( _rxSource.is() )
- connectExternalListSource( _rxSource, aLock );
- }
-
- //---------------------------------------------------------------------
- Reference< XListEntrySource > SAL_CALL OEntryListHelper::getListEntrySource( ) throw (RuntimeException)
- {
- return m_xListSource;
- }
-
-
- //---------------------------------------------------------------------
- void SAL_CALL OEntryListHelper::entryChanged( const ListEntryEvent& _rEvent ) throw (RuntimeException)
- {
- ControlModelLock aLock( m_rControlModel );
-
- OSL_ENSURE( _rEvent.Source == m_xListSource,
- "OEntryListHelper::entryChanged: where did this come from?" );
- OSL_ENSURE( ( _rEvent.Position >= 0 ) && ( _rEvent.Position < m_aStringItems.getLength() ),
- "OEntryListHelper::entryChanged: invalid index!" );
- OSL_ENSURE( _rEvent.Entries.getLength() == 1,
- "OEntryListHelper::entryChanged: invalid string list!" );
-
- if ( ( _rEvent.Position >= 0 )
- && ( _rEvent.Position < m_aStringItems.getLength() )
- && ( _rEvent.Entries.getLength() > 0 )
- )
- {
- m_aStringItems[ _rEvent.Position ] = _rEvent.Entries[ 0 ];
- stringItemListChanged( aLock );
- }
- }
-
- //---------------------------------------------------------------------
- void SAL_CALL OEntryListHelper::entryRangeInserted( const ListEntryEvent& _rEvent ) throw (RuntimeException)
- {
- ControlModelLock aLock( m_rControlModel );
-
- OSL_ENSURE( _rEvent.Source == m_xListSource,
- "OEntryListHelper::entryRangeInserted: where did this come from?" );
- OSL_ENSURE( ( _rEvent.Position > 0 ) && ( _rEvent.Position < m_aStringItems.getLength() ) && ( _rEvent.Entries.getLength() > 0 ),
- "OEntryListHelper::entryRangeRemoved: invalid count and/or position!" );
-
- if ( ( _rEvent.Position > 0 )
- && ( _rEvent.Position < m_aStringItems.getLength() )
- && ( _rEvent.Entries.getLength() > 0 )
- )
- {
- // the entries *before* the insertion pos
- Sequence< ::rtl::OUString > aKeepEntries(
- m_aStringItems.getConstArray(),
- _rEvent.Position
- );
- // the entries *behind* the insertion pos
- Sequence< ::rtl::OUString > aMovedEntries(
- m_aStringItems.getConstArray() + _rEvent.Position,
- m_aStringItems.getLength() - _rEvent.Position
- );
-
- // concat all three parts
- m_aStringItems = ::comphelper::concatSequences(
- aKeepEntries,
- _rEvent.Entries,
- aMovedEntries
- );
-
- stringItemListChanged( aLock );
- }
- }
-
- //---------------------------------------------------------------------
- void SAL_CALL OEntryListHelper::entryRangeRemoved( const ListEntryEvent& _rEvent ) throw (RuntimeException)
- {
- ControlModelLock aLock( m_rControlModel );
-
- OSL_ENSURE( _rEvent.Source == m_xListSource,
- "OEntryListHelper::entryRangeRemoved: where did this come from?" );
- OSL_ENSURE( ( _rEvent.Position > 0 ) && ( _rEvent.Count > 0 ) && ( _rEvent.Position + _rEvent.Count <= m_aStringItems.getLength() ),
- "OEntryListHelper::entryRangeRemoved: invalid count and/or position!" );
-
- if ( ( _rEvent.Position > 0 )
- && ( _rEvent.Count > 0 )
- && ( _rEvent.Position + _rEvent.Count <= m_aStringItems.getLength() )
- )
- {
- // copy all items after the removed ones
- ::std::copy(
- m_aStringItems.getConstArray() + _rEvent.Position + _rEvent.Count,
- m_aStringItems.getConstArray() + m_aStringItems.getLength(),
- m_aStringItems.getArray( ) + _rEvent.Position
- );
- // shrink the array
- m_aStringItems.realloc( m_aStringItems.getLength() - _rEvent.Count );
-
- stringItemListChanged( aLock );
- }
- }
-
- //---------------------------------------------------------------------
- void SAL_CALL OEntryListHelper::allEntriesChanged( const EventObject& _rEvent ) throw (RuntimeException)
- {
- ControlModelLock aLock( m_rControlModel );
-
- OSL_ENSURE( _rEvent.Source == m_xListSource,
- "OEntryListHelper::allEntriesChanged: where did this come from?" );
-
- Reference< XListEntrySource > xSource( _rEvent.Source, UNO_QUERY );
- if ( _rEvent.Source == m_xListSource )
- {
- impl_lock_refreshList( aLock );
- }
- }
-
- // XRefreshable
- //------------------------------------------------------------------------------
- void SAL_CALL OEntryListHelper::addRefreshListener(const Reference<XRefreshListener>& _rxListener) throw(RuntimeException)
- {
- if ( _rxListener.is() )
- m_aRefreshListeners.addInterface( _rxListener );
- }
-
- //------------------------------------------------------------------------------
- void SAL_CALL OEntryListHelper::removeRefreshListener(const Reference<XRefreshListener>& _rxListener) throw(RuntimeException)
- {
- if ( _rxListener.is() )
- m_aRefreshListeners.removeInterface( _rxListener );
- }
-
- //------------------------------------------------------------------------------
- void SAL_CALL OEntryListHelper::refresh() throw(RuntimeException)
- {
- {
- ControlModelLock aLock( m_rControlModel );
- impl_lock_refreshList( aLock );
- }
-
- EventObject aEvt( static_cast< XRefreshable* >( this ) );
- m_aRefreshListeners.notifyEach( &XRefreshListener::refreshed, aEvt );
- }
-
- //---------------------------------------------------------------------
- void OEntryListHelper::impl_lock_refreshList( ControlModelLock& _rInstanceLock )
- {
- if ( hasExternalListSource() )
- {
- m_aStringItems = m_xListSource->getAllListEntries( );
- stringItemListChanged( _rInstanceLock );
- }
- else
- refreshInternalEntryList();
- }
-
- //---------------------------------------------------------------------
- bool OEntryListHelper::handleDisposing( const EventObject& _rEvent )
- {
- if ( m_xListSource .is() && ( _rEvent.Source == m_xListSource ) )
- {
- disconnectExternalListSource( );
- return true;
- }
- return false;
- }
-
- //---------------------------------------------------------------------
- void OEntryListHelper::disposing( )
- {
- EventObject aEvt( static_cast< XRefreshable* >( this ) );
- m_aRefreshListeners.disposeAndClear(aEvt);
-
- if ( hasExternalListSource( ) )
- disconnectExternalListSource( );
- }
-
- //---------------------------------------------------------------------
- void OEntryListHelper::disconnectExternalListSource( )
- {
- if ( m_xListSource.is() )
- m_xListSource->removeListEntryListener( this );
-
- m_xListSource.clear();
-
- disconnectedExternalListSource();
- }
-
- //---------------------------------------------------------------------
- void OEntryListHelper::connectedExternalListSource( )
- {
- // nothing to do here
- }
-
- //---------------------------------------------------------------------
- void OEntryListHelper::disconnectedExternalListSource( )
- {
- // nothing to do here
- }
-
- //---------------------------------------------------------------------
- void OEntryListHelper::connectExternalListSource( const Reference< XListEntrySource >& _rxSource, ControlModelLock& _rInstanceLock )
- {
- OSL_ENSURE( !hasExternalListSource(), "OEntryListHelper::connectExternalListSource: only to be called if no external source is active!" );
- OSL_ENSURE( _rxSource.is(), "OEntryListHelper::connectExternalListSource: invalid list source!" );
-
- // remember it
- m_xListSource = _rxSource;
-
- // initially fill our item list
- if ( m_xListSource.is() )
- {
- // be notified when the list changes ...
- m_xListSource->addListEntryListener( this );
-
- m_aStringItems = m_xListSource->getAllListEntries( );
- stringItemListChanged( _rInstanceLock );
-
- // let derivees react on the new list source
- connectedExternalListSource();
- }
- }
-
- //---------------------------------------------------------------------
- sal_Bool OEntryListHelper::convertNewListSourceProperty( Any& _rConvertedValue,
- Any& _rOldValue, const Any& _rValue ) SAL_THROW( ( IllegalArgumentException ) )
- {
- if ( hasExternalListSource() )
- throw IllegalArgumentException( );
- // TODO: error message
-
- return ::comphelper::tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, m_aStringItems );
- }
-
- //---------------------------------------------------------------------
- void OEntryListHelper::setNewStringItemList( const ::com::sun::star::uno::Any& _rValue, ControlModelLock& _rInstanceLock )
- {
- OSL_PRECOND( !hasExternalListSource(), "OEntryListHelper::setNewStringItemList: this should never have survived convertNewListSourceProperty!" );
- OSL_VERIFY( _rValue >>= m_aStringItems );
- stringItemListChanged( _rInstanceLock );
- }
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/entrylisthelper.hxx b/forms/source/component/entrylisthelper.hxx
deleted file mode 100644
index 1713ffe24..000000000
--- a/forms/source/component/entrylisthelper.hxx
+++ /dev/null
@@ -1,201 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef FORMS_ENTRYLISTHELPER_HXX
-#define FORMS_ENTRYLISTHELPER_HXX
-
-/** === begin UNO includes === **/
-#include <com/sun/star/form/binding/XListEntrySink.hpp>
-#include <com/sun/star/util/XRefreshable.hpp>
-#include <com/sun/star/form/binding/XListEntryListener.hpp>
-#include <com/sun/star/lang/IllegalArgumentException.hpp>
-/** === end UNO includes === **/
-
-#include <cppuhelper/implbase3.hxx>
-#include <cppuhelper/interfacecontainer.hxx>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
- class OControlModel;
- class ControlModelLock;
-
- //=====================================================================
- //= OEntryListHelper
- //=====================================================================
- typedef ::cppu::ImplHelper3 < ::com::sun::star::form::binding::XListEntrySink
- , ::com::sun::star::form::binding::XListEntryListener
- , ::com::sun::star::util::XRefreshable
- > OEntryListHelper_BASE;
-
- class OEntryListHelper : public OEntryListHelper_BASE
- {
- private:
- OControlModel& m_rControlModel;
-
- ::com::sun::star::uno::Reference< ::com::sun::star::form::binding::XListEntrySource >
- m_xListSource; /// our external list source
- ::com::sun::star::uno::Sequence< ::rtl::OUString >
- m_aStringItems; /// "overridden" StringItemList property value
- ::cppu::OInterfaceContainerHelper
- m_aRefreshListeners;
-
-
- protected:
- OEntryListHelper( OControlModel& _rControlModel );
- OEntryListHelper( const OEntryListHelper& _rSource, OControlModel& _rControlModel );
- virtual ~OEntryListHelper( );
-
- /// returns the current string item list
- inline const ::com::sun::star::uno::Sequence< ::rtl::OUString >&
- getStringItemList() const { return m_aStringItems; }
- inline const ::com::sun::star::uno::Reference< ::com::sun::star::form::binding::XListEntrySource >&
- getExternalListEntrySource() const { return m_xListSource; }
-
- /// determines whether we actually have an external list source
- inline bool hasExternalListSource( ) const { return m_xListSource.is(); }
-
- /** handling the XEventListener::disposing call for the case where
- our list source is being disposed
- @return
- <TRUE/> if and only if the disposed object was our list source, and so the
- event was handled
- */
- bool handleDisposing( const ::com::sun::star::lang::EventObject& _rEvent );
-
- /** to be called by derived classes' instances when they're being disposed
- */
- void disposing( );
-
- // prevent method hiding
- virtual void SAL_CALL disposing( const ::com::sun::star::lang::EventObject& Source ) throw (::com::sun::star::uno::RuntimeException) = 0;
-
- /** helper for implementing convertFastPropertyValue( StringItemList )
-
- <p>The signature of this method and the return type have the same semantics
- as convertFastPropertyValue.</p>
- */
- sal_Bool convertNewListSourceProperty(
- ::com::sun::star::uno::Any& _rConvertedValue,
- ::com::sun::star::uno::Any& _rOldValue,
- const ::com::sun::star::uno::Any& _rValue
- )
- SAL_THROW( ( ::com::sun::star::lang::IllegalArgumentException ) );
-
- /** helper for implementing setFastPropertyValueNoBroadcast
-
- <p>Will internally call stringItemListChanged after the new item list
- has been set.</p>
-
- @precond
- not to be called when we have an external list source
- @see hasExternalListSource
- */
- void setNewStringItemList( const ::com::sun::star::uno::Any& _rValue, ControlModelLock& _rInstanceLock );
-
- /** announces that the list of entries has changed.
-
- <p>Derived classes have to override this. Most probably, they'll set the new
- as model property.</p>
-
- @pure
- @see getStringItemList
- */
- virtual void stringItemListChanged( ControlModelLock& _rInstanceLock ) = 0;
-
- /** called whenever a connection to a new external list source has been established
- */
- virtual void connectedExternalListSource( );
-
- /** called whenever a connection to a new external list source has been revoked
- */
- virtual void disconnectedExternalListSource( );
-
- /** called when XRefreshable::refresh has been called, and we do *not* have an external
- list source
- */
- virtual void refreshInternalEntryList() = 0;
-
- private:
- // XListEntrySink
- virtual void SAL_CALL setListEntrySource( const ::com::sun::star::uno::Reference< ::com::sun::star::form::binding::XListEntrySource >& _rxSource ) throw (::com::sun::star::uno::RuntimeException);
- virtual ::com::sun::star::uno::Reference< ::com::sun::star::form::binding::XListEntrySource > SAL_CALL getListEntrySource( ) throw (::com::sun::star::uno::RuntimeException);
-
- // XListEntryListener
- virtual void SAL_CALL entryChanged( const ::com::sun::star::form::binding::ListEntryEvent& _rSource ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL entryRangeInserted( const ::com::sun::star::form::binding::ListEntryEvent& _rSource ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL entryRangeRemoved( const ::com::sun::star::form::binding::ListEntryEvent& _rSource ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL allEntriesChanged( const ::com::sun::star::lang::EventObject& _rSource ) throw (::com::sun::star::uno::RuntimeException);
-
- // XRefreshable
- virtual void SAL_CALL refresh() throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL addRefreshListener(const ::com::sun::star::uno::Reference< ::com::sun::star::util::XRefreshListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeRefreshListener(const ::com::sun::star::uno::Reference< ::com::sun::star::util::XRefreshListener>& _rxListener) throw(::com::sun::star::uno::RuntimeException);
-
- private:
- /** disconnects from the active external list source, if present
- @see connectExternalListSource
- */
- void disconnectExternalListSource( );
-
- /** connects to a new external list source
- @param _rxSource
- the new list source. Must not be <NULL/>
- @see disconnectExternalListSource
- */
- void connectExternalListSource(
- const ::com::sun::star::uno::Reference< ::com::sun::star::form::binding::XListEntrySource >& _rxSource,
- ControlModelLock& _rInstanceLock
- );
-
- /** refreshes our list entries
-
- In case we have an external list source, its used to obtain the new entries, and then
- stringItemListChanged is called to give the derived class the possibility to
- react on this.
-
- In case we do not have an external list source, refreshInternalEntryList is called.
- */
- void impl_lock_refreshList( ControlModelLock& _rInstanceLock );
-
- private:
- OEntryListHelper(); // never implemented
- OEntryListHelper( const OEntryListHelper& ); // never implemented
- OEntryListHelper& operator=( const OEntryListHelper& ); // never implemented
- };
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-
-#endif // FORMS_ENTRYLISTHELPER_HXX
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/errorbroadcaster.cxx b/forms/source/component/errorbroadcaster.cxx
deleted file mode 100644
index 575a65d46..000000000
--- a/forms/source/component/errorbroadcaster.cxx
+++ /dev/null
@@ -1,115 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "errorbroadcaster.hxx"
-#include <connectivity/dbtools.hxx>
-#include <com/sun/star/sdb/SQLContext.hpp>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
- using namespace ::com::sun::star::uno;
- using namespace ::com::sun::star::lang;
- using namespace ::com::sun::star::sdbc;
- using namespace ::com::sun::star::sdb;
- using namespace ::dbtools;
-
- //=====================================================================
- //= OErrorBroadcaster
- //=====================================================================
- //---------------------------------------------------------------------
- OErrorBroadcaster::OErrorBroadcaster( ::cppu::OBroadcastHelper& _rBHelper )
- :m_rBHelper( _rBHelper )
- ,m_aErrorListeners( _rBHelper.rMutex )
- {
- }
-
- //---------------------------------------------------------------------
- OErrorBroadcaster::~OErrorBroadcaster( )
- {
- OSL_ENSURE( m_rBHelper.bDisposed || m_rBHelper.bInDispose,
- "OErrorBroadcaster::~OErrorBroadcaster: not disposed!" );
- // herein, we don't have a chance to do the dispose ourself ....
-
- OSL_ENSURE( 0 == m_aErrorListeners.getLength(),
- "OErrorBroadcaster::~OErrorBroadcaster: still have listeners!" );
- // either we're not disposed, or the derived class did not call our dispose from within their dispose
- }
-
- //---------------------------------------------------------------------
- void SAL_CALL OErrorBroadcaster::disposing()
- {
- EventObject aDisposeEvent( static_cast< XSQLErrorBroadcaster* >( this ) );
- m_aErrorListeners.disposeAndClear( aDisposeEvent );
- }
-
- //------------------------------------------------------------------------------
- void SAL_CALL OErrorBroadcaster::onError( const SQLException& _rException, const ::rtl::OUString& _rContextDescription )
- {
- Any aError;
- if ( _rContextDescription.getLength() )
- aError = makeAny( prependErrorInfo( _rException, static_cast< XSQLErrorBroadcaster* >( this ), _rContextDescription ) );
- else
- aError = makeAny( _rException );
-
- onError( SQLErrorEvent( static_cast< XSQLErrorBroadcaster* >( this ), aError ) );
- }
-
- //------------------------------------------------------------------------------
- void SAL_CALL OErrorBroadcaster::onError( const ::com::sun::star::sdb::SQLErrorEvent& _rError )
- {
- if ( m_aErrorListeners.getLength() )
- {
-
- ::cppu::OInterfaceIteratorHelper aIter( m_aErrorListeners );
- while ( aIter.hasMoreElements() )
- static_cast< XSQLErrorListener* >( aIter.next() )->errorOccured( _rError );
- }
- }
-
- //------------------------------------------------------------------------------
- void SAL_CALL OErrorBroadcaster::addSQLErrorListener( const Reference< XSQLErrorListener >& _rxListener ) throw( RuntimeException )
- {
- m_aErrorListeners.addInterface( _rxListener );
- }
-
- //------------------------------------------------------------------------------
- void SAL_CALL OErrorBroadcaster::removeSQLErrorListener( const Reference< XSQLErrorListener >& _rxListener ) throw( RuntimeException )
- {
- m_aErrorListeners.removeInterface( _rxListener );
- }
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/errorbroadcaster.hxx b/forms/source/component/errorbroadcaster.hxx
deleted file mode 100644
index 38a808322..000000000
--- a/forms/source/component/errorbroadcaster.hxx
+++ /dev/null
@@ -1,76 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef FORMS_ERRORBROADCASTER_HXX
-#define FORMS_ERRORBROADCASTER_HXX
-
-#include <cppuhelper/implbase1.hxx>
-#include <com/sun/star/sdb/XSQLErrorBroadcaster.hpp>
-#include <cppuhelper/interfacecontainer.h>
-#include <com/sun/star/sdbc/SQLException.hpp>
-#include <com/sun/star/sdb/SQLErrorEvent.hpp>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
- //=====================================================================
- //= OErrorBroadcaster
- //=====================================================================
- typedef ::cppu::ImplHelper1 < ::com::sun::star::sdb::XSQLErrorBroadcaster
- > OErrorBroadcaster_BASE;
-
- class OErrorBroadcaster : public OErrorBroadcaster_BASE
- {
- private:
- ::cppu::OBroadcastHelper& m_rBHelper;
- ::cppu::OInterfaceContainerHelper m_aErrorListeners;
-
- protected:
- OErrorBroadcaster( ::cppu::OBroadcastHelper& _rBHelper );
- virtual ~OErrorBroadcaster( );
-
- void SAL_CALL disposing();
-
- void SAL_CALL onError( const ::com::sun::star::sdbc::SQLException& _rException, const ::rtl::OUString& _rContextDescription );
- void SAL_CALL onError( const ::com::sun::star::sdb::SQLErrorEvent& _rException );
-
- protected:
- // XSQLErrorBroadcaster
- virtual void SAL_CALL addSQLErrorListener( const ::com::sun::star::uno::Reference< ::com::sun::star::sdb::XSQLErrorListener >& _rListener ) throw (::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL removeSQLErrorListener( const ::com::sun::star::uno::Reference< ::com::sun::star::sdb::XSQLErrorListener >& _rListener ) throw (::com::sun::star::uno::RuntimeException);
- };
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-#endif // FORMS_ERRORBROADCASTER_HXX
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/findpos.cxx b/forms/source/component/findpos.cxx
deleted file mode 100644
index 40732f806..000000000
--- a/forms/source/component/findpos.cxx
+++ /dev/null
@@ -1,60 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-
-#include "sal/config.h"
-
-#include "findpos.hxx"
-
-#include "com/sun/star/uno/Sequence.hxx"
-#include "comphelper/types.hxx"
-#include "rtl/ustring.hxx"
-#include "sal/types.h"
-
-#include <algorithm>
-
-namespace detail {
-
-sal_Int32 findPos(
- const ::rtl::OUString& aStr,
- const ::com::sun::star::uno::Sequence< ::rtl::OUString >& rList)
-{
- const ::rtl::OUString* pStrList = rList.getConstArray();
- const ::rtl::OUString* pResult = ::std::lower_bound(
- pStrList, pStrList + rList.getLength(), aStr );
- if ( ( pResult != pStrList + rList.getLength() ) && ( *pResult == aStr ) )
- return ( pResult - pStrList );
-
- return -1;
-}
-
-}
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/findpos.hxx b/forms/source/component/findpos.hxx
deleted file mode 100644
index 1a583a909..000000000
--- a/forms/source/component/findpos.hxx
+++ /dev/null
@@ -1,48 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef INCLUDED_FORMS_SOURCE_COMPONENT_FINDPOS_HXX
-#define INCLUDED_FORMS_SOURCE_COMPONENT_FINDPOS_HXX
-
-#include "sal/config.h"
-#include "com/sun/star/uno/Sequence.hxx"
-#include "sal/types.h"
-
-namespace rtl { class OUString; }
-
-namespace detail {
-
-sal_Int32 findPos(
- const ::rtl::OUString& aStr,
- const ::com::sun::star::uno::Sequence< ::rtl::OUString >& rList);
-
-}
-
-#endif
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/formcontrolfont.cxx b/forms/source/component/formcontrolfont.cxx
deleted file mode 100644
index 7a1919024..000000000
--- a/forms/source/component/formcontrolfont.cxx
+++ /dev/null
@@ -1,552 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "formcontrolfont.hxx"
-#include "property.hrc"
-#include "property.hxx"
-#include <tools/debug.hxx>
-#include <comphelper/property.hxx>
-#include <comphelper/types.hxx>
-#include <tools/color.hxx>
-#include <toolkit/helper/emptyfontdescriptor.hxx>
-#include <com/sun/star/awt/FontRelief.hpp>
-#include <com/sun/star/awt/FontEmphasisMark.hpp>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
- using namespace ::comphelper;
- 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
- {
- Any lcl_extractFontDescriptorAggregate( sal_Int32 _nHandle, const FontDescriptor& _rFont )
- {
- Any aValue;
- switch ( _nHandle )
- {
- case PROPERTY_ID_FONT_NAME:
- aValue <<= _rFont.Name;
- break;
-
- case PROPERTY_ID_FONT_STYLENAME:
- aValue <<= _rFont.StyleName;
- break;
-
- case PROPERTY_ID_FONT_FAMILY:
- aValue <<= (sal_Int16)_rFont.Family;
- break;
-
- case PROPERTY_ID_FONT_CHARSET:
- aValue <<= (sal_Int16)_rFont.CharSet;
- break;
-
- case PROPERTY_ID_FONT_CHARWIDTH:
- aValue <<= _rFont.CharacterWidth;
- break;
-
- case PROPERTY_ID_FONT_KERNING:
- aValue <<= _rFont.Kerning;
- break;
-
- case PROPERTY_ID_FONT_ORIENTATION:
- aValue <<= _rFont.Orientation;
- break;
-
- case PROPERTY_ID_FONT_PITCH:
- aValue <<= _rFont.Pitch;
- break;
-
- case PROPERTY_ID_FONT_TYPE:
- aValue <<= _rFont.Type;
- break;
-
- case PROPERTY_ID_FONT_WIDTH:
- aValue <<= _rFont.Width;
- break;
-
- case PROPERTY_ID_FONT_HEIGHT:
- aValue <<= (float)( _rFont.Height );
- break;
-
- case PROPERTY_ID_FONT_WEIGHT:
- aValue <<= (float)_rFont.Weight;
- break;
-
- case PROPERTY_ID_FONT_SLANT:
- aValue = makeAny(_rFont.Slant);
- break;
-
- case PROPERTY_ID_FONT_UNDERLINE:
- aValue <<= (sal_Int16)_rFont.Underline;
- break;
-
- case PROPERTY_ID_FONT_STRIKEOUT:
- aValue <<= (sal_Int16)_rFont.Strikeout;
- break;
-
- case PROPERTY_ID_FONT_WORDLINEMODE:
- aValue = makeAny( (sal_Bool)_rFont.WordLineMode );
- break;
-
- default:
- OSL_FAIL( "lcl_extractFontDescriptorAggregate: invalid handle!" );
- break;
- }
- return aValue;
- }
- }
-
- //=====================================================================
- //= FontControlModel
- //=====================================================================
- //---------------------------------------------------------------------
- FontControlModel::FontControlModel( bool _bToolkitCompatibleDefaults )
- :m_nFontRelief( FontRelief::NONE )
- ,m_nFontEmphasis( FontEmphasisMark::NONE )
- ,m_bToolkitCompatibleDefaults( _bToolkitCompatibleDefaults )
- {
- }
-
- //---------------------------------------------------------------------
- FontControlModel::FontControlModel( const FontControlModel* _pOriginal )
- {
- m_aFont = _pOriginal->m_aFont;
- m_nFontRelief = _pOriginal->m_nFontRelief;
- m_nFontEmphasis = _pOriginal->m_nFontEmphasis;
- m_aTextLineColor = _pOriginal->m_aTextLineColor;
- m_aTextColor = _pOriginal->m_aTextColor;
- m_bToolkitCompatibleDefaults = _pOriginal->m_bToolkitCompatibleDefaults;
- }
-
- //---------------------------------------------------------------------
- bool FontControlModel::isFontRelatedProperty( sal_Int32 _nPropertyHandle ) const
- {
- return isFontAggregateProperty( _nPropertyHandle )
- || ( _nPropertyHandle == PROPERTY_ID_FONT )
- || ( _nPropertyHandle == PROPERTY_ID_FONTEMPHASISMARK )
- || ( _nPropertyHandle == PROPERTY_ID_FONTRELIEF )
- || ( _nPropertyHandle == PROPERTY_ID_TEXTLINECOLOR )
- || ( _nPropertyHandle == PROPERTY_ID_TEXTCOLOR );
- }
-
- //---------------------------------------------------------------------
- bool FontControlModel::isFontAggregateProperty( sal_Int32 _nPropertyHandle ) const
- {
- return ( _nPropertyHandle == PROPERTY_ID_FONT_CHARWIDTH )
- || ( _nPropertyHandle == PROPERTY_ID_FONT_ORIENTATION )
- || ( _nPropertyHandle == PROPERTY_ID_FONT_WIDTH )
- || ( _nPropertyHandle == PROPERTY_ID_FONT_NAME )
- || ( _nPropertyHandle == PROPERTY_ID_FONT_STYLENAME )
- || ( _nPropertyHandle == PROPERTY_ID_FONT_FAMILY )
- || ( _nPropertyHandle == PROPERTY_ID_FONT_CHARSET )
- || ( _nPropertyHandle == PROPERTY_ID_FONT_HEIGHT )
- || ( _nPropertyHandle == PROPERTY_ID_FONT_WEIGHT )
- || ( _nPropertyHandle == PROPERTY_ID_FONT_SLANT )
- || ( _nPropertyHandle == PROPERTY_ID_FONT_UNDERLINE )
- || ( _nPropertyHandle == PROPERTY_ID_FONT_STRIKEOUT )
- || ( _nPropertyHandle == PROPERTY_ID_FONT_WORDLINEMODE )
- || ( _nPropertyHandle == PROPERTY_ID_FONT_PITCH )
- || ( _nPropertyHandle == PROPERTY_ID_FONT_KERNING )
- || ( _nPropertyHandle == PROPERTY_ID_FONT_TYPE );
- }
-
- //---------------------------------------------------------------------
- sal_Int32 FontControlModel::getTextColor( ) const
- {
- sal_Int32 nColor = COL_TRANSPARENT;
- m_aTextColor >>= nColor;
- return nColor;
- }
-
- //---------------------------------------------------------------------
- sal_Int32 FontControlModel::getTextLineColor( ) const
- {
- sal_Int32 nColor = COL_TRANSPARENT;
- m_aTextLineColor >>= nColor;
- return nColor;
- }
-
- //------------------------------------------------------------------------------
- void FontControlModel::describeFontRelatedProperties( Sequence< Property >& /* [out] */ _rProps ) const
- {
- sal_Int32 nPos = _rProps.getLength();
- _rProps.realloc( nPos + 21 );
- Property* pProperties = _rProps.getArray();
-
- DECL_PROP2 ( FONT, FontDescriptor, BOUND, MAYBEDEFAULT );
- DECL_PROP2 ( FONTEMPHASISMARK, sal_Int16, BOUND, MAYBEDEFAULT );
- DECL_PROP2 ( FONTRELIEF, sal_Int16, BOUND, MAYBEDEFAULT );
- DECL_PROP3 ( TEXTCOLOR, sal_Int32, BOUND, MAYBEDEFAULT, MAYBEVOID );
- DECL_PROP3 ( TEXTLINECOLOR, sal_Int32, BOUND, MAYBEDEFAULT, MAYBEVOID );
-
- DECL_PROP1 ( FONT_CHARWIDTH, float, MAYBEDEFAULT );
- DECL_BOOL_PROP1 ( FONT_KERNING, MAYBEDEFAULT );
- DECL_PROP1 ( FONT_ORIENTATION, float, MAYBEDEFAULT );
- DECL_PROP1 ( FONT_PITCH, sal_Int16, MAYBEDEFAULT );
- DECL_PROP1 ( FONT_TYPE, sal_Int16, MAYBEDEFAULT );
- DECL_PROP1 ( FONT_WIDTH, sal_Int16, MAYBEDEFAULT );
- DECL_PROP1 ( FONT_NAME, ::rtl::OUString, MAYBEDEFAULT );
- DECL_PROP1 ( FONT_STYLENAME, ::rtl::OUString, MAYBEDEFAULT );
- DECL_PROP1 ( FONT_FAMILY, sal_Int16, MAYBEDEFAULT );
- DECL_PROP1 ( FONT_CHARSET, sal_Int16, MAYBEDEFAULT );
- DECL_PROP1 ( FONT_HEIGHT, float, MAYBEDEFAULT );
- DECL_PROP1 ( FONT_WEIGHT, float, MAYBEDEFAULT );
- DECL_PROP1 ( FONT_SLANT, sal_Int16, MAYBEDEFAULT );
- DECL_PROP1 ( FONT_UNDERLINE, sal_Int16, MAYBEDEFAULT );
- DECL_PROP1 ( FONT_STRIKEOUT, sal_Int16, MAYBEDEFAULT );
- DECL_BOOL_PROP1 ( FONT_WORDLINEMODE, MAYBEDEFAULT );
- }
-
- //---------------------------------------------------------------------
- void FontControlModel::getFastPropertyValue( Any& _rValue, sal_Int32 _nHandle ) const
- {
- switch( _nHandle )
- {
- case PROPERTY_ID_TEXTCOLOR:
- _rValue = m_aTextColor;
- break;
-
- case PROPERTY_ID_FONTEMPHASISMARK:
- _rValue <<= m_nFontEmphasis;
- break;
-
- case PROPERTY_ID_FONTRELIEF:
- _rValue <<= m_nFontRelief;
- break;
-
- case PROPERTY_ID_TEXTLINECOLOR:
- _rValue = m_aTextLineColor;
- break;
-
- case PROPERTY_ID_FONT:
- _rValue = makeAny( m_aFont );
- break;
-
- default:
- _rValue = lcl_extractFontDescriptorAggregate( _nHandle, m_aFont );
- break;
- }
- }
-
- //---------------------------------------------------------------------
- sal_Bool FontControlModel::convertFastPropertyValue( Any& _rConvertedValue, Any& _rOldValue,
- sal_Int32 _nHandle, const Any& _rValue ) throw( IllegalArgumentException )
- {
- sal_Bool bModified = sal_False;
- switch( _nHandle )
- {
- case PROPERTY_ID_TEXTCOLOR:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, m_aTextColor, ::getCppuType( static_cast< const sal_Int32* >( NULL ) ) );
- break;
-
- case PROPERTY_ID_TEXTLINECOLOR:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, m_aTextLineColor, ::getCppuType( static_cast< sal_Int32* >( NULL ) ) );
- break;
-
- case PROPERTY_ID_FONTEMPHASISMARK:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, m_nFontEmphasis );
- break;
-
- case PROPERTY_ID_FONTRELIEF:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, m_nFontRelief );
- break;
-
- case PROPERTY_ID_FONT:
- {
- Any aWorkAroundGccLimitation = makeAny( m_aFont );
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, aWorkAroundGccLimitation, ::getCppuType( &m_aFont ) );
- }
- break;
-
- case PROPERTY_ID_FONT_NAME:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, m_aFont.Name );
- break;
-
- case PROPERTY_ID_FONT_STYLENAME:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, m_aFont.StyleName );
- break;
-
- case PROPERTY_ID_FONT_FAMILY:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, (sal_Int16)m_aFont.Family );
- break;
-
- case PROPERTY_ID_FONT_CHARSET:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, (sal_Int16)m_aFont.CharSet );
- break;
-
- case PROPERTY_ID_FONT_CHARWIDTH:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, float( m_aFont.CharacterWidth ) );
- break;
-
- case PROPERTY_ID_FONT_KERNING:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, (sal_Int16)m_aFont.Kerning );
- break;
-
- case PROPERTY_ID_FONT_ORIENTATION:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, float( m_aFont.Orientation ) );
- break;
-
- case PROPERTY_ID_FONT_PITCH:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, (sal_Int16)m_aFont.Pitch );
- break;
-
- case PROPERTY_ID_FONT_TYPE:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, (sal_Int16)m_aFont.Type );
- break;
-
- case PROPERTY_ID_FONT_WIDTH:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, (sal_Int16)m_aFont.Width );
- break;
-
- case PROPERTY_ID_FONT_HEIGHT:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, float( m_aFont.Height ) );
- break;
-
- case PROPERTY_ID_FONT_WEIGHT:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, m_aFont.Weight );
- break;
-
- case PROPERTY_ID_FONT_SLANT:
- bModified = tryPropertyValueEnum( _rConvertedValue, _rOldValue, _rValue, m_aFont.Slant );
- break;
-
- case PROPERTY_ID_FONT_UNDERLINE:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, (sal_Int16)m_aFont.Underline );
- break;
-
- case PROPERTY_ID_FONT_STRIKEOUT:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, (sal_Int16)m_aFont.Strikeout );
- break;
-
- case PROPERTY_ID_FONT_WORDLINEMODE:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, (sal_Bool)m_aFont.WordLineMode );
- break;
-
- default:
- OSL_FAIL( "FontControlModel::convertFastPropertyValue: no font aggregate!" );
- }
- return bModified;
- }
-
- //------------------------------------------------------------------------------
- void FontControlModel::setFastPropertyValue_NoBroadcast( sal_Int32 _nHandle, const Any& _rValue ) throw ( Exception )
- {
- switch( _nHandle )
- {
- case PROPERTY_ID_TEXTCOLOR:
- m_aTextColor = _rValue;
- break;
-
- case PROPERTY_ID_TEXTLINECOLOR:
- m_aTextLineColor = _rValue;
- break;
-
- case PROPERTY_ID_FONTEMPHASISMARK:
- _rValue >>= m_nFontEmphasis;
- break;
-
- case PROPERTY_ID_FONTRELIEF:
- _rValue >>= m_nFontRelief;
- break;
-
- case PROPERTY_ID_FONT:
- _rValue >>= m_aFont;
- break;
-
- case PROPERTY_ID_FONT_NAME:
- _rValue >>= m_aFont.Name;
- break;
-
- case PROPERTY_ID_FONT_STYLENAME:
- _rValue >>= m_aFont.StyleName;
- break;
-
- case PROPERTY_ID_FONT_FAMILY:
- _rValue >>= m_aFont.Family;
- break;
-
- case PROPERTY_ID_FONT_CHARSET:
- _rValue >>= m_aFont.CharSet;
- break;
-
- case PROPERTY_ID_FONT_CHARWIDTH:
- _rValue >>= m_aFont.CharacterWidth;
- break;
-
- case PROPERTY_ID_FONT_KERNING:
- _rValue >>= m_aFont.Kerning;
- break;
-
- case PROPERTY_ID_FONT_ORIENTATION:
- _rValue >>= m_aFont.Orientation;
- break;
-
- case PROPERTY_ID_FONT_PITCH:
- _rValue >>= m_aFont.Pitch;
- break;
-
- case PROPERTY_ID_FONT_TYPE:
- _rValue >>= m_aFont.Type;
- break;
-
- case PROPERTY_ID_FONT_WIDTH:
- _rValue >>= m_aFont.Width;
- break;
-
- case PROPERTY_ID_FONT_HEIGHT:
- {
- float nHeight = 0;
- _rValue >>= nHeight;
- m_aFont.Height = (sal_Int16)nHeight;
- }
- break;
-
- case PROPERTY_ID_FONT_WEIGHT:
- _rValue >>= m_aFont.Weight;
- break;
-
- case PROPERTY_ID_FONT_SLANT:
- _rValue >>= m_aFont.Slant;
- break;
-
- case PROPERTY_ID_FONT_UNDERLINE:
- _rValue >>= m_aFont.Underline;
- break;
-
- case PROPERTY_ID_FONT_STRIKEOUT:
- _rValue >>= m_aFont.Strikeout;
- break;
-
- case PROPERTY_ID_FONT_WORDLINEMODE:
- {
- sal_Bool bWordLineMode = sal_False;
- _rValue >>= bWordLineMode;
- m_aFont.WordLineMode = bWordLineMode;
- }
- break;
-
- default:
- OSL_FAIL( "FontControlModel::setFastPropertyValue_NoBroadcast: invalid property!" );
- }
- }
-
- //------------------------------------------------------------------------------
- Any FontControlModel::getPropertyDefaultByHandle( sal_Int32 _nHandle ) const
- {
- Any aReturn;
- // some defaults which are the same, not matter if we have toolkit-compatible
- // defaults or not
- bool bHandled = false;
- switch( _nHandle )
- {
- case PROPERTY_ID_TEXTCOLOR:
- case PROPERTY_ID_TEXTLINECOLOR:
- // void
- bHandled = true;
- break;
-
- case PROPERTY_ID_FONTEMPHASISMARK:
- aReturn <<= FontEmphasisMark::NONE;
- bHandled = true;
- break;
-
- case PROPERTY_ID_FONTRELIEF:
- aReturn <<= FontRelief::NONE;
- bHandled = true;
- break;
- }
- if ( bHandled )
- return aReturn;
-
- if ( m_bToolkitCompatibleDefaults )
- {
- EmptyFontDescriptor aEmpty;
- if ( PROPERTY_ID_FONT == _nHandle )
- return makeAny( (FontDescriptor)aEmpty );
- return lcl_extractFontDescriptorAggregate( _nHandle, aEmpty );
- }
-
- switch( _nHandle )
- {
- case PROPERTY_ID_FONT:
- aReturn <<= ::comphelper::getDefaultFont();
- break;
-
- case PROPERTY_ID_FONT_WORDLINEMODE:
- aReturn = makeBoolAny(sal_False);
-
- case PROPERTY_ID_FONT_NAME:
- case PROPERTY_ID_FONT_STYLENAME:
- aReturn <<= ::rtl::OUString();
-
- case PROPERTY_ID_FONT_FAMILY:
- case PROPERTY_ID_FONT_CHARSET:
- case PROPERTY_ID_FONT_SLANT:
- case PROPERTY_ID_FONT_UNDERLINE:
- case PROPERTY_ID_FONT_STRIKEOUT:
- aReturn <<= (sal_Int16)1;
- break;
-
- case PROPERTY_ID_FONT_KERNING:
- aReturn = makeBoolAny(sal_False);
- break;
-
- case PROPERTY_ID_FONT_PITCH:
- case PROPERTY_ID_FONT_TYPE:
- case PROPERTY_ID_FONT_WIDTH:
- aReturn <<= (sal_Int16)0;
- break;
-
- case PROPERTY_ID_FONT_HEIGHT:
- case PROPERTY_ID_FONT_WEIGHT:
- case PROPERTY_ID_FONT_CHARWIDTH:
- case PROPERTY_ID_FONT_ORIENTATION:
- aReturn <<= (float)0;
- break;
-
- default:
- OSL_FAIL( "FontControlModel::getPropertyDefaultByHandle: invalid property!" );
- }
-
- return aReturn;
- }
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/imgprod.cxx b/forms/source/component/imgprod.cxx
deleted file mode 100644
index 518a20568..000000000
--- a/forms/source/component/imgprod.cxx
+++ /dev/null
@@ -1,582 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-
-#include "imgprod.hxx"
-
-#include <vcl/bmpacc.hxx>
-#include <vcl/cvtgrf.hxx>
-#include <vcl/svapp.hxx>
-#include <unotools/ucbstreamhelper.hxx>
-#include <svtools/filter.hxx>
-#include <com/sun/star/io/XInputStream.hpp>
-
-#include "svtools/imageresourceaccess.hxx"
-#include <comphelper/processfactory.hxx>
-
-// --------------------
-// - ImgProdLockBytes -
-// --------------------
-
-class ImgProdLockBytes : public SvLockBytes
-{
- ::com::sun::star::uno::Reference< ::com::sun::star::io::XInputStream > xStmRef;
- ::com::sun::star::uno::Sequence<sal_Int8> maSeq;
-
- ImgProdLockBytes() {};
-
-public:
-
- ImgProdLockBytes( SvStream* pStm, sal_Bool bOwner );
- ImgProdLockBytes( ::com::sun::star::uno::Reference< ::com::sun::star::io::XInputStream > & rStreamRef );
- virtual ~ImgProdLockBytes();
-
- virtual ErrCode ReadAt( sal_Size nPos, void* pBuffer, sal_Size nCount, sal_Size* pRead ) const;
- virtual ErrCode WriteAt( sal_Size nPos, const void* pBuffer, sal_Size nCount, sal_Size* pWritten );
- virtual ErrCode Flush() const;
- virtual ErrCode SetSize( sal_Size nSize );
- virtual ErrCode Stat( SvLockBytesStat*, SvLockBytesStatFlag ) const;
-};
-
-// ------------------------------------------------------------------------
-
-ImgProdLockBytes::ImgProdLockBytes( SvStream* pStm, sal_Bool bOwner ) :
- SvLockBytes( pStm, bOwner )
-{
-}
-
-// ------------------------------------------------------------------------
-
-ImgProdLockBytes::ImgProdLockBytes( ::com::sun::star::uno::Reference< ::com::sun::star::io::XInputStream > & rStmRef ) :
- xStmRef( rStmRef )
-{
- if( xStmRef.is() )
- {
- const sal_uInt32 nBytesToRead = 65535;
- sal_uInt32 nRead;
-
- do
- {
- ::com::sun::star::uno::Sequence< sal_Int8 > aReadSeq;
-
- nRead = xStmRef->readSomeBytes( aReadSeq, nBytesToRead );
-
- if( nRead )
- {
- const sal_uInt32 nOldLength = maSeq.getLength();
- maSeq.realloc( nOldLength + nRead );
- rtl_copyMemory( maSeq.getArray() + nOldLength, aReadSeq.getConstArray(), aReadSeq.getLength() );
- }
- }
- while( nBytesToRead == nRead );
- }
-}
-
-// ------------------------------------------------------------------------
-
-ImgProdLockBytes::~ImgProdLockBytes()
-{
-}
-
-// ------------------------------------------------------------------------
-
-ErrCode ImgProdLockBytes::ReadAt( sal_Size nPos, void* pBuffer, sal_Size nCount, sal_Size* pRead ) const
-{
- if( GetStream() )
- {
- ( (SvStream*) GetStream() )->ResetError();
- const ErrCode nErr = SvLockBytes::ReadAt( nPos, pBuffer, nCount, pRead );
- ( (SvStream*) GetStream() )->ResetError();
- return nErr;
- }
- else
- {
- const sal_Size nSeqLen = maSeq.getLength();
- ErrCode nErr = ERRCODE_NONE;
-
- if( nPos < nSeqLen )
- {
- if( ( nPos + nCount ) > nSeqLen )
- nCount = nSeqLen - nPos;
-
- memcpy( pBuffer, maSeq.getConstArray() + nPos, nCount );
- *pRead = nCount;
- }
- else
- *pRead = 0UL;
-
- return nErr;
- }
-}
-
-// ------------------------------------------------------------------------
-
-ErrCode ImgProdLockBytes::WriteAt( sal_Size nPos, const void* pBuffer, sal_Size nCount, sal_Size* pWritten )
-{
- if( GetStream() )
- return SvLockBytes::WriteAt( nPos, pBuffer, nCount, pWritten );
- else
- {
- DBG_ASSERT( xStmRef.is(), "ImgProdLockBytes::WriteAt: xInputStream has no reference..." );
- return ERRCODE_IO_CANTWRITE;
- }
-}
-
-// ------------------------------------------------------------------------
-
-ErrCode ImgProdLockBytes::Flush() const
-{
- return ERRCODE_NONE;
-}
-
-// ------------------------------------------------------------------------
-
-ErrCode ImgProdLockBytes::SetSize( sal_Size nSize )
-{
- if( GetStream() )
- return SvLockBytes::SetSize( nSize );
- else
- {
- OSL_FAIL( "ImgProdLockBytes::SetSize not supported for xInputStream..." );
- return ERRCODE_IO_CANTWRITE;
- }
-}
-
-// ------------------------------------------------------------------------
-
-ErrCode ImgProdLockBytes::Stat( SvLockBytesStat* pStat, SvLockBytesStatFlag eFlag ) const
-{
- if( GetStream() )
- return SvLockBytes::Stat( pStat, eFlag );
- else
- {
- DBG_ASSERT( xStmRef.is(), "ImgProdLockBytes::Stat: xInputStream has no reference..." );
- pStat->nSize = maSeq.getLength();
- return ERRCODE_NONE;
- }
-}
-
-// -----------------
-// - ImageProducer -
-// -----------------
-
-ImageProducer::ImageProducer() :
- mpStm ( NULL ),
- mbConsInit ( sal_False )
-{
- mpGraphic = new Graphic;
- DBG_ASSERT( Application::GetFilterHdl().IsSet(), "ImageProducer::ImageProducer(): No filter handler set" );
-}
-
-// ------------------------------------------------------------
-
-ImageProducer::~ImageProducer()
-{
- delete mpGraphic;
- mpGraphic = NULL;
-
- delete mpStm;
- mpStm = NULL;
-}
-
-// ------------------------------------------------------------
-
-// ::com::sun::star::uno::XInterface
-::com::sun::star::uno::Any ImageProducer::queryInterface( const ::com::sun::star::uno::Type & rType ) throw(::com::sun::star::uno::RuntimeException)
-{
- ::com::sun::star::uno::Any aRet = ::cppu::queryInterface( rType,
- SAL_STATIC_CAST( ::com::sun::star::lang::XInitialization*, this ),
- SAL_STATIC_CAST( ::com::sun::star::awt::XImageProducer*, this ) );
- return (aRet.hasValue() ? aRet : OWeakObject::queryInterface( rType ));
-}
-
-// ------------------------------------------------------------
-
-void ImageProducer::addConsumer( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XImageConsumer >& rxConsumer ) throw(::com::sun::star::uno::RuntimeException)
-{
- DBG_ASSERT( rxConsumer.is(), "::AddConsumer(...): No consumer referenced!" );
- if( rxConsumer.is() )
- maConsList.push_back( new ::com::sun::star::uno::Reference< ::com::sun::star::awt::XImageConsumer > ( rxConsumer ));
-}
-
-// ------------------------------------------------------------
-
-void ImageProducer::removeConsumer( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XImageConsumer >& rxConsumer ) throw(::com::sun::star::uno::RuntimeException)
-{
- ConsumerList_t::reverse_iterator riter = std::find(maConsList.rbegin(),maConsList.rend(),rxConsumer);
-
- if (riter != maConsList.rend())
- maConsList.erase(riter.base()-1);
-}
-
-// ------------------------------------------------------------
-
-void ImageProducer::SetImage( const ::rtl::OUString& rPath )
-{
- maURL = rPath;
- mpGraphic->Clear();
- mbConsInit = sal_False;
- delete mpStm;
-
- if ( ::svt::GraphicAccess::isSupportedURL( maURL ) )
- {
- mpStm = ::svt::GraphicAccess::getImageStream( ::comphelper::getProcessServiceFactory(), maURL );
- }
- else if( maURL.getLength() )
- {
- SvStream* pIStm = ::utl::UcbStreamHelper::CreateStream( maURL, STREAM_STD_READ );
- mpStm = pIStm ? new SvStream( new ImgProdLockBytes( pIStm, sal_True ) ) : NULL;
- }
- else
- mpStm = NULL;
-}
-
-// ------------------------------------------------------------
-
-void ImageProducer::SetImage( SvStream& rStm )
-{
- maURL = ::rtl::OUString();
- mpGraphic->Clear();
- mbConsInit = sal_False;
-
- delete mpStm;
- mpStm = new SvStream( new ImgProdLockBytes( &rStm, sal_False ) );
-}
-
-// ------------------------------------------------------------
-
-void ImageProducer::setImage( ::com::sun::star::uno::Reference< ::com::sun::star::io::XInputStream > & rInputStmRef )
-{
- maURL = ::rtl::OUString();
- mpGraphic->Clear();
- mbConsInit = sal_False;
- delete mpStm;
-
- if( rInputStmRef.is() )
- mpStm = new SvStream( new ImgProdLockBytes( rInputStmRef ) );
- else
- mpStm = NULL;
-}
-
-// ------------------------------------------------------------
-
-void ImageProducer::NewDataAvailable()
-{
- if( ( GRAPHIC_NONE == mpGraphic->GetType() ) || mpGraphic->GetContext() )
- startProduction();
-}
-
-// ------------------------------------------------------------
-
-void ImageProducer::startProduction() throw(::com::sun::star::uno::RuntimeException)
-{
- if( !maConsList.empty() || maDoneHdl.IsSet() )
- {
- bool bNotifyEmptyGraphics = false;
-
- // valid stream or filled graphic? => update consumers
- if( mpStm || ( mpGraphic->GetType() != GRAPHIC_NONE ) )
- {
- // if we already have a graphic, we don't have to import again;
- // graphic is cleared if a new Stream is set
- if( ( mpGraphic->GetType() == GRAPHIC_NONE ) || mpGraphic->GetContext() )
- {
- if ( ImplImportGraphic( *mpGraphic ) && maDoneHdl.IsSet() )
- maDoneHdl.Call( mpGraphic );
- }
-
- if( mpGraphic->GetType() != GRAPHIC_NONE )
- ImplUpdateData( *mpGraphic );
- else
- bNotifyEmptyGraphics = true;
- }
- else
- bNotifyEmptyGraphics = true;
-
- if ( bNotifyEmptyGraphics )
- {
- // reset image
- // create temporary list to hold interfaces
- ConsumerList_t aTmp = maConsList;
-
- // iterate through interfaces
- for( ConsumerList_t::iterator iter = aTmp.begin(); iter != aTmp.end(); ++iter )
- {
- (*iter)->init( 0, 0 );
- (*iter)->complete( ::com::sun::star::awt::ImageStatus::IMAGESTATUS_STATICIMAGEDONE, this );
- }
-
- if ( maDoneHdl.IsSet() )
- maDoneHdl.Call( NULL );
- }
- }
-}
-
-// ------------------------------------------------------------
-
-sal_Bool ImageProducer::ImplImportGraphic( Graphic& rGraphic )
-{
- if( ERRCODE_IO_PENDING == mpStm->GetError() )
- mpStm->ResetError();
-
- mpStm->Seek( 0UL );
-
- sal_Bool bRet = GraphicConverter::Import( *mpStm, rGraphic ) == ERRCODE_NONE;
-
- if( ERRCODE_IO_PENDING == mpStm->GetError() )
- mpStm->ResetError();
-
- return bRet;
-}
-
-// ------------------------------------------------------------
-
-void ImageProducer::ImplUpdateData( const Graphic& rGraphic )
-{
- ImplInitConsumer( rGraphic );
-
- if( mbConsInit && !maConsList.empty() )
- {
- // create temporary list to hold interfaces
- ConsumerList_t aTmp = maConsList;
-
- ImplUpdateConsumer( rGraphic );
- mbConsInit = sal_False;
-
- // iterate through interfaces
- for( ConsumerList_t::iterator iter = aTmp.begin(); iter != aTmp.end(); ++iter )
- (*iter)->complete( ::com::sun::star::awt::ImageStatus::IMAGESTATUS_STATICIMAGEDONE, this );
- }
-}
-
-// ------------------------------------------------------------
-
-void ImageProducer::ImplInitConsumer( const Graphic& rGraphic )
-{
- Bitmap aBmp( rGraphic.GetBitmapEx().GetBitmap() );
- BitmapReadAccess* pBmpAcc = aBmp.AcquireReadAccess();
-
- if( pBmpAcc )
- {
- sal_uInt16 nPalCount = 0;
- sal_uInt32 nRMask = 0;
- sal_uInt32 nGMask = 0;
- sal_uInt32 nBMask = 0;
- sal_uInt32 nAMask = 0;
- ::com::sun::star::uno::Sequence< sal_Int32 > aRGBPal;
-
- if( pBmpAcc->HasPalette() )
- {
- nPalCount = pBmpAcc->GetPaletteEntryCount();
-
- if( nPalCount )
- {
- aRGBPal = ::com::sun::star::uno::Sequence< sal_Int32 >( nPalCount + 1 );
-
- sal_Int32* pTmp = aRGBPal.getArray();
-
- for( sal_uInt32 i = 0; i < nPalCount; i++, pTmp++ )
- {
- const BitmapColor& rCol = pBmpAcc->GetPaletteColor( (sal_uInt16) i );
-
- *pTmp = ( (sal_Int32) rCol.GetRed() ) << (sal_Int32)(24L);
- *pTmp |= ( (sal_Int32) rCol.GetGreen() ) << (sal_Int32)(16L);
- *pTmp |= ( (sal_Int32) rCol.GetBlue() ) << (sal_Int32)(8L);
- *pTmp |= (sal_Int32)(0x000000ffL);
- }
-
- if( rGraphic.IsTransparent() )
- {
- // append transparent entry
- *pTmp = (sal_Int32)(0xffffff00L);
- mnTransIndex = nPalCount;
- nPalCount++;
- }
- else
- mnTransIndex = 0;
-
- }
- }
- else
- {
- nRMask = 0xff000000UL;
- nGMask = 0x00ff0000UL;
- nBMask = 0x0000ff00UL;
- nAMask = 0x000000ffUL;
- }
-
- // create temporary list to hold interfaces
- ConsumerList_t aTmp = maConsList;
-
- // iterate through interfaces
- for( ConsumerList_t::iterator iter = aTmp.begin(); iter != aTmp.end(); ++iter)
- {
- (*iter)->init( pBmpAcc->Width(), pBmpAcc->Height() );
- (*iter)->setColorModel( pBmpAcc->GetBitCount(),aRGBPal, nRMask, nGMask, nBMask, nAMask );
- }
-
- aBmp.ReleaseAccess( pBmpAcc );
- mbConsInit = sal_True;
- }
-}
-
-// ------------------------------------------------------------
-
-void ImageProducer::ImplUpdateConsumer( const Graphic& rGraphic )
-{
- BitmapEx aBmpEx( rGraphic.GetBitmapEx() );
- Bitmap aBmp( aBmpEx.GetBitmap() );
- BitmapReadAccess* pBmpAcc = aBmp.AcquireReadAccess();
-
- if( pBmpAcc )
- {
- Bitmap aMask( aBmpEx.GetMask() );
- BitmapReadAccess* pMskAcc = !!aMask ? aMask.AcquireReadAccess() : NULL;
- const long nWidth = pBmpAcc->Width();
- const long nHeight = pBmpAcc->Height();
- const long nStartX = 0L;
- const long nEndX = nWidth - 1L;
- const long nStartY = 0L;
- const long nEndY = nHeight - 1L;
- const long nPartWidth = nEndX - nStartX + 1;
- const long nPartHeight = nEndY - nStartY + 1;
-
- if( !pMskAcc )
- {
- aMask = Bitmap( aBmp.GetSizePixel(), 1 );
- aMask.Erase( COL_BLACK );
- pMskAcc = aMask.AcquireReadAccess();
- }
-
- // create temporary list to hold interfaces
- ConsumerList_t aTmp = maConsList;
-
- if( pBmpAcc->HasPalette() )
- {
- const BitmapColor aWhite( pMskAcc->GetBestMatchingColor( Color( COL_WHITE ) ) );
-
- if( mnTransIndex < 256 )
- {
- ::com::sun::star::uno::Sequence<sal_Int8> aData( nPartWidth * nPartHeight );
- sal_Int8* pTmp = aData.getArray();
-
- for( long nY = nStartY; nY <= nEndY; nY++ )
- {
- for( long nX = nStartX; nX <= nEndX; nX++ )
- {
- if( pMskAcc->GetPixel( nY, nX ) == aWhite )
- *pTmp++ = sal::static_int_cast< sal_Int8 >(
- mnTransIndex );
- else
- *pTmp++ = pBmpAcc->GetPixel( nY, nX ).GetIndex();
- }
- }
-
- // iterate through interfaces
- for (ConsumerList_t::iterator iter = aTmp.begin(); iter != aTmp.end(); ++iter)
- (*iter)->setPixelsByBytes( nStartX, nStartY, nPartWidth, nPartHeight, aData, 0UL, nPartWidth );
- }
- else
- {
- ::com::sun::star::uno::Sequence<sal_Int32> aData( nPartWidth * nPartHeight );
- sal_Int32* pTmp = aData.getArray();
-
- for( long nY = nStartY; nY <= nEndY; nY++ )
- {
- for( long nX = nStartX; nX <= nEndX; nX++ )
- {
- if( pMskAcc->GetPixel( nY, nX ) == aWhite )
- *pTmp++ = mnTransIndex;
- else
- *pTmp++ = pBmpAcc->GetPixel( nY, nX ).GetIndex();
- }
- }
-
- // iterate through interfaces
- for (ConsumerList_t::iterator iter = aTmp.begin(); iter != aTmp.end(); ++iter)
- (*iter)->setPixelsByLongs( nStartX, nStartY, nPartWidth, nPartHeight, aData, 0UL, nPartWidth );
- }
- }
- else
- {
- ::com::sun::star::uno::Sequence<sal_Int32> aData( nPartWidth * nPartHeight );
- const BitmapColor aWhite( pMskAcc->GetBestMatchingColor( Color( COL_WHITE ) ) );
- sal_Int32* pTmp = aData.getArray();
-
- for( long nY = nStartY; nY <= nEndY; nY++ )
- {
- for( long nX = nStartX; nX <= nEndX; nX++, pTmp++ )
- {
- const BitmapColor aCol( pBmpAcc->GetPixel( nY, nX ) );
-
- *pTmp = ( (sal_Int32) aCol.GetRed() ) << (sal_Int32)(24L);
- *pTmp |= ( (sal_Int32) aCol.GetGreen() ) << (sal_Int32)(16L);
- *pTmp |= ( (sal_Int32) aCol.GetBlue() ) << (sal_Int32)(8L);
-
- if( pMskAcc->GetPixel( nY, nX ) != aWhite )
- *pTmp |= 0x000000ffUL;
- }
- }
-
- // iterate through interfaces
- for (ConsumerList_t::iterator iter = aTmp.begin(); iter != aTmp.end(); ++iter)
- (*iter)->setPixelsByLongs( nStartX, nStartY, nPartWidth, nPartHeight, aData, 0UL, nPartWidth );
- }
-
- aBmp.ReleaseAccess( pBmpAcc );
- aMask.ReleaseAccess( pMskAcc );
- }
-}
-
-void ImageProducer::initialize( const ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Any >& aArguments ) throw (::com::sun::star::uno::Exception, ::com::sun::star::uno::RuntimeException)
-{
- if ( aArguments.getLength() == 1 )
- {
- ::com::sun::star::uno::Any aArg = aArguments.getConstArray()[0];
- rtl::OUString aURL;
- if ( aArg >>= aURL )
- {
- SetImage( aURL );
- }
- }
-}
-
-namespace frm
-{
-::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >
-SAL_CALL ImageProducer_CreateInstance(
- const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory >& )
-{
- return ::com::sun::star::uno::Reference < ::com::sun::star::uno::XInterface >(
- ( ::cppu::OWeakObject* ) new ImageProducer );
-}
-} // namespace frm
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/imgprod.hxx b/forms/source/component/imgprod.hxx
deleted file mode 100644
index f37c24534..000000000
--- a/forms/source/component/imgprod.hxx
+++ /dev/null
@@ -1,113 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef _PRODUCE_HXX
-#define _PRODUCE_HXX
-
-#include <boost/ptr_container/ptr_vector.hpp>
-
-#include <tools/link.hxx>
-#include <tools/string.hxx>
-#include <com/sun/star/awt/ImageStatus.hpp>
-#include <com/sun/star/awt/XImageConsumer.hpp>
-#include <com/sun/star/awt/XImageProducer.hpp>
-#include <com/sun/star/lang/XInitialization.hpp>
-#include <cppuhelper/weak.hxx>
-
-
-// -----------------
-// - ImageProducer -
-// -----------------
-
-
-
-class SvStream;
-class ImageConsumer;
-class Graphic;
-class GraphicFilter;
-
-namespace com { namespace sun { namespace star { namespace io {
- class XInputStream;
-}}}}
-
-
-class ImageProducer : public ::com::sun::star::awt::XImageProducer,
- public ::com::sun::star::lang::XInitialization,
- public ::cppu::OWeakObject
-{
-private:
-
- typedef boost::ptr_vector< ::com::sun::star::uno::Reference< ::com::sun::star::awt::XImageConsumer > > ConsumerList_t;
-
- ::rtl::OUString maURL;
- ConsumerList_t maConsList;
- Graphic* mpGraphic;
- SvStream* mpStm;
- sal_uInt32 mnTransIndex;
- sal_Bool mbConsInit;
- Link maDoneHdl;
-
- sal_Bool ImplImportGraphic( Graphic& rGraphic );
- void ImplUpdateData( const Graphic& rGraphic );
- void ImplInitConsumer( const Graphic& rGraphic );
- void ImplUpdateConsumer( const Graphic& rGraphic );
-
-public:
-
- ImageProducer();
- ~ImageProducer();
-
- void SetImage( const ::rtl::OUString& rPath );
- void SetImage( SvStream& rStm );
-
- void NewDataAvailable();
-
- void SetDoneHdl( const Link& i_rHdl ) { maDoneHdl = i_rHdl; }
- const Link& GetDoneHdl() const { return maDoneHdl; }
-
- // ::com::sun::star::uno::XInterface
- ::com::sun::star::uno::Any SAL_CALL queryInterface( const ::com::sun::star::uno::Type & rType ) throw(::com::sun::star::uno::RuntimeException);
- void SAL_CALL acquire() throw() { OWeakObject::acquire(); }
- void SAL_CALL release() throw() { OWeakObject::release(); }
-
- // MT: ???
- void setImage( ::com::sun::star::uno::Reference< ::com::sun::star::io::XInputStream > & rStmRef );
-
- // ::com::sun::star::awt::XImageProducer
- void SAL_CALL addConsumer( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XImageConsumer >& rxConsumer ) throw(::com::sun::star::uno::RuntimeException);
- void SAL_CALL removeConsumer( const ::com::sun::star::uno::Reference< ::com::sun::star::awt::XImageConsumer >& rxConsumer ) throw(::com::sun::star::uno::RuntimeException);
- void SAL_CALL startProduction( ) throw(::com::sun::star::uno::RuntimeException);
-
- // ::com::sun::star::lang::XInitialization
- void SAL_CALL initialize( const ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Any >& aArguments ) throw (::com::sun::star::uno::Exception, ::com::sun::star::uno::RuntimeException);
-
-};
-
-#endif // _PRODUCE_HXX
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/navigationbar.cxx b/forms/source/component/navigationbar.cxx
deleted file mode 100644
index c0c38b083..000000000
--- a/forms/source/component/navigationbar.cxx
+++ /dev/null
@@ -1,512 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "navigationbar.hxx"
-#include "frm_module.hxx"
-
-#include <com/sun/star/text/WritingMode2.hpp>
-
-#include <comphelper/streamsection.hxx>
-#include <comphelper/basicio.hxx>
-
-//--------------------------------------------------------------------------
-extern "C" void SAL_CALL createRegistryInfo_ONavigationBarModel()
-{
- static ::frm::OMultiInstanceAutoRegistration< ::frm::ONavigationBarModel > aAutoRegistration;
-}
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
- using namespace ::com::sun::star::uno;
- using namespace ::com::sun::star::beans;
- using namespace ::com::sun::star::form;
- using namespace ::com::sun::star::awt;
- using namespace ::com::sun::star::io;
- using namespace ::com::sun::star::lang;
- using namespace ::com::sun::star::util;
- using namespace ::com::sun::star::container;
- using namespace ::comphelper;
-
- namespace WritingMode2 = ::com::sun::star::text::WritingMode2;
-
-#define REGISTER_VOID_PROP( prop, memberAny, type ) \
- registerMayBeVoidProperty( PROPERTY_##prop, PROPERTY_ID_##prop, PropertyAttribute::BOUND | PropertyAttribute::MAYBEDEFAULT | PropertyAttribute::MAYBEVOID, \
- &memberAny, ::getCppuType( static_cast< type* >( NULL ) ) );
-
- //==================================================================
- // ONavigationBarModel
- //==================================================================
- DBG_NAME( ONavigationBarModel )
- //------------------------------------------------------------------
- ONavigationBarModel::ONavigationBarModel( const Reference< XMultiServiceFactory >& _rxFactory )
- :OControlModel( _rxFactory, ::rtl::OUString() )
- ,FontControlModel( true )
- {
- DBG_CTOR( ONavigationBarModel, NULL );
-
- m_nClassId = FormComponentType::NAVIGATIONBAR;
- implInitPropertyContainer();
-
- getPropertyDefaultByHandle( PROPERTY_ID_DEFAULTCONTROL ) >>= m_sDefaultControl;
- getPropertyDefaultByHandle( PROPERTY_ID_ICONSIZE ) >>= m_nIconSize;
- getPropertyDefaultByHandle( PROPERTY_ID_BORDER ) >>= m_nBorder;
- getPropertyDefaultByHandle( PROPERTY_ID_DELAY ) >>= m_nDelay;
- getPropertyDefaultByHandle( PROPERTY_ID_ENABLED ) >>= m_bEnabled;
- getPropertyDefaultByHandle( PROPERTY_ID_ENABLEVISIBLE ) >>= m_bEnableVisible;
- getPropertyDefaultByHandle( PROPERTY_ID_SHOW_POSITION ) >>= m_bShowPosition;
- getPropertyDefaultByHandle( PROPERTY_ID_SHOW_NAVIGATION ) >>= m_bShowNavigation;
- getPropertyDefaultByHandle( PROPERTY_ID_SHOW_RECORDACTIONS ) >>= m_bShowActions;
- getPropertyDefaultByHandle( PROPERTY_ID_SHOW_FILTERSORT ) >>= m_bShowFilterSort;
- getPropertyDefaultByHandle( PROPERTY_ID_WRITING_MODE ) >>= m_nWritingMode;
- getPropertyDefaultByHandle( PROPERTY_ID_CONTEXT_WRITING_MODE ) >>= m_nContextWritingMode;
- }
-
- //------------------------------------------------------------------
- ONavigationBarModel::ONavigationBarModel( const ONavigationBarModel* _pOriginal, const Reference< XMultiServiceFactory >& _rxFactory )
- :OControlModel( _pOriginal, _rxFactory )
- ,FontControlModel( _pOriginal )
- {
- DBG_CTOR( ONavigationBarModel, NULL );
-
- implInitPropertyContainer();
-
- m_aTabStop = _pOriginal->m_aTabStop;
- m_aBackgroundColor = _pOriginal->m_aBackgroundColor;
- m_sDefaultControl = _pOriginal->m_sDefaultControl;
- m_sHelpText = _pOriginal->m_sHelpText;
- m_sHelpURL = _pOriginal->m_sHelpURL;
- m_bEnabled = _pOriginal->m_bEnabled;
- m_bEnableVisible = _pOriginal->m_bEnableVisible;
- m_nIconSize = _pOriginal->m_nIconSize;
- m_nBorder = _pOriginal->m_nBorder;
- m_nDelay = _pOriginal->m_nDelay;
- m_bShowPosition = _pOriginal->m_bShowPosition;
- m_bShowNavigation = _pOriginal->m_bShowNavigation;
- m_bShowActions = _pOriginal->m_bShowActions;
- m_bShowFilterSort = _pOriginal->m_bShowFilterSort;
- m_nWritingMode = _pOriginal->m_nWritingMode;
- m_nContextWritingMode = _pOriginal->m_nContextWritingMode;
- }
-
- //------------------------------------------------------------------
- void ONavigationBarModel::implInitPropertyContainer()
- {
- REGISTER_PROP_2( DEFAULTCONTROL, m_sDefaultControl, BOUND, MAYBEDEFAULT );
- REGISTER_PROP_2( HELPTEXT, m_sHelpText, BOUND, MAYBEDEFAULT );
- REGISTER_PROP_2( HELPURL, m_sHelpURL, BOUND, MAYBEDEFAULT );
- REGISTER_PROP_2( ENABLED, m_bEnabled, BOUND, MAYBEDEFAULT );
- REGISTER_PROP_2( ENABLEVISIBLE, m_bEnableVisible, BOUND, MAYBEDEFAULT );
- REGISTER_PROP_2( ICONSIZE, m_nIconSize, BOUND, MAYBEDEFAULT );
- REGISTER_PROP_2( BORDER, m_nBorder, BOUND, MAYBEDEFAULT );
- REGISTER_PROP_2( DELAY, m_nDelay, BOUND, MAYBEDEFAULT );
- REGISTER_PROP_2( SHOW_POSITION, m_bShowPosition, BOUND, MAYBEDEFAULT );
- REGISTER_PROP_2( SHOW_NAVIGATION, m_bShowNavigation, BOUND, MAYBEDEFAULT );
- REGISTER_PROP_2( SHOW_RECORDACTIONS, m_bShowActions, BOUND, MAYBEDEFAULT );
- REGISTER_PROP_2( SHOW_FILTERSORT, m_bShowFilterSort, BOUND, MAYBEDEFAULT );
- REGISTER_PROP_2( WRITING_MODE, m_nWritingMode, BOUND, MAYBEDEFAULT );
- REGISTER_PROP_3( CONTEXT_WRITING_MODE,m_nContextWritingMode, BOUND, MAYBEDEFAULT, TRANSIENT );
-
- REGISTER_VOID_PROP( TABSTOP, m_aTabStop, sal_Bool );
- REGISTER_VOID_PROP( BACKGROUNDCOLOR, m_aBackgroundColor, sal_Int32 );
- }
-
- //------------------------------------------------------------------
- ONavigationBarModel::~ONavigationBarModel()
- {
- if ( !OComponentHelper::rBHelper.bDisposed )
- {
- acquire();
- dispose();
- }
-
- DBG_DTOR( ONavigationBarModel, NULL );
- }
-
- //------------------------------------------------------------------
- Any SAL_CALL ONavigationBarModel::queryAggregation( const Type& _rType ) throw ( RuntimeException )
- {
- Any aReturn = ONavigationBarModel_BASE::queryInterface( _rType );
-
- if ( !aReturn.hasValue() )
- aReturn = OControlModel::queryAggregation( _rType );
-
- return aReturn;
- }
-
- //------------------------------------------------------------------
- IMPLEMENT_FORWARD_XTYPEPROVIDER2( ONavigationBarModel, OControlModel, ONavigationBarModel_BASE )
-
- //------------------------------------------------------------------------------
- IMPLEMENT_DEFAULT_CLONING( ONavigationBarModel )
-
- //------------------------------------------------------------------
- ::rtl::OUString SAL_CALL ONavigationBarModel::getImplementationName() throw(RuntimeException)
- {
- return getImplementationName_Static();
- }
-
- //------------------------------------------------------------------
- Sequence< ::rtl::OUString > SAL_CALL ONavigationBarModel::getSupportedServiceNames() throw(RuntimeException)
- {
- return getSupportedServiceNames_Static();
- }
-
- //------------------------------------------------------------------
- ::rtl::OUString SAL_CALL ONavigationBarModel::getImplementationName_Static()
- {
- return ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.comp.form.ONavigationBarModel" ) );
- }
-
- //------------------------------------------------------------------
- Sequence< ::rtl::OUString > SAL_CALL ONavigationBarModel::getSupportedServiceNames_Static()
- {
- Sequence< ::rtl::OUString > aSupported = OControlModel::getSupportedServiceNames_Static();
- aSupported.realloc( aSupported.getLength() + 2 );
-
- ::rtl::OUString* pArray = aSupported.getArray();
- pArray[ aSupported.getLength() - 2 ] = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.awt.UnoControlModel" ) );
- pArray[ aSupported.getLength() - 1 ] = FRM_SUN_COMPONENT_NAVTOOLBAR;
- return aSupported;
- }
-
- //------------------------------------------------------------------
- Reference< XInterface > SAL_CALL ONavigationBarModel::Create( const Reference< XMultiServiceFactory >& _rxFactory )
- {
- return *( new ONavigationBarModel( _rxFactory ) );
- }
-
- //------------------------------------------------------------------
- void SAL_CALL ONavigationBarModel::disposing()
- {
- OControlModel::disposing( );
- }
-
- //------------------------------------------------------------------
- ::rtl::OUString SAL_CALL ONavigationBarModel::getServiceName() throw ( RuntimeException )
- {
- return FRM_SUN_COMPONENT_NAVTOOLBAR;
- }
-
- //------------------------------------------------------------------
- #define PERSIST_TABSTOP 0x0001
- #define PERSIST_BACKGROUND 0x0002
- #define PERSIST_TEXTCOLOR 0x0004
- #define PERSIST_TEXTLINECOLOR 0x0008
-
- #define PERSIST_ENABLED 0x0001
- #define PERSIST_LARGEICONS 0x0002
- // leaf a leap here - this will allow for two more icon size values to be stored compatibly
- #define PERSIST_SHOW_POSITION 0x0008
- #define PERSIST_SHOW_NAVIGATION 0x0010
- #define PERSIST_SHOW_ACTIONS 0x0020
- #define PERSIST_SHOW_FILTERSORT 0x0040
-
- //------------------------------------------------------------------
- void SAL_CALL ONavigationBarModel::write( const Reference< XObjectOutputStream >& _rxOutStream ) throw ( IOException, RuntimeException )
- {
- // open a section for compatibility - if we later on write additional members,
- // then older versions can skip them
- Reference< XDataOutputStream > xDataOut( _rxOutStream, UNO_QUERY );
- OStreamSection aEnsureBlockCompat( xDataOut );
-
- // base class
- OControlModel::write( _rxOutStream );
-
- {
- OStreamSection aEnsureCompat( xDataOut );
- // determine which properties are not void and need to be written
- sal_Int32 nNonVoids = 0;
- if ( m_aTabStop.hasValue() )
- nNonVoids |= PERSIST_TABSTOP;
- if ( m_aBackgroundColor.hasValue() )
- nNonVoids |= PERSIST_BACKGROUND;
- if ( hasTextColor() )
- nNonVoids |= PERSIST_TEXTCOLOR;
- if ( hasTextLineColor() )
- nNonVoids |= PERSIST_TEXTLINECOLOR;
-
- _rxOutStream->writeLong( nNonVoids );
-
- // the maybeboid anys
- if ( nNonVoids & PERSIST_TABSTOP )
- {
- sal_Bool bTabStop( sal_False );
- m_aTabStop >>= bTabStop;
- _rxOutStream->writeBoolean( bTabStop );
- }
- if ( nNonVoids & PERSIST_BACKGROUND )
- {
- sal_Int32 nBackgroundColor = 0;
- m_aBackgroundColor >>= nBackgroundColor;
- _rxOutStream->writeLong( nBackgroundColor );
- }
- if ( nNonVoids & PERSIST_TEXTCOLOR )
- {
- _rxOutStream->writeLong( getTextColor() );
- }
- if ( nNonVoids & PERSIST_TEXTLINECOLOR )
- {
- _rxOutStream->writeLong( getTextLineColor() );
- }
- }
-
- {
- OStreamSection aEnsureCompat( xDataOut );
- ::comphelper::operator<<( _rxOutStream, getFont() );
- }
-
- // our boolean flags
- sal_Int32 nFlags = 0;
- if ( m_bEnabled ) nFlags |= PERSIST_ENABLED;
- if ( m_nIconSize ) nFlags |= PERSIST_LARGEICONS; // at the moment, this is quasi boolean
- if ( m_bShowPosition ) nFlags |= PERSIST_SHOW_POSITION;
- if ( m_bShowNavigation ) nFlags |= PERSIST_SHOW_NAVIGATION;
- if ( m_bShowActions ) nFlags |= PERSIST_SHOW_ACTIONS;
- if ( m_bShowFilterSort ) nFlags |= PERSIST_SHOW_FILTERSORT;
- _rxOutStream->writeLong( nFlags );
-
- // our strings
- _rxOutStream->writeUTF( m_sHelpText );
- _rxOutStream->writeUTF( m_sHelpURL );
- _rxOutStream->writeUTF( m_sDefaultControl );
-
- // misc
- _rxOutStream->writeShort( m_nBorder );
- _rxOutStream->writeLong ( m_nDelay );
- }
-
- //------------------------------------------------------------------
- void SAL_CALL ONavigationBarModel::read( const Reference< XObjectInputStream >& _rxInStream ) throw ( IOException, RuntimeException )
- {
- Reference< XDataInputStream > xDataIn( _rxInStream, UNO_QUERY );
- OStreamSection aEnsureBlockCompat( xDataIn );
-
- // base class
- OControlModel::read( _rxInStream );
-
- {
- OStreamSection aEnsureCompat( xDataIn );
- // determine which properties were non-void
- sal_Int32 nNonVoids = _rxInStream->readLong( );
-
- // the maybeboid anys
- if ( nNonVoids & PERSIST_TABSTOP )
- m_aTabStop = makeAny( _rxInStream->readBoolean() );
- else
- m_aTabStop.clear();
-
- if ( nNonVoids & PERSIST_BACKGROUND )
- m_aBackgroundColor = makeAny( _rxInStream->readLong() );
- else
- m_aBackgroundColor.clear();
-
- if ( nNonVoids & PERSIST_TEXTCOLOR )
- setTextColor( _rxInStream->readLong() );
- else
- clearTextColor();
-
- if ( nNonVoids & PERSIST_TEXTLINECOLOR )
- setTextLineColor( _rxInStream->readLong() );
- else
- clearTextLineColor();
- }
-
- {
- OStreamSection aEnsureCompat( xDataIn );
- FontDescriptor aFont;
- ::comphelper::operator>>( _rxInStream, aFont );
- setFont( aFont );
- }
-
- // our boolean flags
- sal_Int32 nFlags = _rxInStream->readLong( );
- m_bEnabled = ( nFlags & PERSIST_ENABLED ) ? sal_True : sal_False;
- m_nIconSize = ( nFlags & PERSIST_LARGEICONS ) ? 1 : 0;
- m_bShowPosition = ( nFlags & PERSIST_SHOW_POSITION ) ? sal_True : sal_False;
- m_bShowNavigation = ( nFlags & PERSIST_SHOW_NAVIGATION ) ? sal_True : sal_False;
- m_bShowActions = ( nFlags & PERSIST_SHOW_ACTIONS ) ? sal_True : sal_False;
- m_bShowFilterSort = ( nFlags & PERSIST_SHOW_FILTERSORT ) ? sal_True : sal_False;
-
- // our strings
- m_sHelpText = _rxInStream->readUTF( );
- m_sHelpURL = _rxInStream->readUTF( );
- m_sDefaultControl = _rxInStream->readUTF( );
-
- // misc
- m_nBorder = _rxInStream->readShort();
- m_nDelay = _rxInStream->readLong();
- }
-
- //------------------------------------------------------------------
- void SAL_CALL ONavigationBarModel::getFastPropertyValue( Any& _rValue, sal_Int32 _nHandle ) const
- {
- if ( isRegisteredProperty( _nHandle ) )
- {
- OPropertyContainerHelper::getFastPropertyValue( _rValue, _nHandle );
- }
- else if ( isFontRelatedProperty( _nHandle ) )
- {
- FontControlModel::getFastPropertyValue( _rValue, _nHandle );
- }
- else
- {
- OControlModel::getFastPropertyValue( _rValue, _nHandle );
- }
- }
-
- //------------------------------------------------------------------
- sal_Bool SAL_CALL ONavigationBarModel::convertFastPropertyValue( Any& _rConvertedValue, Any& _rOldValue,
- sal_Int32 _nHandle, const Any& _rValue ) throw( IllegalArgumentException )
- {
- sal_Bool bModified = sal_False;
-
- if ( isRegisteredProperty( _nHandle ) )
- {
- bModified = OPropertyContainerHelper::convertFastPropertyValue( _rConvertedValue, _rOldValue, _nHandle, _rValue );
- }
- else if ( isFontRelatedProperty( _nHandle ) )
- {
- bModified = FontControlModel::convertFastPropertyValue( _rConvertedValue, _rOldValue, _nHandle, _rValue );
- }
- else
- {
- bModified = OControlModel::convertFastPropertyValue( _rConvertedValue, _rOldValue, _nHandle, _rValue );
- }
-
- return bModified;
- }
-
- //------------------------------------------------------------------
- void SAL_CALL ONavigationBarModel::setFastPropertyValue_NoBroadcast( sal_Int32 _nHandle, const Any& _rValue ) throw ( Exception )
- {
- if ( isRegisteredProperty( _nHandle ) )
- {
- OPropertyContainerHelper::setFastPropertyValue( _nHandle, _rValue );
- }
- else if ( isFontRelatedProperty( _nHandle ) )
- {
- FontDescriptor aOldFont( getFont() );
-
- FontControlModel::setFastPropertyValue_NoBroadcast( _nHandle, _rValue );
-
- if ( isFontAggregateProperty( _nHandle ) )
- firePropertyChange( PROPERTY_ID_FONT, makeAny( getFont() ), makeAny( aOldFont ) );
- }
- else
- {
- OControlModel::setFastPropertyValue_NoBroadcast( _nHandle, _rValue );
- }
- }
-
- //------------------------------------------------------------------
- Any ONavigationBarModel::getPropertyDefaultByHandle( sal_Int32 _nHandle ) const
- {
- Any aDefault;
-
- switch ( _nHandle )
- {
- case PROPERTY_ID_TABSTOP:
- case PROPERTY_ID_BACKGROUNDCOLOR:
- /* void */
- break;
- case PROPERTY_ID_WRITING_MODE:
- case PROPERTY_ID_CONTEXT_WRITING_MODE:
- aDefault <<= WritingMode2::CONTEXT;
- break;
-
- case PROPERTY_ID_ENABLED:
- case PROPERTY_ID_ENABLEVISIBLE:
- case PROPERTY_ID_SHOW_POSITION:
- case PROPERTY_ID_SHOW_NAVIGATION:
- case PROPERTY_ID_SHOW_RECORDACTIONS:
- case PROPERTY_ID_SHOW_FILTERSORT:
- aDefault <<= (sal_Bool)sal_True;
- break;
-
- case PROPERTY_ID_ICONSIZE:
- aDefault <<= (sal_Int16)0;
- break;
-
- case PROPERTY_ID_DEFAULTCONTROL:
- aDefault <<= ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.form.control.NavigationToolBar" ) );
- break;
-
- case PROPERTY_ID_HELPTEXT:
- case PROPERTY_ID_HELPURL:
- aDefault <<= ::rtl::OUString();
- break;
-
- case PROPERTY_ID_BORDER:
- aDefault <<= (sal_Int16)0;
- break;
-
- case PROPERTY_ID_DELAY:
- aDefault <<= (sal_Int32)20;
- break;
-
- default:
- if ( isFontRelatedProperty( _nHandle ) )
- aDefault = FontControlModel::getPropertyDefaultByHandle( _nHandle );
- else
- aDefault = OControlModel::getPropertyDefaultByHandle( _nHandle );
- }
- return aDefault;
- }
-
- //------------------------------------------------------------------
- void ONavigationBarModel::describeFixedProperties( Sequence< Property >& _rProps ) const
- {
- BEGIN_DESCRIBE_PROPERTIES( 1, OControlModel )
- DECL_PROP2( TABINDEX, sal_Int16, BOUND, MAYBEDEFAULT );
- END_DESCRIBE_PROPERTIES();
-
- // properties which the OPropertyContainerHelper is responsible for
- Sequence< Property > aContainedProperties;
- describeProperties( aContainedProperties );
-
- // properties which the FontControlModel is responsible for
- Sequence< Property > aFontProperties;
- describeFontRelatedProperties( aFontProperties );
-
- _rProps = concatSequences(
- aContainedProperties,
- aFontProperties,
- _rProps
- );
- }
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/navigationbar.hxx b/forms/source/component/navigationbar.hxx
deleted file mode 100644
index 4af073777..000000000
--- a/forms/source/component/navigationbar.hxx
+++ /dev/null
@@ -1,140 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef FORMS_COMPONENT_NAVIGATION_BAR_HXX
-#define FORMS_COMPONENT_NAVIGATION_BAR_HXX
-
-#include "FormComponent.hxx"
-#include <com/sun/star/io/XPersistObject.hpp>
-#include <comphelper/proparrhlp.hxx>
-#include <comphelper/propertycontainerhelper.hxx>
-#include <cppuhelper/implbase1.hxx>
-#include <cppuhelper/interfacecontainer.hxx>
-#include <com/sun/star/container/XSet.hpp>
-#include <com/sun/star/container/XContainer.hpp>
-#include "formcontrolfont.hxx"
-
-#include <set>
-
-//.........................................................................
-namespace frm
-{
-//.........................................................................
-
- //==================================================================
- // ONavigationBarModel
- //==================================================================
- typedef ::cppu::ImplHelper1 < ::com::sun::star::awt::XControlModel
- > ONavigationBarModel_BASE;
-
- class ONavigationBarModel
- :public OControlModel
- ,public FontControlModel
- ,public OPropertyContainerHelper
- ,public ONavigationBarModel_BASE
- {
- // <properties>
- ::com::sun::star::uno::Any m_aTabStop;
- ::com::sun::star::uno::Any m_aBackgroundColor;
- ::rtl::OUString m_sDefaultControl;
- ::rtl::OUString m_sHelpText;
- ::rtl::OUString m_sHelpURL;
- sal_Int16 m_nIconSize;
- sal_Int16 m_nBorder;
- sal_Int32 m_nDelay;
- sal_Bool m_bEnabled;
- sal_Bool m_bEnableVisible;
- sal_Bool m_bShowPosition;
- sal_Bool m_bShowNavigation;
- sal_Bool m_bShowActions;
- sal_Bool m_bShowFilterSort;
- sal_Int16 m_nWritingMode;
- sal_Int16 m_nContextWritingMode;
- // </properties>
-
- public:
- DECLARE_DEFAULT_LEAF_XTOR( ONavigationBarModel );
-
- // XServiceInfo - static version
- static ::rtl::OUString SAL_CALL getImplementationName_Static();
- static ::com::sun::star::uno::Sequence< ::rtl::OUString > SAL_CALL getSupportedServiceNames_Static();
- static ::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface > SAL_CALL Create( const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory >& _rxFactory );
-
- protected:
- // UNO
- DECLARE_UNO3_AGG_DEFAULTS( ONavigationBarModel, OControlModel );
- virtual ::com::sun::star::uno::Any SAL_CALL queryAggregation( const ::com::sun::star::uno::Type& _rType ) throw (::com::sun::star::uno::RuntimeException);
-
- // XServiceInfo
- virtual ::rtl::OUString SAL_CALL getImplementationName() throw(::com::sun::star::uno::RuntimeException);
- virtual ::com::sun::star::uno::Sequence< ::rtl::OUString > SAL_CALL getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException);
-
- // XTypeProvider
- DECLARE_XTYPEPROVIDER()
-
- // OComponentHelper
- virtual void SAL_CALL disposing();
-
- // XPersistObject
- virtual ::rtl::OUString SAL_CALL getServiceName() throw ( ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL write(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectOutputStream>& _rxOutStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
- virtual void SAL_CALL read(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XObjectInputStream>& _rxInStream) throw ( ::com::sun::star::io::IOException, ::com::sun::star::uno::RuntimeException);
-
- // XPropertySet
- virtual void SAL_CALL getFastPropertyValue(::com::sun::star::uno::Any& rValue, sal_Int32 nHandle ) const;
- virtual sal_Bool SAL_CALL convertFastPropertyValue(::com::sun::star::uno::Any& rConvertedValue, ::com::sun::star::uno::Any& rOldValue,
- sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue )
- throw(::com::sun::star::lang::IllegalArgumentException);
- virtual void SAL_CALL setFastPropertyValue_NoBroadcast(sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue) throw ( ::com::sun::star::uno::Exception);
-
- // XPropertyState
- virtual ::com::sun::star::uno::Any getPropertyDefaultByHandle( sal_Int32 nHandle ) const;
-
- // OControlModel's property handling
- virtual void describeFixedProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
-
- // prevent method hiding
- using OControlModel::disposing;
- using OControlModel::getFastPropertyValue;
-
- protected:
- DECLARE_XCLONEABLE();
-
- private:
- void implInitPropertyContainer();
- };
-
-//.........................................................................
-} // namespace frm
-//.........................................................................
-
-#endif // FORMS_COMPONENT_NAVIGATION_BAR_HXX
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/propertybaghelper.cxx b/forms/source/component/propertybaghelper.cxx
deleted file mode 100644
index ec82d3b1d..000000000
--- a/forms/source/component/propertybaghelper.cxx
+++ /dev/null
@@ -1,360 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "propertybaghelper.hxx"
-
-#include "property.hxx"
-
-/** === begin UNO includes === **/
-#include <com/sun/star/lang/DisposedException.hpp>
-#include <com/sun/star/beans/PropertyExistException.hpp>
-#include <com/sun/star/beans/XMultiPropertySet.hpp>
-#include <com/sun/star/beans/NotRemoveableException.hpp>
-#include <com/sun/star/beans/UnknownPropertyException.hpp>
-/** === end UNO includes === **/
-
-#include <tools/diagnose_ex.h>
-
-#include <comphelper/sequence.hxx>
-#include <rtl/logfile.hxx>
-#include "rtl/instance.hxx"
-
-
-#define NEW_HANDLE_BASE 10000
-
-//........................................................................
-namespace frm
-{
-//........................................................................
-
- /** === begin UNO using === **/
- using ::com::sun::star::lang::DisposedException;
- using ::com::sun::star::uno::Sequence;
- using ::com::sun::star::beans::Property;
- using ::com::sun::star::uno::Any;
- using ::com::sun::star::beans::PropertyExistException;
- using ::com::sun::star::beans::PropertyValue;
- using ::com::sun::star::uno::Reference;
- using ::com::sun::star::uno::UNO_QUERY_THROW;
- using ::com::sun::star::beans::XMultiPropertySet;
- using ::com::sun::star::beans::XPropertySetInfo;
- using ::com::sun::star::uno::RuntimeException;
- using ::com::sun::star::uno::Exception;
- using ::com::sun::star::beans::NotRemoveableException;
- using ::com::sun::star::beans::UnknownPropertyException;
- /** === end UNO using === **/
- namespace PropertyAttribute = ::com::sun::star::beans::PropertyAttribute;
-
- //====================================================================
- //= helper
- //====================================================================
- namespace
- {
- //----------------------------------------------------------------
- static ::comphelper::IPropertyInfoService& lcl_getPropertyInfos()
- {
- static ConcreteInfoService s_aPropInfos;
- return s_aPropInfos;
- }
- }
-
- //====================================================================
- //= PropertyBagHelper
- //====================================================================
- //--------------------------------------------------------------------
- PropertyBagHelper::PropertyBagHelper( IPropertyBagHelperContext& _rContext )
- :m_rContext( _rContext )
- ,m_pPropertyArrayHelper( NULL )
- ,m_bDisposed( false )
- {
- }
-
- //--------------------------------------------------------------------
- PropertyBagHelper::~PropertyBagHelper()
- {
- delete m_pPropertyArrayHelper, m_pPropertyArrayHelper = NULL;
- }
-
- //--------------------------------------------------------------------
- void PropertyBagHelper::dispose()
- {
- m_bDisposed = true;
- }
-
- //--------------------------------------------------------------------
- void PropertyBagHelper::impl_nts_checkDisposed_throw() const
- {
- if ( m_bDisposed )
- throw DisposedException();
- }
-
- //--------------------------------------------------------------------
- void PropertyBagHelper::impl_nts_invalidatePropertySetInfo()
- {
- delete m_pPropertyArrayHelper, m_pPropertyArrayHelper = NULL;
- }
-
- //--------------------------------------------------------------------
- sal_Int32 PropertyBagHelper::impl_findFreeHandle( const ::rtl::OUString& _rPropertyName )
- {
- ::comphelper::OPropertyArrayAggregationHelper& rPropInfo( impl_ts_getArrayHelper() );
-
- // check the preferred handle
- sal_Int32 nHandle = lcl_getPropertyInfos().getPreferedPropertyId( _rPropertyName );
- if ( ( nHandle != -1 ) && rPropInfo.fillPropertyMembersByHandle( NULL, NULL, nHandle ) )
- nHandle = -1;
-
- // seach a free handle in <math>F_1009</math>
- if ( nHandle == -1 )
- {
- sal_Int32 nPrime = 1009;
- sal_Int32 nFactor = 11;
- sal_Int32 nNum = nFactor;
- while ( nNum != 1 )
- {
- if ( !rPropInfo.fillPropertyMembersByHandle( NULL, NULL, nNum + NEW_HANDLE_BASE ) )
- {
- // handle not used, yet
- nHandle = nNum + NEW_HANDLE_BASE;
- break;
- }
- nNum = ( nNum * nFactor ) % nPrime;
- }
- }
-
- // search a free handle greater NEW_HANDLE_BASE
- if ( nHandle == -1 )
- {
- nHandle = NEW_HANDLE_BASE + 1009;
- while ( rPropInfo.fillPropertyMembersByHandle( NULL, NULL, nHandle ) )
- ++nHandle;
- }
-
- return nHandle;
- }
-
- //--------------------------------------------------------------------
- ::comphelper::OPropertyArrayAggregationHelper& PropertyBagHelper::impl_ts_getArrayHelper() const
- {
- OPropertyArrayAggregationHelper* p = m_pPropertyArrayHelper;
- if ( !p )
- {
- ::osl::MutexGuard aGuard( m_rContext.getMutex() );
- p = m_pPropertyArrayHelper;
- if ( !p )
- {
- // our own fixed and our aggregate's properties
- Sequence< Property > aFixedProps;
- Sequence< Property > aAggregateProps;
- m_rContext.describeFixedAndAggregateProperties( aFixedProps, aAggregateProps );
-
- // our dynamic properties
- Sequence< Property > aDynamicProps;
- m_aDynamicProperties.describeProperties( aDynamicProps );
-
- Sequence< Property > aOwnProps(
- ::comphelper::concatSequences( aFixedProps, aDynamicProps ) );
-
- p = new OPropertyArrayAggregationHelper( aOwnProps, aAggregateProps, &lcl_getPropertyInfos(), NEW_HANDLE_BASE );
- OSL_DOUBLE_CHECKED_LOCKING_MEMORY_BARRIER();
- const_cast< PropertyBagHelper* >( this )->m_pPropertyArrayHelper = p;
- }
- } // if ( !p )
- else
- {
- OSL_DOUBLE_CHECKED_LOCKING_MEMORY_BARRIER();
- }
- return *p;
- }
-
- //--------------------------------------------------------------------
- void PropertyBagHelper::addProperty( const ::rtl::OUString& _rName, ::sal_Int16 _nAttributes, const Any& _rInitialValue )
- {
- ::osl::MutexGuard aGuard( m_rContext.getMutex() );
- impl_nts_checkDisposed_throw();
-
- //----------------------------------------------
- // check name sanity
- ::comphelper::OPropertyArrayAggregationHelper& aPropInfo( impl_ts_getArrayHelper() );
- if ( aPropInfo.hasPropertyByName( _rName ) )
- throw PropertyExistException( _rName, m_rContext.getPropertiesInterface() );
-
- //----------------------------------------------
- // normalize the REMOVEABLE attribute - the FormComponent service
- // requires that all dynamic properties are REMOVEABLE
- _nAttributes |= PropertyAttribute::REMOVEABLE;
-
- //----------------------------------------------
- // find a free handle
- sal_Int32 nHandle = impl_findFreeHandle( _rName );
-
- //----------------------------------------------
- // register the property, and invalidate our property meta data
- m_aDynamicProperties.addProperty( _rName, nHandle, _nAttributes, _rInitialValue );
- impl_nts_invalidatePropertySetInfo();
- }
-
- //--------------------------------------------------------------------
- void PropertyBagHelper::removeProperty( const ::rtl::OUString& _rName )
- {
- ::osl::MutexGuard aGuard( m_rContext.getMutex() );
- impl_nts_checkDisposed_throw();
-
- // check whether it's removeable at all
- Reference< XMultiPropertySet > xMe( m_rContext.getPropertiesInterface(), UNO_QUERY_THROW );
- Reference< XPropertySetInfo > xPSI( xMe->getPropertySetInfo(), UNO_QUERY_THROW );
- Property aProperty( xPSI->getPropertyByName( _rName ) );
- if ( ( aProperty.Attributes & PropertyAttribute::REMOVEABLE ) == 0 )
- throw NotRemoveableException( _rName, xMe );
-
- m_aDynamicProperties.removeProperty( _rName );
- impl_nts_invalidatePropertySetInfo();
- }
-
- //--------------------------------------------------------------------
- namespace
- {
- //----------------------------------------------------------------
- struct SelectNameOfProperty : public ::std::unary_function< Property, ::rtl::OUString >
- {
- const ::rtl::OUString& operator()( const Property& _rProp ) const { return _rProp.Name; }
- };
-
- //----------------------------------------------------------------
- struct SelectNameOfPropertyValue : public ::std::unary_function< PropertyValue, ::rtl::OUString >
- {
- const ::rtl::OUString& operator()( const PropertyValue& _rProp ) const { return _rProp.Name; }
- };
-
- //----------------------------------------------------------------
- struct SelectValueOfPropertyValue : public ::std::unary_function< PropertyValue, Any >
- {
- const Any& operator()( const PropertyValue& _rProp ) const { return _rProp.Value; }
- };
-
- //----------------------------------------------------------------
- struct PropertyValueLessByName : public ::std::binary_function< PropertyValue, PropertyValue, bool >
- {
- bool operator()( const PropertyValue& _lhs, const PropertyValue _rhs ) const
- {
- return _lhs.Name < _rhs.Name;
- }
- };
- }
-
- //--------------------------------------------------------------------
- Sequence< PropertyValue > PropertyBagHelper::getPropertyValues()
- {
- ::osl::MutexGuard aGuard( m_rContext.getMutex() );
- impl_nts_checkDisposed_throw();
-
- Reference< XMultiPropertySet > xMe( m_rContext.getPropertiesInterface(), UNO_QUERY_THROW );
- Reference< XPropertySetInfo > xPSI( xMe->getPropertySetInfo(), UNO_QUERY_THROW );
-
- Sequence< Property > aProperties( xPSI->getProperties() );
- Sequence< ::rtl::OUString > aPropertyNames( aProperties.getLength() );
- ::std::transform( aProperties.getConstArray(), aProperties.getConstArray() + aProperties.getLength(),
- aPropertyNames.getArray(), SelectNameOfProperty() );
-
- Sequence< Any > aValues;
- try
- {
- aValues = xMe->getPropertyValues( aPropertyNames );
-
- if ( aValues.getLength() != aPropertyNames.getLength() )
- throw RuntimeException();
- }
- catch( const RuntimeException& ) { throw; }
- catch( const Exception& )
- {
- DBG_UNHANDLED_EXCEPTION();
- }
- Sequence< PropertyValue > aPropertyValues( aValues.getLength() );
- PropertyValue* pPropertyValue = aPropertyValues.getArray();
-
- const ::rtl::OUString* pName = aPropertyNames.getConstArray();
- const ::rtl::OUString* pNameEnd = aPropertyNames.getConstArray() + aPropertyNames.getLength();
- const Any* pValue = aValues.getConstArray();
- for ( ; pName != pNameEnd; ++pName, ++pValue, ++pPropertyValue )
- {
- pPropertyValue->Name = *pName;
- pPropertyValue->Value = *pValue;
- }
-
- return aPropertyValues;
- }
-
- //--------------------------------------------------------------------
- void PropertyBagHelper::setPropertyValues( const Sequence< PropertyValue >& _rProps )
- {
- ::osl::ClearableMutexGuard aGuard( m_rContext.getMutex() );
- impl_nts_checkDisposed_throw();
-
- sal_Int32 nPropertyValues = _rProps.getLength();
-
- // XMultiPropertySet::setPropertyValues expects its arguments to be sorted by name
- // while XPropertyAccess::setPropertyValues doesn't. So first of all, sort.
- Sequence< PropertyValue > aSortedProps( _rProps );
- ::std::sort( aSortedProps.getArray(), aSortedProps.getArray() + nPropertyValues, PropertyValueLessByName() );
-
- // also, XPropertyAccess::setPropertyValues is expected to throw an UnknownPropertyException
- // for unsupported properties, while XMultiPropertySet::setPropertyValues is expected to ignore
- // those. So, check for unsupported properties first.
- ::comphelper::OPropertyArrayAggregationHelper& rArrayHelper( impl_ts_getArrayHelper() );
- for ( const PropertyValue* pProperties = aSortedProps.getConstArray();
- pProperties != aSortedProps.getConstArray() + nPropertyValues;
- ++pProperties
- )
- {
- if ( !rArrayHelper.hasPropertyByName( pProperties->Name ) )
- throw UnknownPropertyException( pProperties->Name, m_rContext.getPropertiesInterface() );
- }
-
- // Now finally split into a Name and a Value sequence, and forward to
- // XMultiPropertySet::setPropertyValues
- Sequence< ::rtl::OUString > aNames( nPropertyValues );
- ::std::transform( aSortedProps.getConstArray(), aSortedProps.getConstArray() + nPropertyValues,
- aNames.getArray(), SelectNameOfPropertyValue() );
-
- Sequence< Any > aValues( nPropertyValues );
- ::std::transform( aSortedProps.getConstArray(), aSortedProps.getConstArray() + nPropertyValues,
- aValues.getArray(), SelectValueOfPropertyValue() );
-
- Reference< XMultiPropertySet > xMe( m_rContext.getPropertiesInterface(), UNO_QUERY_THROW );
-
- aGuard.clear();
- xMe->setPropertyValues( aNames, aValues );
- }
-
-//........................................................................
-} // namespace frm
-//........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/refvaluecomponent.cxx b/forms/source/component/refvaluecomponent.cxx
deleted file mode 100644
index c7095bc54..000000000
--- a/forms/source/component/refvaluecomponent.cxx
+++ /dev/null
@@ -1,303 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "refvaluecomponent.hxx"
-
-/** === begin UNO includes === **/
-/** === end UNO includes === **/
-
-#include <tools/diagnose_ex.h>
-
-#include <list>
-
-//........................................................................
-namespace frm
-{
-//........................................................................
-
- using namespace ::com::sun::star::uno;
- using namespace ::com::sun::star::lang;
- using namespace ::com::sun::star::beans;
- using namespace ::com::sun::star::form::binding;
-
- //====================================================================
- //=
- //====================================================================
- //--------------------------------------------------------------------
- OReferenceValueComponent::OReferenceValueComponent( const Reference< XMultiServiceFactory>& _rxFactory, const ::rtl::OUString& _rUnoControlModelTypeName, const ::rtl::OUString& _rDefault, sal_Bool _bSupportNoCheckRefValue )
- :OBoundControlModel( _rxFactory, _rUnoControlModelTypeName, _rDefault, sal_False, sal_True, sal_True )
- ,m_eDefaultChecked( STATE_NOCHECK )
- ,m_bSupportSecondRefValue( _bSupportNoCheckRefValue )
- {
- }
-
- //--------------------------------------------------------------------
- OReferenceValueComponent::OReferenceValueComponent( const OReferenceValueComponent* _pOriginal, const Reference< XMultiServiceFactory>& _rxFactory )
- :OBoundControlModel( _pOriginal, _rxFactory )
- {
- m_sReferenceValue = _pOriginal->m_sReferenceValue;
- m_sNoCheckReferenceValue = _pOriginal->m_sNoCheckReferenceValue;
- m_eDefaultChecked = _pOriginal->m_eDefaultChecked;
- m_bSupportSecondRefValue = _pOriginal->m_bSupportSecondRefValue;
-
- calculateExternalValueType();
- }
-
- //--------------------------------------------------------------------
- OReferenceValueComponent::~OReferenceValueComponent()
- {
- }
-
- //--------------------------------------------------------------------
- void OReferenceValueComponent::setReferenceValue( const ::rtl::OUString& _rRefValue )
- {
- m_sReferenceValue = _rRefValue;
- calculateExternalValueType();
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OReferenceValueComponent::getFastPropertyValue( Any& _rValue, sal_Int32 _nHandle ) const
- {
- switch ( _nHandle )
- {
- case PROPERTY_ID_REFVALUE: _rValue <<= m_sReferenceValue; break;
- case PROPERTY_ID_DEFAULT_STATE: _rValue <<= (sal_Int16)m_eDefaultChecked; break;
-
- case PROPERTY_ID_UNCHECKED_REFVALUE:
- OSL_ENSURE( m_bSupportSecondRefValue, "OReferenceValueComponent::getFastPropertyValue: not supported!" );
- _rValue <<= m_sNoCheckReferenceValue;
- break;
-
- default:
- OBoundControlModel::getFastPropertyValue( _rValue, _nHandle );
- }
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OReferenceValueComponent::setFastPropertyValue_NoBroadcast( sal_Int32 _nHandle, const Any& _rValue ) throw (Exception)
- {
- switch ( _nHandle )
- {
- case PROPERTY_ID_REFVALUE :
- OSL_VERIFY( _rValue >>= m_sReferenceValue );
- calculateExternalValueType();
- break;
-
- case PROPERTY_ID_UNCHECKED_REFVALUE:
- OSL_ENSURE( m_bSupportSecondRefValue, "OReferenceValueComponent::setFastPropertyValue_NoBroadcast: not supported!" );
- OSL_VERIFY( _rValue >>= m_sNoCheckReferenceValue );
- break;
-
- case PROPERTY_ID_DEFAULT_STATE:
- {
- sal_Int16 nDefaultChecked( (sal_Int16)STATE_NOCHECK );
- OSL_VERIFY( _rValue >>= nDefaultChecked );
- m_eDefaultChecked = (ToggleState)nDefaultChecked;
- resetNoBroadcast();
- }
- break;
-
- default:
- OBoundControlModel::setFastPropertyValue_NoBroadcast( _nHandle, _rValue );
- }
- }
-
- //--------------------------------------------------------------------
- sal_Bool SAL_CALL OReferenceValueComponent::convertFastPropertyValue( Any& _rConvertedValue, Any& _rOldValue, sal_Int32 _nHandle, const Any& _rValue ) throw (IllegalArgumentException)
- {
- sal_Bool bModified = sal_False;
- switch ( _nHandle )
- {
- case PROPERTY_ID_REFVALUE:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, m_sReferenceValue );
- break;
-
- case PROPERTY_ID_UNCHECKED_REFVALUE:
- OSL_ENSURE( m_bSupportSecondRefValue, "OReferenceValueComponent::convertFastPropertyValue: not supported!" );
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, m_sNoCheckReferenceValue );
- break;
-
- case PROPERTY_ID_DEFAULT_STATE:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, (sal_Int16)m_eDefaultChecked );
- break;
-
- default:
- bModified = OBoundControlModel::convertFastPropertyValue( _rConvertedValue, _rOldValue, _nHandle, _rValue );
- break;
- }
- return bModified;
- }
-
- //------------------------------------------------------------------------------
- Any OReferenceValueComponent::getDefaultForReset() const
- {
- return makeAny( (sal_Int16)m_eDefaultChecked );
- }
-
- //--------------------------------------------------------------------
- void OReferenceValueComponent::describeFixedProperties( Sequence< Property >& _rProps ) const
- {
- BEGIN_DESCRIBE_PROPERTIES( m_bSupportSecondRefValue ? 3 : 2, OBoundControlModel )
- DECL_PROP1( REFVALUE, ::rtl::OUString, BOUND );
- DECL_PROP1( DEFAULT_STATE, sal_Int16, BOUND );
- if ( m_bSupportSecondRefValue )
- {
- DECL_PROP1( UNCHECKED_REFVALUE, ::rtl::OUString, BOUND );
- }
- END_DESCRIBE_PROPERTIES();
- }
-
- //-----------------------------------------------------------------------------
- Sequence< Type > OReferenceValueComponent::getSupportedBindingTypes()
- {
- ::std::list< Type > aTypes;
- aTypes.push_back( ::getCppuType( static_cast< sal_Bool* >( NULL ) ) );
-
- if ( m_sReferenceValue.getLength() )
- aTypes.push_front( ::getCppuType( static_cast< ::rtl::OUString* >( NULL ) ) );
- // push_front, because this is the preferred type
-
- Sequence< Type > aTypesRet( aTypes.size() );
- ::std::copy( aTypes.begin(), aTypes.end(), aTypesRet.getArray() );
- return aTypesRet;
- }
-
- //-----------------------------------------------------------------------------
- Any OReferenceValueComponent::translateExternalValueToControlValue( const Any& _rExternalValue ) const
- {
- sal_Int16 nState = STATE_DONTKNOW;
-
- sal_Bool bExternalState = sal_False;
- ::rtl::OUString sExternalValue;
- if ( _rExternalValue >>= bExternalState )
- {
- nState = ::sal::static_int_cast< sal_Int16 >( bExternalState ? STATE_CHECK : STATE_NOCHECK );
- }
- else if ( _rExternalValue >>= sExternalValue )
- {
- if ( sExternalValue == m_sReferenceValue )
- nState = STATE_CHECK;
- else
- {
- if ( !m_bSupportSecondRefValue || ( sExternalValue == m_sNoCheckReferenceValue ) )
- nState = STATE_NOCHECK;
- else
- nState = STATE_DONTKNOW;
- }
- }
- else if ( !_rExternalValue.hasValue() )
- {
- nState = STATE_DONTKNOW;
- }
- else
- {
- OSL_FAIL( "OReferenceValueComponent::translateExternalValueToControlValue: unexpected value type!" );
- }
-
- return makeAny( nState );
- }
-
- //-----------------------------------------------------------------------------
- Any OReferenceValueComponent::translateControlValueToExternalValue( ) const
- {
- Any aExternalValue;
-
- try
- {
- Any aControlValue( m_xAggregateSet->getPropertyValue( PROPERTY_STATE ) );
- sal_Int16 nControlValue = STATE_DONTKNOW;
- aControlValue >>= nControlValue;
-
- bool bBooleanExchange = getExternalValueType().getTypeClass() == TypeClass_BOOLEAN;
- bool bStringExchange = getExternalValueType().getTypeClass() == TypeClass_STRING;
- OSL_ENSURE( bBooleanExchange || bStringExchange,
- "OReferenceValueComponent::translateControlValueToExternalValue: unexpected value exchange type!" );
-
- switch( nControlValue )
- {
- case STATE_CHECK:
- if ( bBooleanExchange )
- {
- aExternalValue <<= (sal_Bool)sal_True;
- }
- else if ( bStringExchange )
- {
- aExternalValue <<= m_sReferenceValue;
- }
- break;
-
- case STATE_NOCHECK:
- if ( bBooleanExchange )
- {
- aExternalValue <<= (sal_Bool)sal_False;
- }
- else if ( bStringExchange )
- {
- aExternalValue <<= (m_bSupportSecondRefValue ? m_sNoCheckReferenceValue : ::rtl::OUString());
- }
- break;
- }
- }
- catch( const Exception& )
- {
- OSL_FAIL( "OReferenceValueComponent::translateControlValueToExternalValue: caught an exception!" );
- }
-
- return aExternalValue;
- }
-
- //-----------------------------------------------------------------------------
- Any OReferenceValueComponent::translateControlValueToValidatableValue( ) const
- {
- if ( !m_xAggregateSet.is() )
- return Any();
-
- Any aControlValue( m_xAggregateSet->getPropertyValue( PROPERTY_STATE ) );
- sal_Int16 nControlValue = STATE_DONTKNOW;
- aControlValue >>= nControlValue;
-
- Any aValidatableValue;
- switch ( nControlValue )
- {
- case STATE_CHECK:
- aValidatableValue <<= (sal_Bool)sal_True;
- break;
- case STATE_NOCHECK:
- aValidatableValue <<= (sal_Bool)sal_False;
- break;
- }
- return aValidatableValue;
- }
-
-//........................................................................
-} // namespace frm
-//........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/refvaluecomponent.hxx b/forms/source/component/refvaluecomponent.hxx
deleted file mode 100644
index bb56ba8b4..000000000
--- a/forms/source/component/refvaluecomponent.hxx
+++ /dev/null
@@ -1,111 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-#ifndef FORMS_SOURCE_COMPONENT_REFVALUECOMPONENT_HXX
-#define FORMS_SOURCE_COMPONENT_REFVALUECOMPONENT_HXX
-
-#include "FormComponent.hxx"
-#include "togglestate.hxx"
-
-/** === begin UNO includes === **/
-/** === end UNO includes === **/
-
-//........................................................................
-namespace frm
-{
-//........................................................................
-
- //====================================================================
- //= OReferenceValueComponent
- //====================================================================
- /** a OBoundControlModel which features the exchange of a reference value
- */
- class OReferenceValueComponent : public OBoundControlModel
- {
- private:
- // <properties>
- ::rtl::OUString m_sReferenceValue; // the reference value to use for data exchange
- ::rtl::OUString m_sNoCheckReferenceValue; // the reference value to be exchanged when the control is not checked
- ToggleState m_eDefaultChecked; // the default check state
- // </properties>
-
- sal_Bool m_bSupportSecondRefValue; // do we support the SecondaryRefValue property?
-
- protected:
- const ::rtl::OUString& getReferenceValue() const { return m_sReferenceValue; }
- void setReferenceValue( const ::rtl::OUString& _rRefValue );
-
- const ::rtl::OUString& getNoCheckReferenceValue() const { return m_sNoCheckReferenceValue; }
-
- ToggleState getDefaultChecked() const { return m_eDefaultChecked; }
- void setDefaultChecked( ToggleState _eChecked ) { m_eDefaultChecked = _eChecked; }
-
- protected:
- OReferenceValueComponent(
- const ::com::sun::star::uno::Reference< ::com::sun::star::lang::XMultiServiceFactory>& _rxFactory,
- const ::rtl::OUString& _rUnoControlModelTypeName,
- const ::rtl::OUString& _rDefault,
- sal_Bool _bSupportNoCheckRefValue = sal_False
- );
- DECLARE_DEFAULT_CLONE_CTOR( OReferenceValueComponent )
- DECLARE_DEFAULT_DTOR( OReferenceValueComponent );
-
- // OPropertySet and friends
- virtual void SAL_CALL getFastPropertyValue(::com::sun::star::uno::Any& rValue, sal_Int32 nHandle) const;
- virtual void SAL_CALL setFastPropertyValue_NoBroadcast( sal_Int32 nHandle, const ::com::sun::star::uno::Any& rValue )
- throw (::com::sun::star::uno::Exception);
- virtual sal_Bool SAL_CALL convertFastPropertyValue(
- ::com::sun::star::uno::Any& _rConvertedValue, ::com::sun::star::uno::Any& _rOldValue, sal_Int32 _nHandle, const ::com::sun::star::uno::Any& _rValue )
- throw (::com::sun::star::lang::IllegalArgumentException);
- virtual void describeFixedProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
- using ::cppu::OPropertySetHelper::getFastPropertyValue;
-
- // OBoundControlModel overridables
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type >
- getSupportedBindingTypes();
- virtual ::com::sun::star::uno::Any
- translateExternalValueToControlValue( const ::com::sun::star::uno::Any& _rExternalValue ) const;
- virtual ::com::sun::star::uno::Any
- translateControlValueToExternalValue( ) const;
-
- virtual ::com::sun::star::uno::Any
- translateControlValueToValidatableValue( ) const;
-
- virtual ::com::sun::star::uno::Any
- getDefaultForReset() const;
- };
-
-//........................................................................
-} // namespace frm
-//........................................................................
-
-#endif // FORMS_SOURCE_COMPONENT_REFVALUECOMPONENT_HXX
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/scrollbar.cxx b/forms/source/component/scrollbar.cxx
deleted file mode 100644
index d2b5c5d06..000000000
--- a/forms/source/component/scrollbar.cxx
+++ /dev/null
@@ -1,322 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "scrollbar.hxx"
-#include <comphelper/streamsection.hxx>
-#include <comphelper/basicio.hxx>
-#include <rtl/math.hxx>
-
-//--------------------------------------------------------------------------
-extern "C" void SAL_CALL createRegistryInfo_OScrollBarModel()
-{
- static ::frm::OMultiInstanceAutoRegistration< ::frm::OScrollBarModel > aRegisterModel;
-}
-
-//........................................................................
-namespace frm
-{
-//........................................................................
-
- using namespace ::com::sun::star::uno;
- using namespace ::com::sun::star::beans;
- using namespace ::com::sun::star::form;
- using namespace ::com::sun::star::awt;
- using namespace ::com::sun::star::lang;
- using namespace ::com::sun::star::util;
- using namespace ::com::sun::star::io;
- using namespace ::com::sun::star::form::binding;
-
- //====================================================================
- //= helper
- //====================================================================
- //--------------------------------------------------------------------
- Any translateExternalDoubleToControlIntValue(
- const Any& _rExternalValue, const Reference< XPropertySet >& _rxProperties,
- const ::rtl::OUString& _rMinValueName, const ::rtl::OUString& _rMaxValueName )
- {
- OSL_ENSURE( _rxProperties.is(), "translateExternalDoubleToControlIntValue: no aggregate!?" );
-
- sal_Int32 nControlValue( 0 );
- double nExternalValue = 0;
- if ( _rExternalValue >>= nExternalValue )
- {
- if ( ::rtl::math::isInf( nExternalValue ) )
- {
- // set the minimum or maximum of the scroll values
- ::rtl::OUString sLimitPropertyName = ::rtl::math::isSignBitSet( nExternalValue )
- ? _rMinValueName : _rMaxValueName;
- if ( _rxProperties.is() )
- _rxProperties->getPropertyValue( sLimitPropertyName ) >>= nControlValue;
- }
- else
- {
- nControlValue = (sal_Int32)::rtl::math::round( nExternalValue );
- }
- }
- else
- {
- if ( _rxProperties.is() )
- _rxProperties->getPropertyValue( _rMinValueName ) >>= nControlValue;
- }
-
- return makeAny( nControlValue );
- }
-
- //--------------------------------------------------------------------
- Any translateControlIntToExternalDoubleValue( const Any& _rControlIntValue )
- {
- Any aExternalDoubleValue;
- sal_Int32 nScrollValue = 0;
- if ( _rControlIntValue >>= nScrollValue )
- aExternalDoubleValue <<= (double)nScrollValue;
- else
- {
- OSL_FAIL( "translateControlIntToExternalDoubleValue: no integer scroll value!" );
- // aExternalDoubleValue is void here, which is okay for this purpose ...
- }
-
- return aExternalDoubleValue;
- }
-
- //====================================================================
- //= OScrollBarModel
- //====================================================================
- //--------------------------------------------------------------------
- DBG_NAME( OScrollBarModel )
- //--------------------------------------------------------------------
- OScrollBarModel::OScrollBarModel( const Reference<XMultiServiceFactory>& _rxFactory )
- :OBoundControlModel( _rxFactory, VCL_CONTROLMODEL_SCROLLBAR, VCL_CONTROL_SCROLLBAR, sal_True, sal_True, sal_False )
- ,m_nDefaultScrollValue( 0 )
- {
- DBG_CTOR( OScrollBarModel, NULL );
-
- m_nClassId = FormComponentType::SCROLLBAR;
- initValueProperty( PROPERTY_SCROLL_VALUE, PROPERTY_ID_SCROLL_VALUE );
- }
-
- //--------------------------------------------------------------------
- OScrollBarModel::OScrollBarModel( const OScrollBarModel* _pOriginal, const Reference< XMultiServiceFactory >& _rxFactory )
- :OBoundControlModel( _pOriginal, _rxFactory )
- {
- DBG_CTOR( OScrollBarModel, NULL );
- m_nDefaultScrollValue = _pOriginal->m_nDefaultScrollValue;
- }
-
- //--------------------------------------------------------------------
- OScrollBarModel::~OScrollBarModel( )
- {
- DBG_DTOR( OScrollBarModel, NULL );
- }
-
- //--------------------------------------------------------------------
- IMPLEMENT_SERVICE_REGISTRATION_2( OScrollBarModel, OControlModel, FRM_SUN_COMPONENT_SCROLLBAR, BINDABLE_INTEGER_VALUE_RANGE )
- // note that we're passing OControlModel as "base class". This is because
- // OBoundControlModel, our real base class, claims to support the DataAwareControlModel
- // service, which isn't really true for us. We only derive from this class
- // to benefit from the functionality for binding to spreadsheet cells
-
- //------------------------------------------------------------------------------
- IMPLEMENT_DEFAULT_CLONING( OScrollBarModel )
-
- //------------------------------------------------------------------------------
- void SAL_CALL OScrollBarModel::disposing()
- {
- OBoundControlModel::disposing();
- }
-
- //--------------------------------------------------------------------
- void OScrollBarModel::describeFixedProperties( Sequence< Property >& _rProps ) const
- {
- BEGIN_DESCRIBE_PROPERTIES( 3, OControlModel )
- DECL_PROP1( DEFAULT_SCROLL_VALUE, sal_Int32, BOUND );
- DECL_PROP1( TABINDEX, sal_Int16, BOUND );
- DECL_PROP2( CONTROLSOURCEPROPERTY,::rtl::OUString, READONLY, TRANSIENT );
- END_DESCRIBE_PROPERTIES();
- }
-
- //------------------------------------------------------------------------------
- void OScrollBarModel::getFastPropertyValue( Any& _rValue, sal_Int32 _nHandle ) const
- {
- switch ( _nHandle )
- {
- case PROPERTY_ID_DEFAULT_SCROLL_VALUE:
- _rValue <<= m_nDefaultScrollValue;
- break;
-
- default:
- OBoundControlModel::getFastPropertyValue( _rValue, _nHandle );
- }
- }
-
- //------------------------------------------------------------------------------
- void OScrollBarModel::setFastPropertyValue_NoBroadcast( sal_Int32 _nHandle, const Any& _rValue ) throw ( Exception )
- {
- switch ( _nHandle )
- {
- case PROPERTY_ID_DEFAULT_SCROLL_VALUE:
- OSL_VERIFY( _rValue >>= m_nDefaultScrollValue );
- resetNoBroadcast();
- break;
-
- default:
- OBoundControlModel::setFastPropertyValue_NoBroadcast( _nHandle, _rValue );
- }
- }
-
- //------------------------------------------------------------------------------
- sal_Bool OScrollBarModel::convertFastPropertyValue(
- Any& _rConvertedValue, Any& _rOldValue, sal_Int32 _nHandle, const Any& _rValue )
- throw ( IllegalArgumentException )
- {
- sal_Bool bModified( sal_False );
- switch ( _nHandle )
- {
- case PROPERTY_ID_DEFAULT_SCROLL_VALUE:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, m_nDefaultScrollValue );
- break;
-
- default:
- bModified = OBoundControlModel::convertFastPropertyValue( _rConvertedValue, _rOldValue, _nHandle, _rValue );
- break;
- }
- return bModified;
- }
-
- //--------------------------------------------------------------------
- Any OScrollBarModel::getPropertyDefaultByHandle( sal_Int32 _nHandle ) const
- {
- Any aReturn;
-
- switch ( _nHandle )
- {
- case PROPERTY_ID_DEFAULT_SCROLL_VALUE:
- aReturn <<= (sal_Int32)0;
- break;
-
- default:
- aReturn = OBoundControlModel::getPropertyDefaultByHandle( _nHandle );
- break;
- }
-
- return aReturn;
- }
-
- //------------------------------------------------------------------------------
- Any OScrollBarModel::translateDbColumnToControlValue( )
- {
- OSL_FAIL( "OScrollBarModel::commitControlValueToDbColumn: never to be called (we're not bound)!" );
- return Any();
- }
-
- //------------------------------------------------------------------------------
- sal_Bool OScrollBarModel::commitControlValueToDbColumn( bool /*_bPostReset*/ )
- {
- OSL_FAIL( "OScrollBarModel::commitControlValueToDbColumn: never to be called (we're not bound)!" );
- return sal_True;
- }
-
- //------------------------------------------------------------------------------
- Any OScrollBarModel::getDefaultForReset() const
- {
- return makeAny( (sal_Int32)m_nDefaultScrollValue );
- }
-
- //--------------------------------------------------------------------
- ::rtl::OUString SAL_CALL OScrollBarModel::getServiceName() throw( RuntimeException )
- {
- return FRM_SUN_COMPONENT_SCROLLBAR;
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OScrollBarModel::write( const Reference< XObjectOutputStream >& _rxOutStream )
- throw( IOException, RuntimeException )
- {
- OBoundControlModel::write( _rxOutStream );
- ::osl::MutexGuard aGuard( m_aMutex );
-
- OStreamSection aSection( Reference< XDataOutputStream >( _rxOutStream, UNO_QUERY ) );
-
- // version
- _rxOutStream->writeShort( 0x0001 );
-
- // properties
- _rxOutStream << m_nDefaultScrollValue;
- writeHelpTextCompatibly( _rxOutStream );
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OScrollBarModel::read( const Reference< XObjectInputStream>& _rxInStream ) throw( IOException, RuntimeException )
- {
- OBoundControlModel::read( _rxInStream );
- ::osl::MutexGuard aGuard( m_aMutex );
-
- // version
- {
- OStreamSection aSection( Reference< XDataInputStream >( _rxInStream, UNO_QUERY ) );
-
- sal_uInt16 nVersion = _rxInStream->readShort();
- if ( nVersion == 0x0001 )
- {
- _rxInStream >> m_nDefaultScrollValue;
- readHelpTextCompatibly( _rxInStream );
- }
- else
- defaultCommonProperties();
-
- // here, everything in the stream section which is left will be skipped
- }
- }
-
- //--------------------------------------------------------------------
- Any OScrollBarModel::translateExternalValueToControlValue( const Any& _rExternalValue ) const
- {
- return translateExternalDoubleToControlIntValue( _rExternalValue, m_xAggregateSet,
- ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "ScrollValueMin" ) ),
- ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "ScrollValueMax" ) ) );
- }
-
- //--------------------------------------------------------------------
- Any OScrollBarModel::translateControlValueToExternalValue( ) const
- {
- // by definition, the base class simply obtains the property value
- return translateControlIntToExternalDoubleValue( OBoundControlModel::translateControlValueToExternalValue() );
- }
-
- //--------------------------------------------------------------------
- Sequence< Type > OScrollBarModel::getSupportedBindingTypes()
- {
- return Sequence< Type >( &::getCppuType( static_cast< double* >( NULL ) ), 1 );
- }
-
-//........................................................................
-} // namespace frm
-//........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/scrollbar.hxx b/forms/source/component/scrollbar.hxx
deleted file mode 100644
index a7b4e323f..000000000
--- a/forms/source/component/scrollbar.hxx
+++ /dev/null
@@ -1,104 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-#ifndef FORMS_SOURCE_COMPONENT_SCROLLBAR_HXX
-#define FORMS_SOURCE_COMPONENT_SCROLLBAR_HXX
-
-#include "FormComponent.hxx"
-#include "frm_module.hxx"
-
-//........................................................................
-namespace frm
-{
-//........................................................................
-
- //====================================================================
- //= OScrollBarModel
- //====================================================================
- class OScrollBarModel :public OBoundControlModel
- {
- private:
- // <properties>
- sal_Int32 m_nDefaultScrollValue;
- // </properties>
-
- protected:
- DECLARE_DEFAULT_LEAF_XTOR( OScrollBarModel );
-
- // XServiceInfo
- DECLARE_SERVICE_REGISTRATION( OScrollBarModel )
-
- // XPersistObject
- DECLARE_XPERSISTOBJECT()
-
- // XCloneable
- DECLARE_XCLONEABLE();
-
- // XPropertyState
- virtual ::com::sun::star::uno::Any getPropertyDefaultByHandle( sal_Int32 _nHandle ) const;
-
- // OControlModel's property handling
- virtual void describeFixedProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
-
- // OPropertySetHelper
- virtual void SAL_CALL getFastPropertyValue( ::com::sun::star::uno::Any& _rValue, sal_Int32 _nHandle ) const;
- virtual void SAL_CALL setFastPropertyValue_NoBroadcast( sal_Int32 _nHandle, const ::com::sun::star::uno::Any& _rValue )
- throw ( ::com::sun::star::uno::Exception );
- virtual sal_Bool SAL_CALL convertFastPropertyValue( ::com::sun::star::uno::Any& _rConvertedValue, ::com::sun::star::uno::Any& _rOldValue, sal_Int32 _nHandle, const ::com::sun::star::uno::Any& _rValue )
- throw ( ::com::sun::star::lang::IllegalArgumentException );
-
- // OBoundControlModel
- virtual ::com::sun::star::uno::Any
- translateDbColumnToControlValue( );
- virtual sal_Bool commitControlValueToDbColumn( bool _bPostReset );
- virtual ::com::sun::star::uno::Any
- getDefaultForReset() const;
-
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type >
- getSupportedBindingTypes();
- virtual ::com::sun::star::uno::Any
- translateExternalValueToControlValue( const ::com::sun::star::uno::Any& _rExternalValue ) const;
- virtual ::com::sun::star::uno::Any
- translateControlValueToExternalValue( ) const;
-
- // XCoponent and related helpers
- virtual void SAL_CALL disposing();
-
- // prevent method hiding
- using OBoundControlModel::disposing;
- using OBoundControlModel::getFastPropertyValue;
-
- };
-//........................................................................
-} // namespacefrm
-//........................................................................
-
-#endif // FORMS_SOURCE_COMPONENT_SCROLLBAR_HXX
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/spinbutton.cxx b/forms/source/component/spinbutton.cxx
deleted file mode 100644
index 7fbc3ea8b..000000000
--- a/forms/source/component/spinbutton.cxx
+++ /dev/null
@@ -1,278 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_forms.hxx"
-#include "spinbutton.hxx"
-#include <comphelper/streamsection.hxx>
-#include <comphelper/basicio.hxx>
-
-//--------------------------------------------------------------------------
-extern "C" void SAL_CALL createRegistryInfo_OSpinButtonModel()
-{
- static ::frm::OMultiInstanceAutoRegistration< ::frm::OSpinButtonModel > aRegisterModel;
-}
-
-//........................................................................
-namespace frm
-{
-//........................................................................
-
- using namespace ::com::sun::star::uno;
- using namespace ::com::sun::star::beans;
- using namespace ::com::sun::star::form;
- using namespace ::com::sun::star::awt;
- using namespace ::com::sun::star::lang;
- using namespace ::com::sun::star::util;
- using namespace ::com::sun::star::io;
- using namespace ::com::sun::star::form::binding;
-
- //====================================================================
- //= OSpinButtonModel
- //====================================================================
- // implemented elsewhere
- Any translateExternalDoubleToControlIntValue(
- const Any& _rExternalValue, const Reference< XPropertySet >& _rxProperties,
- const ::rtl::OUString& _rMinValueName, const ::rtl::OUString& _rMaxValueName );
- Any translateControlIntToExternalDoubleValue( const Any& _rControlIntValue );
-
- //====================================================================
- //= OSpinButtonModel
- //====================================================================
- //--------------------------------------------------------------------
- DBG_NAME( OSpinButtonModel )
- //--------------------------------------------------------------------
- OSpinButtonModel::OSpinButtonModel( const Reference<XMultiServiceFactory>& _rxFactory )
- :OBoundControlModel( _rxFactory, VCL_CONTROLMODEL_SPINBUTTON, VCL_CONTROL_SPINBUTTON, sal_True, sal_True, sal_False )
- ,m_nDefaultSpinValue( 0 )
- {
- DBG_CTOR( OSpinButtonModel, NULL );
-
- m_nClassId = FormComponentType::SPINBUTTON;
- initValueProperty( PROPERTY_SPIN_VALUE, PROPERTY_ID_SPIN_VALUE );
- }
-
- //--------------------------------------------------------------------
- OSpinButtonModel::OSpinButtonModel( const OSpinButtonModel* _pOriginal, const Reference< XMultiServiceFactory >& _rxFactory )
- :OBoundControlModel( _pOriginal, _rxFactory )
- {
- DBG_CTOR( OSpinButtonModel, NULL );
- m_nDefaultSpinValue = _pOriginal->m_nDefaultSpinValue;
- }
-
- //--------------------------------------------------------------------
- OSpinButtonModel::~OSpinButtonModel( )
- {
- DBG_DTOR( OSpinButtonModel, NULL );
- }
-
- //--------------------------------------------------------------------
- IMPLEMENT_SERVICE_REGISTRATION_2( OSpinButtonModel, OControlModel, FRM_SUN_COMPONENT_SPINBUTTON, BINDABLE_INTEGER_VALUE_RANGE )
- // note that we're passing OControlModel as "base class". This is because
- // OBoundControlModel, our real base class, claims to support the DataAwareControlModel
- // service, which isn't really true for us. We only derive from this class
- // to benefit from the functionality for binding to spreadsheet cells
-
- //------------------------------------------------------------------------------
- IMPLEMENT_DEFAULT_CLONING( OSpinButtonModel )
-
- //------------------------------------------------------------------------------
- void SAL_CALL OSpinButtonModel::disposing()
- {
- OBoundControlModel::disposing();
- }
-
- //--------------------------------------------------------------------
- void OSpinButtonModel::describeFixedProperties( Sequence< Property >& _rProps ) const
- {
- BEGIN_DESCRIBE_PROPERTIES( 3, OControlModel )
- DECL_PROP1( DEFAULT_SPIN_VALUE, sal_Int32, BOUND );
- DECL_PROP1( TABINDEX, sal_Int16, BOUND );
- DECL_PROP2( CONTROLSOURCEPROPERTY,::rtl::OUString, READONLY, TRANSIENT );
- END_DESCRIBE_PROPERTIES();
- }
-
- //------------------------------------------------------------------------------
- void OSpinButtonModel::getFastPropertyValue( Any& _rValue, sal_Int32 _nHandle ) const
- {
- switch ( _nHandle )
- {
- case PROPERTY_ID_DEFAULT_SPIN_VALUE:
- _rValue <<= m_nDefaultSpinValue;
- break;
-
- default:
- OBoundControlModel::getFastPropertyValue( _rValue, _nHandle );
- }
- }
-
- //------------------------------------------------------------------------------
- void OSpinButtonModel::setFastPropertyValue_NoBroadcast( sal_Int32 _nHandle, const Any& _rValue ) throw ( Exception )
- {
- switch ( _nHandle )
- {
- case PROPERTY_ID_DEFAULT_SPIN_VALUE:
- OSL_VERIFY( _rValue >>= m_nDefaultSpinValue );
- resetNoBroadcast();
- break;
-
- default:
- OBoundControlModel::setFastPropertyValue_NoBroadcast( _nHandle, _rValue );
- }
- }
-
- //------------------------------------------------------------------------------
- sal_Bool OSpinButtonModel::convertFastPropertyValue(
- Any& _rConvertedValue, Any& _rOldValue, sal_Int32 _nHandle, const Any& _rValue )
- throw ( IllegalArgumentException )
- {
- sal_Bool bModified( sal_False );
- switch ( _nHandle )
- {
- case PROPERTY_ID_DEFAULT_SPIN_VALUE:
- bModified = tryPropertyValue( _rConvertedValue, _rOldValue, _rValue, m_nDefaultSpinValue );
- break;
-
- default:
- bModified = OBoundControlModel::convertFastPropertyValue( _rConvertedValue, _rOldValue, _nHandle, _rValue );
- break;
- }
- return bModified;
- }
-
- //--------------------------------------------------------------------
- Any OSpinButtonModel::getPropertyDefaultByHandle( sal_Int32 _nHandle ) const
- {
- Any aReturn;
-
- switch ( _nHandle )
- {
- case PROPERTY_ID_DEFAULT_SPIN_VALUE:
- aReturn <<= (sal_Int32)0;
- break;
-
- default:
- aReturn = OBoundControlModel::getPropertyDefaultByHandle( _nHandle );
- break;
- }
-
- return aReturn;
- }
-
- //------------------------------------------------------------------------------
- Any OSpinButtonModel::translateDbColumnToControlValue( )
- {
- OSL_FAIL( "OSpinButtonModel::commitControlValueToDbColumn: never to be called (we're not bound)!" );
- return Any();
- }
-
- //------------------------------------------------------------------------------
- sal_Bool OSpinButtonModel::commitControlValueToDbColumn( bool /*_bPostReset*/ )
- {
- OSL_FAIL( "OSpinButtonModel::commitControlValueToDbColumn: never to be called (we're not bound)!" );
- return sal_True;
- }
-
- //------------------------------------------------------------------------------
- Any OSpinButtonModel::getDefaultForReset() const
- {
- return makeAny( (sal_Int32)m_nDefaultSpinValue );
- }
-
- //--------------------------------------------------------------------
- ::rtl::OUString SAL_CALL OSpinButtonModel::getServiceName() throw( RuntimeException )
- {
- return FRM_SUN_COMPONENT_SPINBUTTON;
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OSpinButtonModel::write( const Reference< XObjectOutputStream >& _rxOutStream )
- throw( IOException, RuntimeException )
- {
- OBoundControlModel::write( _rxOutStream );
- ::osl::MutexGuard aGuard( m_aMutex );
-
- OStreamSection aSection( Reference< XDataOutputStream >( _rxOutStream, UNO_QUERY ) );
-
- // version
- _rxOutStream->writeShort( 0x0001 );
-
- // properties
- _rxOutStream << m_nDefaultSpinValue;
- writeHelpTextCompatibly( _rxOutStream );
- }
-
- //--------------------------------------------------------------------
- void SAL_CALL OSpinButtonModel::read( const Reference< XObjectInputStream>& _rxInStream ) throw( IOException, RuntimeException )
- {
- OBoundControlModel::read( _rxInStream );
- ::osl::MutexGuard aGuard( m_aMutex );
-
- // version
- {
- OStreamSection aSection( Reference< XDataInputStream >( _rxInStream, UNO_QUERY ) );
-
- sal_uInt16 nVersion = _rxInStream->readShort();
- if ( nVersion == 0x0001 )
- {
- _rxInStream >> m_nDefaultSpinValue;
- readHelpTextCompatibly( _rxInStream );
- }
- else
- defaultCommonProperties();
-
- // here, everything in the stream section which is left will be skipped
- }
- }
-
- //--------------------------------------------------------------------
- Any OSpinButtonModel::translateExternalValueToControlValue( const Any& _rExternalValue ) const
- {
- return translateExternalDoubleToControlIntValue( _rExternalValue, m_xAggregateSet,
- ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "SpinValueMin" ) ),
- ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "SpinValueMax" ) ) );
- }
-
- //--------------------------------------------------------------------
- Any OSpinButtonModel::translateControlValueToExternalValue( ) const
- {
- // by definition, the base class simply obtains the property value
- return translateControlIntToExternalDoubleValue( OBoundControlModel::translateControlValueToExternalValue() );
- }
-
- //--------------------------------------------------------------------
- Sequence< Type > OSpinButtonModel::getSupportedBindingTypes()
- {
- return Sequence< Type >( &::getCppuType( static_cast< double* >( NULL ) ), 1 );
- }
-
-//........................................................................
-} // namespace frm
-//........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
diff --git a/forms/source/component/spinbutton.hxx b/forms/source/component/spinbutton.hxx
deleted file mode 100644
index 54348e580..000000000
--- a/forms/source/component/spinbutton.hxx
+++ /dev/null
@@ -1,104 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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.
- *
- ************************************************************************/
-#ifndef FORMS_SOURCE_COMPONENT_SPINBUTTON_HXX
-#define FORMS_SOURCE_COMPONENT_SPINBUTTON_HXX
-
-#include "FormComponent.hxx"
-#include "frm_module.hxx"
-
-//........................................................................
-namespace frm
-{
-//........................................................................
-
- //====================================================================
- //= OSpinButtonModel
- //====================================================================
- class OSpinButtonModel :public OBoundControlModel
- {
- private:
- // <properties>
- sal_Int32 m_nDefaultSpinValue;
- // </properties>
-
- protected:
- DECLARE_DEFAULT_LEAF_XTOR( OSpinButtonModel );
-
- // XServiceInfo
- DECLARE_SERVICE_REGISTRATION( OSpinButtonModel )
-
- // XPersistObject
- DECLARE_XPERSISTOBJECT()
-
- // XCloneable
- DECLARE_XCLONEABLE();
-
- // XPropertyState
- virtual ::com::sun::star::uno::Any getPropertyDefaultByHandle( sal_Int32 _nHandle ) const;
-
- // OControlModel's property handling
- virtual void describeFixedProperties(
- ::com::sun::star::uno::Sequence< ::com::sun::star::beans::Property >& /* [out] */ _rProps
- ) const;
-
- // OPropertySetHelper
- virtual void SAL_CALL getFastPropertyValue( ::com::sun::star::uno::Any& _rValue, sal_Int32 _nHandle ) const;
- virtual void SAL_CALL setFastPropertyValue_NoBroadcast( sal_Int32 _nHandle, const ::com::sun::star::uno::Any& _rValue )
- throw ( ::com::sun::star::uno::Exception );
- virtual sal_Bool SAL_CALL convertFastPropertyValue( ::com::sun::star::uno::Any& _rConvertedValue, ::com::sun::star::uno::Any& _rOldValue, sal_Int32 _nHandle, const ::com::sun::star::uno::Any& _rValue )
- throw ( ::com::sun::star::lang::IllegalArgumentException );
-
- // OBoundControlModel
- virtual ::com::sun::star::uno::Any
- translateDbColumnToControlValue( );
- virtual sal_Bool commitControlValueToDbColumn( bool _bPostReset );
- virtual ::com::sun::star::uno::Any
- getDefaultForReset() const;
-
- virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type >
- getSupportedBindingTypes();
- virtual ::com::sun::star::uno::Any
- translateExternalValueToControlValue( const ::com::sun::star::uno::Any& _rExternalValue ) const;
- virtual ::com::sun::star::uno::Any
- translateControlValueToExternalValue( ) const;
-
- // XCoponent and related helpers
- virtual void SAL_CALL disposing();
-
- // prevent method hiding
- using OBoundControlModel::disposing;
- using OBoundControlModel::getFastPropertyValue;
-
- };
-//........................................................................
-} // namespacefrm
-//........................................................................
-
-#endif // FORMS_SOURCE_COMPONENT_SPINBUTTON_HXX
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */