Ich schreib grad an ein Konsolenmailer und habe folgendes Problem,
der Code will bei mir nicht funktioniern! Keine Ausgabe von Warnungen oder Fehlern!
Kann es sein das irgendetwas vergessen habe, wie ein Konstruktor, da in der Windows Anwendung alles funktioniert.
with mess do
begin
Priority:=mpHighest;
From.text:='XXX@gmx.de';
Recipients.EMailAddresses:='XXX@gmx.de';
Body.Add('HALLO erste Mail');
Subject:='Test Mail mit Delphi';
end;
with smtp do
begin
AuthenticationType:=atlogin;
Username:='0000000';
Password:='Kennwort';
Host:='mail.gmx.de';
Port:=25;
Connect(3000);
try
Send(mess);
finally
Disconnect;
end;
end;
{Test}