Mailclient Indy Attachment versenden

[LaPeter]

Hallo erst mal ...
Ich benutze Indy9 zum Versenden von emails. Mit Attachments habe ich folgendes Problem.

ich lade eine Fileliste in eine Stringliste

Delphi-Quellcode:

... 
ListAttach.Add(PFLog + sr.name);
...

die Liste ist okay

mit

Delphi-Quellcode:

For i := 0 to ListAttach.Count -1 do
    begin
      TIdAttachment.Create(EMail.MessageParts,ListAttach[i]);
    end;

lade ich diese in die Messageparts.

das versenden der mail schlägt aber fehl.(ohne Attachments funzts)

lade ich die Attachments direkt wie z.B.

Delphi-Quellcode:

TIdAttachment.Create(EMail.MessageParts,'D:\115_PlayList.log');
TIdAttachment.Create(EMail.MessageParts,'D:\116_PlayList.log');
TIdAttachment.Create(EMail.MessageParts,'D:\117_PlayList.log');

funtioniert das Versenden!

Für eine Idee wäre ich Euch sehr dankbar, bin langsam am Ende mit meinem Lathein

Danke schon mal

Peter

[Gege]

hallo ..

und wenn du es mit einen zwischhen String machst ? geht es dann ?

also

Code:

For i := 0 to ListAttach.Count -1 do
begin
Tempstring:=ListAttach[i];
TIdAttachment.Create(EMail.MessageParts,Tempstring);
end;

kommt auf die Terminierung des Strings/Stringlist evtl an denk ich ?! evtl lieg ich ja auch falsch ..

[LaPeter]

... Hab ich auch schon probiert, funzt leider auch nicht.
Der Witz ist, ich hab mir den Inhalt der messageparts angschaut, in beiden Varianten, und
Es sieht absolut identisch aus ...
Ich habs auch mal mit folgendem code versucht, der auch funktionierte ...

Delphi-Quellcode:

If opendialog.execute then
  For i := 0 to opendialog.files.count -1 do
      TIdAttachment.Create(EMail.MessageParts, opendialog.files[i];

Die Stringterminierung werde ich mir mal noch genauer anschauen, vielleicht liegt es daran!

Danke für den Tip
Peter

[pelzig]

Hast Du mal versucht, ein Trim auf den Tempstring von #2 loszulassen?

MfG

[LaPeter]

Yes ...

[noisy_master]

Moin,

habe gerade gesehen, dass du scheinbar mit findfirst/Next deine Dateien zusammensuchst.
Bist du dir sicher, dass keine Directories und auch . und .. nicht in deinen Suchergebnissen sind?

[LaPeter]

auch moin

Problem gelöst !
Danke für deinen Hinweis. Dies war zwar nicht das Problem, hat mich aber auf
die richtige Spur gebracht.
Im Pfad zum Anhang fehlte der letzte Backslash vor dem Dateinamen !
Mein Fehler, arbeite eigentlich immer mit IncludeTrailingPathDelimiter,
an dieser Stelle hab ichs aber verbumfidelt!

Danke Euch allen für die Hilfe

Gruß aus Leipzig
Peter