深入Delphi编程(OOP)
http://tech.ddvip.com 2007年11月19日 社区交流
内容摘要：OOP的英文全称是Object Oriented Programming，翻译过来就是面向对象编程。OOP是一种非常重要的编程思想。也许你会对这种抽象的东西不感兴趣，可是几乎任何一个高手都会告诉你：“语言并不重要，重要的是编程思想。”
procedure TDate.SetValue(m,d,y:Integer);
begin
Mouth := m;
Day := d;
Year := y;
end; function TDate.LeapYear:Boolean;
begin
if (Year mod 4 <> 0) then
LeapYear := False
else if (Year mod 100 <> 0)
LeapYear := True
else if (Year mod 400 <> 0)
LeapYear := False
else
LeapYear := True;
end;实现了这些定义之后，就可以这样调用它们：
var
ADay: TDate;
begin
//建立一个对象
ADay := TDate.create;
//使用之
ADay.SetValue(1,1,2000);
if ADay.LeapYear then
ShowMessage('闰年：' + Inttostr(ADay.year));
//释放对象
ADay.free;
end;我们来逐行解释这些代码的含义。var后面那一行声明了一个TDate类的变量。
声明了变量之后，我们怎么使用它呢？使用TDate类的Create方法可以建立一个该类的对象，并将其赋予ADay变量。
现在我们又接触到了OOP中另一个重要的概念：对象。什么是对象？简言之，对象就是类的实例，或者说，是类定义的数据类型的变量。当建立一个类的对象时，系统为它分配一块内存。例如我们定义一个变量A为Integer类型，那么，Integer是一个数据类型，A就是一个实例。类与对象的关系就类似于这两者之间的关系。区别类和对象是非常重要的，甚至一些专业的程序员都往往将他们搞混。
细心的读者可能注意到，在TDate类的定义中，并没有Create这个方法。那么这个Create方法是从哪里来的呢？Create方法是每一个Class都具有隐含的方法，它的作用是建立这个类的实例。请注意，在这里，类和其他的数据类型是不同的。其他的数据类型都是声明了变量之后就可以直接使用，而类类型必须在使用Create方法创建它的实例（对象）之后才能使用。
作者：左轻侯 责编：豆豆技术应用
正在加载评论...