LibreOffice Module sc (master) 1
vbaassistant.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
20#include <ooo/vba/office/MsoAnimationType.hpp>
21
22#include"vbaassistant.hxx"
23
24using namespace com::sun::star;
25using namespace ooo::vba;
26
27using namespace ooo::vba::office::MsoAnimationType;
28
29constexpr OUStringLiteral g_sName = u"Clippit";
30
31ScVbaAssistant::ScVbaAssistant( const uno::Reference< XHelperInterface >& rParent, const uno::Reference< uno::XComponentContext >& rContext ): ScVbaAssistantImpl_BASE(rParent, rContext)
32{
33 m_bIsVisible = false;
34 m_nPointsLeft = 795;
35 m_nPointsTop = 248;
36 m_nAnimation = msoAnimationIdle;
37}
38
40{
41}
42
44{
45 return m_bIsVisible;
46}
47
48void SAL_CALL ScVbaAssistant::setVisible( sal_Bool bVisible )
49{
51}
52
54{
55 return false;
56}
57
58void SAL_CALL ScVbaAssistant::setOn( sal_Bool bOn )
59{
60 setVisible( bOn );
61}
62
63::sal_Int32 SAL_CALL
65{
66 return m_nPointsTop;
67}
68void SAL_CALL
69ScVbaAssistant::setTop( ::sal_Int32 _top )
70{
71 m_nPointsTop = _top;
72}
73::sal_Int32 SAL_CALL
75{
76 return m_nPointsLeft;
77}
78void SAL_CALL
79ScVbaAssistant::setLeft( ::sal_Int32 _left )
80{
81 m_nPointsLeft = _left;
82}
83::sal_Int32 SAL_CALL
85{
86 return m_nAnimation;
87}
88void SAL_CALL
89ScVbaAssistant::setAnimation( ::sal_Int32 _animation )
90{
91 m_nAnimation = _animation;
92}
93
94OUString SAL_CALL
96{
97 return g_sName;
98}
99
100OUString
102{
103 return "ScVbaAssistant";
104}
105
106uno::Sequence< OUString >
108{
109 static uno::Sequence< OUString > const aServiceNames
110 {
111 "ooo.vba.Assistant"
112 };
113 return aServiceNames;
114}
115
116/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
virtual void SAL_CALL setAnimation(::sal_Int32 _animation) override
virtual void SAL_CALL setVisible(sal_Bool _visible) override
virtual void SAL_CALL setLeft(::sal_Int32 _left) override
sal_Int32 m_nAnimation
virtual void SAL_CALL setOn(sal_Bool _on) override
ScVbaAssistant(const css::uno::Reference< ov::XHelperInterface > &rParent, const css::uno::Reference< css::uno::XComponentContext > &rContext)
sal_Int32 m_nPointsLeft
virtual css::uno::Sequence< OUString > getServiceNames() override
virtual ::sal_Int32 SAL_CALL getAnimation() override
virtual OUString getServiceImplName() override
virtual ~ScVbaAssistant() override
virtual OUString SAL_CALL Name() override
sal_Int32 m_nPointsTop
virtual void SAL_CALL setTop(::sal_Int32 _top) override
virtual sal_Bool SAL_CALL getVisible() override
virtual ::sal_Int32 SAL_CALL getTop() override
virtual sal_Bool SAL_CALL getOn() override
virtual ::sal_Int32 SAL_CALL getLeft() override
float u
Sequence< OUString > aServiceNames
bool bVisible
unsigned char sal_Bool
constexpr OUStringLiteral g_sName