Verwenden von D7 + Indy 10 der neuesten Version.

Mein Code verwendet TIdSMTP, um E-Mails zu senden. Bei einigen Endbenutzern wird "Verbindung ordnungsgemäß geschlossen", und die E-Mail wird nie gesendet.

Der Code ist wie folgt:

try
~~~~
~~~~
_idSMTP := TIdSmtp.Create;
with _idSMTP do
begin
  Host := 'myhost';
  Connect;
  try
    Send(_EmailMsg);
    Result := True;
  except
    on E: Exception do
    begin
      MsgDlgErr(Self.Handle, E.Message)
    end
  end;
end;
finally
 _idSMTP.Disconnect;
 _idSMTP.Free;
end;

Irgendein Rat?