Setzen von Timeout bei Mailversand - immer Fehler?

[andreasm82]

Delphi-Quellcode:

Try
      SMTPClient := TIdSMTP.Create;
      SMTPClient.Username := MailData.MailUsername;
      SMTPClient.Password := MailData.MailPassword;
      SMTPClient.ConnectTimeout := 5000;
      SMTPClient.Connect(MailData.MailProvider);
      SMTPClient.Send(SendMessage);
      SMTPClient.Destroy;
      DataLog('Mail send to ' + Buffer + '!');
    except
      DataLog('SendMail not possible, Connection failed!');
    end;

Bei dem obigen Code erhalte ich komischerweise jedes Mal die Meldung 'SendMail not possible, Connection failed!' in meinem Logfenster.
Aber: Die Mail wurde versandt. Das verstehe ich nicht...


Als ich früher das ConnectTimeout niedriger gesetzt hatte, so kam die Meldung 'SendMail not possible, Connection failed!' nicht.
Ich möchte das Timeout aber aus Sicherheitsgründen extra hoch gesetzt haben.


Woran liegt dies?