网站导航免费论文 原创论文 论文搜索 原创论文 网学软件 学术大家 资料中心 会员中心 问题解答 原创论文 论文素材 设计下载 最新论文 下载排行 论文上传 在线投稿 联系我们
返回网学首页
网学联系
最新论文 推荐专题 热门论文 素材专题
当前位置: 网学 > 编程文档 > DELPHI > 正文
OnHint事件的应用
来源:Http://myeducs.cn 联系QQ:点击这里给我发消息 作者: 用户投稿 来源: 网络 发布时间: 12/10/12
下载{$ArticleTitle}原创论文样式

|" 字符会分开,例如: 

   Edit.Hint := ''Name |Enter Name in the edit box'' 

等价于

   Edit.Hint := Name;

Application.Hint := Enter Name in the edit box 

应用程序的Hint属性可用在OnHint事件。

  如果只定义了一个值,Delphi把这个值同时赋给部件和应用程序部件的Hint属性。 如果应用程序的ShowHint属性为假值,所有的帮助提示将不显示, 但可以利用程序部件的Hint属性显示其它提示,如状态条等。SHowHint属性为真, 但又没有定义Hint 属性, 如果此时文件定义了Hint属性,则此部件将使用文件的Hint值。 

11.3.2 OnHint事件 

  当用户把鼠标放在某一部件,而该部件的Hint 值不为空值,此时发生OnHint事件。利用OnHint事件可以执行一些特殊的操作。

  最常用是利用OnHint事件显示状态条的标题,状态条是用面板来实现的。下面举例说明。

  这个例子使用了面板部件,菜单,一个编辑框。菜单可随意设计, 但需记住每个菜单项的Hint 值。 另外, 定义编辑框的Hint 值, 把面板置于窗体底部( 将Align 属性置于dBotton) 把面板标题置于左端(将Alignment属性置于taleftJustify) 。

  OnHint 事件是应用程序部件的事件,而应用程序部件是非可视部件,不能使用Object Inspector窗体定义事件,必须编写自己的OnHint事件。TForm1对象中宣称DisplayHint方法,并在单元的implementation部分编写实现代码。在DisplayHint方法中,把应用程序的Hint属性赋给面板的标题。另一个重要问题是必须把DisplayHint方法作为处理OnHint事件的方法。窗体的OnCreate事件的代码解决了这个问题

  首先,在


下面列出了程序的完整代码。当用户运行程序, 把鼠标置于菜单或部件之上,在窗体的状态条中将出现定义的提示。 

Type

TForm1 = class(TForm)

Button1: TButton;

Panel1: TPanel;

Edit1: TEdit;

procedure FormCreate(Sender: TObject);

private

{ Private declarations }

public

procedure DisplayHint(Sender: TObject);

end;

var

Form1: TForm1;

implementation

{$R *.FRM}

procedure TForm1.DisplayHint(Sender: TObject);

begin

Panel1.Caption := Application.Hint;

end;

procedure TForm1.FormCreate(Sender: TObject);

begin

Application.OnHint := DisplayHint;

end; 

11.4 自定义部件的帮助安装 

  Delphi有一个功能强大的帮助搜询引擎,叫做多层帮助,能为自定义的部件提供“上下文敏感”帮助。多层帮助允许把自定义部件的多个帮助文件安装成Delphi 的帮助序列,以提供给用户一种内层访问帮助文件的方式,用户有三种方法访问帮助文件:

  1. 设计状态选中部件,然后按F1;2. 在自定义部件的Object Inspector窗口中按F1;3. 在Delphi帮助系统选择搜询主题。Delphi 在提供这种帮助机制时, 不需要编写额外的代码。 有些文件是自定义部件帮助系统所必须的, 以下介绍安装的具体步骤。

  

  

  

  安装所需的文件

  STEREO.PAS     自定义部件的源代码

STEREO.RES     自定义部件的资源文件

STEREO.DCR     工具调色板图标0

STEREO.HRJ     帮助工程文件

STEREO.RTF     帮助源文件

STEREO.HLP     自定义部件的帮助文件

STEREO.KUF     关键字文件

  安装步骤 

11.4.1 安装关键字文件 

1. 退出Delphi集成开发环境

2. 备份\delphi\bin\delphi.hdx

3. 运行HelpInst应用程序

4. 打开\delphi\bin\delphi.hdx

5. 选择888 |Add菜单项并选择Sberee.buf

6. 选择File|Source

菜单项


7. 退出HelpInst

8. 因为WinHelp需要知道STEREO.HLP的位置所以要做以下其中之一:

    a. 把STEREO.Hlp复制到\delphi:\bin\目录下;

    b. 在WinHELP.INI文件中加上stereo.hlp=\usehelp; 

11.4.2 安装自定义部件 

1. 进入Delphi集成开发环境

2. 选择Option|Install Components菜单项

3. 选择Add

4. 选择Browse

5. 输入\stereo

6. 选择OK 

11.4.3 激活自定义部件帮助系统 

  1. TstereoButton和TStereeSpeaker部件从部件调色板上的Sample页拖至窗口;

2. 选择TStereoButton部件并按F1,屏幕上出现关于TStereoButton的帮助信息;

3. 在Object Inspector窗体口选择IsOn属性并按F1,屏幕显示IsOn属性;

4. 在主菜单中选择Help|Topic菜单项,并搜询Stereo 主题, 屏幕将出现STEREO

.HLP的帮助内容。

 

  当某一部件的
 

  • 上一篇资讯: 修改标题栏
  • 下一篇资讯: 俄罗斯方块delphi
  • 网学推荐

    免费论文

    原创论文

    浏览:
    设为首页 | 加入收藏 | 论文首页 | 论文专题 | 设计下载 | 网学软件 | 论文模板 | 论文资源 | 程序设计 | 关于网学 | 站内搜索 | 网学留言 | 友情链接 | 资料中心
    版权所有 QQ:3710167 邮箱:3710167@qq.com 网学网 [Myeducs.cn] 您电脑的分辨率是 像素
    Copyright 2008-2015 myeducs.Cn www.myeducs.Cn All Rights Reserved
    湘ICP备09003080号