能否通过COM互操作转发委托？

Question

我有一个类：

public class A
{
public delegate void SetTextDel(string value);
public void Test()
{
      SetTextDel setText = someInterface.SetText;
      icom.Set(setText);
}
}

[ComVisible(true), Guid("81C99F84-AA95-41A5-868E-62FAC8FAC263"),   InterfaceType(ComInterfaceType.InterfaceIsDual)]
    public interface Icom
    {
        void Set(Delegate del);
    }

[ComVisible(true)]
    [Guid("6DF6B926-8EB1-4333-827F-DD814B868097")]
    [ClassInterface(ClassInterfaceType.None)]
    [ComDefaultInterface(typeof(Icom))]
    public class B : Icom
    {
         Set(Delegate del)
         {
              del.DynamicInvoke("some text");
         }
    }

我在Set(Delegate del)中遇到了目标调用异常。有没有更好的方法将委托作为参数转发？或者我在这里犯了一些错误，但我没有看到。我的目的是将someInterface.SetText方法作为参数传递。谢谢您的帮助。

- Miloš Đošović

---

这段代码有效吗？ - JeremiahDotNet

是的，COM被识别了，这只是简短的版本。我只需要帮助将委托作为参数传递给B类。 - Miloš Đošović

Answer 1

以下内容是可行的：

public class A
{
    public delegate void SetTextDel(string value);

    void TestSetText(string value)
    {
        MessageBox.Show(value);
    }

    public void Test(Icom icom)
    {
        SetTextDel del = TestSetText;
        icom.Set(del);
    }
}

[ComVisible(true), Guid("81C99F84-AA95-41A5-868E-62FAC8FAC263"), InterfaceType(ComInterfaceType.InterfaceIsDual)]
public interface Icom
{
    void Set(Delegate del);
}

[ComVisible(true)]
[Guid("6DF6B926-8EB1-4333-827F-DD814B868097")]
[ClassInterface(ClassInterfaceType.None)]
[ComDefaultInterface(typeof(Icom))]
public class B : Icom
{
    public void Set(Delegate del)
    {
        del.DynamicInvoke("some text");
    }
}

private void buttonTest_Click(object sender, EventArgs e)
{
    var a = new A();
    var b = new B();

    a.Test(b);
}

接下来，如果你想要从C++中将回调函数传递给Icom.Set，下面的代码也可以实现：

[UnmanagedFunctionPointer(CallingConvention.StdCall)]
public delegate void SetTextDel([MarshalAs(UnmanagedType.BStr)] string value);

[ComVisible(true), Guid("81C99F84-AA95-41A5-868E-62FAC8FAC263"), InterfaceType(ComInterfaceType.InterfaceIsDual)]
public interface Icom
{
    void Set([MarshalAs(UnmanagedType.FunctionPtr)] SetTextDel del);
}

[ComVisible(true)]
[Guid("6DF6B926-8EB1-4333-827F-DD814B868097")]
[ClassInterface(ClassInterfaceType.None)]
[ComDefaultInterface(typeof(Icom))]
public class B : Icom
{
    public void Set(SetTextDel del)
    {
        del("some text");
    }
}

请确保将C#和C++项目都编译为32位代码。C++回调函数应该声明如下：

static HRESULT __stdcall SetTextDelCallback(BSTR value)
{
    return S_OK;
}

最终，我认为实现这个的正确方式是简单地定义一个回调接口（如下所示的ISetCallback），并传递实现该接口的对象，而不是委托。 ISetCallback可以用任何语言实现，包括C#或C++：

[ComVisible(true), Guid("2FE5D78D-D9F2-4236-9626-226356BA25E7")]
[InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]
public interface ISetCallback
{
    void OnSetText(string value);
}

public class A : ISetCallback
{
    public void OnSetText(string value) // ISetCallback
    {
        MessageBox.Show(value);
    }

    public void Test(Icom icom)
    {
        icom.Set(this);
    }
}

[ComVisible(true), Guid("81C99F84-AA95-41A5-868E-62FAC8FAC263"), InterfaceType(ComInterfaceType.InterfaceIsDual)]
public interface Icom
{
    void Set(ISetCallback callback);
}

[ComVisible(true)]
[Guid("6DF6B926-8EB1-4333-827F-DD814B868097")]
[ClassInterface(ClassInterfaceType.None)]
[ComDefaultInterface(typeof(Icom))]
public class B : Icom
{
    public void Set(ISetCallback callback)
    {
        callback.OnSetText("some text");
    }
}

private void buttonTest_Click(object sender, EventArgs e)
{
    var a = new A();
    var b = new B();

    a.Test(b);
}

- noseratio