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

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(Sender.ClassName);
end;
 
procedure TForm1.Button2Click(Sender: TObject);
begin
  Button1Click(Button2);
  Button1Click(Form1);
end;
 
全文:http://bbs.csdn.net/topics/320135034
posted @ 2015-05-22 10:07  stma  阅读(189)  评论(0)    收藏  举报