调用帮助文件.txt

来自「创建异形窗体可以创建出各种各样的异形窗体」· 文本 代码 · 共 19 行

帮助功能

程序的帮助功能一般都是打开帮助文件，做的比较好的帮助文件就是能上下文关联，但这是比较麻烦的。目前一般的帮助功能都是打开CHM格式的文件，所有的帮助内容都在其中。现在hlp文件用的越来越少。打开一个CHM格式的文件代码如下：
先在uses中加入shellapi函数.
procedure TMainForm.help1Click(Sender: TObject);

var fpath:string;

begin

fpath:=ExtractFilePath(ParamStr(0))+'help.chm';

ShellExecute(handle,nil,pchar(fpath),nil,nil,sw_shownormal);

end;

上面的代码中，首先获取当前执行文件（EXE文件）所在的路径，然后在此路径下寻找help.chm帮助文件并打开它，这就要求帮助文件和执行文件要放在同一目录下，如果你的帮助文件很多，有单独的子文件夹，那么对上述代码做一点修改即可。