10.3.3 事件是属性
在 Object Pascal 中一个非常重要的概念是,事件几乎都是作为方法指针类型的属性来实现的。这意味着,要处理一个组件的事件,需要为相应的事件属性指定一个方法。就代码而言,这意味着你可以为一个事件处理器分配一个对象的方法,使用的代码下面这样,我们以及在上一节见过了:
Button1.OnClick := ButtonClickHandler;
再一次强调,事件的方法指针类型必须与所赋值方法的签名相匹配,否则编译器会出错。
系统为事件定义了几种常用的标准方法指针类型,首先是简单类型:
typeTNotifyEvent = procedure(Sender: TObject) of object;
这通常是 OnClick 事件处理器的类型,因此这意味着上述方法必须(在类中)声明为:
procedure ButtonClickHandler(Sender: TObject);
如果这听起来有点令人困惑,请思考一下在IDE中所发生的:选择一个按钮,比方说 Button1,双击它,在开发环境的 "对象检查器 "中列出的OnClick 事件中,一个新的空方法会被添加到容器模块(可能是窗体)中:
procedure TForm1.Button1Click(Sender: TObject)
beginend;
你填写方法的代码,然后,一切正常!这是因为将事件处理器方法赋值给事件是在幕后进行的,与您在设计时为其他组件设置属性的方式完全相同。
从上面的描述中,你可以了解到事件与其分配的方法之间并不存在一一对应的关系。恰恰相反。可以有多个事件共享同一个事件处理器,这也是经常使用的发送者参数的原因,该参数表示哪个对象触发了事件。例如,如果为两个按钮设置了相同的 OnClick 事件处理器,那么 Sender 值将包含对被点击的按钮对象的引用。
注意 您可以在代码中为不同的事件分配相同的方法,如上所示,也可以在设计时这样做。在 "对象检查器 "中选择事件时,按下事件名称右侧的箭头按钮,可以看到 "兼容 "方法的下拉列表–具有相同方法指针类型的方法列表。这样就可以轻松地为不同组件的同一事件选择相同的方法。在某些情况下,您还可以为同一组件的不同兼容事件分配相同的处理器。