S
shiner
Unregistered / Unconfirmed
GUEST, unregistred user!
我写了一个工资管理程序,用到李颖写得数据库备份控件,现在遇到如下
问题:
做安装程序,考虑到数据库别名的问题,我在主程序的TForm1.FormCreate
事件添加了如下代码:
With Session do
begin
ConfigMode:=cmSession;
try
AddStandardAlias('shiner',ExtractFilePath(ParamStr(0)),'PARADOX');
finally
Configmode:=cmAll;
end;
end;
这就要求主程序text.exe和数据库文件在一个目录下,所以安装后的目录为:
C:/Program Files/xyz
程序运行,执行备份,删除,回取均不行,且回取就死机。
在我自己得电脑上又可以,因为我的电脑上用database desktop创建了别名:
shiner。text.exe的存放目录为:c:/xyz 数据库目录为:c:/xyz/data。
主程序TForm1.FormCreate
事件删除了如下代码:
With Session do
begin
ConfigMode:=cmSession;
try
AddStandardAlias('shiner',ExtractFilePath(ParamStr(0)),'PARADOX');
finally
Configmode:=cmAll;
end;
end;
程序运行一切正常。
请问该怎样解决?
问题:
做安装程序,考虑到数据库别名的问题,我在主程序的TForm1.FormCreate
事件添加了如下代码:
With Session do
begin
ConfigMode:=cmSession;
try
AddStandardAlias('shiner',ExtractFilePath(ParamStr(0)),'PARADOX');
finally
Configmode:=cmAll;
end;
end;
这就要求主程序text.exe和数据库文件在一个目录下,所以安装后的目录为:
C:/Program Files/xyz
程序运行,执行备份,删除,回取均不行,且回取就死机。
在我自己得电脑上又可以,因为我的电脑上用database desktop创建了别名:
shiner。text.exe的存放目录为:c:/xyz 数据库目录为:c:/xyz/data。
主程序TForm1.FormCreate
事件删除了如下代码:
With Session do
begin
ConfigMode:=cmSession;
try
AddStandardAlias('shiner',ExtractFilePath(ParamStr(0)),'PARADOX');
finally
Configmode:=cmAll;
end;
end;
程序运行一切正常。
请问该怎样解决?