一段delphi代码 不知道什么作用求解释

type  
  TMyNotifyEvent=procedure (Sender:TObject;FileNames:TStringList) of object;
......  published
    property OnDropFiles:TMyNotifyEvent read FDropFile write FDropFile;
这是这段 谁能帮我详细解释下

解决方案 »

  1.   

      还少一句
      private   FDropFile :TMyNotifyEvent
     随便解释下：
     TMyNotifyEvent=procedure (Sender:TObject;FileNames:TStringList) of object;
      这是通知事件方法；
       property OnDropFiles:TMyNotifyEvent read FDropFile write FDropFile; 
      这是某个控件的OnDropFiles属性，通过对这个属性来修改FDropFile值，
      假设 OnDropFiles：=myprocedre;
      我们将myprocedre赋给FDropFile;
      那么，当这个DropFiles事件触发的时候，我们会启用FDropFile这个方法，而这个方法就是后来赋给它的
      myprocedre，程序进入myprocedre当中。 
     
      
      

  2.   

    定义一个过程类型：TMyNotifyEvent
    定义一个过程变量：FDropFile 
    定义类的published属性：OnDropFiles （来读写过程变量FDropFile ）
      

  3.   

    学习学习中>>>>>>>>>>>>>>