Question

我在VS2010 C＃中编写了一个dll，并确保项目标记为COM可见，并注册了COM Interop。我可以在VS2010 C ++项目中使用，通过C ++ Property Pages-＆gt; Common Properties-＆gt; Framework and References，引用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 ++，要么是过时的，不是特定于我的问题，要么就是不起作用。

Answer 1

知道了。

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

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

在Borland C ++中使用C＃dll

1 个答案: