datasnap xe连接池_Delphi XE FireDac 连接池

在开发Datasnap三层中，使用FireDac 连接  MSSQL数据库。

实现过程如下：

1、在ServerMethods 单元中放入 FDManager、FDPhysMSSQLDriverLink1、FDGUIxWaitCursor1等控件。

2、自定义过程：

private

varoParams: TStrings;

procedure TSrvMethods.SetupFDManager; //加载数据库链接信息。

begin

//*****初始化*****

oParams := TStringList.Create;

//********* 连接池

oParams.Add(‘DriverID=MSSQL‘);

//oParams.Add(‘CharacterSet=utf8‘);

oParams.Add(‘Server=192.168.1.199‘);

//oParams.Add(‘Port=3306‘);

oParams.Add(‘Database=DSCSYS‘);

oParams.Add(‘User_Name=sa‘);

oParams.Add(‘Password=‘);

// 毫秒

oParams.Add(‘POOL_CleanupTimeout=36000‘);

// 毫秒

oParams.Add(‘POOL_ExpireTimeout=600000‘);

//最多连接数

oParams.Add(‘POOL_MaximumItems=60‘);

oParams.Add(‘Pooled=True‘);