0

我有一个我在 VS2010 C# 中编写的 dll，并确保该项目被标记为 COM 可见，并为 COM Interop 注册。我可以在 VS2010 C++ 项目中使用，通过 C++ 属性页->通用属性->框架和引用，引用 C# 项目，然后编写代码以使用 gcnew 实例化我的对象。

但是，这种方法在 Borland C++ 中不起作用。由于注册了 C# dll，我可以添加对它的引用，并生成 *_OCX.h 和 *_TLB.h 文件，我可以看到这些文件中的可用对象。但是，我不知道如何创建我的课程。我什至不知道哪个类是正确的，因为已经完成了重命名。

在 C# 中，类可以很简单：

public namespace MyTest
{
   public class MyClass
   {
      public MyClass() { }
      public int SomeInt { get; set; }
   }
}

在 C++ 中，生成了很多东西。其中一些是：

MyTest_TLB.cpp

#include <vcl.h>
#pragma hdrstop
#include "MyTest_TLB.h"

namespace Mytest_tlb
{
const GUID LIBID_MyTest = {0xE082EF89, 0x8FE8, 0x45FA,{ 0x8D, 0x13, 0x20,0x3B, 0x58, 0xCF,0x7E, 0x82} };
const GUID CLSID_MyClass = {0x22E68247, 0x3CDB, 0x3CCA,{ 0xB8, 0x8B, 0xB9,0x52, 0xF3, 0x4C,0x11, 0x70} };
const GUID IID__MyClass = {0x6A6EC8CB, 0x1AAB, 0x3AB1,{ 0xBD, 0x57, 0x0F,0xE2, 0x17, 0x78,0xD4, 0xE2} };
};     // namespace Mytest_tlb

MyTest_TLB.h

namespace Stdvcl {class IStrings; class IStringsDisp;}
using namespace Stdvcl;
typedef TComInterface<IStrings> IStringsPtr;
typedef TComInterface<IStringsDisp> IStringsDispPtr;

namespace Mytest_tlb
{
extern __declspec (package) const GUID LIBID_MyTest;
extern __declspec (package) const GUID IID__MyClass;
extern __declspec (package) const GUID CLSID_MyClass;

interface DECLSPEC_UUID("{6A6EC8CB-1AAB-3AB1-BD57-0FE21778D4E2}") _MyClass;
typedef TComInterface<_MyClass, &IID__MyClass> _MyClassPtr;
typedef _MyClass MyClass;
typedef _MyClassPtr MyClassPtr;

interface _MyClass  : public IDispatch
{
public:
#if !defined(__TLB_NO_INTERFACE_WRAPPERS)
#endif //   __TLB_NO_INTERFACE_WRAPPERS
};

#if !defined(__TLB_NO_INTERFACE_WRAPPERS)
template <class T /* _MyClass */ >
class TCOM_MyClassT : public TComInterface<_MyClass>, public TComInterfaceBase<IUnknown>
{
public:
  TCOM_MyClassT() {}
  TCOM_MyClassT(_MyClass *intf, bool addRef = false) : TComInterface<_MyClass>(intf, addRef) {}
  TCOM_MyClassT(const TCOM_MyClassT& src) : TComInterface<_MyClass>(src) {}
  TCOM_MyClassT& operator=(const TCOM_MyClassT& src) { Bind(src, true); return *this;}
};
typedef TCOM_MyClassT<_MyClass> TCOM_MyClass;

template<class T>
class _MyClassDispT : public TAutoDriver<_MyClass>
{
public:
  _MyClassDispT(){}

  _MyClassDispT(_MyClass *pintf)
  {
    TAutoDriver<_MyClass>::Bind(pintf, false);
  }

  _MyClassDispT(_MyClassPtr pintf)
  {
    TAutoDriver<_MyClass>::Bind(pintf, true);
  }

  _MyClassDispT& operator=(_MyClass *pintf)
  {
    TAutoDriver<_MyClass>::Bind(pintf, false);
    return *this;
  }

  _MyClassDispT& operator=(_MyClassPtr pintf)
  {
    TAutoDriver<_MyClass>::Bind(pintf, true);
    return *this;
  }

  HRESULT BindDefault()
  {
    return OLECHECK(Bind(CLSID_MyClass));
  }

  HRESULT BindRunning()
  {
    return BindToActive(CLSID_MyClass);
  }
};
typedef _MyClassDispT<_MyClass> _MyClassDisp;

typedef TCoClassCreatorT<TCOM_MyClass, _MyClass, &CLSID_MyClass, &IID__MyClass> CoMyClass;
#endif  //   __TLB_NO_INTERFACE_WRAPPERS
};     // namespace Mytest_tlb

还有一个 TCOM_MyClassT.h 文件。我不知道这意味着什么。我看到的教程或示例要么是针对 VC++ 的，要么是过时的，不是针对我的问题的，要么就是不起作用。

4

1 回答 1

2

知道了。

CoInitialize(NULL);
_MyClassPtr obj;
HRESULT ptr = obj.CreateInstance(__uuidof(MyClass));

令人沮丧的是，一些最简单的事情可能如此困难。

于 2012-10-19T20:31:05.370 回答