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

Question

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

如何使用 Delphi 为给定文件弹出 Windows 上下文菜单？

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

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

谢谢

Answer 1

寻找 TClipboard（库/使用 ClipBrd）。使用它，您可以在 Delphi 上管理剪贴板。

更多信息：基本剪贴板操作

观察：您也可以使用“操作”，具体取决于您的需要。请参阅 ActionManager 组件和弹出菜单的 Action 属性。