Enviar Correo Con Outlook

[keys]

Hola a todos. Tengo un proceso para enviar correos a través de outlook. Hasta ahora funcionaba correctamente.

Código Delphi [-]
 
  vMailItem := Outlook.CreateItem(olMailItem);
  vMailItem.Recipients.Add("correo@correo.com);
  vMailItem.Subject := "Asunto";
  vMailItem.Body := "cuerpo del mensaje";  
  vMailItem.Send;

El problema es que al enviar a una dirección en concreto me retorna el error "Outlook no reconoce alguno de los nombres", he comprobado que el email esta correcto.

Tengo en los contactos de outlook un contacto creado con ese email. Si elimino el contacto de outlook o le cambio el email del contacto lo envia corretamente. Pero si lo envío con el contacto con ese email da error.

Si envio a otros correos que estan en contactos tambien me envía bien. Pero hay unos cuantos que me da error si esta en contactos.