事件声明
EVENT Name ( [ Parameter #1 [ , Parameter #2 ... ] )
声明一个
类的
事件,使用
RAISE关键字可引发该
事件。
RAISE关键字可以返回一个布尔值,用来表示事件处理是否取消了该事件。
Example
EVENT BeforeSend(Data AS String)
...
DIM bResult AS Boolean
' Raises the event
bResult = RAISE BeforeSend("MyData")
IF bResult THEN
PRINT "Canceled !"
ENDIF
事件处理
作为缺省,将
对象名称_事件名称作为事件发生时事件监听程序调用的方法名称。
例如,如果有一个调用FancyButton的
类而且发生调用FancyClick的
事件,而且被FMain调用的窗体有名为MyButton的FancyButton
对象,则
事件处理方法的声明就像下面这样:
PUBLIC SUB MyButton_FancyClick(...)
缺省的行为可以被改变,就像这样:参见
Object.Attach和静态
Object 类的另一个方法,除了控件组(其信息应用于任一个发生事件的
类)以外,