事件event

 event 是用来连接一个系统触发事件与响应这个触发事件的处理方法的.
通常event是一个指向类实例方法的方法指针;

事件也是一种属性, 因此一般定义如下:
FOnUpdateMinute: TNotifyEvent;
property OnUpdateMinute: TNotifyEvent read FOnUpdateMinute write OnUpdateMinute;
procedure OnUpdateMinute(const Value: TNotifyEvent);

TNotifyEvent 的定义:
type TNotifyEvent = procedure (Sender: TObject) of object; // 事件方法是一个过程

事件方法是可选的, 即必须提供默认的事件处理代码.


使用标准事件:
VCL组件继承了标准事件, 一般是 protected.

标准事件分为两类:
一种是所有控件(继承于TControl)共有的: 如鼠标事件, 键盘事件; 一般都有对应的回调方法:
OnClick--> Click; OnEndDrag--> DoEndDrag.
一种是标准控件(继承于TWinControl):
如: OnEnter, OnKeyDown, OnKeyPress, OnExit.
响应windows消息 WM_GETDLGCODE 或 CM_WANTSPECIALKEYS处理特殊按键(如Alt).

TControl 和 TWinControl中的标准事件一般定义在 Protected中.
从这两个类中继承的子类的事件需要在Public或published 中重新定义.

重写事件的处理方法: override, inherited;

自定义事件:
1. 触发事件 -- 什么情况下触发定义的事件; 鼠标,键盘,时间,状态改变等.
2. 事件方法类型:
 TNotifyEvent: 仅仅发出事件已经发生的通知, 不带有参数.
 特殊事件类型: 比如键盘事件就附加有按键信息; 消息事件通过消息参数传递信息;
 事件方法中返回信息: 因为所有的事件方法都是 procedure, 只有通过 var 参数来返回事件是否处理;
 OnKeyDown, OnKeyUp, and OnKeyPress 即传递 var key 参数.
3. 声明事件:
 事件一般以 On 前缀命名, 在通讯和数据库组件事件中也有 Before, After 前缀.
4. 调用事件:
   默认的事件处理代码;
   覆盖 override 默认的事件处理方法;


 

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值