Delphi的类和对象（五）- 初识类的事件