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;