仓库管理软件版1楼: 我知道弹出文本文件用下面这句。
WinExec(＇＇notepad help.txt＇＇,1);
要是我现在想弹出CHM文件，要怎么改一下？

2楼: 首先，在implementation里，作如下声明：

function HtmlHelpA(hwndCaller: THandle; pazfile: String;

uCommand, dwData: DWord): DWord; stdcall external ＇＇hhctrl.ocx＇＇;

然后就可以进行使用，例如：

HtmlHelpA (handle, ＇＇c＼winnt＼help＼access.chm＇＇, 0, 0); 如金蝶财务软件价格

3楼: ＇＇hhctrl.ocx＇＇;这是个什么控件？
HtmlHelpA (handle, ＇＇c＼winnt＼help＼access.chm＇＇, 0, 0);
如果我要弹出本目录下的access.chm呢？

4楼: ShellExecute(0, ＇＇open＇＇, ＇＇help.chm＇＇, nil, nil, SW_SHOW);

5楼: HtmlHelpA (handle, ＇＇.＼access.chm＇＇, 0, 0);

6楼: 没错，ShellExecute

仓库管理软件版7楼: 多人接受答案了。