Sincronizacion desde OutLook a TCxShedeuler

[lccarvajal814]

Muchas gracias si en el primer mensaje yo adjunte el programa donde hago ese proceso. La verdad no es un programa que yo hice sino esta en las consultas de dbexpress. Ahi diseñaron la unidad llamada en español dos formas de sincronizar con outlook en teoría se hace en ambos sentidos, pero a mi me interesa por hora desde outlook no hacia outlook.

Si se borra la información de la tabla adjunta el la pobla de nueva con la información obtenida del calendario de outlook.

En estas paginas consulte

[Neftali [Germán.Estévez]]

Empezado por lccarvajal814

si en el primer mensaje yo adjunte el programa donde hago ese proceso.

No es correcto.
Has puesto un programa que lee datos de una Base de Datos de MSAccess y las pasa a un calendario (no hay nada de outlook en ese programa).

Empezado por lccarvajal814

Ahi diseñaron la unidad llamada en español dos formas de sincronizar con outlook

Gracias.
A traducir desde el inglés había llegado.

Empezado por lccarvajal814

...en teoría se hace en ambos sentidos,

Pues ese es el error.
Ese programa (como ya te he dicho antes) NO HACE NADA CON OUTLOOK!
Sólo lee datos de una Base de Datos y los pasa a un calendario.

El nombre que le hayan puesto es igual. NO HACE lo que dice el nombre. Y si lo revisas lo verás.

Empezado por lccarvajal814

a mi me interesa por hora desde outlook
Si se borra la información de la tabla adjunta el la pobla de nueva con la información obtenida del calendario de outlook.

Lo primero que necesitas es conectarte a outlook.
Revisa los componentes de automatización que vienen con Delphi a ver si los tienes y haz una prueba.



También puedes revisar y buscar hilos en los foros que hablan del tema:
https://www.clubdelphi.com/foros/showthread.php?t=69785

Si buscas encontrarás más.

[lccarvajal814]

Muchas gracias por el interés pero por favor revisen esta lógica.
Esta parte trae informacion del outlook

Código Delphi [-]
for I := 1 to CalendarFolder.Items.Count do
    begin
      AOutlookAppointmentItem := CalendarFolder.Items(I);
      if not VarIsNull(AOutlookAppointmentItem) then
      begin
        if AStorageEntryIDs.FindEntryID(AOutlookAppointmentItem.EntryID, AIndex) then
        begin
          AEvent := AStorageEntryIDs.ExtractEvent(AIndex);
          AEventCompareFieldValue := AEvent.GetCustomFieldValueByName(StorageCompareFieldName);
          AApptCompareFieldValue := InvokePropertyGet(AOutlookAppointmentItem, OutlookCompareFieldName);
          if AApptCompareFieldValue > AEventCompareFieldValue then
            UpdateExistingEvent(AEvent, AOutlookAppointmentItem, AStorageEntryIDs)
          else
            UpdateExistingAppointmentItem(AOutlookAppointmentItem, AEvent);
        end
        else
          ImportAppointmentItemFromOutlook(AOutlookAppointmentItem);
      end;
      Application.ProcessMessages;
    end;

[lccarvajal814]

Buenos dias envio prueba que hice donde borro la tabla y est si toma informacion desde outlook. Les agradezco la ayuda

Respetuoso saludo