Grato pelo post, para o terra ficou assim:
ACBrNFe1.NotasFiscais.Items[0].EnviarEmail(edtSmtpHost.Text , edtSmtpPort.Text , edtSmtpUser.Text , edtSmtpPass.Text ,
[email protected] //edtSmtpUser.Text , Para , ReplaceVariaveis(edtEmailAssunto.Text) , Mensagem , FALSE //chkEmailSSL.Checked // SSL - Conexão Segura , True //Enviar PDF junto , CC //Lista com emails que serão enviado cópias - TStrings , nil // Lista de anexos - TStrings , False //Pede confirmação de leitura do email , True //Aguarda Envio do Email(não usa thread) , qrNota.FieldByName('Filial_Fantasia').AsString // Fantasia da Empresa , TRUE //chkEmailTLS.Checked // Auto TLS , False //UsaTread , False); //UsaHtml
