TMenuItem 使用 Delphi 5 自动检查

【问题标题】：TMenuItem auto checked with Delphi 5TMenuItem 使用 Delphi 5 自动检查
【发布时间】：2009-06-23 14:56:07
【问题描述】：

创建自定义 TMenuItem 以自动管理其选中属性的正确方法是什么。请记住，一旦有人会：

myHelloItem.OnClick := helloword;

那么行为就丢失了……

这在 Delphi 7 中是如何实现的？

问候，

【问题讨论】：

标签： delphi vcl

【解决方案1】：

两种选择：

您有一个 AutoCheck 属性，无论 OnClick 行为如何，每次单击都会切换该菜单项的复选标记（尽管我相信 OnClick 实现可以覆盖 AutoCheck）。然而，它限制了功能。
您可以继承 TMenuItem 并在 Click 方法中实现您想要的行为，该方法调用“OnClick”

【讨论】：