File aus TIDAttachment Löschen ?

[ste_ett]

Auf die einzelnen Attachments kannst du mit

(*Name der Instanz von TIdMessage*).MessageParts.Items zugreifen.

Um die Datei aus der Attachmentliste zu löschen, reicht es, das Objekt freizugeben.

Delphi-Quellcode:

  for i := 0 to (*Name der Instanz von TIdMessage*).MessageParts.Count-1 do
    if ((*Name der Instanz von TIdMessage*).MessageParts.Items[i].StoredPathName = 'Pfad\zur\Datei') then
      (*Name der Instanz von TIdMessage*).MessageParts.Items[i].Free;