Delphi中PopupMenu.HelpContext设为0时按F1提示无上下文帮助的原因

我创建了一个包含弹出菜单（PopupMenu）和按钮的VCL程序，相关代码如下：

Button1.PopupMenu := PopupMenu1;
PopupMenu1.HelpContext := 0;

当我将鼠标移至MenuItem上并按下F1键时，系统弹出提示：“未安装上下文相关帮助”。我了解到HelpContext = 0代表无帮助，但为何会出现该提示？此问题在Delphi 2010和Delphi 10.3中均存在。

VCL的帮助系统逻辑是：在菜单项上按下F1时，会先检查当前MenuItem的HelpContext值。如果MenuItem未显式设置HelpContext（默认值为0），它会向上查找父控件（即PopupMenu）的HelpContext。即便PopupMenu的HelpContext设为0，VCL不会直接忽略帮助请求，而是触发默认的“未安装上下文相关帮助”提示——这是VCL帮助系统的固有行为，当找不到有效帮助上下文时，就会弹出该提示而非静默处理。

有两种可行的处理方式：

• 给每个MenuItem显式设置HelpContext := 0：让每个菜单项自身明确标记为无帮助，VCL就不会触发默认提示
• 给PopupMenu添加OnHelp事件处理，手动取消默认提示：

procedure TForm1.PopupMenu1Help(Sender: TObject; HelpType: THelpType; var HelpCtx: Integer; var HelpFile: string; var Cancel: Boolean);
begin
  Cancel := True; // 阻止系统弹出默认帮助提示
end;

内容的提问来源于stack exchange，提问作者AA ALJEMA