replace obsolete "master" branch with README that points at new repoHEADmaster-deletedmaster

1 files changed, 0 insertions, 1289 deletions

diff --git a/extensions/source/propctrlr/eventhandler.cxx b/extensions/source/propctrlr/eventhandler.cxx
deleted file mode 100644
index 0fe072a6d..000000000
--- a/extensions/source/propctrlr/eventhandler.cxx
+++ /dev/null
@@ -1,1289 +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_extensions.hxx"
-
-#include "eventhandler.hxx"
-#include "propctrlr.hrc"
-#include "formbrowsertools.hxx"
-#include "formresid.hrc"
-#include "formstrings.hxx"
-#include "handlerhelper.hxx"
-#include "modulepcr.hxx"
-#include "pcrcommon.hxx"
-#include "pcrstrings.hxx"
-#include "propertycontrolextender.hxx"
-
-/** === begin UNO includes === **/
-#include <com/sun/star/awt/XTabControllerModel.hpp>
-#include <com/sun/star/beans/PropertyAttribute.hpp>
-#include <com/sun/star/beans/UnknownPropertyException.hpp>
-#include <com/sun/star/beans/XIntrospection.hpp>
-#include <com/sun/star/beans/XIntrospectionAccess.hpp>
-#include <com/sun/star/container/NoSuchElementException.hpp>
-#include <com/sun/star/container/XChild.hpp>
-#include <com/sun/star/container/XIndexAccess.hpp>
-#include <com/sun/star/container/XNameContainer.hpp>
-#include <com/sun/star/container/XNameReplace.hpp>
-#include <com/sun/star/form/FormComponentType.hpp>
-#include <com/sun/star/form/XForm.hpp>
-#include <com/sun/star/form/runtime/XFormController.hpp>
-#include <com/sun/star/inspection/PropertyControlType.hpp>
-#include <com/sun/star/lang/NullPointerException.hpp>
-#include <com/sun/star/script/XEventAttacherManager.hpp>
-#include <com/sun/star/script/XScriptEventsSupplier.hpp>
-#include <com/sun/star/util/XModifiable.hpp>
-#include <com/sun/star/uri/UriReferenceFactory.hpp>
-#include <com/sun/star/uri/XVndSunStarScriptUrlReference.hpp>
-/** === end UNO includes === **/
-
-#include <comphelper/namedvaluecollection.hxx>
-#include <comphelper/evtmethodhelper.hxx>
-#include <comphelper/types.hxx>
-#include <cppuhelper/implbase1.hxx>
-#include <rtl/ref.hxx>
-#include <rtl/ustrbuf.hxx>
-#include <sfx2/app.hxx>
-#include <svl/eitem.hxx>
-#include <svl/itemset.hxx>
-#include <svx/svxdlg.hxx>
-#include <svx/svxids.hrc>
-#include <tools/diagnose_ex.h>
-#include <vcl/msgbox.hxx>
-
-#include <map>
-#include <algorithm>
-#include <o3tl/compat_functional.hxx>
-
-//------------------------------------------------------------------------
-extern "C" void SAL_CALL createRegistryInfo_EventHandler()
-{
-    ::pcr::OAutoRegistration< ::pcr::EventHandler > aAutoRegistration;
-}
-
-//........................................................................
-namespace pcr
-{
-//........................................................................
-
-    /** === begin UNO using === **/
-    using ::com::sun::star::uno::Reference;
-    using ::com::sun::star::uno::XComponentContext;
-    using ::com::sun::star::beans::XPropertySet;
-    using ::com::sun::star::uno::Any;
-    using ::com::sun::star::uno::TypeClass_STRING;
-    using ::com::sun::star::uno::Type;
-    using ::com::sun::star::beans::XPropertyChangeListener;
-    using ::com::sun::star::beans::Property;
-    using ::com::sun::star::beans::PropertyState;
-    using ::com::sun::star::beans::PropertyState_DIRECT_VALUE;
-    using ::com::sun::star::uno::Sequence;
-    using ::com::sun::star::script::ScriptEventDescriptor;
-    using ::com::sun::star::script::XScriptEventsSupplier;
-    using ::com::sun::star::lang::NullPointerException;
-    using ::com::sun::star::uno::Exception;
-    using ::com::sun::star::container::XChild;
-    using ::com::sun::star::container::XIndexAccess;
-    using ::com::sun::star::script::XEventAttacherManager;
-    using ::com::sun::star::uno::UNO_QUERY;
-    using ::com::sun::star::uno::UNO_QUERY_THROW;
-    using ::com::sun::star::uno::XInterface;
-    using ::com::sun::star::beans::XIntrospection;
-    using ::com::sun::star::beans::XIntrospectionAccess;
-    using ::com::sun::star::container::XNameContainer;
-    using ::com::sun::star::awt::XTabControllerModel;
-    using ::com::sun::star::form::XForm;
-    using ::com::sun::star::form::runtime::XFormController;
-    using ::com::sun::star::beans::UnknownPropertyException;
-    using ::com::sun::star::uno::makeAny;
-    using ::com::sun::star::container::NoSuchElementException;
-    using ::com::sun::star::beans::XPropertySetInfo;
-    using ::com::sun::star::container::XNameReplace;
-    using ::com::sun::star::lang::IllegalArgumentException;
-    using ::com::sun::star::lang::WrappedTargetException;
-    using ::com::sun::star::uno::RuntimeException;
-    using ::com::sun::star::beans::PropertyValue;
-    using ::com::sun::star::inspection::LineDescriptor;
-    using ::com::sun::star::inspection::XPropertyControlFactory;
-    using ::com::sun::star::inspection::InteractiveSelectionResult;
-    using ::com::sun::star::inspection::InteractiveSelectionResult_Cancelled;
-    using ::com::sun::star::inspection::InteractiveSelectionResult_Success;
-    using ::com::sun::star::inspection::XObjectInspectorUI;
-    using ::com::sun::star::util::XModifiable;
-    using ::com::sun::star::beans::PropertyChangeEvent;
-    using ::com::sun::star::frame::XFrame;
-    using ::com::sun::star::frame::XModel;
-    using ::com::sun::star::frame::XController;
-    using ::com::sun::star::uno::UNO_SET_THROW;
-    using com::sun::star::uri::UriReferenceFactory;
-    using com::sun::star::uri::XUriReferenceFactory;
-    using com::sun::star::uri::XVndSunStarScriptUrlReference;
-    using ::com::sun::star::lang::XEventListener;
-    /** === end UNO using === **/
-    namespace PropertyControlType = ::com::sun::star::inspection::PropertyControlType;
-    namespace PropertyAttribute = ::com::sun::star::beans::PropertyAttribute;
-    namespace FormComponentType = ::com::sun::star::form::FormComponentType;
-
-    //====================================================================
-    //= EventDescription
-    //====================================================================
-    EventDescription::EventDescription( EventId _nId, const sal_Char* _pListenerNamespaceAscii, const sal_Char* _pListenerClassAsciiName,
-            const sal_Char* _pListenerMethodAsciiName, sal_uInt16 _nDisplayNameResId, const rtl::OString& _sHelpId, const rtl::OString& _sUniqueBrowseId )
-        :sDisplayName( String( PcrRes( _nDisplayNameResId ) ) )
-        ,sListenerMethodName( ::rtl::OUString::createFromAscii( _pListenerMethodAsciiName ) )
-        ,sHelpId( _sHelpId )
-        ,sUniqueBrowseId( _sUniqueBrowseId )
-        ,nId( _nId )
-    {
-        ::rtl::OUStringBuffer aQualifiedListenerClass;
-        aQualifiedListenerClass.appendAscii( "com.sun.star." );
-        aQualifiedListenerClass.appendAscii( _pListenerNamespaceAscii );
-        aQualifiedListenerClass.appendAscii( "." );
-        aQualifiedListenerClass.appendAscii( _pListenerClassAsciiName );
-        sListenerClassName = aQualifiedListenerClass.makeStringAndClear();
-    }
-
-    //========================================================================
-    //= helper
-    //========================================================================
-    namespace
-    {
-        //....................................................................
-        #define DESCRIBE_EVENT( asciinamespace, asciilistener, asciimethod, id_postfix ) \
-            s_aKnownEvents.insert( EventMap::value_type( \
-                ::rtl::OUString::createFromAscii( asciimethod ), \
-                EventDescription( ++nEventId, asciinamespace, asciilistener, asciimethod, RID_STR_EVT_##id_postfix, HID_EVT_##id_postfix, UID_BRWEVT_##id_postfix ) ) )
-
-        //....................................................................
-        bool lcl_getEventDescriptionForMethod( const ::rtl::OUString& _rMethodName, EventDescription& _out_rDescription )
-        {
-            static EventMap s_aKnownEvents;
-            if ( s_aKnownEvents.empty() )
-            {
-                ::osl::MutexGuard aGuard( ::osl::Mutex::getGlobalMutex() );
-                if ( s_aKnownEvents.empty() )
-                {
-                    static sal_Int32 nEventId = 0;
-
-                    DESCRIBE_EVENT( "form", "XApproveActionListener",       "approveAction",            APPROVEACTIONPERFORMED );
-                    DESCRIBE_EVENT( "awt",  "XActionListener",              "actionPerformed",          ACTIONPERFORMED );
-                    DESCRIBE_EVENT( "form", "XChangeListener",              "changed",                  CHANGED );
-                    DESCRIBE_EVENT( "awt",  "XTextListener",                "textChanged",              TEXTCHANGED );
-                    DESCRIBE_EVENT( "awt",  "XItemListener",                "itemStateChanged",         ITEMSTATECHANGED );
-                    DESCRIBE_EVENT( "awt",  "XFocusListener",               "focusGained",              FOCUSGAINED );
-                    DESCRIBE_EVENT( "awt",  "XFocusListener",               "focusLost",                FOCUSLOST );
-                    DESCRIBE_EVENT( "awt",  "XKeyListener",                 "keyPressed",               KEYTYPED );
-                    DESCRIBE_EVENT( "awt",  "XKeyListener",                 "keyReleased",              KEYUP );
-                    DESCRIBE_EVENT( "awt",  "XMouseListener",               "mouseEntered",             MOUSEENTERED );
-                    DESCRIBE_EVENT( "awt",  "XMouseMotionListener",         "mouseDragged",             MOUSEDRAGGED );
-                    DESCRIBE_EVENT( "awt",  "XMouseMotionListener",         "mouseMoved",               MOUSEMOVED );
-                    DESCRIBE_EVENT( "awt",  "XMouseListener",               "mousePressed",             MOUSEPRESSED );
-                    DESCRIBE_EVENT( "awt",  "XMouseListener",               "mouseReleased",            MOUSERELEASED );
-                    DESCRIBE_EVENT( "awt",  "XMouseListener",               "mouseExited",              MOUSEEXITED );
-                    DESCRIBE_EVENT( "form", "XResetListener",               "approveReset",             APPROVERESETTED );
-                    DESCRIBE_EVENT( "form", "XResetListener",               "resetted",                 RESETTED );
-                    DESCRIBE_EVENT( "form", "XSubmitListener",              "approveSubmit",            SUBMITTED );
-                    DESCRIBE_EVENT( "form", "XUpdateListener",              "approveUpdate",            BEFOREUPDATE );
-                    DESCRIBE_EVENT( "form", "XUpdateListener",              "updated",                  AFTERUPDATE );
-                    DESCRIBE_EVENT( "form", "XLoadListener",                "loaded",                   LOADED );
-                    DESCRIBE_EVENT( "form", "XLoadListener",                "reloading",                RELOADING );
-                    DESCRIBE_EVENT( "form", "XLoadListener",                "reloaded",                 RELOADED );
-                    DESCRIBE_EVENT( "form", "XLoadListener",                "unloading",                UNLOADING );
-                    DESCRIBE_EVENT( "form", "XLoadListener",                "unloaded",                 UNLOADED );
-                    DESCRIBE_EVENT( "form", "XConfirmDeleteListener",       "confirmDelete",            CONFIRMDELETE );
-                    DESCRIBE_EVENT( "sdb",  "XRowSetApproveListener",       "approveRowChange",         APPROVEROWCHANGE );
-                    DESCRIBE_EVENT( "sdbc", "XRowSetListener",              "rowChanged",               ROWCHANGE );
-                    DESCRIBE_EVENT( "sdb",  "XRowSetApproveListener",       "approveCursorMove",        POSITIONING );
-                    DESCRIBE_EVENT( "sdbc", "XRowSetListener",              "cursorMoved",              POSITIONED );
-                    DESCRIBE_EVENT( "form", "XDatabaseParameterListener",   "approveParameter",         APPROVEPARAMETER );
-                    DESCRIBE_EVENT( "sdb",  "XSQLErrorListener",            "errorOccured",             ERROROCCURRED );
-                    DESCRIBE_EVENT( "awt",  "XAdjustmentListener",          "adjustmentValueChanged",   ADJUSTMENTVALUECHANGED );
-                }
-            }
-
-            EventMap::const_iterator pos = s_aKnownEvents.find( _rMethodName );
-            if ( pos == s_aKnownEvents.end() )
-                return false;
-
-            _out_rDescription = pos->second;
-            return true;
-        }
-
-        //....................................................................
-        ::rtl::OUString lcl_getEventPropertyName( const ::rtl::OUString& _rListenerClassName, const ::rtl::OUString& _rMethodName )
-        {
-            ::rtl::OUStringBuffer aPropertyName;
-            aPropertyName.append( _rListenerClassName );
-            aPropertyName.append( (sal_Unicode)';' );
-            aPropertyName.append( _rMethodName.getStr() );
-            return aPropertyName.makeStringAndClear();
-        }
-
-        //................................................................
-        ScriptEventDescriptor lcl_getAssignedScriptEvent( const EventDescription& _rEvent, const Sequence< ScriptEventDescriptor >& _rAllAssignedMacros )
-        {
-            ScriptEventDescriptor aScriptEvent;
-            // for the case there is actually no event assigned, initialize at least ListenerType and MethodName,
-            //  so this ScriptEventDescriptor properly describes the given event
-            aScriptEvent.ListenerType = _rEvent.sListenerClassName;
-            aScriptEvent.EventMethod = _rEvent.sListenerMethodName;
-
-            const ScriptEventDescriptor* pAssignedEvent = _rAllAssignedMacros.getConstArray();
-            sal_Int32 assignedEventCount( _rAllAssignedMacros.getLength() );
-            for ( sal_Int32 assignedEvent = 0; assignedEvent < assignedEventCount; ++assignedEvent, ++pAssignedEvent )
-            {
-                if  (   ( pAssignedEvent->ListenerType != _rEvent.sListenerClassName )
-                    ||  ( pAssignedEvent->EventMethod != _rEvent.sListenerMethodName )
-                    )
-                    continue;
-
-                if  (   ( pAssignedEvent->ScriptCode.getLength() == 0 )
-                    ||  ( pAssignedEvent->ScriptType.getLength() == 0 )
-                    )
-                {
-                    OSL_FAIL( "lcl_getAssignedScriptEvent: me thinks this should not happen!" );
-                    continue;
-                }
-
-                aScriptEvent = *pAssignedEvent;
-
-                if ( !aScriptEvent.ScriptType.equalsAsciiL( RTL_CONSTASCII_STRINGPARAM( "StarBasic" ) ) )
-                    continue;
-
-                // this is an old-style macro specification:
-                // [document|application]:Library.Module.Function
-                // we need to translate this to the new-style macro specification
-                // vnd.sun.star.script:Library.Module.Function?language=Basic&location=[document|application]
-
-                sal_Int32 nPrefixLen = aScriptEvent.ScriptCode.indexOf( ':' );
-                OSL_ENSURE( nPrefixLen > 0, "lcl_getAssignedScriptEvent: illegal location!" );
-                ::rtl::OUString sLocation = aScriptEvent.ScriptCode.copy( 0, nPrefixLen );
-                ::rtl::OUString sMacroPath = aScriptEvent.ScriptCode.copy( nPrefixLen + 1 );
-
-                ::rtl::OUStringBuffer aNewStyleSpec;
-                aNewStyleSpec.appendAscii( "vnd.sun.star.script:" );
-                aNewStyleSpec.append     ( sMacroPath );
-                aNewStyleSpec.appendAscii( "?language=Basic&location=" );
-                aNewStyleSpec.append     ( sLocation );
-
-                aScriptEvent.ScriptCode = aNewStyleSpec.makeStringAndClear();
-
-                // also, this new-style spec requires the script code to be "Script" instead of "StarBasic"
-                aScriptEvent.ScriptType = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "Script" ) );
-            }
-            return aScriptEvent;
-        }
-
-        //................................................................
-        ::rtl::OUString lcl_getQualifiedKnownListenerName( const ScriptEventDescriptor& _rFormComponentEventDescriptor )
-        {
-            EventDescription aKnownEvent;
-            if ( lcl_getEventDescriptionForMethod( _rFormComponentEventDescriptor.EventMethod, aKnownEvent ) )
-                return aKnownEvent.sListenerClassName;
-            OSL_FAIL( "lcl_getQualifiedKnownListenerName: unknown method name!" );
-                // somebody assigned an script to a form component event which we don't know
-                // Speaking strictly, this is not really an error - it is possible to do
-                // this programmatically -, but it should rarely happen, since it's not possible
-                // via UI
-            return _rFormComponentEventDescriptor.ListenerType;
-        }
-
-        //................................................................
-        typedef ::std::set< Type, TypeLessByName > TypeBag;
-
-        //................................................................
-        void lcl_addListenerTypesFor_throw( const Reference< XInterface >& _rxComponent,
-            const Reference< XIntrospection >& _rxIntrospection, TypeBag& _out_rTypes )
-        {
-            if ( !_rxComponent.is() )
-                return;
-            OSL_PRECOND( _rxIntrospection.is(), "lcl_addListenerTypesFor_throw: this will crash!" );
-
-            Reference< XIntrospectionAccess > xIntrospectionAccess(
-                _rxIntrospection->inspect( makeAny( _rxComponent ) ), UNO_QUERY_THROW );
-
-            Sequence< Type > aListeners( xIntrospectionAccess->getSupportedListeners() );
-
-            ::std::copy( aListeners.getConstArray(), aListeners.getConstArray() + aListeners.getLength(),
-                ::std::insert_iterator< TypeBag >( _out_rTypes, _out_rTypes.begin() ) );
-        }
-
-        //................................................................
-        bool operator ==( const ScriptEventDescriptor _lhs, const ScriptEventDescriptor _rhs )
-        {
-            return  (   ( _lhs.ListenerType         == _rhs.ListenerType        )
-                    &&  ( _lhs.EventMethod          == _rhs.EventMethod         )
-                    &&  ( _lhs.AddListenerParam     == _rhs.AddListenerParam    )
-                    &&  ( _lhs.ScriptType           == _rhs.ScriptType          )
-                    &&  ( _lhs.ScriptCode           == _rhs.ScriptCode          )
-                    );
-        }
-    }
-
-    //====================================================================
-    //= EventHandler
-    //====================================================================
-    typedef ::cppu::WeakImplHelper1 <   ::com::sun::star::container::XNameReplace
-                                    >   EventHolder_Base;
-    /** a UNO component holding assigned event descriptions, for use with a SvxMacroAssignDlg
-    */
-    class EventHolder : public EventHolder_Base
-    {
-    private:
-        typedef ::boost::unordered_map< ::rtl::OUString, ScriptEventDescriptor, ::rtl::OUStringHash >  EventMap;
-        typedef ::std::map< EventId, EventMap::iterator >                                       EventMapIndexAccess;
-
-        EventMap            m_aEventNameAccess;
-        EventMapIndexAccess m_aEventIndexAccess;
-
-    public:
-        EventHolder( );
-
-        void addEvent( EventId _nId, const ::rtl::OUString& _rEventName, const ScriptEventDescriptor& _rScriptEvent );
-
-        /** effectively the same as getByName, but instead of converting the ScriptEventDescriptor to the weird
-            format used by the macro assignment dialog, it is returned directly
-        */
-        ScriptEventDescriptor getNormalizedDescriptorByName( const ::rtl::OUString& _rEventName ) const;
-
-        // XNameReplace
-        virtual void SAL_CALL replaceByName( const ::rtl::OUString& _rName, const Any& aElement ) throw (IllegalArgumentException, NoSuchElementException, WrappedTargetException, RuntimeException);
-        virtual Any SAL_CALL getByName( const ::rtl::OUString& _rName ) throw (NoSuchElementException, WrappedTargetException, RuntimeException);
-        virtual Sequence< ::rtl::OUString > SAL_CALL getElementNames(  ) throw (RuntimeException);
-        virtual ::sal_Bool SAL_CALL hasByName( const ::rtl::OUString& _rName ) throw (RuntimeException);
-        virtual Type SAL_CALL getElementType(  ) throw (RuntimeException);
-        virtual ::sal_Bool SAL_CALL hasElements(  ) throw (RuntimeException);
-
-    protected:
-        ~EventHolder( );
-
-    private:
-        ScriptEventDescriptor impl_getDescriptor_throw( const ::rtl::OUString& _rEventName ) const;
-    };
-
-    DBG_NAME( EventHolder )
-    //------------------------------------------------------------------------
-    EventHolder::EventHolder()
-    {
-        DBG_CTOR( EventHolder, NULL );
-    }
-
-    //------------------------------------------------------------------------
-    EventHolder::~EventHolder()
-    {
-        m_aEventNameAccess.clear();
-        m_aEventIndexAccess.clear();
-        DBG_DTOR( EventHolder, NULL );
-    }
-
-    //------------------------------------------------------------------------
-    void EventHolder::addEvent( EventId _nId, const ::rtl::OUString& _rEventName, const ScriptEventDescriptor& _rScriptEvent )
-    {
-        ::std::pair< EventMap::iterator, bool > insertionResult =
-            m_aEventNameAccess.insert( EventMap::value_type( _rEventName, _rScriptEvent ) );
-        OSL_ENSURE( insertionResult.second, "EventHolder::addEvent: there already was a MacroURL for this event!" );
-        m_aEventIndexAccess[ _nId ] = insertionResult.first;
-    }
-
-    //------------------------------------------------------------------------
-    ScriptEventDescriptor EventHolder::getNormalizedDescriptorByName( const ::rtl::OUString& _rEventName ) const
-    {
-        return impl_getDescriptor_throw( _rEventName );
-    }
-
-    //------------------------------------------------------------------------
-    ScriptEventDescriptor EventHolder::impl_getDescriptor_throw( const ::rtl::OUString& _rEventName ) const
-    {
-        EventMap::const_iterator pos = m_aEventNameAccess.find( _rEventName );
-        if ( pos == m_aEventNameAccess.end() )
-            throw NoSuchElementException( ::rtl::OUString(), *const_cast< EventHolder* >( this ) );
-        return pos->second;
-    }
-
-    //------------------------------------------------------------------------
-    void SAL_CALL EventHolder::replaceByName( const ::rtl::OUString& _rName, const Any& _rElement ) throw (IllegalArgumentException, NoSuchElementException, WrappedTargetException, RuntimeException)
-    {
-        EventMap::iterator pos = m_aEventNameAccess.find( _rName );
-        if ( pos == m_aEventNameAccess.end() )
-            throw NoSuchElementException( ::rtl::OUString(), *this );
-
-        Sequence< PropertyValue > aScriptDescriptor;
-        OSL_VERIFY( _rElement >>= aScriptDescriptor );
-
-        ::comphelper::NamedValueCollection aExtractor( aScriptDescriptor );
-
-        pos->second.ScriptType = aExtractor.getOrDefault( "EventType", ::rtl::OUString() );
-        pos->second.ScriptCode = aExtractor.getOrDefault( "Script", ::rtl::OUString() );
-    }
-
-    //------------------------------------------------------------------------
-    Any SAL_CALL EventHolder::getByName( const ::rtl::OUString& _rName ) throw (NoSuchElementException, WrappedTargetException, RuntimeException)
-    {
-        ScriptEventDescriptor aDescriptor( impl_getDescriptor_throw( _rName ) );
-
-        Any aRet;
-        Sequence< PropertyValue > aScriptDescriptor( 2 );
-        aScriptDescriptor[0].Name = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("EventType"));
-        aScriptDescriptor[0].Value <<= aDescriptor.ScriptType;
-        aScriptDescriptor[1].Name = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("Script"));
-        aScriptDescriptor[1].Value <<= aDescriptor.ScriptCode;
-
-        return makeAny( aScriptDescriptor );
-    }
-
-    //------------------------------------------------------------------------
-    Sequence< ::rtl::OUString > SAL_CALL EventHolder::getElementNames(  ) throw (RuntimeException)
-    {
-        Sequence< ::rtl::OUString > aReturn( m_aEventIndexAccess.size() );
-        ::rtl::OUString* pReturn = aReturn.getArray();
-
-        // SvxMacroAssignDlg has a weird API: It expects a XNameReplace, means a container whose
-        // main access method is by name. In it's UI, it shows the possible events in exactly the
-        // order in which XNameAccess::getElementNames returns them.
-        // However, SvxMacroAssignDlg *also* takes an index for the initial selection, which is
-        // relative to the sequence returned by XNameAccess::getElementNames.
-        // This is IMO weird, since it mixes index access with name access, which decreases efficiency
-        // of the implementation.
-        // Well, it means we're forced to return the events in getElementNames in exactly the same as they
-        // appear in the property browser UI.
-        for (   EventMapIndexAccess::const_iterator loop = m_aEventIndexAccess.begin();
-                loop != m_aEventIndexAccess.end();
-                ++loop, ++pReturn
-            )
-            *pReturn = loop->second->first;
-        return aReturn;
-    }
-
-     //------------------------------------------------------------------------
-    sal_Bool SAL_CALL EventHolder::hasByName( const ::rtl::OUString& _rName ) throw (RuntimeException)
-    {
-        EventMap::const_iterator pos = m_aEventNameAccess.find( _rName );
-        return pos != m_aEventNameAccess.end();
-    }
-
-    //------------------------------------------------------------------------
-    Type SAL_CALL EventHolder::getElementType(  ) throw (RuntimeException)
-    {
-        return ::getCppuType( static_cast< Sequence< PropertyValue >* >( NULL ) );
-    }
-
-    //------------------------------------------------------------------------
-    sal_Bool SAL_CALL EventHolder::hasElements(  ) throw (RuntimeException)
-    {
-        return !m_aEventNameAccess.empty();
-    }
-
-
-    //====================================================================
-    //= EventHandler
-    //====================================================================
-    DBG_NAME( EventHandler )
-    //--------------------------------------------------------------------
-    EventHandler::EventHandler( const Reference< XComponentContext >& _rxContext )
-        :EventHandler_Base( m_aMutex )
-        ,m_aContext( _rxContext )
-        ,m_aPropertyListeners( m_aMutex )
-        ,m_bEventsMapInitialized( false )
-        ,m_bIsDialogElement( false )
-        ,m_nGridColumnType( -1 )
-    {
-        DBG_CTOR( EventHandler, NULL );
-    }
-
-    //--------------------------------------------------------------------
-    EventHandler::~EventHandler()
-    {
-        DBG_DTOR( EventHandler, NULL );
-    }
-
-    //--------------------------------------------------------------------
-    ::rtl::OUString SAL_CALL EventHandler::getImplementationName(  ) throw (RuntimeException)
-    {
-        return getImplementationName_static();
-    }
-    
-    //--------------------------------------------------------------------
-    ::sal_Bool SAL_CALL EventHandler::supportsService( const ::rtl::OUString& ServiceName ) throw (RuntimeException)
-    {
-        StlSyntaxSequence< ::rtl::OUString > aAllServices( getSupportedServiceNames() );
-        return ::std::find( aAllServices.begin(), aAllServices.end(), ServiceName ) != aAllServices.end();
-    }
-    
-    //--------------------------------------------------------------------
-    Sequence< ::rtl::OUString > SAL_CALL EventHandler::getSupportedServiceNames(  ) throw (RuntimeException)
-    {
-        return getSupportedServiceNames_static();
-    }
-
-    //--------------------------------------------------------------------
-    ::rtl::OUString SAL_CALL EventHandler::getImplementationName_static(  ) throw (RuntimeException)
-    {
-        return ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.comp.extensions.EventHandler" ) );
-    }
-    
-    //--------------------------------------------------------------------
-    Sequence< ::rtl::OUString > SAL_CALL EventHandler::getSupportedServiceNames_static(  ) throw (RuntimeException)
-    {
-        Sequence< ::rtl::OUString > aSupported( 1 );
-        aSupported[0] = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.form.inspection.EventHandler" ) );
-        return aSupported;
-    }
-    
-    //--------------------------------------------------------------------
-    Reference< XInterface > SAL_CALL EventHandler::Create( const Reference< XComponentContext >& _rxContext )
-    {
-        return *( new EventHandler( _rxContext ) );
-    }
-
-    //--------------------------------------------------------------------
-    void SAL_CALL EventHandler::inspect( const Reference< XInterface >& _rxIntrospectee ) throw (RuntimeException, NullPointerException)
-    {
-        ::osl::MutexGuard aGuard( m_aMutex );
-
-        if ( !_rxIntrospectee.is() )
-            throw NullPointerException();
-
-        m_xComponent = Reference< XPropertySet >( _rxIntrospectee, UNO_QUERY_THROW );
-
-        m_bEventsMapInitialized = false;
-        EventMap aEmpty;
-        m_aEvents.swap( aEmpty );
-
-        m_bIsDialogElement = false;
-        m_nGridColumnType = -1;
-        try
-        {
-            Reference< XPropertySetInfo > xPSI( m_xComponent->getPropertySetInfo() );
-            m_bIsDialogElement = xPSI.is()
-                              && xPSI->hasPropertyByName( PROPERTY_WIDTH )
-                              && xPSI->hasPropertyByName( PROPERTY_HEIGHT )
-                              && xPSI->hasPropertyByName( PROPERTY_POSITIONX )
-                              && xPSI->hasPropertyByName( PROPERTY_POSITIONY );
-
-            Reference< XChild > xAsChild( _rxIntrospectee, UNO_QUERY );
-            if ( xAsChild.is() && !Reference< XForm >( _rxIntrospectee, UNO_QUERY ).is() )
-            {
-                if ( FormComponentType::GRIDCONTROL == classifyComponent( xAsChild->getParent() ) )
-                {
-                    m_nGridColumnType = classifyComponent( _rxIntrospectee );
-                }
-            }
-        }
-        catch( const Exception& )
-        {
-            DBG_UNHANDLED_EXCEPTION();
-        }
-    }
-
-    //--------------------------------------------------------------------
-    Any SAL_CALL EventHandler::getPropertyValue( const ::rtl::OUString& _rPropertyName ) throw (UnknownPropertyException, RuntimeException)
-    {
-        ::osl::MutexGuard aGuard( m_aMutex );
-
-        const EventDescription& rEvent = impl_getEventForName_throw( _rPropertyName );
-
-        Sequence< ScriptEventDescriptor > aEvents;
-        impl_getComponentScriptEvents_nothrow( aEvents );
-
-        sal_Int32 nEventCount = aEvents.getLength();
-        const ScriptEventDescriptor* pEvents = aEvents.getConstArray();
-
-        ScriptEventDescriptor aPropertyValue;
-        for ( sal_Int32 event = 0; event < nEventCount; ++event, ++pEvents )
-        {
-            if  (   rEvent.sListenerClassName == pEvents->ListenerType
-                &&  rEvent.sListenerMethodName == pEvents->EventMethod
-                )
-            {
-                aPropertyValue = *pEvents;
-                break;
-            }
-        }
-
-        return makeAny( aPropertyValue );
-    }
-    
-    //--------------------------------------------------------------------
-    void SAL_CALL EventHandler::setPropertyValue( const ::rtl::OUString& _rPropertyName, const Any& _rValue ) throw (UnknownPropertyException, RuntimeException)
-    {
-        ::osl::MutexGuard aGuard( m_aMutex );
-
-        const EventDescription& rEvent = impl_getEventForName_throw( _rPropertyName );
-
-        ScriptEventDescriptor aNewScriptEvent;
-        OSL_VERIFY( _rValue >>= aNewScriptEvent );
-
-        ScriptEventDescriptor aOldScriptEvent;
-        OSL_VERIFY( getPropertyValue( _rPropertyName ) >>= aOldScriptEvent );
-        if ( aOldScriptEvent == aNewScriptEvent )
-            return;
-
-        if ( m_bIsDialogElement )
-            impl_setDialogElementScriptEvent_nothrow( aNewScriptEvent );
-        else
-            impl_setFormComponentScriptEvent_nothrow( aNewScriptEvent );
-
-        Reference< XModifiable > xDoc( m_aContext.getContextValueByAsciiName( "ContextDocument" ), UNO_QUERY );
-        if ( xDoc.is() )
-            xDoc->setModified( sal_True );
-
-        PropertyChangeEvent aEvent;
-        aEvent.Source = m_xComponent;
-        aEvent.PropertyHandle = rEvent.nId;
-        aEvent.PropertyName = _rPropertyName;
-        aEvent.OldValue <<= aOldScriptEvent;
-        aEvent.NewValue <<= aNewScriptEvent;
-        m_aPropertyListeners.notify( aEvent, &XPropertyChangeListener::propertyChange );
-    }
-    
-    //--------------------------------------------------------------------
-    Any SAL_CALL EventHandler::convertToPropertyValue( const ::rtl::OUString& _rPropertyName, const Any& _rControlValue ) throw (UnknownPropertyException, RuntimeException)
-    {
-        ::osl::MutexGuard aGuard( m_aMutex );
-
-        ::rtl::OUString sNewScriptCode;
-        OSL_VERIFY( _rControlValue >>= sNewScriptCode );
-
-        Sequence< ScriptEventDescriptor > aAllAssignedEvents;
-        impl_getComponentScriptEvents_nothrow( aAllAssignedEvents );
-
-        const EventDescription& rEvent = impl_getEventForName_throw( _rPropertyName );
-        ScriptEventDescriptor aAssignedScript = lcl_getAssignedScriptEvent( rEvent, aAllAssignedEvents );
-
-        OSL_ENSURE( !sNewScriptCode.getLength(), "EventHandler::convertToPropertyValue: cannot convert a non-empty display name!" );
-        // Usually, there is no possibility for the user to change the content of an event binding directly in the
-        // input field, this instead is done with the macro assignment dialog.
-        // The only exception is the user pressing "DEL" while the control has the focus, in this case, we reset the
-        // control content to an empty string. So this is the only scenario where this method is allowed to be called.
-
-        // Striclty, we would be able to convert the display value to a property value,
-        // using the "name (location, language)" format we used in convertToControlValue. However,
-        // there is no need for this code ...
-
-        aAssignedScript.ScriptCode = sNewScriptCode;
-        return makeAny( aAssignedScript );
-    }
-    
-    //--------------------------------------------------------------------
-    Any SAL_CALL EventHandler::convertToControlValue( const ::rtl::OUString& /*_rPropertyName*/, const Any& _rPropertyValue, const Type& _rControlValueType ) throw (UnknownPropertyException, RuntimeException)
-    {
-        ::osl::MutexGuard aGuard( m_aMutex );
-
-        ScriptEventDescriptor aScriptEvent;
-        OSL_VERIFY( _rPropertyValue >>= aScriptEvent );
-
-        OSL_ENSURE( _rControlValueType.getTypeClass() == TypeClass_STRING,
-            "EventHandler::convertToControlValue: unexpected ControlValue type class!" );
-        (void)_rControlValueType;
-
-        ::rtl::OUString sScript( aScriptEvent.ScriptCode );
-        if ( sScript.getLength() )
-        {
-            // format is: "name (location, language)"
-            try
-            {
-                // parse
-                Reference< XUriReferenceFactory > xUriRefFac = UriReferenceFactory::create( m_aContext.getUNOContext() );
-                Reference< XVndSunStarScriptUrlReference > xScriptUri( xUriRefFac->parse( sScript ), UNO_QUERY_THROW );
-
-                ::rtl::OUStringBuffer aComposeBuffer;
-
-                // name
-                aComposeBuffer.append( xScriptUri->getName() );
-
-                // location
-                const ::rtl::OUString sLocationParamName( RTL_CONSTASCII_USTRINGPARAM( "location" ) );
-                const ::rtl::OUString sLocation = xScriptUri->getParameter( sLocationParamName );
-                const ::rtl::OUString sLangParamName( RTL_CONSTASCII_USTRINGPARAM( "language" ) );
-                const ::rtl::OUString sLanguage = xScriptUri->getParameter( sLangParamName );
-
-                if ( sLocation.getLength() || sLanguage.getLength() )
-                {
-                    aComposeBuffer.appendAscii( " (" );
-
-                    // location
-                    OSL_ENSURE( sLocation.getLength(), "EventHandler::convertToControlValue: unexpected: no location!" );
-                    if ( sLocation.getLength() )
-                    {
-                        aComposeBuffer.append( sLocation );
-                        aComposeBuffer.appendAscii( ", " );
-                    }
-
-                    // language
-                    if ( sLanguage.getLength() )
-                    {
-                        aComposeBuffer.append( sLanguage );
-                    }
-
-                    aComposeBuffer.append( sal_Unicode( ')' ) );
-                }
-
-                sScript = aComposeBuffer.makeStringAndClear();
-            }
-            catch( const Exception& )
-            {
-                DBG_UNHANDLED_EXCEPTION();
-            }
-        }
-
-        return makeAny( sScript );
-    }
-    
-    //--------------------------------------------------------------------
-    PropertyState SAL_CALL EventHandler::getPropertyState( const ::rtl::OUString& /*_rPropertyName*/ ) throw (UnknownPropertyException, RuntimeException)
-    {
-        return PropertyState_DIRECT_VALUE;
-    }
-    
-    //--------------------------------------------------------------------
-    void SAL_CALL EventHandler::addPropertyChangeListener( const Reference< XPropertyChangeListener >& _rxListener ) throw (RuntimeException)
-    {
-        ::osl::MutexGuard aGuard( m_aMutex );
-        if ( !_rxListener.is() )
-            throw NullPointerException();
-        m_aPropertyListeners.addListener( _rxListener );
-    }
-    
-    //--------------------------------------------------------------------
-    void SAL_CALL EventHandler::removePropertyChangeListener( const Reference< XPropertyChangeListener >& _rxListener ) throw (RuntimeException)
-    {
-        ::osl::MutexGuard aGuard( m_aMutex );
-        m_aPropertyListeners.removeListener( _rxListener );
-    }
-    
-    //--------------------------------------------------------------------
-    Sequence< Property > SAL_CALL EventHandler::getSupportedProperties() throw (RuntimeException)
-    {
-        ::osl::MutexGuard aGuard( m_aMutex );
-        if ( !m_bEventsMapInitialized )
-        {
-            const_cast< EventHandler* >( this )->m_bEventsMapInitialized = true;
-            try
-            {
-                Sequence< Type > aListeners;
-                impl_getCopmonentListenerTypes_nothrow( aListeners );
-                sal_Int32 listenerCount = aListeners.getLength();
-
-                Property aCurrentProperty;
-                ::rtl::OUString sListenerClassName;
-
-                // loop through all listeners and all methods, and see which we can present at the UI
-                const Type* pListeners = aListeners.getConstArray();
-                for ( sal_Int32 listener = 0; listener < listenerCount; ++listener, ++pListeners )
-                {
-                    aCurrentProperty = Property();
-
-                    // the programmatic name of the listener, to be used as "property" name
-                    sListenerClassName = pListeners->getTypeName();
-                    OSL_ENSURE( sListenerClassName.getLength(), "EventHandler::getSupportedProperties: strange - no listener name ..." );
-                    if ( !sListenerClassName.getLength() )
-                        continue;
-
-                    // loop through all methods
-                    Sequence< ::rtl::OUString > aMethods( comphelper::getEventMethodsForType( *pListeners ) );
-
-                    const ::rtl::OUString* pMethods = aMethods.getConstArray();
-                    sal_uInt32 methodCount = aMethods.getLength();
-
-                    for (sal_uInt32 method = 0 ; method < methodCount ; ++method, ++pMethods )
-                    {
-                        EventDescription aEvent;
-                        if ( !lcl_getEventDescriptionForMethod( *pMethods, aEvent ) )
-                            continue;
-
-                        if ( !impl_filterMethod_nothrow( aEvent ) )
-                            continue;
-
-                        const_cast< EventHandler* >( this )->m_aEvents.insert( EventMap::value_type(
-                            lcl_getEventPropertyName( sListenerClassName, *pMethods ), aEvent ) );
-                    }
-                }
-
-            }
-            catch( const Exception& )
-            {
-                DBG_UNHANDLED_EXCEPTION();
-            }
-        }
-
-        // sort them by ID - this is the relative ordering in the UI
-        ::std::map< EventId, Property > aOrderedProperties;
-        for (   EventMap::const_iterator loop = m_aEvents.begin();
-                loop != m_aEvents.end();
-                ++loop
-            )
-        {
-            aOrderedProperties[ loop->second.nId ] = Property(
-                loop->first, loop->second.nId,
-                ::getCppuType( static_cast< const ::rtl::OUString* >( NULL ) ),
-                PropertyAttribute::BOUND );
-        }
-
-        StlSyntaxSequence< Property > aReturn( aOrderedProperties.size() );
-        ::std::transform( aOrderedProperties.begin(), aOrderedProperties.end(), aReturn.begin(),
-            ::o3tl::select2nd< ::std::map< EventId, Property >::value_type >() );
-        return aReturn;
-    }
-    
-    //--------------------------------------------------------------------
-    Sequence< ::rtl::OUString > SAL_CALL EventHandler::getSupersededProperties( ) throw (RuntimeException)
-    {
-        // none
-        return Sequence< ::rtl::OUString >( );
-    }
-    
-    //--------------------------------------------------------------------
-    Sequence< ::rtl::OUString > SAL_CALL EventHandler::getActuatingProperties( ) throw (RuntimeException)
-    {
-        // none
-        return Sequence< ::rtl::OUString >( );
-    }
-    
-    //--------------------------------------------------------------------
-    LineDescriptor SAL_CALL EventHandler::describePropertyLine( const ::rtl::OUString& _rPropertyName,
-        const Reference< XPropertyControlFactory >& _rxControlFactory )
-        throw (UnknownPropertyException, NullPointerException, RuntimeException)
-    {
-        if ( !_rxControlFactory.is() )
-            throw NullPointerException();
-
-        ::osl::MutexGuard aGuard( m_aMutex );
-
-        LineDescriptor aDescriptor;
-
-        aDescriptor.Control = _rxControlFactory->createPropertyControl( PropertyControlType::TextField, sal_True );
-        Reference< XEventListener > xControlExtender = new PropertyControlExtender( aDescriptor.Control );
-
-        const EventDescription& rEvent = impl_getEventForName_throw( _rPropertyName );
-        aDescriptor.DisplayName = rEvent.sDisplayName;
-        aDescriptor.HelpURL = HelpIdUrl::getHelpURL( rEvent.sHelpId );
-        aDescriptor.PrimaryButtonId = rtl::OStringToOUString(rEvent.sUniqueBrowseId, RTL_TEXTENCODING_UTF8);
-        aDescriptor.HasPrimaryButton = sal_True;
-        aDescriptor.Category = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "Events" ) );
-        return aDescriptor;
-    }
-    
-    //--------------------------------------------------------------------
-    ::sal_Bool SAL_CALL EventHandler::isComposable( const ::rtl::OUString& /*_rPropertyName*/ ) throw (UnknownPropertyException, RuntimeException)
-    {
-        return sal_False;
-    }
-    
-    //--------------------------------------------------------------------
-    InteractiveSelectionResult SAL_CALL EventHandler::onInteractivePropertySelection( const ::rtl::OUString& _rPropertyName, sal_Bool /*_bPrimary*/, Any& /*_rData*/, const Reference< XObjectInspectorUI >& _rxInspectorUI ) throw (UnknownPropertyException, NullPointerException, RuntimeException)
-    {
-        if ( !_rxInspectorUI.is() )
-            throw NullPointerException();
-
-        ::osl::MutexGuard aGuard( m_aMutex );
-        const EventDescription& rForEvent = impl_getEventForName_throw( _rPropertyName );
-
-        Sequence< ScriptEventDescriptor > aAllAssignedEvents;
-        impl_getComponentScriptEvents_nothrow( aAllAssignedEvents );
-
-        // SvxMacroAssignDlg-compatible structure holding all event/assignments
-        ::rtl::Reference< EventHolder >  pEventHolder( new EventHolder );
-
-        for (   EventMap::const_iterator event = m_aEvents.begin();
-                event != m_aEvents.end();
-                ++event
-            )
-        {
-            // the script which is assigned to the current event (if any)
-            ScriptEventDescriptor aAssignedScript = lcl_getAssignedScriptEvent( event->second, aAllAssignedEvents );
-            pEventHolder->addEvent( event->second.nId, event->second.sListenerMethodName, aAssignedScript );
-        }
-
-        // the inital selection in the dialog
-        Sequence< ::rtl::OUString > aNames( pEventHolder->getElementNames() );
-        const ::rtl::OUString* pChosenEvent = ::std::find( aNames.getConstArray(), aNames.getConstArray() + aNames.getLength(), rForEvent.sListenerMethodName );
-        sal_uInt16 nInitialSelection = (sal_uInt16)( pChosenEvent - aNames.getConstArray() );
-
-        // the dialog
-        SvxAbstractDialogFactory* pFactory = SvxAbstractDialogFactory::Create();
-        if ( !pFactory )
-            return InteractiveSelectionResult_Cancelled;
-
-        ::std::auto_ptr< VclAbstractDialog > pDialog( pFactory->CreateSvxMacroAssignDlg(
-            PropertyHandlerHelper::getDialogParentWindow( m_aContext ),
-            impl_getContextFrame_nothrow(),
-            m_bIsDialogElement,
-            pEventHolder.get(),
-            nInitialSelection
-        ) );
-
-        if ( !pDialog.get() )
-            return InteractiveSelectionResult_Cancelled;
-
-        // DF definite problem here
-        // OK & Cancel seem to be both returning 0
-        if ( pDialog->Execute() == RET_CANCEL )
-            return InteractiveSelectionResult_Cancelled;
-
-        try
-        {
-            for (   EventMap::const_iterator event = m_aEvents.begin();
-                    event != m_aEvents.end();
-                    ++event
-                )
-            {
-                ScriptEventDescriptor aScriptDescriptor( pEventHolder->getNormalizedDescriptorByName( event->second.sListenerMethodName ) );
-
-                // set the new "property value"
-                setPropertyValue(
-                    lcl_getEventPropertyName( event->second.sListenerClassName, event->second.sListenerMethodName ),
-                    makeAny( aScriptDescriptor )
-                );
-            }
-        }
-        catch( const Exception& )
-        {
-            DBG_UNHANDLED_EXCEPTION();
-        }
-
-        return InteractiveSelectionResult_Success;
-    }
-    
-    //--------------------------------------------------------------------
-    void SAL_CALL EventHandler::actuatingPropertyChanged( const ::rtl::OUString& /*_rActuatingPropertyName*/, const Any& /*_rNewValue*/, const Any& /*_rOldValue*/, const Reference< XObjectInspectorUI >& /*_rxInspectorUI*/, sal_Bool /*_bFirstTimeInit*/ ) throw (NullPointerException, RuntimeException)
-    {
-        OSL_FAIL( "EventHandler::actuatingPropertyChanged: no actuating properties -> no callback (well, this is how it *should* be!)" );
-    }
-    
-    //--------------------------------------------------------------------
-    IMPLEMENT_FORWARD_XCOMPONENT( EventHandler, EventHandler_Base )
-
-    //--------------------------------------------------------------------
-    void SAL_CALL EventHandler::disposing()
-    {
-        EventMap aEmpty;
-        m_aEvents.swap( aEmpty );
-        m_xComponent.clear();
-    }
-
-    //--------------------------------------------------------------------
-    sal_Bool SAL_CALL EventHandler::suspend( sal_Bool /*_bSuspend*/ ) throw (RuntimeException)
-    {
-        return sal_True;
-    }
-
-    //------------------------------------------------------------------------
-    Reference< XFrame > EventHandler::impl_getContextFrame_nothrow() const
-    {
-        Reference< XFrame > xContextFrame;
-
-        try
-        {
-            Reference< XModel > xContextDocument( m_aContext.getContextValueByAsciiName( "ContextDocument" ), UNO_QUERY_THROW );
-            Reference< XController > xController( xContextDocument->getCurrentController(), UNO_SET_THROW );
-            xContextFrame.set( xController->getFrame(), UNO_SET_THROW );
-        }
-        catch( const Exception& )
-        {
-            DBG_UNHANDLED_EXCEPTION();
-        }
-
-        return xContextFrame;
-    }
-
-    //--------------------------------------------------------------------
-    sal_Int32 EventHandler::impl_getComponentIndexInParent_throw() const
-    {
-        Reference< XChild > xChild( m_xComponent, UNO_QUERY_THROW );
-        Reference< XIndexAccess > xParentAsIndexAccess( xChild->getParent(), UNO_QUERY_THROW );
-
-        // get the index of the inspected object within it's parent container
-        sal_Int32 nElements = xParentAsIndexAccess->getCount();
-        for ( sal_Int32 i=0; i<nElements; ++i )
-        {
-            Reference< XInterface > xElement( xParentAsIndexAccess->getByIndex( i ), UNO_QUERY_THROW );
-            if ( xElement == m_xComponent )
-                return i;
-        }
-        throw NoSuchElementException();
-    }
-
-    //--------------------------------------------------------------------
-    void EventHandler::impl_getFormComponentScriptEvents_nothrow( Sequence < ScriptEventDescriptor >& _out_rEvents ) const
-    {
-        _out_rEvents = Sequence < ScriptEventDescriptor >();
-        try
-        {
-            Reference< XChild > xChild( m_xComponent, UNO_QUERY_THROW );
-            Reference< XEventAttacherManager > xEventManager( xChild->getParent(), UNO_QUERY_THROW );
-            _out_rEvents = xEventManager->getScriptEvents( impl_getComponentIndexInParent_throw() );
-
-            // the form component script API has unqualified listener names, but for normalization
-            // purpose, we want fully qualified ones
-            ScriptEventDescriptor* pEvents = _out_rEvents.getArray();
-            ScriptEventDescriptor* pEventsEnd = _out_rEvents.getArray() + _out_rEvents.getLength();
-            while ( pEvents != pEventsEnd )
-            {
-                pEvents->ListenerType = lcl_getQualifiedKnownListenerName( *pEvents );
-                ++pEvents;
-            }
-        }
-        catch( const Exception& )
-        {
-            DBG_UNHANDLED_EXCEPTION();
-        }
-    }
-
-    //--------------------------------------------------------------------
-    void EventHandler::impl_getCopmonentListenerTypes_nothrow( Sequence< Type >& _out_rTypes ) const
-    {
-        _out_rTypes.realloc( 0 );
-        try
-        {
-            // we use a set to avoid duplicates
-            TypeBag aListeners;
-
-            Reference< XIntrospection > xIntrospection( m_aContext.createComponent( "com.sun.star.beans.Introspection" ), UNO_QUERY_THROW );
-
-            // --- model listeners
-            lcl_addListenerTypesFor_throw(
-                m_xComponent, xIntrospection, aListeners );
-
-            // --- "secondary component" (usually: "control" listeners)
-            {
-                Reference< XInterface > xSecondaryComponent( impl_getSecondaryComponentForEventInspection_throw() );
-                lcl_addListenerTypesFor_throw( xSecondaryComponent, xIntrospection, aListeners );
-                ::comphelper::disposeComponent( xSecondaryComponent );
-            }
-
-            // now that they're disambiguated, copy these types into our member
-            _out_rTypes.realloc( aListeners.size() );
-            ::std::copy( aListeners.begin(), aListeners.end(), _out_rTypes.getArray() );
-        }
-        catch( const Exception& )
-        {
-            DBG_UNHANDLED_EXCEPTION();
-        }
-    }
-
-    //--------------------------------------------------------------------
-    void EventHandler::impl_getDialogElementScriptEvents_nothrow( Sequence < ScriptEventDescriptor >& _out_rEvents ) const
-    {
-        _out_rEvents = Sequence < ScriptEventDescriptor >();
-        try
-        {
-            Reference< XScriptEventsSupplier > xEventsSupplier( m_xComponent, UNO_QUERY_THROW );
-            Reference< XNameContainer > xEvents( xEventsSupplier->getEvents(), UNO_QUERY_THROW );
-            Sequence< ::rtl::OUString > aEventNames( xEvents->getElementNames() );
-
-            sal_Int32 nEventCount = aEventNames.getLength();
-            _out_rEvents.realloc( nEventCount );
-
-            const ::rtl::OUString* pNames = aEventNames.getConstArray();
-            ScriptEventDescriptor* pDescs = _out_rEvents.getArray();
-
-            for( sal_Int32 i = 0 ; i < nEventCount ; ++i, ++pNames, ++pDescs )
-                OSL_VERIFY( xEvents->getByName( *pNames ) >>= *pDescs );
-        }
-        catch( const Exception& )
-        {
-            DBG_UNHANDLED_EXCEPTION();
-        }
-    }
-
-    //--------------------------------------------------------------------
-    Reference< XInterface > EventHandler::impl_getSecondaryComponentForEventInspection_throw( ) const
-    {
-        Reference< XInterface > xReturn;
-
-        // if it's a form, create a form controller for the additional events
-        Reference< XForm > xComponentAsForm( m_xComponent, UNO_QUERY );
-        if ( xComponentAsForm.is() )
-        {
-            Reference< XTabControllerModel > xComponentAsTCModel( m_xComponent, UNO_QUERY_THROW );
-            Reference< XFormController > xController(
-                m_aContext.createComponent( "com.sun.star.form.runtime.FormController" ), UNO_QUERY_THROW );
-            xController->setModel( xComponentAsTCModel );
-
-            xReturn = xController;
-        }
-        else
-        {
-            ::rtl::OUString sControlService;
-            OSL_VERIFY( m_xComponent->getPropertyValue( PROPERTY_DEFAULTCONTROL ) >>= sControlService );
-
-            xReturn = m_aContext.createComponent( sControlService );
-        }
-        return xReturn;
-    }
-
-    //--------------------------------------------------------------------
-    const EventDescription& EventHandler::impl_getEventForName_throw( const ::rtl::OUString& _rPropertyName ) const
-    {
-        EventMap::const_iterator pos = m_aEvents.find( _rPropertyName );
-        if ( pos == m_aEvents.end() )
-            throw UnknownPropertyException();
-        return pos->second;
-    }
-
-    //--------------------------------------------------------------------
-    namespace
-    {
-        static bool lcl_endsWith( const ::rtl::OUString& _rText, const ::rtl::OUString& _rCheck )
-        {
-            sal_Int32 nTextLen = _rText.getLength();
-            sal_Int32 nCheckLen = _rCheck.getLength();
-            if ( nCheckLen > nTextLen )
-                return false;
-
-            return _rText.indexOf( _rCheck ) == ( nTextLen - nCheckLen );
-        }
-    }
-    //--------------------------------------------------------------------
-    void EventHandler::impl_setFormComponentScriptEvent_nothrow( const ScriptEventDescriptor& _rScriptEvent )
-    {
-        try
-        {
-            ::rtl::OUString sScriptCode( _rScriptEvent.ScriptCode );
-            ::rtl::OUString sScriptType( _rScriptEvent.ScriptType );
-            bool bResetScript = ( sScriptCode.getLength() == 0 );
-
-            sal_Int32 nObjectIndex = impl_getComponentIndexInParent_throw();
-            Reference< XChild > xChild( m_xComponent, UNO_QUERY_THROW );
-            Reference< XEventAttacherManager > xEventManager( xChild->getParent(), UNO_QUERY_THROW );
-            Sequence< ScriptEventDescriptor > aEvents( xEventManager->getScriptEvents( nObjectIndex ) );
-
-            // is there already a registered script for this event?
-            ScriptEventDescriptor* pEvent = aEvents.getArray();
-            sal_Int32 eventCount = aEvents.getLength(), event = 0;
-            for ( event = 0; event < eventCount; ++event, ++pEvent )
-            {
-                if  (   ( pEvent->EventMethod == _rScriptEvent.EventMethod )
-                    &&  ( lcl_endsWith( _rScriptEvent.ListenerType, pEvent->ListenerType ) )
-                          // (strange enough, the events we get from getScriptEvents are not fully qualified)
-                    )
-                {
-                    // yes
-                    if ( !bResetScript )
-                    {
-                        // set to something non-empty -> overwrite
-                        pEvent->ScriptCode = sScriptCode;
-                        pEvent->ScriptType = sScriptType;
-                    }
-                    else
-                    {
-                        // set to empty -> remove from sequence
-                        ::std::copy( pEvent + 1, aEvents.getArray() + eventCount, pEvent );
-                        aEvents.realloc( eventCount - 1 );
-                        --eventCount;
-                    }
-                    break;
-                }
-            }
-            if ( ( event >= eventCount ) && !bResetScript )
-            {
-                // no, did not find it -> append
-                aEvents.realloc( eventCount + 1 );
-                aEvents[ eventCount ] = _rScriptEvent;
-            }
-
-            xEventManager->revokeScriptEvents( nObjectIndex );
-            xEventManager->registerScriptEvents( nObjectIndex, aEvents );
-
-            PropertyHandlerHelper::setContextDocumentModified( m_aContext );
-        }
-        catch( const Exception& )
-        {
-            DBG_UNHANDLED_EXCEPTION();
-        }
-    }
-
-    //--------------------------------------------------------------------
-    void EventHandler::impl_setDialogElementScriptEvent_nothrow( const ScriptEventDescriptor& _rScriptEvent )
-    {
-        try
-        {
-            ::rtl::OUString sScriptCode( _rScriptEvent.ScriptCode );
-            bool bResetScript = ( sScriptCode.getLength() == 0 );
-
-            Reference< XScriptEventsSupplier > xEventsSupplier( m_xComponent, UNO_QUERY_THROW );
-            Reference< XNameContainer > xEvents( xEventsSupplier->getEvents(), UNO_QUERY_THROW );
-
-            ::rtl::OUStringBuffer aCompleteName;
-            aCompleteName.append( _rScriptEvent.ListenerType );
-            aCompleteName.appendAscii( "::" );
-            aCompleteName.append( _rScriptEvent.EventMethod );
-            ::rtl::OUString sCompleteName( aCompleteName.makeStringAndClear() );
-
-            bool bExists = xEvents->hasByName( sCompleteName );
-
-            if ( bResetScript )
-            {
-                if ( bExists )
-                    xEvents->removeByName( sCompleteName );
-            }
-            else
-            {
-                Any aNewValue; aNewValue <<= _rScriptEvent;
-
-                if ( bExists )
-                    xEvents->replaceByName( sCompleteName, aNewValue );
-                else
-                    xEvents->insertByName( sCompleteName, aNewValue );
-            }
-        }
-        catch( const Exception& )
-        {
-            DBG_UNHANDLED_EXCEPTION();
-        }
-    }
-
-    //--------------------------------------------------------------------
-    bool EventHandler::impl_filterMethod_nothrow( const EventDescription& _rEvent ) const
-    {
-        // some (control-triggered) events do not make sense for certain grid control columns. However,
-        // our mechnism to retrieve control-triggered events does not know about this, so we do some
-        // late filtering here.
-        switch ( m_nGridColumnType )
-        {
-        case FormComponentType::COMBOBOX:
-            if ( UID_BRWEVT_ACTIONPERFORMED == _rEvent.sUniqueBrowseId )
-                return false;
-            break;
-        case FormComponentType::LISTBOX:
-            if  (   ( UID_BRWEVT_CHANGED == _rEvent.sUniqueBrowseId )
-                ||  ( UID_BRWEVT_ACTIONPERFORMED == _rEvent.sUniqueBrowseId )
-                )
-                return false;
-            break;
-        }
-
-        return true;
-    }
-
-//........................................................................
-} // namespace pcr
-//........................................................................
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */