-1

我试过这个,但它似乎不起作用:

procedure TDataModule3.DataModuleCreate(Sender: TObject);
begin
FDConnection1.Params.Values['Database'] := ExtractFilePath(ParamStr(0)) + 'MYDB.fdb' ;
FDConnection1.Params.Add('User_Name=SYSDBA');
FDConnection1.Params.Add('Password=masterkey');
FDConnection1.Params.Add('DriverID=FB');
FDPhysFBDriverLink1.VendorsLib := ExtractFilePath(ParamStr(0)) +'fbembed.dll';
  try
     FDConnection1.Open;
     FDTable1.TableName :='mytable';
     FDTable1.Open;
      except
    on E: EDatabaseError do
    ShowMessage(E.Message);
  end;
end;

任何想法如何使这项工作?

4

1 回答 1

1

解决了...必须将firebird文件夹intl和udf复制到app文件夹中。

于 2014-09-17T11:16:12.360 回答