Termineintrag aus Outlook auslesen

[Susanne]

stimmt, das items war zu viel!

jetzt versuche ich immernoch, an den blöden Anhang des Termins zu kommen. ich habe jetzt einfach nur mal versucht, herauszubekommen, wieviel Anhänge er denn findet:
Am Ende möchte ich dann den Pfad mit Dateinamen haben, ich hatte es auch schon versucht mit SaveToFile, aber da sagte er dann, dass die MEthode nicht unterstützt wird.

Code:

for i := 1 to gefilterteTermine.Count do
            begin
               Termin := GefilterteTermine.Item(i);
               //Titel des Termins und Startdatum mit Zeit auslesen:
               ShowMessage(Termin.Subject + ' '+ DateToStr(Termin.Start) );
               //Anhang extrahieren oder den Pfad + Datei
               x := Termin.Attachments;
            end;

Fehlermeldung: eVariantTypeCastError: Variante des Typs Dispatch konnte nicht in Typ Integer konvertiert werden.

Was muss ich denn nun machen?