怎样在delphi 中调用帮助文件,急急!!!在线等待

Question

我搞了一个小东东,要在delphi 中调用帮助文件,帮助文件已经做好了
如:在
from1 中调用help.chm

Answer 1

procedure  GetCHMHelp(Title: String);
var
   myhelp: string;
   HWndHelp:HWnd;
begin
   //¼ì²é°ïÖú´°¿ÚÊÇ·ñÒѾ­´æÔÚ
   HWndHelp:=FindWindow(nil,'帮助中的标题');
    if HwndHelp<>0 then  // &Egrave;&ccedil;&acute;&aelig;&Ocirc;&Uacute;&Ocirc;ò&sup1;&Oslash;±&Otilde;
       SendMessage(HwndHelp,WM_CLOSE,0,0);   myhelp :='hh.exe '+ExtractFilePath(Application.ExeName)+'/MalCall.chm::/'+Title+'.htm';
   Winexec(pchar(myhelp),SW_SHOWMAXIMIZED);
end;

Answer 2

uses shellapi
shellexecute(handle,'open','help\**.chm',nil,nil,sw_shownormal);

Answer 3

如何在Delphi应用程序中调用文档
 
      在开发应用程序过程中， 为更好地方便用户熟悉此软件的功能和使用方法， 我们可以使用CHM的帮助文档。那么， 如何更好地使CHM文档融入到你的应用程序中呢？笔者谈谈一种简单、方便的方法， 以供参考。       在Win9.x的system目录下(或Win2000的system32目录下)可以找到hhctrl.ocx文件， 虽然这个文件是ActiveX， 但是它还可以当成DLL动态链接库使用，不过它必须在IE4.0以后才有提供。通过分析 hhctrl.ocx 文件，可以看出它提供了一个HtmlHelpA函数来对CHM文件进行调用。    首先，在implementation里，作如下声明：  function  HtmlHelpA(hwndCaller: THandle; pazFile: String;   uCommand, dwData: DWord): DWord; stdcall external ’hhctrl.ocx’;         然后就可以进行使用，例如：      HtmlHelpA (handle,  ’c\winnt\help\access.chm’,  0,  0);      非常简单吧， 试试看， 您一定行的， 为你的程序加入这个简单易行的功能吧！至于F1嘛，你可以给帮助菜单项加一个F1快捷键就可以了。