Leer Libreta de Direcciones de Correo de Outlock

[Efren2006]

Empezado por cloayza

Bueno...

Primero: Buscar en google
Segundo: Buscar en google
Tercero: Buscar en google

Controlling MS Outlook from Delphi XE2
read outlook contact from delphi

Bueno eso es todo...

Empezado por pacopenin

Como ejemplo sencillito igual te sirve esto:

Código Delphi [-]
const
  olFolderContacts = $0000000A;
var
  outlook, NameSpace, Contacts, Contact: OleVariant;
  i, p: Integer;

....

   outlook := CreateOleObject('Outlook.Application');
   try
    NameSpace := outlook.GetNameSpace('MAPI');

    Contacts := NameSpace.GetDefaultFolder(olFolderContacts);

    for i := 1 to Contacts.Items.Count do
     begin

     ..... aquí haz lo que necesites

     end;
   finally
    Outlook.Quit;
    Outlook := UnAssigned;
   end;

Gracias Amigos por los aportes....

Probare estas opciones .... a ver como me van y si es lo que necesito

Saludos