杭州交通信息网群众路线的深刻内涵:请问！怎样连接数据库才能让delphi程序无论在什么路径下都可以正常运行？
来源：百度文库 编辑：杭州交通信息网 时间：2024/04/27 01:35:37
请问！怎样连接数据库才能让delphi程序无论在什么路径下都可以正常运行？
因为之前我一直用的BDE Administrator->New->Standard,然后在Path里写上数据库的绝对地址，可这样以后再把Delphi程序拷到别的路径下运行时，就会出现找不到数据库的错误，程序无法运行。
请问应该怎么设置数据库才能不受程序所在具体路径的影响而正常运行呢？
多谢！！
不好意思奥，问一下，nipperhjw ,
1、AnsiString strCurPath := ExtractPath(Application- >ExeName);
AnsiString strDataPath := strCurPath + 'Data\...(数据文件名)';
这是一段代码吗？
2、如是是段代码的话，比如说我DATA文件夹里有个数据文件db.mdb，那我要将
AnsiString strCurPath := ExtractPath(Application- >ExeName);
AnsiString strDataPath := strCurPath + 'Data\db.mdb';
这段代码加到哪里呢？
因为之前我一直用的BDE Administrator->New->Standard,然后在Path里写上数据库的绝对地址，可这样以后再把Delphi程序拷到别的路径下运行时，就会出现找不到数据库的错误，程序无法运行。
请问应该怎么设置数据库才能不受程序所在具体路径的影响而正常运行呢？
多谢！！
不好意思奥，问一下，nipperhjw ,
1、AnsiString strCurPath := ExtractPath(Application- >ExeName);
AnsiString strDataPath := strCurPath + 'Data\...(数据文件名)';
这是一段代码吗？
2、如是是段代码的话，比如说我DATA文件夹里有个数据文件db.mdb，那我要将
AnsiString strCurPath := ExtractPath(Application- >ExeName);
AnsiString strDataPath := strCurPath + 'Data\db.mdb';
这段代码加到哪里呢？
你在程序运行的时候通过ExtractPath(Application->ExeName)得到当前路径,再将你的相对于本程序的数据路径转换一下就可以了!
比如你的目录为:
C:\Project\
--Application.exe
|
|-Data
|
--....(数据文件)
得到当前路径为
AnsiString strCurPath := ExtractPath(Application->ExeName);
//那strCurPath 就等于C:\Project\
你再转换一下
AnsiString strDataPath := strCurPath + 'Data\...(数据文件名)';
就可以得到相对地址了!
Delphi数据库吗？我只会绝对路径的