Branch data Line data Source code
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 SC_VBA_PROGRESSBAR_HXX
20 : : #define SC_VBA_PROGRESSBAR_HXX
21 : : #include <cppuhelper/implbase1.hxx>
22 : : #include <ooo/vba/msforms/XProgressBar.hpp>
23 : :
24 : : #include "vbacontrol.hxx"
25 : : #include <vbahelper/vbahelper.hxx>
26 : : #include <cppuhelper/implbase2.hxx>
27 : :
28 : : typedef cppu::ImplInheritanceHelper2< ScVbaControl, ov::msforms::XProgressBar, css::script::XDefaultProperty > ProgressBarImpl_BASE;
29 : :
30 : 0 : class ScVbaProgressBar : public ProgressBarImpl_BASE
31 : : {
32 : : public:
33 : : ScVbaProgressBar( const css::uno::Reference< ov::XHelperInterface >& xParent, const css::uno::Reference< css::uno::XComponentContext >& xContext, const css::uno::Reference< css::uno::XInterface >& xControl, const css::uno::Reference< css::frame::XModel >& xModel, ov::AbstractGeometryAttributes* pGeomHelper );
34 : : // Attributes
35 : : virtual css::uno::Any SAL_CALL getValue() throw (css::uno::RuntimeException);
36 : : virtual void SAL_CALL setValue( const css::uno::Any& _value ) throw (css::uno::RuntimeException);
37 : : //XHelperInterface
38 : : virtual rtl::OUString getServiceImplName();
39 : : virtual css::uno::Sequence<rtl::OUString> getServiceNames();
40 : : // XDefaultProperty
41 : 0 : rtl::OUString SAL_CALL getDefaultPropertyName( ) throw (css::uno::RuntimeException) { return ::rtl::OUString("Value"); }
42 : : };
43 : : #endif //SC_VBA_LABEL_HXX
44 : :
45 : : /* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|