diff options
Diffstat (limited to 'include/vbahelper/vbaapplicationbase.hxx')
-rw-r--r-- | include/vbahelper/vbaapplicationbase.hxx | 86 |
1 files changed, 86 insertions, 0 deletions
diff --git a/include/vbahelper/vbaapplicationbase.hxx b/include/vbahelper/vbaapplicationbase.hxx new file mode 100644 index 000000000..24bac8204 --- /dev/null +++ b/include/vbahelper/vbaapplicationbase.hxx @@ -0,0 +1,86 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ +#ifndef INCLUDED_VBAHELPER_VBAAPPLICATIONBASE_HXX +#define INCLUDED_VBAHELPER_VBAAPPLICATIONBASE_HXX + +#include <exception> +#include <memory> + +#include <com/sun/star/uno/Any.hxx> +#include <com/sun/star/uno/Reference.hxx> +#include <com/sun/star/uno/RuntimeException.hpp> +#include <com/sun/star/uno/Sequence.hxx> +#include <ooo/vba/XApplicationBase.hpp> +#include <rtl/ustring.hxx> +#include <sal/types.h> +#include <vbahelper/vbadllapi.h> +#include <vbahelper/vbahelper.hxx> +#include <vbahelper/vbahelperinterface.hxx> + +namespace com::sun::star { + namespace frame { class XModel; } + namespace uno { class XComponentContext; } +} + +typedef InheritedHelperInterfaceWeakImpl< ov::XApplicationBase > ApplicationBase_BASE; + +struct VbaApplicationBase_Impl; + +class VBAHELPER_DLLPUBLIC VbaApplicationBase : public ApplicationBase_BASE +{ + std::unique_ptr<VbaApplicationBase_Impl> m_pImpl; + +protected: + VbaApplicationBase( const css::uno::Reference< css::uno::XComponentContext >& xContext ); + virtual ~VbaApplicationBase() override; + + /// @throws css::uno::RuntimeException + virtual css::uno::Reference< css::frame::XModel > getCurrentDocument() = 0; +public: + // XHelperInterface ( parent is itself ) + virtual css::uno::Reference< ov::XHelperInterface > SAL_CALL getParent( ) override { return this; } + + virtual sal_Bool SAL_CALL getScreenUpdating() override; + virtual void SAL_CALL setScreenUpdating(sal_Bool bUpdate) override; + virtual sal_Bool SAL_CALL getDisplayStatusBar() override; + virtual void SAL_CALL setDisplayStatusBar(sal_Bool bDisplayStatusBar) override; + virtual sal_Bool SAL_CALL getInteractive() override; + virtual void SAL_CALL setInteractive( sal_Bool bInteractive ) override; + virtual sal_Bool SAL_CALL getVisible() override; + virtual void SAL_CALL setVisible( sal_Bool bVisible ) override; + virtual OUString SAL_CALL getCaption() override; + virtual void SAL_CALL setCaption( const OUString& sCaption ) override; + virtual void SAL_CALL OnKey( const OUString& Key, const css::uno::Any& Procedure ) override; + virtual css::uno::Any SAL_CALL CommandBars( const css::uno::Any& aIndex ) override; + virtual OUString SAL_CALL getVersion() override; + virtual css::uno::Any SAL_CALL getVBE() override; + + virtual css::uno::Any SAL_CALL Run( const OUString& MacroName, const css::uno::Any& varg1, const css::uno::Any& varg2, const css::uno::Any& varg3, const css::uno::Any& varg4, const css::uno::Any& varg5, const css::uno::Any& varg6, const css::uno::Any& varg7, const css::uno::Any& varg8, const css::uno::Any& varg9, const css::uno::Any& varg10, const css::uno::Any& varg11, const css::uno::Any& varg12, const css::uno::Any& varg13, const css::uno::Any& varg14, const css::uno::Any& varg15, const css::uno::Any& varg16, const css::uno::Any& varg17, const css::uno::Any& varg18, const css::uno::Any& varg19, const css::uno::Any& varg20, const css::uno::Any& varg21, const css::uno::Any& varg22, const css::uno::Any& varg23, const css::uno::Any& varg24, const css::uno::Any& varg25, const css::uno::Any& varg26, const css::uno::Any& varg27, const css::uno::Any& varg28, const css::uno::Any& varg29, const css::uno::Any& varg30 ) override; + virtual void SAL_CALL OnTime( const css::uno::Any& aEarliestTime, const OUString& aFunction, const css::uno::Any& aLatestTime, const css::uno::Any& aSchedule ) override; + virtual float SAL_CALL CentimetersToPoints( float Centimeters ) override; + virtual void SAL_CALL Undo() override; + virtual void SAL_CALL Quit() override; + + // XHelperInterface + virtual OUString getServiceImplName() override; + virtual css::uno::Sequence<OUString> getServiceNames() override; +}; +#endif + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ |