Mail senden mit ICS funktioniert nicht

[Mumpe]

Hast Du einen Portblocker, Virenscanner o.ä. laufen, der u.U. verhindert, dass Dein Programm den Port 25 benutzen darf?


Du könntest auch versuchen, das Verschicken der Mail im OnRequestDone erledigen zu lassen, z.B.

Delphi-Quellcode:

procedure TForm1.SmtpCli1RequestDone(Sender: TObject; RqType: TSmtpRequest; Error: Word);
begin
     if RqType=smtpConnect then SmtpCli1.Helo; 
     if RqType=smtpOpen then SmtpCli1.Helo; 
     if RqType=smtpHelo then begin
        {Mail zusammenbauen}
        SmtpCli1.Mail; 
     end;
     if RqType=smtpMail then SmtpCli1.Quit;  
     if RqType=smtpQuit then 
        // Fertig...
        if POP3Cli1.Connected then  POP3Cli1.DisConnect;
end;