说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

各位大虾,小弟有100分送上*_*,有谁知道如何在Delphi中调用.CHM格式的帮助文件?

编辑:说三道四文库 发布时间:2018-04-23 06:22
HTML文档下载 WORD文档下载 PDF文档下载
欢迎提出详细方案。(最好有编码)
另有谁知道什么工具做.CHM格式的帮助文件比较方便,及下载网址?
Application.Help := Help1.chm
Application.HelpFile := 'C:\MyHelp.CHM'
1.WinExec('myhelp.chm');
2.
uses ShellAPI;
ShellExecute();

3.CreateProcess;

4.Help Design或Help&Manual
ShellExecute(0,'open','help.chm',nil,nil,0); 
在uses加入shellapi
工具使用微软的HTML WorkShop罢,权威,任何一张Visual Studio中都有。

1、先找到HTMLHlp.Pas(安装了HTML WorkShop的目录应该有)
2、将这个PAS加入到工程中
3、在要调用的单元中加入对这个单元的引用。
  Uses HTMLHlp;
4、用这种方法调用:
  HtmlHelpA(Handle,PChar(HelpFile),HH_DISPLAY_TOC,0);
变化第三个参数,可以在打开帮助时得到不同的效果(比如打开目录、索引、搜索或者直接打开某个帮助主题)。 
 

你试试一定行,这是我的软件中的调用帮助的程序。

procedure TfrmMain.miHelpClick(Sender: TObject);
var
p:pchar;
begin
  if FileExists(ExtractFilePath(Application.Exename)+'HELP.chm') then
   begin
    p:=pchar(ExtractFilePath(Application.Exename)+'HELP.chm');
    ShellExecute(0, nil, p, nil, nil, SW_NORMAL);
   end
  else
   begin
    p:=pchar(ExtractFilePath(Application.Exename)+'heremed3.5帮助文件\hereinfoIndex.HTM');
    ShellExecute(0, nil, p, nil, nil, SW_NORMAL);
   end;
end;

如果没有这个PAS,贴上地址,我发给你。
这里可以下载 HTML Help Workshop   微软的
http://www.microsoft.com/downloads/release.asp?ReleaseID=33071&area=search&ordinal=1
http://www.csdn.net/expert/topic/625/625832.xml?temp=.9682428
多谢各位!
问题暂时已结,我会散分的!
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘