(发件人:TObject) 是什么意思?
如:
procedure TForm1.Button1Click(Sender:TObject);
var
s: Integer;
begin
.....
.....
end;
Sender 是对触发事件的组件的引用。在这种情况下,Sender 将是用户单击的按钮,该按钮称为 Button1Click 事件。
当您有多个组件调用同一事件并且您需要找出哪个组件导致事件被触发时,这非常有用。
例如,您可以执行以下操作:
if Sender = Button1 then
// ...
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)