Delphi XE FireDac 连接池
在开发Datasnap三层中,使用FireDac 连接 MSSQL数据库。 实现过程如下: 1、在ServerMethods 单元中放入 FDManager 、FDPhysMSSQLDriverLink1、FDGUIxWaitCursor1等控件。 2、自定义过程: private var oParams: 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');