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

时间:2010-04-14 01:02:39

标签: delphi inheritance parent delphi-2007 popupmenu

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

2 个答案:

答案 0 :(得分:5)

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

答案 1 :(得分:4)

这是QC#54286: Parent-PopupMenu overrides standard context menu。 Andreas Hausladen的VCL Fix Pack解决了这个问题,因此它的工作方式与你期望的一样。