D2007 dbExpress (na mão) MySQL5

procedure TConexao.Conectar;
begin

  FCN := TSQLConnection.Create(nil);

  FCN.DriverName := ´MySQL´;
  FCN.VendorLib := ´libmysql.dll´;
  FCN.LibraryName := ´dbxmys30.dll´;
  FCN.ConnectionName := EmptyStr;
  FCN.Params.Clear;

  with FCN.Params do
  begin
    Add(´DriverUnit=DBXDynalink´);
    Add(´DriverPackageLoader=TDBXDynalinkDriverLoader´);
    Add(´DriverPackage=DBXCommonDriver110.bpl´);
    Add(´DriverAssemblyLoader=Borland.Data.TDBXDynalinkDriverLoader´);
    Add(´DriverAssembly=Borland.Data.DbxCommonDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=a91a7c5705831a4f´);
    Add(´HostName=´ + FInfoConexao.Servidor);
    Add(´Database=´ + FInfoConexao.BancoDeDados);
    Add(´User_Name=´ + FInfoConexao.Usuario);
    Add(´Password=´ + FInfoConexao.Senha);
    Add(´BlobSize=-1´);
    Add(´ErrorResourceFile=´);
    Add(´LocaleCode=0000´);
    Add(´Compressed=False´);
    Add(´Encrypted=False´);
  end;

  FCN.Connected := True;

end;