DELPHI在建立类时能不能加入事件？DELPHI的消息机制又是怎样的？

Question

可以加入事件声明，如
  published
     MyEvent : TNotifyEvent read FMyEvent ....

Answer 1

private
  .......
protected
  .......procedure FmClose(var msg:Tmessage);message WM_CLOSE;
procedure TForm1.FmClose(var msg:Tmessage);
begin
showmessage('你关掉了.......');
end;

Answer 2

一般是从基类扩展，其实利用基类的事件。
比如 onclick－－－》onselected 这其中的处理应该可以想像的到吧。
当然，你首先要定义一个onselected 事件

Answer 3

DELPHI在建立类时能不能加入事件？ 可以