Delphi 如何将文本字符串及其超链接从HTML页面拖动到TEdit

我希望将文本字符串及其超链接从HTML页面拖到TEdit页面。 比如说

显示

aaa

实际字符串是

我尝试使用拖放vcl，但发现它只能捕获

aaa

本身，而不能捕获字符串及其超链接

欢迎评论

谢谢

---

interdev

免费下载安德斯·梅兰德的作品。您将在其中找到要放在表单上的

TDropURLTarget

。将其

Target

属性设置为引用您的

TEdit

控件，当URL放到该控件中时，组件的

URL

和

Title

属性将更新，以便您可以在

OnDrop

事件处理程序中检查它们。该套件附带了几个示例；TargetDemo有一些基础知识。

另一个很好的库是Raize DropMaster

不管怎样，我相信你可以做你想做的事情，但也许会变成HTML或RTF拖放？很难说。例如，我可以将这个页面上的超链接列表（在右边的“RELATED”下）拖放到Word中，它们都会显示出来，并带有超链接。 所以这是可能的。但我怀疑WinWord正在以HTML的形式消失

---

无论如何，Rob关于查看示例的建议是很好的——在该库和Raize之间，您应该找到一些可以用作原型的东西。

谢谢。我正在使用这个vcl。我想这只适用于grag&drop单超链接。我更喜欢选择一系列字符串，拖放以一次性捕获它们的超链接。但是浏览器不会一次发送一个超链接，而且您无法接收未发送的内容。在您的情况下，正在拖动的是一块文本，因此看起来您需要使用普通的

TDropTarget

组件，并查找与

THTMLClipboardFormat

或

TTextClipboardFormat

匹配的内容。然后解析文本中的HTML以查找超链接。如何解析HTML可能会在堆栈溢出的其他问题中涉及。谢谢。Raize Dropmaster也可以做我想做的事。