delphi FireDAC MySQL 连接

with FDPhysMySQLDriverLink1 do begin

DriverID := 'MySQL';

VendorLib :=ExtractFilePath(Application.Exename)+ 'libmysql.dll';

end;

with FDConnection1 do begin

DriverName := 'MySQL';

LoginPrompt := false;

Params.Database := 'Test';

Params.DriverID := 'MySQL';

Params.UserName := 'root';

Params.Password := '123456';

Connected := true;

end;

with FDQuery1 do begin

Connection := FDConnection1;

SQL.Add('select * from address');

Active := true; // <----- Crash

end;

推荐分享