Delphi6: Mit SMTP Mails verschicken.

[Stevie]

Ich versuche, mit einer NMSMTP-Komponente eine Mail zu verschicken. Das klappt auch wunderbar bis auf einige Schönheitsfehler: In der Mail befindet sich immer als erstes eine Leerzeile und das Sendedatum wird nicht angezeigt. Wie kann ich das beheben? Der Quellcode:

procedure TfrmWinMail.btnSendClick(Sender: TObject);

begin

  with SMTP do

  begin

    Connect;

    with PostMessage do

    begin

      ToAddress.Clear;

      ToAddress.Add(edToAddress.Text);

      Subject := edSubject.Text;

      Body.Clear;

      Body.Add(edBody.Text);

    end;

    SendMail;

    MessageDlg('E-Mail verschickt.', mtInformation, [mbOK], 0);

    Disconnect;

  end;

end;

Host, FromAddress und FromName hab ich in den Eigenschaften schon festgelegt. Charset steht auf us-ascii.

[geloescht_JesterDay]

Da du Delphi 6 benutzt solltest du nicht die NM-Komponenten benutzen sondern die Indy-Komponenten.

Indy ist ein Opensource Projekt zur Einbindung der Internet-Protokolle in Delphi und wurde seit Delphi6 von Borland mit Delphi ausgeliefert.

http://www.indyproject.org/index.html

[Stevie]

Wärst du so freundlich, mal kurz zu erläutern, wie man damit Mails verschickt und empfängt? Vielleicht etwas Code?! Thx!

[geloescht_JesterDay]

Sorry, hab die SMTP komponente von Indy eigentlich noch nicht benutzt, aber die alten NM-Komponenten waren noch nie so toll. Das ist wohl auch der Grund warum Borland Indy mit ausliefert.

http://www.atozedsoftware.com/indy/Demos/index.html

Dort findest du ein Indy SMTP Demo.