动态数据库连接

Moodsky

最近开发一个物流管理信息系统，其中涉及到了一个关于连接数据库的方案拿出来和大家分享一下。

      简化程序安装，我们通常采用了通过系统注册表写入连接数据库的信息，但是这样已经是修改了系统的设置，于是我们通过了在系统设计中所数据库连接的信息放到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