Sender,Self,Owner和parent

Sender--意义：指本对象。Sender在什么对象相关代码里，那么Sender就是什么。
Self--意义：指本类，也就是Self被引用的类。比如若在类TMyClass内引用了Self，那么Self=TMyClass.

self既然代表对象自己，那么难道自己还用定义吗？看下边的代码：

procedure TForm1.button1click(sender: TObject);
var
a: TButton;
begin
a := Tbutton.create(self);
....
end;
　　在创建Tbutton类的对象的时候，需要给出一个内存管理者。self就表示了正在运行button1click这个过程的那个对象(的数据块的首地址)。其实大多数情况下就是form1。
Owner--意义：哪个对象释放我的内存

如：Pan:=TPanel.Create(Self);其中Create的参数是：AOwner:TComponent。Owner释放Pan的内存。因为窗口释放Pan的内存，但窗口类的对象是Self.一般给Owner传Self就可以。
比如：
代码段一：
pan:=TPanel.Create(Self);
with Pan do begin
try
Left:=20;
Top:=20;
parent:=Self; //Parent:=Form1也可以。
Visible:=true;
ShowMessage('Created');
finally
Pan.free;
end;
end;
-----------------------------------------------------
Parent--
意义：此对象包括在哪个对象里那？
说明：若组件不是从TControl继承来的，那么在创建组件后不必声明此属性。

转载于:https://www.cnblogs.com/lzming/archive/2008/12/24/1361332.html