如何用当前以当前目录做为数据库的存取路径?(0分)

  • 主题发起人 主题发起人 流浪的蛋壳
  • 开始时间 开始时间

流浪的蛋壳

Unregistered / Unconfirmed
GUEST, unregistred user!
我刚学的!我按书上的步骤做了一个数据存取程序!用的是BDE,我在databasename中设了
e:/data然后tablename的属性是m.db!我发现在如果把程序和数据全部移动到另一个目录
就不能用报错!听书上说可以用数据库别名来管理!可是如果我要把这个程序发给别人用
他机子上肯定没有delphi也那怎么办?有没什么方法用当前以当前程序所在的目录做为数据库的存取
路径?谢谢了
 
procedure TForm1.FormCreate(Sender: TObject);
var syspath:string;
begin
syspath:=extractfilepath(paramstr(0));
table1.DatabaseName :=syspath;
end;

可制作安装程序发布你的应用软件,把BDE打包进去,或者在用户机器上单独安装BDE。
 
谢了!我用你的方法我的那个问题解决了但是有一个新问题! 我动行程序的时候出现
table1:Cannot perform this operation on an open dataset
点确定之后就可以正常使用!这个要怎么解决?谢了
 
这是因为你的Table1的Active属性被你设定为 True;
在table1.DatabaseName :=syspath;之前增加一句:
Table1.close;
然后在table1.DatabaseName :=syspath;
Table1.tablename:='xxxxx.db';
Table1.open;
 
现在好了!太感谢了
 
在别人没有装delphi的机器上要做如何设置?拷过去运行有错!error$2109
 
安装一下BDE就可以了。BDE在DELPHI安装盘上有的。或者用DELPHI专用安装程序制作工具来发布你的软件。
 
用ADO的话,就简单了只写数据库文件名不写路径就行了.
 
后退
顶部