Params := TStringList.Create; try Params.Clear; Params.Add('Server=' + Server); Params.Add('Port=' + Port); Params.Add('Database=' + Database); Params.Add('CharacterSet=utf8'); Params.Add('User_Name=' + User_Name); Params.Add('Password=' + Password); Params.Add('Pooled=true'); Params.Add('POOL_MaximumItems=1000'); Params.Add('POOL_CleanupTimeout=60000'); // 线程不用后过多少时间清除单位毫秒 Params.Add('POOL_ExpireTimeout=10000'); FDMainManager.AddConnectionDef('', 'MSSQL', Params); finally Params.Free; end; ———————————————— 版权声明:本文为博主「zjm12343」的原创文章,遵循 CC 4.0 BY-SA 版权协议,转载请附上原文出处链接及本声明。 原文链接:https://blog.csdn.net/zjm12343/article/details/89336976