delphi 三层CS架构一步步建立的简单例子 
所谓三层:
(1) 客户端
(2) 服务器端
(3) 数据库
    在数据访问时,使得客户端必须通过服务器来访问数据库。提高了系统的安全性。
在Delphi中可以使用Socket或者Dcom组件来连接他们相互间的通讯。
本例使用SOCKET组件.  DCOM用在局域网,  SOCKET用在互联网.
环境为windows xp+ delphi 7 + access2000
创建过程:
1、请用ACCESS2000新建一个数据库database02.mdb. 
2、请在delphi7执行 file-new- application,  新建一个桌面,
上面放一个label,    label.caption  =服务器端已运行.delphi app’
3、接下来在delphi7执行file --new--other,选择"Multitier"--"Remote data module"。在跳出
来的对话框里面输入名称(任意),例如:AppSqlConn。选择确定,进入remote data module窗口。
界面如下图所示
4、加入组件:adodataset,点击connectionstring属性,点击后面的 …,进入设定连接窗口。在选择数据库中选择自己想要使用的数据库database02.mdb。一般只要地址正确、用户名和密码无误,肯定可以连接通过。确定。
3、ADODATASET1在commandtext中点击后面的…,啥也不用设定,默认配置;
4、ADODATASET1将active属性设置为false。
5、再加入组件:datasetprovider。设定其dataset属性为上面的adodataset1。
 
5.1 接着设置datasetprovider1的属性,poallowcommandtext=true,
其他的参数默认即可.
datasetprovider1的属性如下图所示
6、到此服务器端已经设置完成。请保存并且运行一次,从而使服务注册。

版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。