请问这段语法是什么意思啊？谢谢

Question

TInternetExplorerCommandStateChange = procedure(Sender: TObject; Command: Integer; 
                                                                   Enable: WordBool) of object;
像上面这种声明代表什么意思呢我知道像 procedure 过程名(参数)但上面那种却是什么意思呢？

Answer 1

定义了一种TInternetExplorerCommandStateChange类型,目的是为了用过程作参数

Answer 2

这个语句是在VCL里的啊再次请教给个明白的答案啊

Answer 3

of object:这个关键词是指你定义了一个事件类型的指针；
TInternetExplorerCommandStateChange：这是指定义一个事件类型名称，也就是“当IE的命令状态发生改变时执行的事”的意思；
procedure(Sender: TObject; Command: Integer; Enable: WordBool);
这是过程是没有名称的，其实这是所定义的事件执行过程的原型；在为此事件指针指定对应过程时，该过程的型式必与上面定义一样。但名称可以是任意合法的过程名称；你可以参考如下定义：
  TMouseClickEvent=procedure(sender:TObject) of object;
  type
    TButton=class(t...)
       prative
          FClick:TMouseclickEvent;
       ...
       publish
          property OnClick Read FClick....;
    end;

Answer 4

谢谢  dinglinger(红辣椒) (  结贴