Self--意义:指本类,也就是Self被引用的类。比如若在类TMyClass内引用了Self。Self = TMyclass。
Self:是指所编写的程序是在哪一个类中,如果是在窗体编程中使用self,则self代表的是窗体,如果是在编写一个类,则self代表的是这个类;
Sender--意义:指本对象。Sender在什么对象相关代码里,那么Sender就是什么。
另外应注意,self只能用在类方法中,而不能用在过程或函数中
procedure TForm1.btn2Click(Sender: TObject);
var
Mybutton: TButton;
begin
with Mybutton do
begin
TButton.Create(Self); //系统默认窗体上所有控件的所有者都是窗体。
//TButton.Create(form1); //意义与Self一样。
//TButton.Create(nil); //不指出所有者
Parent := pnl1; //Parent属性是指构件的包容器,构件只能在此范围内显示和移动
Caption := 'Test';
Left := 0;
Top := 0;
end;
end;