本人自学delphi,遇到一问题.希望有高手可以解答:如何在一个程序或软件中链接一个帮助文件,运行程序是点击"帮助文件"在窗口外打开帮助文件

procedure TForm1.N13Click(Sender: TObject); var HWndHelp:Hwnd; i:integer; begin

//检查帮助窗口是否已经存在

HWndHelp:=FindWindow(nil,'系统帮助文件');

if HwndHelp<>0 then // 如存在则关闭

SendMessage(HwndHelp,WM_CLOSE,0,0);

i:=ShellExecute(handle, 'open',Pchar('\help.chm'),nil, nil, sw_ShowNormal);

end; 以上适用于打开文件名为*.chm后缀的帮助文件,此处仅以help.chm举例说明,请把帮助文件放在可执行文件的根目录