接收 COM 事件而不手动将 dispids 映射到方法

Question

我有一个IConnectionPointContainer 并且知道我想要接收其事件的连接点。现在我需要为这些事件编写一个包含回调方法的类。

所以基本上我是这样做的：

OleCheck((ExtIntf as IConnectionPointContainer).FindConnectionPoint(IID_IEvents, cp));
OleCheck(cp.Advise(MySink {<--this one I need}, Cookie));

我需要提供MySink，并且我知道该怎么做才能调用MyIntf.Invoke。但我不想手动将 dispids 映射到事件方法。

这意味着我不想在我的Invoke 中这样做：

// Handle the event
case DispID of
  102   :  OnStatusTextChange(pdpParams^.rgvarg^[lpDispIds[0]].bstrval);
  104   :  OnDownloadComplete;
  105   :  OnCommandStateChange(pdpParams^.rgvarg^[lpDispIds[0]].lval,
                                pdpParams^.rgvarg^[lpDispIds[1]].vbool);
  106   :  OnDownloadBegin;
  108   :  OnProgressChange(pdpParams^.rgvarg^[lpDispIds[0]].lval,
                            pdpParams^.rgvarg^[lpDispIds[1]].lval);
  112   :  OnPropertyChange(pdpParams^.rgvarg^[lpDispIds[0]].bstrval);
  {... doh}

对于连接点IID_IEvents，我同时拥有接口IEvents 和dispinterface 声明（来自Delphi 类型库导入）。我不能以某种方式实现IEvents 吗？我想要一个包含方法的干净类，每个方法都是IID_IEvents 连接点提供的事件之一的回调。

我非常希望有人知道

• 我可以继承的基类负责调用我的事件方法
• 一个为我创建适当类的 Delphi 向导
• 我需要制作我的魔杖才能最终掌握 COM 的树

有什么建议吗？

Answer 1

TechVanguards 有一个为您生成代码的工具：COM Sink Event Generator。

你可以also see my question;我抱怨不得不写下你所面临的写作。