delphi之self

在使用delphi的对象技术的时候，经常会看到一个词汇：self，它到底指的是什么呢？我们还要从对象与类的关系谈起。类是对将要创建的对象的性质的描述，是一种文档。这很重要：类只是一段描述性的文字，它并不会真去分配内存，无论在其中定义多少变量。如果打个比方，类就是图纸，而对象就是根据图纸盖的房子。对象是真正在内存中存在的东西，是运行“实体”。根据一份图纸可以盖多个相似的房子，同样道理，根据一个类，可以创建多个类似的对象，这个过程叫做“实例化”。在delphi中使用对象技术，要遵循以下的步骤：
1。定义一个类

2。用该类声明一个名字（实质是一个指针）

3。用该类实例化一个对象，并使它与先前的名字联系起来

4。调用对象的方法或属性

5。释放对象

下面我们写一个最简单的表达累加器功能的类
type

TCount = class

private FNum: integer; // 记录有多少个数字被累加

FSum: integer; // 当前的累加和

pubic

procedure Add(n: integer) // 把整数n累加进去

procedure clear; // 清零

procedure show; // 显示当前信息

constructor create; // 构造函数

end;
....

使用的过程是这样的：
var a: TCount; // 这里只是声明了一个名字，并非真正地分配了一个对象

...... // a这个变量只占用4字节地内存

a := TCount.create; // 在堆空间中分配内存，并把首地址拷贝到a中。

a.add(5);

a.add(7);

a.show(); // 以上是调用a对象的有关方法

a.free; //  free会去调用析构函数，完成堆空间的释放。

我们看这样一个问题：一个对象到底占用多大的内存空间？ 　　

答案是很小！因为在分配一个对象地时候，实际上只分配了类中定义的数据，而没有分配其中的函数所需要的空间。这些类中定义的函数（称为成员函数），与普通函数一样被存放在静态地址空间中。
　　这样就引出了第二个问题：既然对象的数据和操作这些数据的方法不是存在一起，那么这些函数如何才能知道到底要操作哪个数据块呢？（类可生成多个实例）
　　显然，最容易想到的解决办法就是让这些特殊函数带一个参数，是个指针类型，该指针指示要操作的数据块的首地址。
　　事实上，成员函数正是这样做的，它们有一个缺省的参数self，这是个指针类型，对于上边的例子，它的定义就是：TCount self。编译器在遇到调用a.add(5)的时候，把它解释为：TCount.add(a,5)；把代表对象的数据块的地址送给add函数作为第一个参数－－隐含的参数。
　　说得本质一些就是：self是当前正在执行本函数的那个对象的数据块的首地址。
self既然代表对象自己，那么难道自己还用定义吗？

看下边的代码：
procedure TForm1.button1click(sender: TObject);

var a: TButton;

begin

a := Tbutton.create(self);

....

end;
　　在创建Tbutton类的对象的时候，需要给出一个内存管理者。self就表示了正在运行button1click这个过程的那个对象(的数据块的首地址)。其实大多数情况下就是form1。

 

来源：http://blog.sina.com.cn/s/blog_4e87cf5d0100mt3i.html