菜鸟问个问题：这个“Sender: TObject”究竟是干什么的？

Question

比如以下代码：
procedure TMainForm.ShowInfo(Sender: TObject);
begin
  MessageBox(MainForm.Handle, 'Menu Test OK!', 'Menu', MB_OK);
end;
procedure TMainForm.Button1Click(Sender: TObject);
var
  NewMenu: TMenuItem;begin
  NewMenu := TMenuItem.Create(Self);
  NewMenu.Caption := 'New Menu';
  NewMenu.OnClick := ShowInfo;
  MainMenu1.Items.Add(NewMenu);
end;
在一般情况下，这个Sender代表什么，在这个例子中，在ShwoInfo(Sender: TObject)中，这个Sender实际代表什么，和用户单击菜单的信息有关么？如果无关，那用户单击菜单的信息怎样知道。请不要笑我，Delphi新手。

Answer 1

一般情况下：这个Sender就是NewMenu对象，

Answer 2

NewMenu.OnClick := ShowInfo;
主要是这句

Answer 3

在我理解Sender是事件的接收者，比如你点击按钮，那么按钮就是Ｓｅｎｄｅｒ！

Answer 4

把你的程序改一下就可以知道Ｓｅｎｄｅｒ是不是菜单了！
 procedure TMainForm.ShowInfo(Sender: TObject);
begin
  if sender is TMenuItem then
  showmessage('Sender is Menu');
end;
其它一样！