mycomclassimpl.cpp

C++ BUILDER精彩编程实例集锦(源码) 第一部分 界面设计 第二部分 程序设置

// MYCOMCLASSIMPL : Implementation of TMyComClassImpl (CoClass: MyComClass, Interface: IMyComClass)

#include <vcl.h>
#pragma hdrstop

#include "MYCOMCLASSIMPL.H"

/////////////////////////////////////////////////////////////////////////////
// TMyComClassImpl

STDMETHODIMP TMyComClassImpl::get_Property1(BSTR* Value)
{
  try
  {
   *Value=InputString; //新增
  }
  catch(Exception &e)
  {
    return Error(e.Message.c_str(), IID_IMyComClass);
  }
  return S_OK;
};


STDMETHODIMP TMyComClassImpl::set_Property1(BSTR Value)
{
  try
  {
   InputString=Value;  //新增
  }
  catch(Exception &e)
  {
    return Error(e.Message.c_str(), IID_IMyComClass);
  }
  return S_OK;
};