xref: /trunk/main/extensions/test/ole/unoTocomCalls/XCallback_Impl/Simple.cpp (revision 1ecadb572e7010ff3b3382ad9bf179dbc6efadbb)
1 /*************************************************************************
2  *
3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4  *
5  * Copyright 2000, 2010 Oracle and/or its affiliates.
6  *
7  * OpenOffice.org - a multi-platform office productivity suite
8  *
9  * This file is part of OpenOffice.org.
10  *
11  * OpenOffice.org is free software: you can redistribute it and/or modify
12  * it under the terms of the GNU Lesser General Public License version 3
13  * only, as published by the Free Software Foundation.
14  *
15  * OpenOffice.org is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  * GNU Lesser General Public License version 3 for more details
19  * (a copy is included in the LICENSE file that accompanied this code).
20  *
21  * You should have received a copy of the GNU Lesser General Public License
22  * version 3 along with OpenOffice.org.  If not, see
23  * <http://www.openoffice.org/license.html>
24  * for a copy of the LGPLv3 License.
25  *
26  ************************************************************************/
27 // Simple.cpp : Implementation of CSimple
28 #include "stdafx.h"
29 #include "XCallback_Impl.h"
30 #include "Simple.h"
31 
32 /////////////////////////////////////////////////////////////////////////////
33 // CSimple
34 
35 
36 STDMETHODIMP CSimple::func(BSTR message)
37 {
38     USES_CONVERSION;
39     MessageBox( NULL, W2T( message), _T("XCallback_Impl.Simple"), MB_OK);
40     return S_OK;
41 }
42 
43 
44 STDMETHODIMP CSimple::func2(BSTR message)
45 {
46     USES_CONVERSION;
47     MessageBox( NULL, W2T( message), _T("XCallback_Impl.Simple"), MB_OK);
48     return S_OK;
49 }
50 
51 STDMETHODIMP CSimple::func3(BSTR message)
52 {
53     USES_CONVERSION;
54     MessageBox( NULL, W2T( message), _T("XCallback_Impl.Simple"), MB_OK);
55     return S_OK;
56 }
57 
58 
59 STDMETHODIMP CSimple::get__implementedInterfaces(LPSAFEARRAY *pVal)
60 {
61     HRESULT hr= S_OK;
62     SAFEARRAY *pArr=    SafeArrayCreateVector( VT_BSTR, 0, 3);
63     if( pArr)
64     {   long index=0;
65         BSTR name1= SysAllocString(L"oletest.XSimple");
66         BSTR name2= SysAllocString(L"oletest.XSimple2");
67         BSTR name3= SysAllocString(L"oletest.XSimple3");
68 
69         hr= SafeArrayPutElement( pArr, & index, name1);
70         index++;
71         hr= SafeArrayPutElement( pArr, &index, name2);
72         index++;
73         hr= SafeArrayPutElement( pArr, &index, name3);
74         *pVal= pArr;
75 
76     }
77     *pVal= pArr;
78     return S_OK;
79 }
80 
81