1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
3 * This file is part of the LibreOffice project.
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/.
9 * This file incorporates work covered by the following license notice:
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 .
19 #ifndef INCLUDED_VBAHELPER_VBASHAPES_HXX
20 #define INCLUDED_VBAHELPER_VBASHAPES_HXX
22 #include <com/sun/star/drawing/XShapes.hpp>
23 #include <com/sun/star/drawing/XDrawPage.hpp>
24 #include <com/sun/star/container/XIndexAccess.hpp>
25 #include <ooo/vba/msforms/XShapes.hpp>
27 #include <vbahelper/vbahelperinterface.hxx>
29 #include <vbahelper/vbacollectionimpl.hxx>
31 typedef CollTestImplHelper
< ov::msforms::XShapes
> ScVbaShapes_BASE
;
33 class VBAHELPER_DLLPUBLIC ScVbaShapes
: public ScVbaShapes_BASE
36 css::uno::Reference
< css::drawing::XShapes
> m_xShapes
;
37 css::uno::Reference
< css::drawing::XDrawPage
> m_xDrawPage
;
38 sal_Int32 m_nNewShapeCount
;
39 void initBaseCollection();
41 css::uno::Reference
< css::frame::XModel
> m_xModel
;
42 virtual OUString
getServiceImplName() SAL_OVERRIDE
;
43 virtual css::uno::Sequence
<OUString
> getServiceNames() SAL_OVERRIDE
;
44 css::uno::Reference
< css::container::XIndexAccess
> getShapesByArrayIndices( const css::uno::Any
& Index
) throw (css::uno::RuntimeException
);
45 css::uno::Reference
< css::drawing::XShape
> createShape( const OUString
& service
) throw (css::uno::RuntimeException
);
46 css::uno::Any
AddRectangle( sal_Int32 startX
, sal_Int32 startY
, sal_Int32 nLineWidth
, sal_Int32 nLineHeight
, const css::uno::Any
& rRange
) throw (css::uno::RuntimeException
);
47 css::uno::Any
AddEllipse( sal_Int32 startX
, sal_Int32 startY
, sal_Int32 nLineWidth
, sal_Int32 nLineHeight
, const css::uno::Any
& rRange
) throw (css::uno::RuntimeException
);
48 css::uno::Any
AddTextboxInWriter( sal_Int32 _nOrientation
, sal_Int32 _nLeft
, sal_Int32 _nTop
, sal_Int32 _nWidth
, sal_Int32 _nHeight
) throw (css::uno::RuntimeException
);
49 OUString
createName( const OUString
& sName
);
50 //TODO helperapi using a writer document
51 //css::awt::Point calculateTopLeftMargin( css::uno::Reference< ov::XHelperInterface > xDocument );
54 ScVbaShapes( const css::uno::Reference
< ov::XHelperInterface
>& xParent
, const css::uno::Reference
< css::uno::XComponentContext
>& xContext
, const css::uno::Reference
< css::container::XIndexAccess
>& xShapes
, const css::uno::Reference
< css::frame::XModel
>& xModel
);
55 static void setDefaultShapeProperties( css::uno::Reference
< css::drawing::XShape
> xShape
) throw (css::uno::RuntimeException
);
56 static void setShape_NameProperty( css::uno::Reference
< css::drawing::XShape
> xShape
, const OUString
& sName
);
58 virtual css::uno::Type SAL_CALL
getElementType() throw (css::uno::RuntimeException
) SAL_OVERRIDE
;
59 virtual css::uno::Reference
< css::container::XEnumeration
> SAL_CALL
createEnumeration() throw (css::uno::RuntimeException
) SAL_OVERRIDE
;
61 virtual void SAL_CALL
SelectAll() throw (css::uno::RuntimeException
, std::exception
) SAL_OVERRIDE
;
63 virtual css::uno::Any SAL_CALL
AddLine( sal_Int32 StartX
, sal_Int32 StartY
, sal_Int32 endX
, sal_Int32 endY
) throw (css::uno::RuntimeException
, std::exception
) SAL_OVERRIDE
;
64 virtual css::uno::Any SAL_CALL
AddShape( sal_Int32 _nType
, sal_Int32 _nLeft
, sal_Int32 _nTop
, sal_Int32 _nWidth
, sal_Int32 _nHeight
) throw (css::uno::RuntimeException
, std::exception
) SAL_OVERRIDE
;
65 virtual css::uno::Any SAL_CALL
AddTextbox( sal_Int32 _nOrientation
, sal_Int32 _nLeft
, sal_Int32 _nTop
, sal_Int32 _nWidth
, sal_Int32 _nHeight
) throw (css::uno::RuntimeException
, std::exception
) SAL_OVERRIDE
;
66 virtual css::uno::Reference
< ov::msforms::XShapeRange
> SAL_CALL
Range( const css::uno::Any
& shapes
) throw (css::uno::RuntimeException
, std::exception
) SAL_OVERRIDE
;
67 // ScVbaCollectionBaseImpl
68 virtual css::uno::Any
createCollectionObject( const css::uno::Any
& aSource
) throw (css::uno::RuntimeException
) SAL_OVERRIDE
;
69 virtual css::uno::Any SAL_CALL
Item( const css::uno::Any
& Index1
, const css::uno::Any
& Index2
)
70 throw (css::lang::IndexOutOfBoundsException
, css::script::BasicErrorException
, css::uno::RuntimeException
) SAL_OVERRIDE
;
73 #endif // INCLUDED_VBAHELPER_VBASHAPES_HXX
75 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */