易截截图软件、单文件、免安装、纯绿色、仅160KB

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

下面这个按钮点击事件中,Sender代表谁?
Delphi(Pascal) code:
procedure Tsomain.ToolButton1Click(Sender: TObject);


是代表事件的拥有者吗?
Delphi(Pascal) code:


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

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





看这样子好明白吗? :)

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


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

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

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


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


相关问答:

Python中的Unicode在Delphi如何还原成Gb2312?

已知Python 中:
s = unicode("测试", "gb2312")
s = u'\u6d4b\u8bd5'
print s
测试

在Delphi里面如何将\u6d4b\u8bd5这样的还原成Gb2312的汉字呢?
找到个方法
......

ACCESS的自定义函数在delphi里怎么用呢...

我在模块里自定义了一个函数:stradd()

可是在adoquery1.sql.add('select stradd(author) from book');
时提示stradd未定义...

这个问题有什么办法可以解决的吗? 非常感激!


(在A ......

delphi动态数组如何去掉一个元素

procedure DynArrayDelete(var A;elSize:Longint;index,Count:Integer);
var
len,MaxDelete:Integer;
P:PLongint; //4 个字节的长整形指针
begin
P:=PLongint(A);// 取的 A 的 ......

delphi中select 的 where后面的id=变量怎么写啊

我的程序中有一段更新某一条记录的语句:
var
id:=integer;
begin
id:=strtoint(edit1.text);//edit1.text的值已经取得;
...
...
...
adoQuery1.sql.add('update 计划清单表 set 计划日 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号