.net 类型被类型库中的 IUnknown 替换

Question

当我使用类型库导入器将特定于 .net dll 的 tlb 文件导入 Delphi 时，接受特定于 .net 类型参数的方法被 IUnknown 替换。 当我想从我的 Delphi 客户端应用程序调用这样的方法时，我想传递一个 SQLTransaction 类型的参数值。我如何实现这一目标？我是否需要将所有 .net dll 方法参数更改为从 .net 特定类型继承的用户定义类型？

我在导入 .net tlb 时也导入了 mscorlib_TLB.pas。

.net方法

public class MyConnection : IDisposable
{    
    public int BulkInsert(SqlTransaction tran);
    {...}
}

Delphi中导入tlb的方法：

_MyConnection = interface(IDispatch)
    ['{9FB088F8-1033-3A99-B9C6-C7D7D2D40140}']    
    function BulkInsert(const SQLTransaction: IUnknown): int; safecall;
end;
  CoMyConnection = class
    class function Create: _MyConnection;
    class function CreateRemote(const MachineName: string): _MyConnection;
  end;

如何从我的 Delphi 客户端应用程序调用 BulkInsert 方法？

Answer 1

这完全是意料之中的。 SqlTransaction 类型是 .net 类型，您的 COM 接口未知。你怎么能期望其他方，在这种情况下是一个 Delphi 程序，能够获得 .net SqlTransaction 类型的实例。

您的 COM 接口需要限制自己仅使用 COM 类型。您需要将SqlTransaction 替换为COM 接口。解决这个问题的一种方法是声明一个 COM 接口，它公开了SqlTransaction 的必要功能。然后在您的 C# 代码中通过将实现委托给SqlTransaction 的实例来创建一个实现此接口的类型。然后公开一个允许实例化包装器接口的方法。在 Delphi 方面，消费者将实例化您的包装接口并将其传递给BulkInsert。当然，您将更改 BulkInsert 以接受包装接口而不是 SqlTransaction 作为其参数。

Answer 2

也许你应该首先获取Interop代理对象，通常在Visual Studio项目中导入类型库它是由IDE自动完成的，我认为Delphy应该实现相同的功能，但我不确定..