如何将界面代码和功能代码分离

1 2 下一页

版权所有：Lythm
文章来源：东日制作室
转载请与作者联系

关键字 代码设计 VCl Delphi

很多朋友看了上次我写的“创建良好设计的代码（基于Delphi/VCL）”后，对我说感觉上可以接受其中的观点，但似乎说得太简单，不够具体；也有的朋友对其中的一个小例子有些异议。因此便有了此文。

上次，我举的例子是这样的：假设要从某处获得一个字符串列表，然后显示于 TListBox 中，我所推崇的代码是：

ObjectXXX := TObjectXXX.Create;
ListBox1.Items := ObjectXXX.GetStringList;
ObjectXXX.Free;

的确，我承认，单纯从这三行代码来看，似乎有了“滥用对象”之嫌。也许是例子过于简单，给人的感觉是TObjectXXX只有GetStringList这一个public成员函数，如果真的这样的话，那可真是“滥用对象”了。类是对对象的抽象，而对象是由状态和操作（也就是数据和对数据的操作）的集合组成。因此，没有状态的对象不是对象！没有私有数据成员的类的设计是失败的设计（那不是类，而是接口了）。

好，下面我就举一个详细的例子来说明，如何将界面代码和功能代码分离。
假设我要做一个简单的个人通讯录管理软件，很显然，整个软件分为两部分：一部分是面象用户的，也就是所谓界面部分，我可以提供四个按钮（分别为“添加”、“删除”、“修改”、“查找”）和一个编辑框（显示通讯录信息和接受用户输入）用于和用户交互；另一部分是功能化的，也就是软件内部的对于通讯录的存取操作。
于是，有了一个TAddrBook类，它是对功能化部分的抽象。

TAddrBook = class
private
//一些私有成员
public
constructor Create;
destructor Destroy;override;
GetCount: Integer;
FindRecord(strString): Integer;
GetRecord(nIndex:Integer): String;
SetRecord(nIndex:integer; strRec:String): Boolean;
AddRecord(strRec:String): Boolean;
DelRecord(nIndex): Boolean;
//其它共有成员函数
end;

私有成员之所以无法确定，主要是取决于这个类的实现。

上一篇： Delphi控件，我们也可以(1)
下一篇： Delphi控件，我们也可以(3)

1 2 下一页

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有