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