最近开发一个物流管理信息系统,其中涉及到了一个关于连接数据库的方案拿出来和大家分享一下。
简化程序安装,我们通常采用了通过系统注册表写入连接数据库的信息,但是这样已经是修改了系统的设置,于是我们通过了在系统设计中所数据库连接的信息放到INI文件里,在以后的安装时,只要修改INI文件即可
流程如下:(汉文)
程序启动
↓
读取INI文件
↓连接数据库
↓
↓失败
◇ → →出现配置连接窗口,进行配置
↓ ↓连接数据库 ↑重
↓成功 ↓ ↑配
进入系统 ←←←←←←◇→→→→→→◇
↓放弃
↓
退出
流程如下:(Delphi)
form.oncreate
↓
Read INI(可写用一个调用函数)
↓Connect DB
↓
↓ false
if DBConnect(函数)→ →出现配置连接窗口,进行配置(Write I NI)
↓ ↓连接数据库 ↑重
↓true ↓ ↑配
System ←←←←←← ◇→→→→→→◇
↓放弃
↓
退出
简述一下INI文件
1. INI文件结构
;注释
[小节名]
关键字=值
。。。。
2. INI文件定义
A. 在Interface的Uses中加INIFiles
B. 声明TINIFile变量 MyINIFile:TINIFile;
C. INI文件的打开
FileName:=ExtractFilePath(Paramstr(0))+’test.ini’//ExtractFilePath(Application.ExeName)+’/test.ini;
MyINIFile:=INIFile.Create(FileName);
D. 关键字读取值
vs:=MyINIFile.ReadString(‘小节名’,’关键字’,缺省值);
E。 写入INI文件
MyINIFile.WriteString(‘小节名’,’关键字’,变量或字符值);
F. 删除关键字
MyINIFile.DeleteKey(‘‘小节名’,’关键字’);
G. INI文件释放
MyINIFile.distory;
如果考虑到安全问题,可以在INI文件上实现加密。
针对这个系统,我现在在准备写一篇关于我们这个系统的又一个难点就是《如何实现异地数据存储》的问题。请有关这方面兴趣的大侠一起研究。我QQ:13927506
本文地址:http://com.8s8s.com/it/it5319.htm