Datenabgleich mit Outlook

[oschulz]

aber gerne doch

Delphi-Quellcode:

//Session anlegen
ext_App:=CoOutlookApplication.Create;
if not Assigned(ext_Session) then
  ext_Session:=ext_App.GetNamespace('MAPI');
ext_Session.Logon('','',false,false);

//Ordner Kalender auswählen
ext_Calendar:=ext_Session.GetDefaultFolder(olFolderCalendar);

//aktuelles Item
item:=ext_Messages.GetNext as AppointmentItem;

//array of records        
temp_ext_Calendar[ic].body:=item.Body;