使用FireDac(Delphi)在Firebird中创建数据库

时间:2014-01-23 15:41:06

标签: delphi firebird firedac

我最近从AnyDac改为FireDac(8.0.5.3365)。我们正在运行Delphi 2006。

当我使用此组件的AnyDac版本时,我可以通过执行以下操作来创建新数据库。

设置我的连接

fConnection.LoginPrompt := false;
fConnection.ResourceOptions.SilentMode := true;

fConnection.Params.Clear;
fConnection.Params.Add(Format('DriverID=%s',          ['IB']));
fConnection.Params.Add(Format('Database=%s',          [fConnectionInfo.xDatabase]));
fConnection.Params.Add(Format('CharacterSet=%s',      ['UTF8']));
fConnection.Params.Add(Format('user_name=%s',         [fConnectionInfo.xUserName]));
fConnection.Params.Add(Format('password=%s',          [fConnectionInfo.xPassword]));
fConnection.Params.Add(Format('ExtendedMetadata=%s',  ['True']));
fConnection.Params.Add(Format('CreateDatabase=%s',    ['Yes']));
fConnection.Params.Add(Format('Protocol=%s',          ['Local']))

//database path = C:\Users\LoginName\AppData\Local\AppName\TestDB.FDB

打开并关闭连接

fConnection.Open;
fConnection.Close;

然后我可以在现有数据库上运行我的create table sql脚本。

但是现在当我使用FireDac版本执行此操作时,Open命令会引发fbe_unavailable错误,就像我没有指定CreateDatabase参数一样。

我应该以不同的方式做这件事吗?

感谢您的时间。

科里。

1 个答案:

答案 0 :(得分:2)

这里有一个完整的例子http://docwiki.embarcadero.com/RADStudio/XE5/en/Executing_SQL_Scripts_%28FireDAC%29

例如,以下Firebird脚本创建数据库,可以使用TFDScript执行:

SET SQL DIALECT 3;
SET NAMES UTF8;
SET CLIENTLIB 'C:\fb25\bin\fbclient.dll';
CREATE DATABASE 'E:\Test2.ib'
  USER 'sysdba' PASSWORD 'masterkey'
  PAGE_SIZE 16384
  DEFAULT CHARACTER SET NONE;

SET TERM ^ ;

CREATE PROCEDURE MY_PROC RETURNS (aParam INTEGER) AS
BEGIN
  aParam = 10;
END^

您应该使用CreateDatabase = Yes连接定义参数 除了其他必要参数: http://docwiki.embarcadero.com/RADStudio/XE5/en/Connect_to_Firebird_(FireDAC)