delphi – 从继承父弹出菜单中停止VCL子控件

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

解决方法

尝试将PopupMenu的Autopopup属性设置为False,然后在需要时手动弹出()菜单,因为在TPanel的OnContextMenu事件中.