一个关于帮助的简单问题(35分)

C

cslotus

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-10

• #1

怎样将已制作好的chm帮助文件嵌入Delphi程序，就象.hlp文件一样按F1即弹出帮助？

 

M

maginnn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-11

• #2

begin
if (not winhelp (handle,'helpguide,hlp',help_finder,0)) then
begin
showmessage('不能访问帮助文件');
exit;
end;
end;

按f1

begin
if key=vk_f1 then
winhelp(......);
end;

 

C

cslotus

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-13

• #3

按F1通过写代码的方式好象不行，而且也不是很标准

 

Z

zhem8

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-13

• #4

你可以在FORM的ONKEYDOWN事件里写如下代码：
if key=112 then //112是F1键的ASC码。
shellexecute(handle,'open','temp.chm',null,null,sw_showmodal);

 

C

cslotus

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-13

• #5

单纯这样写好象通不过，ShellExecute是包含在哪个库里的？

 

Y

yzhshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-13

• #6

uses shellapi
不过推荐使用HtmlHelp来实现。

 

Y

yzhshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-13

• #7

Function HtmlHelp(hwd : integer;pszFile : String;uCommand :Integer;dwData :LongInt):integer; stdcall;external 'HHCtrl.ocx' name 'HtmlHelpA';