Mehrere Dateien als Anhang verschicken.

[Sir K]

Ich habs mal ausprobiert aber ich bekomme Zugriffsverletzungen gemeldet wenn ich die mail versenden möchte:

Delphi-Quellcode:

var
  iAttachment: TIdAttachmentFile;
  i: Integer;
begin

...
 
i:=0;
while not(MyAttatchments[i] = '') do
  begin
    iAttachment.Create(IdMessage1.MessageParts, MyAttatchments[i]);
    i:=i+1;
  end;

Lg
Sir K