如何在Delphi 7中使用chm？

Question

如何在Delphi 7程序中从chm文件调用帮助？

Application.HelpFile := 'd:\help.chm';
Application.HelpCommand(HELP_CONTEXT, 10);

结果是

为什么无法从该程序获得帮助？

该程序的帮助是以Windows帮助格式创建的，该格式取决于此Windows版本中未包含的功能。 但是，您可以下载一个程序，该程序将允许您查看以Windows帮助格式创建的帮助。

有关更多信息，请访问Microsoft帮助和支持网站。

Answer 1

问题在于，默认情况下，Delphi 7假定帮助文件使用Vista附带的旧WinHelp格式。 即使您的帮助文件具有.chm扩展名，Delphi也会尝试使用WinHelp命令来显示它。 而且由于WinHelp不存在，您将收到报告的错误消息。

有多种方法可以获取帮助系统以显示HTML帮助。 例如，一种常见的技术是为Application对象实现OnHelp处理程序，并将帮助路由到对HtmlHelp API的调用。 我在最近的回答中给出了一个非常简单的例子。

Answer 2

要打开CHM文件，请使用以下代码：

    ShellExecute(Handle, 'open', PChar(ExtractFilePath(Application.ExeName) + 'help.chm'), nil, nil, SW_SHOW);