在你的硬碟上建立一代码要放置的目录,如:
d:/MulitSys
d:/MulitSys/Server
d:/MulitSys/Client
1
。建立
Server
端
(1)
打开
Delphi7
,
File -->New --> Application -->
变更
Form1
的名称为:
Name:='Serverfrm';
保存
Serverfrm
到
d:/Mulitsys/Server/
下,
.pass
文件命名为:
pu_server.pas
;
Project
命名为:
pf_server.dpr
变更
Serverfrm
的
WindowState
的值为:
wsMinimized
(2)View -->Project Manager -->
选取项目
pf_server.exe
,然后在工具栏上选择
New Items
按钮,弹出
New Items
窗口,选择
Mulitier
标签,再选择
Remove Data Module
,建立服务器端运程数据模块
-->
点
"OK"
,进入到
"Remove Data Module Wizard"
向导。
输入:
Class Name : Mulit_ServerData-->
确定
(3)
建立数据库链接
在
Mulit_ServerData
中放一个
ADOConnection
组件
(
在
ADO
标签中
)
,将