请各位大虾帮忙如何在delphi中指定帮助文件的页面

Question

问题：我的帮助文件名：help.chm  在程序中要多处调用这个文件。每处调用时想让它打开到想要翻到的那一页。请问能实现吗？其中一处调用的代码如下：(但这样做只能打开文件，不能指定翻到那一页。请各位大虾帮忙。）uses shellapiprocedure TForm1.helpClick(Sender: TObject);
var  HWndHelp:Hwnd;
     i:integer;
begin
   //检查帮助窗口是否已经存在   HWndHelp:=FindWindow(nil, '帮助文件‘);   if HwndHelp<>0 then  // 如存在则关闭        SendMessage(HwndHelp,WM_CLOSE,0,0);   i:=ShellExecute(handle, 'open', Pchar('.\help.chm'), nil, nil, sw_ShowNormal);   if i<>42 then  
      Showmessage('help.chm 帮助文件损坏！');
end;

Answer 1

具体可以这样： 首先在project-options中设置好帮助文件的路径。 然后在某个按钮或是别的中写如下事件就成哩：   application.helpcontext(xx);xx是你在制作帮助文件时该主题的context number的数值。

Answer 2

你想翻到那页就把context number的数值设置为那页的数值。