Delphi三层网络架构代码实现
1 .三层网络的概念
三层架构(3-tier architecture) 通常意义上的三层架构就是将整个业务应用划分为:
表现层(UI)、业务逻辑层(BLL)、数据访问层(DAL)。 区分层次的目的即为了“高内聚,低耦合”的思想。
概念简介
1、表现层(UI):通俗讲就是展现给用户的界面,即用户在使用一个系统的时候他的所见所得。
2、业务逻辑层(BLL):针对具体问题的操作,也可以说是对数据层的操作,对数据业务逻辑处理。
3、数据访问层(DAL):该层所做事务直接操作数据库,针对数据的增添、删除、修改、查找等。
2 .三层网络构建步骤
1 .打开delphi->file->new->others ,Delphi Projects->DataSnap Server->DataSnap Server 然后弹出来的都默认->OK。回头感性趣再研究其它的吧。
2 .生成三个窗口,三个窗口中需要记住DSTCPServerTransport1控件的Port和ServerMethods1控件里面的代码
type
TServerMethods1 = class(TDSServerModule)
记住“TServerMethods1”引号中 名字客户端需要用。
3 .在ServerMethods1窗口把数据库搭建好。如图所示
服务器需要上述控件。
下面说客户端的搭建方法:
打开delphi->file->new->VCL Form Application -Delph
如图
需要上述控件
其中SQLConnection1控件,设置属性Driver 选择DataSnap,再把Driver左边的+号打开把HostName的地址填上(服务器的IP地址)
Port为服务器端口地址。