如何使用Delphi创建IDataObject实例？

这个。这将打开标准邮件客户端，并将所选文件作为附件，这是mailto:protocol处理程序的一个非常有趣的替代方案

在Delphi中创建必需的IDataObject实例的最佳（简短且安全）方法是什么

---

我找到了一些代码，但也许有更好的解决方案。

< P>移植到Delphi的C++代码可能并不太困难。 从

type
  TDataObject = class(TInterfacedObject, IDataObject)

---

并实现C++示例中所需的方法。

是的，我同意，实际上看起来并不那么难。也许我可以使用IShellFolder的GetUIObjectOf方法，查看我的Delphi代码示例链接，而不实现IDataObject。