使用FireDac 连接 MySQL数据库,参考官方帮助文档
http://docwiki.embarcadero.com/RADStudio/XE7/en/Multithreading_(FireDAC),
实现过程如下:
1、在DataModule界面上 放置一个 FDManager 控件;
2、在 Create 事件中:
procedure TDM.DataModuleCreate(Sender: TObject);
var
oParams: TStrings;
begin
//*****初始化*****
oParams := TStringList.Create;
//********* 连接池
oParams.Add('DriverID=MySQL');
oParams.Add('CharacterSet=utf8');
oParams.Add('Server=localhost');
oParams.Add('Port=3306');
oParams.Add('Database=dbname');
oParams.Add('User_Name=dbuser');
oParams.Add('Password=password');
// 毫秒
oParams.Add('POOL_CleanupTimeout=36000');
// 毫秒
oParams.Add('POOL_ExpireTimeout=600000');
//最多连接数
oParams.Add('POOL_MaximumItems=60');
oParams.Add('