在没有类型库的情况下使用来自 C# 的 COM dll

Question

我需要使用很久以前在 Delphi 中开发的 COM 组件（一个 dll）。问题是：dll 不包含类型库……而且 .NET 中的每个互操作功能（例如 TlbImp）似乎都依赖于 TLB。该组件已在 Delphi 程序中使用多年，没有出现任何问题，因为“使用 Delphi 的 COM 对象不是什么大问题，因为我们知道接口”（引用 Delphi 开发人员）。

有没有什么方法可以在没有 TLB 的情况下从 c# 使用这个 DLL？我尝试将 DLL 用作非托管的，但它导出的唯一方法是 DllUnregisterServer、DllRegisterServer、DllCanUnloadNow 和 DllGetClassObject。我知道我要使用的类和函数的名称，如果有帮助的话。

更新： 我已尝试实施 Jeff 的建议，但出现此错误：

“无法将类型为“ComTest.ResSrvDll”的 COM 对象转换为接口类型“ComTest.IResSrvDll”。此操作失败，因为对具有 IID 的接口的 COM 组件调用 QueryInterface '{75400500-939F- 11D4-9E44-0050040CE72C}' 由于以下错误而失败：不支持此类接口（来自 HRESULT 的异常：0x80004002 (E_NOINTERFACE)）。”

这就是我所做的：

我从 Delphi 的一个人那里得到了这个接口定义：

unit ResSrvDllIf;

interface

type
   IResSrvDll = interface
   ['{75400500-939F-11D4-9E44-0050040CE72C}']
    procedure clearAll;

    function  ResObjOpen(const aClientID: WideString; const aClientSubID: WideString;
                         const aResFileName: WideString; aResShared: Integer): Integer; {safecall;}
    ...
   end;
implementation
end.

由此我制作了这个界面

using System.Runtime.InteropServices;
namespace ComTest
{
    [ComImport]
    [Guid("75400500-939F-11D4-9E44-0050040CE72C")]
    [InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]
    public interface IResSrvDll
    {
        int ResObjOpen(string aClientID, string aClientSubID, string aResFileName, int aResShared);

    }
}

还有这个 coclass（从 delphi-guys 那里得到了指导）

using System.Runtime.InteropServices;

namespace ComTest
{
    [ComImport]
    [Guid("75400503-939F-11D4-9E44-0050040CE72C")]
    public class ResSrvDll
    {
    }
}

更新

Jeff 的解决方案就是解决问题的方法。不过值得注意的是，接口定义必须与 COM 组件完全匹配！ IE。相同的顺序，相同的名称等。

Answer 1

你也可以late binding，然后通过反射调用方法（myObject.InvokeMember("NameOfTheMethod", options, params, etc.)）。

但是，包装器应该提供更好的性能和更快的编组。​​

Answer 2

是和不是。

为了与 COM 对象通信，所有 C#（和任何 CLR 语言）都需要一个兼容的接口签名。通常指定接口的方法、GUID 和单元样式。如果您可以将此定义添加到您的代码库中，则不需要 TLB。

该声明附带一个小警告。如果您尝试跨公寓边界使用 COM 对象并且没有注册合适的 TLB，我相信您会遇到麻烦。不过，我不能 100% 记得这一点。

Answer 3

在 VB.Net 中编写一个包装器。 VB.Net 支持真正的后期绑定（没有杂乱的反射）。您只需要 progId。您还应该实现 IDisposable 以明确管理组件生命周期。

Answer 4

我怀疑 dynamic 关键字 (C# 4.0) 将完成此操作。如果是这样，它将给出在很大程度上等同于调用方法的结果，即 Groo 建议的方式。

Answer 5

您只需要 CLS_ID 和接口 ID。我在博客上写了关于这个特定问题的文章：

“Using Obscure Windows COM APIs in .NET”

Answer 6

您经常会遇到不受类型库（Delphi 或其他）支持的接口实现。 Shell 扩展就是一个例子。

您基本上需要调用 Windows API 来通过适当的 COM 函数调用来创建实例。 API 将通过您前面提到的导出函数来管理 DLL。

您将需要在 C# 代码中重新创建接口定义，但之后您只需创建对象，将其强制转换为接口，它与其他任何东西没有什么不同。这里唯一真正需要注意的是，根据您的使用情况，您可能需要处理一些线程问题，因此请检查用于 DLL 的“线程模型”，并据此考虑您的使用情况。

这是一个关于使用不基于 TLB 的接口的教程的链接。 Tutorial

Answer 7

如果您成功地创建了对象的实例，那么您就克服了第一个主要障碍！

现在试试这个：

myObject.GetType().InvokeMember(
                      "ResObjOpen",  // method name goes here
                      BindingFlags.InvokeMethod,
                      null,
                      myObject,
                      new object[] { 
                         someClientID,   // arguments go here
                         someSubId, 
                         somFileName, 
                         someInt} );

我认为您可能需要这样做的原因是 Delphi COM 对象不是“双重”对象。它可能只支持后期绑定，即您在上面看到的那种调用。

（在 C# 4.0 中，他们使用 dynamic 关键字使这变得更容易。）

编辑：刚刚注意到一些非常可疑的事情。接口的 IID 和对象本身的 CLSID 似乎相同。这是不对的。

假设您已成功创建对象，它似乎是该对象的 CLSID。所以这不是正确的 IID。你需要回到你的 Delphi 人员那里，让他们告诉你接口 IResSrvDll 的 IID 是什么。

再次编辑：您可以尝试更改从ComInterfaceType 指定的枚举成员。应该有 IDispatch 和“双重”的 - 尽管您的对象不支持 IDispatch，这些都不应该是正确的选择。 IUnknown 设置（出现在您的示例代码中）应该可以工作 - 表明 IID 错误。