acg.net

Consegui resolver.
Vou postar aqui o código para quem possa ter o mesmo problema:
 
        bSalvar                                                   := ACBrNFe1.Configuracoes.Geral.Salvar;
        ACBrNFe1.Configuracoes.Geral.Salvar := True;
        ACBrNFe1.EnviarEventoNFe(ibDm.cdCartaCorrecaoCO_LOTE_CC.AsInteger);
        ACBrNFe1.Configuracoes.Geral.Salvar := bSalvar;

        MemoResp.Lines.Text       := UTF8Encode(ACBrNFe1.WebServices.EnvEvento.RetWS);
        memoRespWS.Lines.Text := UTF8Encode(ACBrNFe1.WebServices.EnvEvento.RetornoWS);

        if Pos('Evento registrado e vinculado a NF-e',MemoResp.Lines.Text) > 0 then
        begin
          // pegando o xml de envio da carta de correcao
          sNomeArquivo := ACBrNFe1.Configuracoes.Geral.PathSalvar +
          SomenteNumeros(ACBrNFe1.EventoNFe.Evento.Items[0].InfEvento.id) + '-procEventoNFe.xml';

          cdCartaCorrecao.Edit;
          cdCartaCorrecaoTX_ARQUIVO_XML.LoadFromFile(sNomeArquivo);

          cdCartaCorrecaoDS_PATH_ARQUIVO_XML.AsString := sNomeArquivo;
          cdCartaCorrecao.Post;

          Application.MessageBox('Carta de correção registrada e vinculada a NF-e!', 'ATENÇÃO',
            MB_OK + MB_ICONINFORMATION + MB_DEFBUTTON2);

        end