Delphi中Self和Sender的區(qū)別
在事件處理程序參數(shù)表中,至少含有一個(gè)參數(shù)Sender,它代表觸發(fā)事件處理程序的構(gòu)件,如在上例中,Sender就指Button2,有了Sender參數(shù),可以使多個(gè)構(gòu)件共用相同的事件處理程序,如下例:
- Procedure Tform1.Buttonclick(Sender:Tobject);
- Begin
- If sender=button1 then
- Label1.caption:=′看庭前花開花落
- ′ Else Label2.caption:=′望天上云卷云舒′
- End;
在此例中,Button1,Button2共用了Buttonclick事件處理程序。
Self是指所編的程序范圍是在哪一個(gè)類中,Delphi中大都在窗體范圍內(nèi)編程。
因此,self即指窗體,如果在編寫一個(gè)類或是一個(gè)組件,則self指該類或組件。
我們?cè)诤瘮?shù)或過程的聲明中可看出self是代表哪個(gè)組件,即self代表‘.’號(hào)之前的組件,如在***個(gè)例子中,self代表Tform1。
另外應(yīng)注意,self只能用在類方法中,而不能用在過程或函數(shù)中,如下例用法是錯(cuò)的:
- Function a1(B:Integer):Integer;
- Begin
- ……
- Button:=tbutton.create(self);……
- End;
Clientheight和Height,Clientwidth和Width的區(qū)別:
對(duì)于一般的構(gòu)件而言,Height就是Clientheight,Width就是Clientwidth,而對(duì)于窗體而言,Height是包括標(biāo)題條在內(nèi)的高度,而Clientheight是指窗體工作區(qū)的高度。同理,Clientwidth是指定窗體工作區(qū)的寬度。
從上面陳述可知,理解Ower和Parent,Self和Sender,Clientheight和Height,Clientwidth和Width區(qū)別,對(duì)于Delphi中正確編程是重要的。
【編輯推薦】