Outlook-Kalender auslesen

[Jumpy]

Hab mal was aus einer Excel-VBA-Anwendung kopiert, daher die nicht Delphi-Syntax. Das Prinzip des Zugriffs sollte aber das selbe sein:

Code:

Set Kalender = objApp.GetNamespace("MAPI") _
               .Folders.Item("Öffentliche Ordner") _
               .Folders.Item("Alle Öffentlichen Ordner") _
               .Folders.Item("Kalender") _
               .Folders.Item("Raum1")