环境:Delphi XE10.2.3
fireDAC 连接Mysql 报错!
代码如下:
procedure TfrmServiceconfig.TestConnection;
begin
try
with ds.DataModule4.FDConnection1 do
begin
Close;
// create temporary connection definition
with Params do
begin
Clear;
Add('DriverID=' + ComboBox1.Text);
Add('Server=' + Ed_Server.Text);
Add('Port=' + Ed_Port.Text);
Add('Username=' + Ed_User.Text);
Add('password=' + Ed_Password.Text);
Add('Database=' + Ed_Database.Text);
end;
Open;
ShowMessage('连接成功');
end;
except
on E: Exception do
ShowMessage(E.Message);
end;
end;
解决办法:
修改 Add('Username=' + Ed_User.Text); 为
Add('User_name=' + Ed_User.Text);即可 坑啊!!!!