DELPHI如何执行*.chm的帮助文档文件!急!

Question

DELPHI如何执行*.chm的帮助文档文件!急!

Answer 1

use shellapi;
...
ShellExecute(application.handle,'open','c:\myhelp\help.chm','','',sw_show);
或
ShellExecute(0,'open','help.chm',nil,nil,0);

Answer 2

加shellapi单元的shellexecute(handle,'open',pchar('c:\test.chm'),nil,nil,SW_SHOWMAXIMIZED);
//自己相应改改目录和文件名

Answer 3

嘿 ！和我相同的时间发的， samcrm(阿靖) ( ) 兄的居然在前 ！呵呵

Answer 4

use shellapi;
...
ShellExecute(0,'open','help.chm',nil,nil,0);

Answer 5

function HtmlHelpA(hwndCaller: THandle; pazFile: String; uCommand, dwData: DWord): DWord; stdcall external 'hhctrl.ocx';
//调用hhctrl.ocx的HtmlHelpA函数，使用CHM格式的帮助文件procedure TFormMain.ButtonHelpClick(Sender: TObject);
var ChmFileName: String;
begin    // 显示CHM格式的帮助文件
  ChmFileName:=ExtractFilePath(Paramstr(0))+'help.chm';
  if FIleExists(ChmFileName) then
    HtmlHelpA(handle,'help.chm',0,0)
  else
    Application.MessageBox('没有找到帮助文件'+#13+'检查软件是否安装完整！','提醒',MB_OK+MB_ICONINFORMATION);

Answer 6

就是上面的方法
想要强大的找一个CHM帮助单元，有网站的操作的，还可以打开其中的页面Google可以找到

Answer 7

我有一个delphi版的chm帮助单元。
楼主要的话，留个email吧。

Answer 8

ShellExecute(0,'open','help.chm',nil,nil,0);