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 #ifndef SW_VBA_SYSTEM_HXX 24*b1cdbd2cSJim Jagielski #define SW_VBA_SYSTEM_HXX 25*b1cdbd2cSJim Jagielski 26*b1cdbd2cSJim Jagielski #include <ooo/vba/word/XSystem.hpp> 27*b1cdbd2cSJim Jagielski #include <vbahelper/vbahelperinterface.hxx> 28*b1cdbd2cSJim Jagielski #include <cppuhelper/implbase1.hxx> 29*b1cdbd2cSJim Jagielski #include <vbahelper/vbapropvalue.hxx> 30*b1cdbd2cSJim Jagielski 31*b1cdbd2cSJim Jagielski typedef InheritedHelperInterfaceImpl1< ooo::vba::word::XSystem > SwVbaSystem_BASE; 32*b1cdbd2cSJim Jagielski 33*b1cdbd2cSJim Jagielski class PrivateProfileStringListener : public PropListener 34*b1cdbd2cSJim Jagielski { 35*b1cdbd2cSJim Jagielski private: 36*b1cdbd2cSJim Jagielski rtl::OUString maFileName; 37*b1cdbd2cSJim Jagielski ByteString maGroupName; 38*b1cdbd2cSJim Jagielski ByteString maKey; 39*b1cdbd2cSJim Jagielski public: PrivateProfileStringListener()40*b1cdbd2cSJim Jagielski PrivateProfileStringListener(){}; 41*b1cdbd2cSJim Jagielski virtual ~PrivateProfileStringListener(); 42*b1cdbd2cSJim Jagielski void Initialize( const rtl::OUString& rFileName, const ByteString& rGroupName, const ByteString& rKey ); 43*b1cdbd2cSJim Jagielski 44*b1cdbd2cSJim Jagielski //PropListener 45*b1cdbd2cSJim Jagielski virtual void setValueEvent( const css::uno::Any& value ); 46*b1cdbd2cSJim Jagielski virtual css::uno::Any getValueEvent(); 47*b1cdbd2cSJim Jagielski }; 48*b1cdbd2cSJim Jagielski 49*b1cdbd2cSJim Jagielski class SwVbaSystem : public SwVbaSystem_BASE 50*b1cdbd2cSJim Jagielski { 51*b1cdbd2cSJim Jagielski private: 52*b1cdbd2cSJim Jagielski PrivateProfileStringListener maPrivateProfileStringListener; 53*b1cdbd2cSJim Jagielski 54*b1cdbd2cSJim Jagielski public: 55*b1cdbd2cSJim Jagielski SwVbaSystem( css::uno::Reference< css::uno::XComponentContext >& m_xContext ); 56*b1cdbd2cSJim Jagielski virtual ~SwVbaSystem(); 57*b1cdbd2cSJim Jagielski 58*b1cdbd2cSJim Jagielski // XSystem 59*b1cdbd2cSJim Jagielski virtual sal_Int32 SAL_CALL getCursor() throw ( css::uno::RuntimeException ); 60*b1cdbd2cSJim Jagielski virtual void SAL_CALL setCursor( sal_Int32 _cursor ) throw ( css::uno::RuntimeException ); 61*b1cdbd2cSJim Jagielski virtual css::uno::Any SAL_CALL PrivateProfileString( const rtl::OUString& rFilename, const rtl::OUString& rSection, const rtl::OUString& rKey ) throw ( css::uno::RuntimeException ); 62*b1cdbd2cSJim Jagielski 63*b1cdbd2cSJim Jagielski // XHelperInterface 64*b1cdbd2cSJim Jagielski virtual rtl::OUString& getServiceImplName(); 65*b1cdbd2cSJim Jagielski virtual css::uno::Sequence<rtl::OUString> getServiceNames(); 66*b1cdbd2cSJim Jagielski }; 67*b1cdbd2cSJim Jagielski #endif /* SW_VBA_SYSTEM_HXX */ 68