23 #include <com/sun/star/script/ModuleType.hpp>
24 #include <com/sun/star/script/vba/VBAEventId.hpp>
28 using namespace ::com::sun::star::script::vba::VBAEventId;
33 using namespace ::com::sun::star::script::ModuleType;
47 const EventHandlerInfo& rInfo,
const uno::Sequence< uno::Any >& )
49 switch( rInfo.mnEventId )
52 rEventQueue.emplace_back(AUTO_NEW );
55 rEventQueue.emplace_back(AUTO_OPEN );
58 rEventQueue.emplace_back(AUTO_CLOSE );
65 const uno::Sequence< uno::Any >& )
68 return uno::Sequence< uno::Any >();
72 const EventHandlerInfo& ,
bool )
78 const uno::Sequence< uno::Any >& )
const
81 return "ThisDocument";
87 return "SwVbaEventsHelper";
95 return {
"com.sun.star.document.vba.VBATextEventProcessor" };
99 extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface*
101 css::uno::XComponentContext* context, css::uno::Sequence<css::uno::Any>
const& args)
virtual ~SwVbaEventsHelper() override
virtual sal_Bool SAL_CALL supportsService(const OUString &ServiceName) override
virtual OUString SAL_CALL getImplementationName() override
virtual void implPostProcessEvent(EventQueue &rEventQueue, const EventHandlerInfo &rInfo, bool bCancel) override
bool CPPUHELPER_DLLPUBLIC supportsService(css::lang::XServiceInfo *implementation, rtl::OUString const &name)
virtual css::uno::Sequence< css::uno::Any > implBuildArgumentList(const EventHandlerInfo &rInfo, const css::uno::Sequence< css::uno::Any > &rArgs) override
SAL_DLLPUBLIC_EXPORT css::uno::XInterface * Writer_SwVbaEventsHelper_get_implementation(css::uno::XComponentContext *context, css::uno::Sequence< css::uno::Any > const &args)
SwVbaEventsHelper(const css::uno::Sequence< css::uno::Any > &rArgs, const css::uno::Reference< css::uno::XComponentContext > &rxContext)
virtual OUString implGetDocumentModuleName(const EventHandlerInfo &rInfo, const css::uno::Sequence< css::uno::Any > &rArgs) const override
void registerEventHandler(sal_Int32 nEventId, sal_Int32 nModuleType, const char *pcMacroName, sal_Int32 nCancelIndex=-1, const css::uno::Any &rUserData=css::uno::Any())
::std::deque< EventQueueEntry > EventQueue
virtual bool implPrepareEvent(EventQueue &rEventQueue, const EventHandlerInfo &rInfo, const css::uno::Sequence< css::uno::Any > &rArgs) override
virtual css::uno::Sequence< OUString > SAL_CALL getSupportedServiceNames() override