请问如何执行chm帮助文件！急。。。。。

Question

请问如何执行chm帮助文件，请高手帮帮忙

Answer 1

用HCW.exe转化word为.hlp文件然后:
begin
   if FileExists('help.hlp') then
   begin
     Application.HelpFile :='help.hlp';
     Application.HelpCommand(HELP_FINDER, 0);
   end
   else
     Application.MessageBox('帮助文件不存在!','信息提示',mb_iconError+mb_OK);
end;

Answer 2

或者在uses 中加入　　Shellapi在click中写以下代码，就可以了
ShellExecute(handle,'open',pchar('help.chm'),nil,nil,SW_SHOWNORMAL);