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

initial commit for vba blob ( not including container_control stuff )

Browse Source
This commit is contained in:
Noel Power
2010-10-06 10:16:13 +01:00
parent eedd208284
commit e31e563d72
31 changed files with 395 additions and 139 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -154,9 +154,16 @@ void OInterfaceContainer::impl_addVbEvents_nolck_nothrow( const sal_Int32 i_nIn
xProps->getPropertyValue( rtl::OUString::createFromAscii("DefaultControl" ) ) >>= sServiceName;
Reference< ooo::vba::XVBAToOOEventDescGen > xDescSupplier( m_xServiceFactory->createInstance( rtl::OUString::createFromAscii( "ooo.vba.VBAToOOEventDesc" ) ), UNO_QUERY_THROW );
Sequence< ScriptEventDescriptor > vbaEvents = xDescSupplier->getEventDescriptions( m_xServiceFactory->createInstance( sServiceName ), sCodeName );
Reference< XInterface > xInterface = m_xServiceFactory->createInstance( sServiceName );
Sequence< ScriptEventDescriptor > vbaEvents = xDescSupplier->getEventDescriptions( xInterface, 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 );
}