Delphi Sender对象的使用

一、Sender的定义：

每一个事件处理里面至少都有一个Sender参数。比如：

procedureTForm1.Button1Click(Sender:TObject);begin<代码段>end;

当点击BUTTON1时，会产生一个Button1Click事件，系统会把Button1传递给Button1Click过程作为参数：
Sender的含义就是代表调用TForm1.Button1Click这个过程的控件，即Sender代表控件Button1。

二、用法：（经常配合is和as使用）

1、Sender代表了调用所在过程的控件，那么你就可以直接把它拿来当那个控件用
例： button2共用了button1的过程：

ProcedureTForm1.Button1Click(Sender:TObject);Begin//sender直接当控件使用IfSender=button2 then ShowMessage(‘您按下了button2’);End;

2、如果要用属sender代表的控制属件，用 (sender as 控件类名).属性（注意是控件类名）
例 button2,button3共用了button1的过程

 ProcedureTForm1.Button1Click(Sender:TObject);BeginCase (Sender as Tbutton).tag of //在每个button设置tag值，case要求有序类型//或写成Case Tbutton(sender).tag of1：ShowMessage(‘您按了Button1’);2：ShowMessage(‘您按了Button2’);3：ShowMessage(‘您按了Button3’);End;
End;

Delphi Sender对象的使用相关推荐

Delphi之对象库（Object Repository）
对象库(Object Repository)是一种手段,通过这种手段,用户可以选择预定义的对象,并运用到自己的应用程序中,用对象库能做以下的工作: 选择一个预定义的应用程序.窗体或对话框,用于用户的应 ...
Delphi的对象机制浅探[转载]
Delphi的对象机制浅探 savetime2k@yahoo.com 2004-1-3 前几天开始阅读 VCL 源代码,可是几个基类的继承代码把我看得头大.在大富翁请教了几位仁兄后,我还是对Delph ...
Delphi 中将对象作为参数传递的使用
Delphi 中将对象作为参数传递的使用举例分析 2009-07-24 13:40 下面的单击事件,将要调用一个以对象为参数的方法,并将结果显示出来. procedure TForm1.btn1Cl ...
Delphi的对象注销方法Destroy和free的区别
当您使用完对象后,您应该及时撤销它,以便把这个对象占用的内存释放出来.您可以通过调用一个注销方法来撤销您的对象,它会释放分配给这个对象的内存. Delphi的注销方法有两个:Destroy和Free. ...
Delphi中流对象 TStream
2019独角兽企业重金招聘Python工程师标准>>> 在Delphi中,所有流对象的基类为TStream类, 其中定义了所有流的共同属性和方法.TStream类中定义的属性介绍如下 ...
Delphi GDI对象之绘制文本
转载:http://www.cnblogs.com/pchmonster/archive/2012/07/06/2579185.html 基本绘图操作(Basic Drawing Operations ...
delphi webbrowser 对象不支持_【Python 秘籍】排序不支持原生比较的对象
问题你想排序类型相同的对象,但是他们不支持原生的比较操作. 解决方案内置的 sorted() 函数有一个关键字参数 key ,可以传入一个 callable 对象给它, 这个 callable 对 ...
delphi webbrowser 对象不支持_建模初学者，那些你可能还不知道的10个ZBrush小技巧！【值得收藏】...
介绍如果你对zbrush软件的了解,只是认为它是一款雕刻软件,那么现在是时候对它另眼相看了. 作为数字雕刻的行业标准,ZBrush的工具集非常灵活,以至于能够让用户选择比较适合他们自己的工作流,人们 ...
Delphi 2007体验！
Delphi 2007体验! baidu 内容摘要:CodeGear(From Borland) 公司公布了最新的Delphi 2007 For Win32版本号.作为一个 Delphi 的使用者,第 ...

Delphi Sender对象的使用

一、Sender的定义：

二、用法：（经常配合is和as使用）

Delphi Sender对象的使用相关推荐

最新文章

热门文章