LibreOffice Module sw (master) 1
vbalistlevels.cxx
Go to the documentation of this file.
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#include "vbalistlevels.hxx"
20#include "vbalistlevel.hxx"
21#include <ooo/vba/word/WdListGalleryType.hpp>
22#include <utility>
23
24using namespace ::ooo::vba;
25using namespace ::com::sun::star;
26
27namespace {
28
29class ListLevelsEnumWrapper : public EnumerationHelper_BASE
30{
31 SwVbaListLevels* m_pListLevels;
32 sal_Int32 m_nIndex;
33public:
34 explicit ListLevelsEnumWrapper( SwVbaListLevels* pLevels ) : m_pListLevels( pLevels ), m_nIndex( 1 ) {}
35 virtual sal_Bool SAL_CALL hasMoreElements( ) override
36 {
37 return ( m_nIndex <= m_pListLevels->getCount() );
38 }
39
40 virtual uno::Any SAL_CALL nextElement( ) override
41 {
42 if ( m_nIndex <= m_pListLevels->getCount() )
43 return m_pListLevels->Item( uno::Any( m_nIndex++ ), uno::Any() );
44 throw container::NoSuchElementException();
45 }
46};
47
48}
49
50SwVbaListLevels::SwVbaListLevels( const uno::Reference< XHelperInterface >& xParent, const uno::Reference< uno::XComponentContext > & xContext, SwVbaListHelperRef pHelper ) : SwVbaListLevels_BASE( xParent, xContext, uno::Reference< container::XIndexAccess >() ), m_pListHelper(std::move( pHelper ))
51{
52}
53
54::sal_Int32 SAL_CALL SwVbaListLevels::getCount()
55{
56 sal_Int32 nGalleryType = m_pListHelper->getGalleryType();
57 if( nGalleryType == word::WdListGalleryType::wdBulletGallery
58 || nGalleryType == word::WdListGalleryType::wdNumberGallery )
59 return 1;
60 else if( nGalleryType == word::WdListGalleryType::wdOutlineNumberGallery )
61 return 9;
62 return 0;
63}
64
65uno::Any SAL_CALL SwVbaListLevels::Item( const uno::Any& Index1, const uno::Any& /*not processed in this base class*/ )
66{
67 sal_Int32 nIndex = 0;
68 if( !( Index1 >>= nIndex ) )
69 throw uno::RuntimeException();
70 if( nIndex <=0 || nIndex > getCount() )
71 throw uno::RuntimeException("Index out of bounds" );
72
73 return uno::Any( uno::Reference< word::XListLevel >( new SwVbaListLevel( this, mxContext, m_pListHelper, nIndex - 1 ) ) );
74}
75
76// XEnumerationAccess
79{
81}
82
83uno::Reference< container::XEnumeration >
85{
86 return new ListLevelsEnumWrapper( this );
87}
88
90SwVbaListLevels::createCollectionObject( const css::uno::Any& aSource )
91{
92 return aSource;
93}
94
95OUString
97{
98 return "SwVbaListLevels";
99}
100
101css::uno::Sequence<OUString>
103{
104 static uno::Sequence< OUString > const sNames
105 {
106 "ooo.vba.word.ListLevels"
107 };
108 return sNames;
109}
110
111/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
css::uno::Reference< css::uno::XComponentContext > mxContext
virtual css::uno::Any SAL_CALL Item(const css::uno::Any &Index1, const css::uno::Any &) override
virtual ::sal_Int32 SAL_CALL getCount() override
SwVbaListHelperRef m_pListHelper
virtual css::uno::Sequence< OUString > getServiceNames() override
SwVbaListLevels(const css::uno::Reference< ooo::vba::XHelperInterface > &rParent, const css::uno::Reference< css::uno::XComponentContext > &rContext, SwVbaListHelperRef pHelper)
virtual OUString getServiceImplName() override
virtual css::uno::Any createCollectionObject(const css::uno::Any &aSource) override
virtual css::uno::Type SAL_CALL getElementType() override
virtual css::uno::Reference< css::container::XEnumeration > SAL_CALL createEnumeration() override
css::uno::Type const & get()
sal_Int32 nIndex
Reference
unsigned char sal_Bool
::cppu::WeakImplHelper< css::container::XEnumeration > EnumerationHelper_BASE
std::shared_ptr< SwVbaListHelper > SwVbaListHelperRef