在 delphi 中, 要调用 chm 文件可以通过引用 hhctrl.ocx 文件的函数 htmlhelpa 实现。
不过在这里 , API 函数 Shellexecute 来打开 CHM 帮助文件。
在网上找到的资料 , 通常以
Shellexecute (self.handle, 'open', 'hold.chm', '', '', sw_show);?
的方式来实现。
但有个不足 , 就是不能打开指定的帮助页面 所显示的是帮助文档的起始页面。
想到 CHM 文件被关联到 hh.exe 程序 , 那只要执行 hh.exe 程序 , 并传入指定页面的地址 则应该可以打开指定帮助页面。 则应该可以打开指定帮助页面。
方法如下 :
Shellexecute (Self.Handle
,'открыть'
, 'hh.exe'
, 'mk: @msitstore:' + extractfilepath (application.exename) + 'wordimggener.chm ::/html/wallow.htm'
, ''
, Sw_show);?
只要在 Форма 的 Onhelp 事件中 , 对应当前 ActiveControl , 传入相应的地址就可以显示相关的帮助信息。
也可以在 Форма 中加入一个 список действий, 添加一个动作 设置快捷键为 f1 , 在 Выполнить 事件中调用上面的函数来打开 chm 帮助文档 , 当不失是一个简便的方法。