Hi Sven !
Wenn Du die
Jedi Komponenten verwendest, dann kannst Du auch tJvMail benutzen.
Die Komponente ist wirklich sehr einfach zu bedienen.
Delphi-Quellcode:
procedure TForm1.SendButtonClick(Sender: TObject);
begin
JvMail1.Subject := SubjectEdit.Text;
JvMail1.Recipient.Clear;
with JvMail1.Recipient.Add
do Address := RecipientEdit.Text;
JvMail1.Body.Text := BodyMemo.Lines.Text;
JvMail1.SendMail(true);
end;
Die Übertragung erfolgt über das Standard-Mail-Programm.
Auch die Verwendung von Attachments (über StringListe von Dateinamen), CarbonCopy und BlindCopy (wie Recipient) ist möglich.
Einen Haken hat die Sache :
Über den Parameter bei JvMail1.SendMail kannst Du einstellen, ob der Editor des Mailprogramms geöffnet werden soll. Wählst Du hier false, so erscheint ein Dialog des Mailprogramms, der darauf hinweist, dass ein anderes Programm versucht eine Mail zu versenden und nachfragt, ob dies OK ist. - Automatisches Senden im Hintergrund, bspw. für automatische Berichte, funktioniert also nicht. Ein Klick auf "Senden" ist immer erforderlich.
Gruß
Guido