end;

访问方法

做了如上修改以后，我们的类就可以实现唯一实例的判断以及创建控制。

在主调单元中，我们想往常一样uses类所在的unit文件，相较普通的对象访问方式，我们采用类似如下的代码：

TConfigReader.GetInstance(Self).MyMethod1;

TConfigReader.GetInstance(Self).MyMethod2;

MyVar:= TConfigReader.GetInstance(Self).MyFunc1;

MyObject:= TConfigReader.GetInstance(Self).Member1;

……

小结

对数据的隐藏、共享、保护是OO编程的优点，利用不同的数据访问级别隐藏相应的方法、成员，可以更大限度控制数据的安全性，也可以让程序按照我们想要的方式运行。类方法和类成员可以在对象没有创建的时候就被访问，因此可以越过对象本身来判断其创建与否。定义在单元内但类外的对象变量可以全局于单元内的所有类。

在我的YAHOO公文包中有这片文章相关的代码，欢迎下载。也希望大家给我提出改进意见。

上一页  [1] [2]