ITPub博客

首页 > IT基础架构 > 网络安全 > 利用OnHelp( )在BCB中实现上下文敏感的html help (转)

利用OnHelp( )在BCB中实现上下文敏感的html help (转)

原创 网络安全 作者:gugu99 时间:2007-11-02 13:47:34 0 删除 编辑
利用OnHelp( )在BCB中实现上下文敏感的html help (转)[@more@]

关于Html Help,在CSDN上推荐得最多的是如何利用shellExecute( )或HtmlHelp( )来打开相应的帮助文件和帮助主题。本人在查找了一些资料后试验成功一种在BCB中简单易行的显示上下文敏感的Html Help的方法,其效果和旧式的上下文敏感的WinHelp( )完全相同。这种方法的代码量小,而且可扩展性好,当你以后在帮助文件中增加主题时根本不需要再改动你的代码,只需要修改chm文件和窗体上各控件的HelpContext属性值即可。

假定程序的chm帮助文件中有三个主题文件1.htm、2.htm、3.htm,窗体上有3个TEdit控件,要达到的目的为:
当在第一个TEdit控件上按F1键时显示1.htm的内容,在第二个TEdit控件上按F1键时显示2.htm的内容,依次类推。这就是所谓的上下文敏感帮助。
当然你可以通过截获F1键并判断当前是哪个TEdit控件拥有输入焦点,从而调用ShellExecute( )或HtmlHelp( )来显示相应的html主题。但这种方法可扩展性不好,以后增加html文件时需要修改程序代码。

做法如下:

1、用文本编辑器直接编辑html help的project文件*.hhp,加入下面的内容。也可以通过html help workshop的界面加入。这相当于将3个html文件映射为3个context ID。之后重新编译你的project。

[ALIAS]
IDH_CHAPTER1 = 1.htm
IDH_CHAPTER2 = 2.htm
IDH_CHAPTER3 = 3.htm

[MAP]
#define IDH_CHAPTER1 1001
#define IDH_CHAPTER2 1002
#define IDH_CHAPTER3 1003

2、设置窗体上的3个TEdit控件的HelpContext属性分别为1001、1002、1003。

3、修改程序代码,重载TApplication->OnHelp(当然也可以重载各Form的OnHelp),利用HtmlHelp( )来显示相应的上下文敏感帮助。当Command取值为HELP_CONTEXT时,Data就是你按F1键时拥有输入焦点的那个控件的HelpContext属性值。

__fastcall TForm1::TForm1(TComponent* Owner)
  : TForm(Owner)
{
  Application->HelpFile = "Main.chm";
  Application->OnHelp = AppHelp;
}
//--------------------------------------------------------------------------
bool __fastcall TForm1::AppHelp(word Command, int Data, bool &CallHelp)
{
  switch(Command)
  {
  case HELP_CONTEXT:

  HtmlHelp(GetDesktopWindow(), Application->HelpFile.c_str( ), HH_HELP_CONTEXT, Data);
  CallHelp = false;

  break;

  default:

  CallHelp = true;
  }

  return true;
}
//--------------------------------------------------------------------------
void __fastcall TForm1::FormClose(Tobject *Sender, TCloseAction &Action)
{
  HtmlHelp(NULL, NULL, HH_CLOSE_ALL, 0);
}
//---------------------------------------------------------------------------

这样就Ok了。上述没有保存Application->OnHelp的旧值,也没有处理Command为其它值的情况,可根据需要加上。


来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/10748419/viewspace-980460/,如需转载,请注明出处,否则将追究法律责任。

请登录后发表评论 登录
全部评论
  • 博文量
    3122
  • 访问量
    2244117