delphi 将免费DBX驱动程序与TSQLConnection结合使用时出现的问题

1cklez4t  于 2023-11-18  发布在  其他
关注(0)|答案(2)|浏览(139)

我从here下载了免费的DBX驱动程序。我已经试了两天了,没有成功。
下面是我的代码的快照:

unit uMainForm;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, SqlExpr, WideStrings, DBXDynalink, DB;

type
  TMainForm = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  MainForm: TMainForm;

implementation

{$R *.dfm}

procedure TMainForm.Button1Click(Sender: TObject);
var C: TSQLConnection;
begin
  C := TSQLConnection.Create(Self);
  try
    C.DriverName := 'FirebirdConnection';
    C.LibraryName := 'dbxfb4d12.dll';
    C.VendorLib := 'fbclient.dll';
    C.GetDriverFunc := 'getSQLDriverFIREBIRD';
    C.Params.Add('User_Name=SYSDBA');
    C.Params.Add('Password=masterkey');
    C.Params.Add('Database=C:\MyDB.fdb');
    C.Open;
    if C.Connected then
      ShowMessage('Connection is active')
  finally
    C.Free;
  end;
end;

字符串
运行测试后,我收到错误:
无法加载fbclient.dll(错误代码22)。系统路径中可能缺少它。
在我的应用程序路径中有必需的库,甚至在System32路径中也有。我没有使用dbxdrivers.ini和dbxconnections.ini。
那么这是怎么回事呢?我有 Delphi 2009年的最新更新。

qzwqbdag

qzwqbdag1#

您是否也尝试将fbclient.dll文件与可执行文件放在同一个文件夹中?

ddhy6vgd

ddhy6vgd2#

有时需要将fbclient.dll重命名为gds32.dll,这可能会奏效。

相关问题