self指代的是啥？

Question

请问在如下代码中
procedure TForm1.Button1Click(sender:Tobject);
var
  MyLbl:TLabel;
begin
  MyLbl:=TLabel.Create(self);
  MyLbl.Parent:=self;  
end;1.这里的self是指Tform1还是Tlabel？
2.MyLbl.Parent:=self;与MyLbl.Parent:=form1有和区别？

Answer 1

Self指的是当前类的当前实例。TForm1是一个类，当然一般一个程序中只有一个From1是TForm1类的实例。如果有两个以上实例时，就不能用MyLbl.Parent=Form1这样的写法了。

Answer 2

self 指的是Form1,不是TForm1,Form1是属于TForm1这个类。因此2没有区别。
其实你要知道程序段中self指代的是什么，用showmessage(self.Name)和showmessage(self.ClassName)就知道self的名称和它所属类的名称了