xref: /aoo4110/main/sw/source/ui/vba/vbadialogs.cxx (revision b1cdbd2c)
1*b1cdbd2cSJim Jagielski /**************************************************************
2*b1cdbd2cSJim Jagielski  *
3*b1cdbd2cSJim Jagielski  * Licensed to the Apache Software Foundation (ASF) under one
4*b1cdbd2cSJim Jagielski  * or more contributor license agreements.  See the NOTICE file
5*b1cdbd2cSJim Jagielski  * distributed with this work for additional information
6*b1cdbd2cSJim Jagielski  * regarding copyright ownership.  The ASF licenses this file
7*b1cdbd2cSJim Jagielski  * to you under the Apache License, Version 2.0 (the
8*b1cdbd2cSJim Jagielski  * "License"); you may not use this file except in compliance
9*b1cdbd2cSJim Jagielski  * with the License.  You may obtain a copy of the License at
10*b1cdbd2cSJim Jagielski  *
11*b1cdbd2cSJim Jagielski  *   http://www.apache.org/licenses/LICENSE-2.0
12*b1cdbd2cSJim Jagielski  *
13*b1cdbd2cSJim Jagielski  * Unless required by applicable law or agreed to in writing,
14*b1cdbd2cSJim Jagielski  * software distributed under the License is distributed on an
15*b1cdbd2cSJim Jagielski  * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16*b1cdbd2cSJim Jagielski  * KIND, either express or implied.  See the License for the
17*b1cdbd2cSJim Jagielski  * specific language governing permissions and limitations
18*b1cdbd2cSJim Jagielski  * under the License.
19*b1cdbd2cSJim Jagielski  *
20*b1cdbd2cSJim Jagielski  *************************************************************/
21*b1cdbd2cSJim Jagielski 
22*b1cdbd2cSJim Jagielski 
23*b1cdbd2cSJim Jagielski #include <ooo/vba/word/XDialog.hpp>
24*b1cdbd2cSJim Jagielski #include "vbadialogs.hxx"
25*b1cdbd2cSJim Jagielski #include "vbadialog.hxx"
26*b1cdbd2cSJim Jagielski 
27*b1cdbd2cSJim Jagielski using namespace ::ooo::vba;
28*b1cdbd2cSJim Jagielski using namespace ::com::sun::star;
29*b1cdbd2cSJim Jagielski 
30*b1cdbd2cSJim Jagielski uno::Any
Item(const uno::Any & aItem)31*b1cdbd2cSJim Jagielski SwVbaDialogs::Item( const uno::Any &aItem ) throw (uno::RuntimeException)
32*b1cdbd2cSJim Jagielski {
33*b1cdbd2cSJim Jagielski 	sal_Int32 nIndex = 0;
34*b1cdbd2cSJim Jagielski 	aItem >>= nIndex;
35*b1cdbd2cSJim Jagielski 	uno::Reference< word::XDialog > aDialog( new SwVbaDialog( uno::Reference< XHelperInterface >( Application(),uno::UNO_QUERY_THROW ), mxContext, m_xModel, nIndex ) );
36*b1cdbd2cSJim Jagielski 	return uno::Any( aDialog );
37*b1cdbd2cSJim Jagielski }
38*b1cdbd2cSJim Jagielski 
39*b1cdbd2cSJim Jagielski rtl::OUString&
getServiceImplName()40*b1cdbd2cSJim Jagielski SwVbaDialogs::getServiceImplName()
41*b1cdbd2cSJim Jagielski {
42*b1cdbd2cSJim Jagielski 	static rtl::OUString sImplName( RTL_CONSTASCII_USTRINGPARAM("SwVbaDialogs") );
43*b1cdbd2cSJim Jagielski 	return sImplName;
44*b1cdbd2cSJim Jagielski }
45*b1cdbd2cSJim Jagielski 
46*b1cdbd2cSJim Jagielski uno::Sequence< rtl::OUString >
getServiceNames()47*b1cdbd2cSJim Jagielski SwVbaDialogs::getServiceNames()
48*b1cdbd2cSJim Jagielski {
49*b1cdbd2cSJim Jagielski 	static uno::Sequence< rtl::OUString > aServiceNames;
50*b1cdbd2cSJim Jagielski 	if ( aServiceNames.getLength() == 0 )
51*b1cdbd2cSJim Jagielski 	{
52*b1cdbd2cSJim Jagielski 		aServiceNames.realloc( 1 );
53*b1cdbd2cSJim Jagielski 		aServiceNames[ 0 ] = rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("ooo.vba.word.Dialogs" ) );
54*b1cdbd2cSJim Jagielski 	}
55*b1cdbd2cSJim Jagielski 	return aServiceNames;
56*b1cdbd2cSJim Jagielski }
57*b1cdbd2cSJim Jagielski 
58