procedure[function] 方法名(参数表)[:返回值];overload;
方法的重载提供了对类的扩充性
四、reintroduce、self、is、as
1、 reintroduce
当父类中以定义了一方法，派生类再定义同签名的方法将会隐藏父类的方法，如果不希望这种结果出现，可在派生类定义方法时，加此标志，声明方式：
procedure[function] 方法名(参数表)[:返回值];reintroduce;
2、 self
self代表了实例对象自身。类的所有数据成员和函数成员都隐含存在于with self do结构范围内。使用方法：
self.Edit1.text:=’’;
