Delphi处理事件函数中的Sender: TObject代表什么？

Posted 2021-01-10 jijm123

下面这个按钮点击事件中，Sender代表谁？

procedure Tsomain.ToolButton1Click(Sender: TObject);

是代表事件的拥有者吗？

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(Sender.ClassName);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  Button1Click(Button2);
  Button1Click(Form1);
end;

代表响应这个事件的当前的控件
比如你上面那个事件，sender就是被点击的那个按钮

按照语义来说是被触发的那个控件

当然也并不一定 如果自己调用这个参数可以传任意对象

代表响应这个事件的当前的控件;ToolButton1的click事件.
当然也并不一定 如果自己调用这个参数可以传任意对象;

向下转型的类参数，用处还有很多