イベント・メソッドの Self (ID:34585)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 イベント・メソッドの Self は何を指しているのでしょうか？ procedure TMyPtn.Greeting; begin if Assigned(FOnGreeting) then FOnGreeting(Self); //この Self は何のためにあるのか？ end; ヘルプによるとSelf 識別子はそのメソッドが呼び出されたオブジェクトを参照するということですから、 たとえば次のように使用した場合 Self は MyPtn1 になるのでしょうか？ ------------- MyPtn1 := TMyPtn.Create; procedure TForm1.MyPtn1OnGreeting(Sender: TObject); begin with MyPtn1 do begin ・・・・・ end; end;