mir/libreoffice
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

targetted VBA re-work.

Browse Source
This commit is contained in:
Noel Power
2012-09-11 08:48:02 +01:00
committed by Michael Meeks
parent c414499bbd
commit 4597483e00
100 changed files with 515 additions and 4052 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
forms/source/misc/InterfaceContainer.cxx
View File

@@ -158,16 +158,9 @@ void OInterfaceContainer::impl_addVbEvents_nolck_nothrow( const sal_Int32 i_nIn
xProps->getPropertyValue( rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("DefaultControl") ) ) >>= sServiceName;
Reference< ooo::vba::XVBAToOOEventDescGen > xDescSupplier( m_xServiceFactory->createInstance( rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("ooo.vba.VBAToOOEventDesc") ) ), UNO_QUERY_THROW );
Reference< XInterface > xInterface = m_xServiceFactory->createInstance( sServiceName );
Sequence< ScriptEventDescriptor > vbaEvents = xDescSupplier->getEventDescriptions( xInterface, sCodeName );
Sequence< ScriptEventDescriptor > vbaEvents = xDescSupplier->getEventDescriptions( m_xServiceFactory->createInstance( sServiceName ), sCodeName );
// register the vba script events
m_xEventAttacher->registerScriptEvents( i_nIndex, vbaEvents );
Reference< XComponent > xComponent( xInterface, UNO_QUERY );
if ( xComponent.is() )
{
xComponent->dispose();
}
}
while ( false );
}