sw/source/ui/vba/vbadocumentproperties.hxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19 #ifndef INCLUDED_SW_SOURCE_UI_VBA_VBADOCUMENTPROPERTIES_HXX
  20 #define INCLUDED_SW_SOURCE_UI_VBA_VBADOCUMENTPROPERTIES_HXX
  21
  22 #include <ooo/vba/XDocumentProperties.hpp>
  23 #include <com/sun/star/frame/XModel.hpp>
  24 #include <vbahelper/vbacollectionimpl.hxx>
  25 #include <rtl/ref.hxx>
  26
  27 class SwXTextDocument;
  28
  29 typedef CollTestImplHelper< ov::XDocumentProperties > SwVbaDocumentproperties_BASE;
  30
  31 class SwVbaBuiltinDocumentProperties : public SwVbaDocumentproperties_BASE
  32 {
  33 public:
  34     SwVbaBuiltinDocumentProperties( const css::uno::Reference< ov::XHelperInterface >& xParent, const css::uno::Reference< css::uno::XComponentContext > & xContext, const rtl::Reference< SwXTextDocument >& xDocument );
  35
  36     // XDocumentProperties
  37     virtual css::uno::Reference< ::ooo::vba::XDocumentProperty > SAL_CALL Add( const OUString& Name, sal_Bool LinkToContent, ::sal_Int8 Type, const css::uno::Any& Value, const css::uno::Any& LinkSource ) override;
  38     // XEnumerationAccess
  39     virtual css::uno::Type SAL_CALL getElementType() override;
  40     virtual css::uno::Reference< css::container::XEnumeration > SAL_CALL createEnumeration() override;
  41     // ScVbaCollectionBaseImpl
  42     virtual css::uno::Any createCollectionObject( const css::uno::Any& aSource ) override;
  43
  44     // XHelperInterface
  45     virtual OUString getServiceImplName() override;
  46     virtual css::uno::Sequence<OUString> getServiceNames() override;
  47 };
  48
  49 class SwVbaCustomDocumentProperties : public SwVbaBuiltinDocumentProperties
  50 {
  51 public:
  52     SwVbaCustomDocumentProperties( const css::uno::Reference< ov::XHelperInterface >& xParent, const css::uno::Reference< css::uno::XComponentContext > & xContext, const rtl::Reference< SwXTextDocument >& xDocument );
  53 // XDocumentProperties
  54     virtual css::uno::Reference< ::ooo::vba::XDocumentProperty > SAL_CALL Add( const OUString& Name, sal_Bool LinkToContent, ::sal_Int8 Type, const css::uno::Any& Value, const css::uno::Any& LinkSource ) override;
  55     // XHelperInterface
  56     virtual OUString getServiceImplName() override;
  57 };
  58
  59 #endif /* SW_VBA_DOCUMENTPROPERTY_HXX */
  60
  61 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */