封装和成员可见性

1、南阳理工学院软件学院Delphi开发基础封装和成员可见性南阳理工学院软件学院Delphi开发基础n与记录类型强调将各种不同的数据组织在一起形成结构化数据不同，类类型更加强调类中成员的封装。n即不仅将数据、代码等各种成员组织在一起，更要讲究组织成员的方式，以保证代码的可扩展性和可重用性。南阳理工学院软件学院Delphi开发基础封装n在面向对象的程序设计中，有一个好的封装是十分重要的。n一方面要尽可能的将类中的内部数据、内部方法设为私有，以防止外界对其任意改动从而影响类功能的实现。n另一方面，要提供良好的接口，使用户能够根据需要方便的设定类的特征或调用类的功能。n同时，还应该考虑类的继承关系以及实

2、现多态的需要。南阳理工学院软件学院Delphi开发基础n一个优秀的面向对象设计，应当将其中的关键数据和关键代码对外界隐藏起来，不允许外界随意使用，这样，不仅能够有效的保证类中数据的安全性和完整性，也有利于今后的修改和功能扩展。南阳理工学院软件学院Delphi开发基础n封装使得类成为功能相对独立的模块，从而大大提高了类的可重用性，也提高了用户使用类的便捷性。n因为用户不需要关心类的功能是如何实现的，只要正确调用类所提供的各种接口就可以达到程序设计的目的南阳理工学院软件学院Delphi开发基础内聚和耦合n内聚和耦合是封装的两个方面，它们是面向对象程序设计中的非常重要的概念。南阳理工学院软件学院De

3、lphi开发基础内聚n指的是程序设计的“单纯性”。要达到这一目的，每一个成员函数就应当尽可能只做一件事情，从而为创建可重用代码提供更大的方便。南阳理工学院软件学院Delphi开发基础耦合n指类与类之间的相互联系方式n相互耦合的对象经常需要相互引用对方的内部部件。而过多地依赖必定大大降低对象的可重用性，因为它们相互依赖，我们不能在没有另一个的情况下使用这一个。n解决这个问题的最好方法是保持单耦合点，通常将对象之间的耦合限定为例程接收和返回的参数。南阳理工学院软件学院Delphi开发基础Visibility of class members（类成员的可见性） 类的每个成员都有一个称为可见性的属性，

4、我们用下面的关键字之一来表示它：private、protected、public、published 和automated。比如published property Color: TColor read GetColor write SetColor;声明一个叫做Color 的published 属性。可见性决定了一个成员在哪些地方以及如何能被访问，private表示最小程度的访问能力，protected 表示中等程度的访问能力，public、published 和automated 表示最大程度的访问能力。若声明一个成员时没有指定其可见性，则它和前面的成员拥有相同的可见性；若在类声明的开始没

5、有指定可见性，当在$M+状态下编译类时（或者继承自一个在$M+状态下编译的类），它的默认可见性是published，否则，它的可见性是public。为可读性考虑，最好在声明类时用可见性来组织成员：把所有的private 成员组织在一起，接下来是所有的protected 成员，依此类推。用这种方法，每个可见性关键字最多出现一次，并且标明了每个新段的开始。在每一段中，都应当遵循先数据域，再方法，再属性的顺序进行定义。南阳理工学院软件学院Delphi开发基础典型的类声明typeTMyClass = class(TControl)private. private declarations herepr

6、otected. protected declarations here public. public declarations here published. published declarations here end;南阳理工学院软件学院Delphi开发基础Private(私有)n私有部分的成员只能被该类的其他成员访问南阳理工学院软件学院Delphi开发基础Protected(保护部分)n保护部分的成员除了可以被该类的其他成员访问之外，还可以在该类所有派生类的内部被访问。南阳理工学院软件学院Delphi开发基础Public（公共部分）n公共部分的成员可以被任何类以任何方式访问。南阳理工

7、学院软件学院Delphi开发基础Published(发布部分)n发布部分的成员具有与公共部分成员一样的可见性，不仅如此对于安装在组件面板的组件类来讲，他们还可以在设计期通过对象监视器进行访问。南阳理工学院软件学院Delphi开发基础n对于类中三种成员来讲n数据域：privaten属性：public or published(组件类)n方法：private(公共方法调用的内部方法) public(供外界使用的方法) protected(提 供给派生类使用以及 用来实现多态的方法)南阳理工学院软件学院Delphi开发基础Delphi的单元封装特性n在delphi中，除了可以使用可见性保留字来实现信

8、息隐藏之外，还可以使用单元的封装特性来实现信息的隐藏南阳理工学院软件学院Delphi开发基础n在同一个单元中声明的多个类之间，其成员可以完全自由地相互访问，而不受私有和保护等可见性的区别。n在单元实现部分声明的类，对于其他成员来讲，其成员总是不可见的。南阳理工学院软件学院Delphi开发基础Unit unit2interface type TA=class private i:integer; protected b:boolean; public c:char; end;南阳理工学院软件学院Delphi开发基础Unit unit3IntefaceUses unit2Type TAA=clas

9、s(TA) r:real; private procedure RR;End;ImplementionProcedure TAA.RRBegin i:=8;/不合法 b:=true; c:=c;End;南阳理工学院软件学院Delphi开发基础Unit unit4IntefaceUses unit3Type TAAA=class(TAA) s:string; procedure RS;End;ImplementionProcedure TAAA.RS;Begin RR;/不合法 i:=9;/不合法 b:=false; r:=3.44;End;南阳理工学院软件学院Delphi开发基础Unit unit1Uses unit2,unit3,unit4;Var A:TA; AA:TAA; AAA:TAAA;Begin A:=TA.create; A.i:=1; A.b:=true; AA:=TAA.create; AA.i:=2; AA.b:=true; AA.RR; AAA:=TAAA.create; AAA.i:=3; AAA.c:=M; AAA.RS; A.free; AA.free; AAA.free;南阳理工学院软件学院Delphi开发基础继承性（Inheritance）n指的是一个对象根据另一个对象的一