这种过程声明表示什么意思？
TNotifyEvent = procedure(Sender: TObject) of object; procedure?
[解决办法]
定义函数指针.