type TNotifyEvent = procedure (Sender: TObject) ofobject;DescriptionThe TNotifyEvent type is the type for events that have no event-specific parameters. These events simply notify the component that a specific event occurred. For example, OnClick, which is of type TNotifyEvent, notifies the control that a click event occurred on the control.The Sender parameter is the object whose event handler is called.  
                        ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
For example,.with the OnClick event of a button, the Sender parameter is the button component that is clicked.

解决方案 »

  1.   

    一个事件处理过程可被多个组件的不同事件共同响应,可以通过事件处理过程的Sender参数来确定消息来源。
    举例:
    Button1和Button2的Onclike事件可以都指向Button1Click,则可以有以下用法:
    procedure TForm1.Button1Click(Sender:TObject)
    begin
      if (Sender=Button1) then
          ............
      if (Sender=Button2) then
          ............
    end;
        
      

  2.   

    事件产生者。比如人说话,说话只是行为,而说话的主体是人, Sender 就是指人这样一个角色
      

  3.   

    SENDER代表发送消息的控件对象,其中包括了关于这个控件的详细信息