Delphi中Self和Sender的区别

在事件处理程序参数表中，至少含有一个参数Sender,它代表触发事件处理程序的构件，如在上例中，Sender就指Button2，有了Sender参数，可以使多个构件共用相同的事件处理程序，如下例：

 
 
 

  
  
  
Procedure Tform1.Buttonclick(Sender:Tobject);   
  
  
  
　　Begin   
  
  
  
　　If sender=button1 then   
  
  
  
　　Label1.caption:=′看庭前花开花落   
  
  
  
′ 　　Else Label2.caption:=′望天上云卷云舒′   
  
  
  
　　End；  
 
 
 

在此例中，Button1,Button2共用了Buttonclick事件处理程序。

Self是指所编的程序范围是在哪一个类中，Delphi中大都在窗体范围内编程。

因此，self即指窗体，如果在编写一个类或是一个组件，则self指该类或组件。

我们在函数或过程的声明中可看出self是代表哪个组件，即self代表‘.’号之前的组件，如在***个例子中，self代表Tform1。

另外应注意，self只能用在类方法中，而不能用在过程或函数中，如下例用法是错的:

 
 
 

  
  
  
Function a1(B:Integer):Integer;   
  
  
  
　　Begin   
  
  
  
　　……   
  
  
  
　　Button:=tbutton.create(self)；……   
  
  
  
　　End； 
 
 
 

Clientheight和Height,Clientwidth和Width的区别：

对于一般的构件而言，Height就是Clientheight,Width就是Clientwidth，而对于窗体而言，Height是包括标题条在内的高度，而Clientheight是指窗体工作区的高度。同理，Clientwidth是指定窗体工作区的宽度。

从上面陈述可知，理解Ower和Parent,Self和Sender，Clientheight和Height,Clientwidth和Width区别，对于Delphi中正确编程是重要的。

网页标题：Delphi中Self和Sender的区别
URL分享：http://www.shufengxianlan.com/qtweb/news10/382560.html

成都网站建设公司_创新互联，为您提供营销型网站建设、移动网站建设、标签优化、python、定制开发、云服务器

广告

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源： 创新互联