TCheckBox(Sender).Checked 与 TCheckBox1.Checked 有什么不同？

最新推荐文章于 2022-01-27 12:20:13 发布

weixin_30925411

最新推荐文章于 2022-01-27 12:20:13 发布

阅读量227

点赞数

原文链接：http://www.cnblogs.com/chuangyiyuan/p/6908567.html

版权

#3楼 2009-02-20 09:02 彬

请问这里的TCheckBox(Sender).Checked 与 TCheckBox1.Checked 有什么不同？我以前一直用的是后者。

#4楼 [ 楼主] 2009-02-20 09:53 万一

@彬
这样写便于共用代码.
譬如 procedure TForm1.CheckBox1Click(Sender: TObject); 中的 Sender 就是指 CheckBox1 本身, 但 Sender 声明的是 TObject 类型的;
但它到底是 TCheckBox 还是 TButton 只有使用者自己知道, 类型转换一下即可.
转换后的好处是, 不管是 CheckBox1、CheckBox2... 都可以用 TCheckBox(Sender) 或 Sender as TCheckBox 表示当前对象.

参考链接： http://www.cnblogs.com/del/archive/2008/03/13/1104585.html

转载于:https://www.cnblogs.com/chuangyiyuan/p/6908567.html