在事件處理程序參數表中，至少含有一個參數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；
