extensions/test/ole/unoTocomCalls/XCallback_Impl/Simple.cpp

   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 // Simple.cpp : Implementation of CSimple
  20 #include "stdafx.h"
  21 #include "XCallback_Impl.h"
  22 #include "Simple.h"
  23
  24
  25 // CSimple
  26
  27
  28 STDMETHODIMP CSimple::func(BSTR message)
  29 {
  30     USES_CONVERSION;
  31     MessageBox( NULL, W2T( message), _T("XCallback_Impl.Simple"), MB_OK);
  32     return S_OK;
  33 }
  34
  35
  36 STDMETHODIMP CSimple::func2(BSTR message)
  37 {
  38     USES_CONVERSION;
  39     MessageBox( NULL, W2T( message), _T("XCallback_Impl.Simple"), MB_OK);
  40     return S_OK;
  41 }
  42
  43 STDMETHODIMP CSimple::func3(BSTR message)
  44 {
  45     USES_CONVERSION;
  46     MessageBox( NULL, W2T( message), _T("XCallback_Impl.Simple"), MB_OK);
  47     return S_OK;
  48 }
  49
  50
  51 STDMETHODIMP CSimple::get__implementedInterfaces(LPSAFEARRAY *pVal)
  52 {
  53     HRESULT hr= S_OK;
  54     SAFEARRAY *pArr=    SafeArrayCreateVector( VT_BSTR, 0, 3);
  55     if( pArr)
  56     {   long index=0;
  57         BSTR name1= SysAllocString(L"oletest.XSimple");
  58         BSTR name2= SysAllocString(L"oletest.XSimple2");
  59         BSTR name3= SysAllocString(L"oletest.XSimple3");
  60
  61         hr= SafeArrayPutElement( pArr, & index, name1);
  62         index++;
  63         hr|= SafeArrayPutElement( pArr, &index, name2);
  64         index++;
  65         hr|= SafeArrayPutElement( pArr, &index, name3);
  66         *pVal= pArr;
  67
  68     }
  69     *pVal= pArr;
  70     return hr;
  71 }
  72
  73 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */