将“粘贴”添加到Shell上下文菜单

Question

我正在使用此例程弹出Shell上下文菜单，找到一个运行良好的文件名，除了一件事。

How to pop-up the Windows context menu for a given file using Delphi?

当我点击“复制”时，菜单会按预期关闭。如果我移动到另一个文件夹或保持在同一个文件夹中，当我再次右键单击上下文菜单时，它没有“粘贴”选项。甚至不是灰色的。我检查了海报的博客，如他在底部的编辑中所提到的那样，但是这个新例程会因为参数不正确而崩溃。

有人可以协助将“粘贴”添加到上述链接中的原始例程

由于

Answer 1

查找TClipboard（库/使用ClipBrd）。使用它，您可以在Delphi上管理cliboard。

更多信息：Basic CLipboard Operations

Obs。：根据您的需要，您也可以使用“操作”。请参阅弹出菜单的ActionManager组件和操作属性。