Question

我很难让我的代码正常工作。我想用Delphi7中的应用程序连接到数据库，但如果我更改应用程序的文件夹，例如，如果我安装在另一台计算机中，我的数据模块将停止工作。错误为：

引发异常类EdatabaseError，消息为“缺少驱动程序名称适当性”

我的实际代码是：

procedure TDataModule1.DataModuleCreate(Sender: TObject);
var
  conexao : TSQLConnection;
begin
   with SQLConnection1 do
    begin
        ConnectionName :=  SKY ;
        DriverName :=  Interbase ;
        LibraryName :=  dbexpint.dll ;
        VendorLib :=  gds32.dll ;
        GetDriverFunc :=  getSQLDriverINTERBASE ;
        LoadParamsOnConnect := true;
        LoginPrompt := False;
        Params.Add( Database= +ExtractFilePath(Application.ExeName)+ BancoFLY_SKY_DESK.FDB );
        Params.Add( User_Name=SYSDBA );
        params.Add( Password=masterkey );
        Params.Add( SQLDialect=3 );
        Open;
    end;
      SQLConnection1.Connected:=true;
end;

我想在任何路径或安装位置使用.exe连接到数据库。

Answer 1

如果你运行的是Windows7或Vista，并将应用程序安装到“程序文件”（任意一个）目录中，由于UAC中的文件夹虚拟化，这将不起作用。

您不应该试图将数据库放在程序运行的同一目录中。您将在XP及更早版本中逃脱惩罚。从那时起，这是一个禁忌。

这可能不是你的问题，但肯定是个问题。

Answer 2

当我试图编写从线程打开Firebird数据库的代码时，我也遇到了类似的问题。该代码看起来像是在使用dbExpressTSQLConnection；如果使用IB组件，特别是TIBDatabase，则会容易得多。然后您的代码变成如下所示

var
 ibdb: TIBDatabase;
 qDefaults: TIBQuery;
 trans: TIBTransaction;

begin
 ibdb:= TIBDatabase.Create (nil);
 ibdb.databasename:= ExtractFilePath(Application.ExeName)+ BancoFLY_SKY_DESK.FDB )
 ibdb.loginprompt:= false;
 ibdb.params.add ( password=masterkey );
 ibdb.params.add ( user_name=sysdba );
 ibdb.sqldialect:= 3;
 ibdb.connected:= true;
 trans:= TIBTransaction.create (nil);
 trans.defaultdatabase:= ibdb;
 qDefaults:= TIBQuery.create (nil);
 qDefaults.database:= ibdb;
 qDefaults.transaction:= trans;
 qDefaults.sql.Add ( select * from defaults );
 qDefaults.active:= true; 
 ...

Answer 3

您很可能缺少目标计算机上所需的DLL。您需要弄清楚哪些DLL应该包含在客户端应用程序中，并将它们安装在目标计算机上。通常，只需将所需的DLL与EXE放在同一文件夹中即可。

由于您引用了Interbase、dbExpress和Firebird，我不太清楚您在使用什么，但您的目标计算机可能没有所需的驱动程序。

Answer 4

您需要部署：

dbxconnections.ini
dbxdrivers.ini 
dbxfb.dll 
fbclient.dll 
midas.dll {in case you used ClientDatasSet and you didn t include MidasLib into uses clause}

在将所有这些文件与Exe一起部署之后，您需要更新注册表项以指向dbxconnections.ini和dbxdrivers.ini的位置，我的版本是Delphi10.3，因此注册表项位于

HKEY_CURRENT_USER > Software > Embarcadero > BDS > 20.0 > DBExpress

Connection Registry File value is the path to dbxconnections.ini Driver Registry File value is the path to dbxdrivers.ini

友情链接