三句话搞定FireDAC连接池

 

form上拖入：

FDManager1: TFDManager;

FDConnection1: TFDConnection;

 

//初始化连接池
procedure TForm1.InitDBPool;
begin
FDManager1.ConnectionDefFileName:=HomePath+'db.ini';
FDConnection1.ConnectionDefName:= 'db_pool';
FDConnection1.Connected:=true;
end;

db.ini 内容如下：

[db_pool]
POOL_MaximumItems=50
DriverID=MSSQL
Database=master
Password=xxxx
Pooled=True
Server=capserver
User_Name=sa

 

由于服务器更改了端口号，capserver为在客户端配置的一个实例名，端口号也做相应更改