请问一个关于打开文件的问题（调用其它文件）

Question

我编了一个小系统，也同时做了一个帮助文件（chm格式），可是我不知道怎么调用这个帮助文件，也就是说我想在菜单栏的“系统帮助”按钮上按一下，就能帮助文件调用出来。我是位新手，现在在做毕业设计，时间很紧，哪位大侠能帮小弟解决这个问题吗？谢谢了

Answer 1

str:=ExtractFilePath(Application.ExeName)+'GsmPhoneHelp.chm';
ShellExecute(Handle,'open',PChar(str),nil,nil,SW_SHOWNORMAL);

Answer 2

ExtractFilePath(Application.ExeName) 这个是取程序的当前目录 
后面加上你的.chm文件名.
这样str就是完整的文件路径
uses 里加 shellapi;

Answer 3

procedure TfMain.N1Click(Sender: TObject);
begin
  WinExec(PChar('hh.exe ' + ExtractFilePath(Application.ExeName) +
    'Help\DocumentHelp.chm'), SW_SHOWMAXIMIZED);
end;