如何在无COM注册时用C# dynamic消费COM事件

我可以用C#的dynamic调用未注册的进程外COM服务器，属性和方法都能正常工作，但事件功能无法实现。代码大致如下：

Process.Start(@"path\to\comserver.exe", "-embedding");
Thread.Sleep(1000);
Type serverType = Type.GetTypeFromCLSID(new Guid("..."));
dynamic c = Activator.CreateInstance(serverType);
Console.WriteLine(c.SomeProperty);      // 正常工作
Console.WriteLine(c.SomeMethod(42));    // 正常工作
// c.SomeEvent += Handler;              // 仅在COM注册后正常工作

var cpc = (IConnectionPointContainer) c;
Guid guidOfIServerEvents = ...;
cpc.FindConnectionPoint(ref guidOfIServerEvents, out IConnectionPoint? ppCP);
EventsSinkHelper sinkHelper = new();
ppCP.Advise(sinkHelper, out int cookie);    // 未注册时触发COMException 0x80040202

// ...

[ComImport]
[InterfaceType(ComInterfaceType.InterfaceIsIDispatch)]
[Guid("...")]
interface IServerEvents
{
    [DispId(1)]
    void SomeEvent();
}

[ComVisible(true)]
[ClassInterface(ClassInterfaceType.None)]
[Guid("... (不同GUID)")]
public sealed class EventsSinkHelper : IServerEvents
{
    public void SomeEvent() { /* ... */ }
}

当COM服务器已注册时，上述代码可完美运行，但未注册时调用Advise会触发错误码为0x80040202的COMException。即使在STA线程中运行，结果也一致。

我知道该场景不受官方支持，但对测试（尤其是单元测试）极为便利，请问如何让事件功能正常工作？

错误0x80040202对应CONNECT_E_CANNOTCONNECT，本质是进程外COM服务器无法找到事件接收器的类型信息——未注册状态下，服务器无法通过接收器类的GUID查询到对应的类型库或注册信息，无法完成跨进程的代理/存根创建。以下是可行解决办法：

1. 临时注册事件接收器类 #

在创建接收器实例前，临时将EventsSinkHelper类注册到注册表，测试完成后清理。可通过RegistrationServices类实现：

var regService = new RegistrationServices();
bool registered = regService.RegisterTypeForComClients(
    typeof(EventsSinkHelper),
    RegistrationClassContext.LocalServer,
    RegistrationConnectionType.MultipleUse);

// 执行事件订阅逻辑...

// 测试完成后注销
if (registered)
{
    regService.UnregisterTypeForComClients(typeof(EventsSinkHelper).GUID);
}

该方式会在注册表中临时添加必要的COM注册项，让进程外服务器能找到接收器的类型信息，完成跨进程事件传递。

2. 手动实现IDispatch动态接收器 #

利用IDispatch接口手动处理事件回调，避免注册依赖。这种方式需要自行实现IDispatch的核心方法：

[ComVisible(true)]
public class DynamicSink : IDispatch
{
    public int GetTypeInfoCount(out int pcTInfo)
    {
        pcTInfo = 0;
        return 0;
    }

    public void GetTypeInfo(int iTInfo, int lcid, out IntPtr ppTInfo)
    {
        ppTInfo = IntPtr.Zero;
        throw new NotImplementedException();
    }

    public void GetIDsOfNames(ref Guid riid, IntPtr rgszNames, int cNames, int lcid, IntPtr rgDispId)
    {
        string name = Marshal.PtrToStringUni(rgszNames);
        if (name == "SomeEvent")
        {
            Marshal.WriteInt32(rgDispId, 1); // 对应事件的DispId
        }
        else
        {
            throw new NotImplementedException();
        }
    }

    public void Invoke(int dispIdMember, ref Guid riid, int lcid, ushort wFlags, ref DISPPARAMS pDispParams, IntPtr pVarResult, IntPtr pExcepInfo, IntPtr puArgErr)
    {
        if (dispIdMember == 1) // 匹配SomeEvent的DispId
        {
            // 处理事件逻辑
            Console.WriteLine("SomeEvent triggered");
        }
    }
}

使用这个DynamicSink作为接收器调用Advise即可，前提是COM服务器支持IDispatch类型的事件接口。

3. 补充：确保STA线程的消息循环 #

跨进程COM事件依赖STA线程的消息循环，控制台程序需手动添加：

Thread staThread = new Thread(() =>
{
    // 执行COM对象创建、事件订阅逻辑
    Application.Run(); // 启动消息循环，保持线程存活以接收事件
});
staThread.SetApartmentState(ApartmentState.STA);
staThread.Start();

内容的提问来源于stack exchange，提问作者Martin