delphi - 阻止 VCL 子控件继承父弹出菜单

Question

我有一个分配给它的 TPopupMenu 的 Delphi 2007 VCL TPanel。面板上有一些 TEdit 控件。编辑继承父面板的弹出菜单。我不想让这个弹出窗口继承，所以编辑将显示默认的 Windows TEdit 弹出菜单，包括复制、剪切、粘贴等，但还没有找到方法。似乎没有“ParentPopupMenu”类型的属性来设置哪些控件从父组件继承它。

Answer 1

尝试将 PopupMenu 的 AutoPopup 属性设置为 False，然后在需要时手动 Popup() 菜单，就像在 TPanel 的 OnContextMenu 事件中一样。

Answer 2

这是QC#54286：Parent-PopupMenu 覆盖标准上下文菜单。Andreas Hausladen 的VCL Fix Pack修复了这个问题，因此它可以按照您期望的方式工作。