Hi zusammen,
ich benutze derzeit Delphi 7 und die Indy 10 Componenten.
Möchte nun eine eMail mit Attachment versenden, klappt leider noch nicht.
Die Beispiele die ich finde sind alle für Indy 9. Aber seit Indy 10 hat sich die KLasse TidAttachment geändert und wird anders verwendet.
Jedenfalls erzeuge ich mir mein Attachment, und füge es meiner Message mit der Methode DoCreateAttachment zu.
Bei der Methode "Send" von TidSMTP erhalte ich dann jedoch den Fehler "Abstrakter Fehler".
Das versenden von eMail funktioniert, nur sobald ich das Attachment hinzufüge krachts.
Kann sein das ich das Attachment einfach falsch verwende, aber ohne Hilfe und Erfahrung in Indy beisst man sich da echt die Zähne aus.
Vielleicht kann mir ja jemand helfen.
Anbei ein Codeschnipsel, so wie ich das Attachment hinzu/anfüge:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
| procedure TdmHaupt.EMailAttachmentHinzufuegen(strDateiname : String);
var
attachment : TIdAttachment;
begin
attachment := TIdAttachment.Create( IdMessage.MessageParts );
attachment.FileName := strDateiname;
attachment.ContentType := 'application/zip';
with IdMessage do DoCreateAttachment(attachment.Headers, attachment);
end; |
UGrohne