Termineintrag aus Outlook auslesen

[Domo Sokrat]

Hallo Susanne,

ich bin mir nicht sicher, ob ich Dir bei den Sachen mit dem Anhang weiterhelfen kann, aber generell ist das Auslesen von FolderItems unter Outlook immer die gleichen Strickart. Ich hab' das Beispiel aus dem Swiss Delphi Center zum Thema "Outlook Kontakte auslesen" mal ein wenig umgestrickt. Ich hab's nicht testen können, da ich hier kein Outlook habe. Das mit dem Datum ist nur 'ne Vermutung, müsste aber stimmen:

Delphi-Quellcode:

uses ComObj;

procedure TForm1.Button1Click(Sender: TObject);
const
  olFolderCalendar = $00000009;
var
  outlook, NameSpace, Termine, Termin: OleVariant;
  i: Integer;
begin
  outlook := CreateOleObject('Outlook.Application');
  NameSpace := outlook.GetNameSpace('MAPI');

  Termine := NameSpace.GetDefaultFolder(olFolderCalendar);
  for i := 1 to Termine.Items.Count do
  begin
    Termin := Termine.Items.Item(i);
    // Titel des Termins und Startdatum mit Zeit auslesen:
    ShowMessage(Termin.Subject + '<Begin: ' + DateTimeToStr (Termin.Start) + ' >');
  end;

  Outlook := UnAssigned;
end;

{ gefundene Item-Properties:
   Subject                    (alphanumerisch)
   Body                       (alphanumerisch)
   Start                      (Datum/Uhrzeit)
   Duration                   (numerisch)
   End                        (Datum/Uhrzeit)
   Location                   (alphanumerisch)
   ReminderMinutesBeforeStart (Integer)
   ReminderSet                (boole'sch)
   Categories                 (alphanumerisch)
   BusyStatus                 (numerisch)
        (olFree        = frei),
         olTentative   = unter Vorbehalt),
         olBusy        = gebucht),
         olOutOfOffice = abwesend))
   Categories                 (alphanumerisch)
   CreationTime               (alphanumerisch)
   ReminderPlaySound          (boole'sch)
}

Ich hoffe, das hilft Dir ein wenig weiter, auch wenn ich's nicht testen konnte...