Delphi + Indy: fermeture de la Connexion avec élégance

À l'aide de D7 + Indy 10 dernière version.

Mon code est à l'aide de TIdSMTP pour envoyer l'email.
Je reçois des "fermeture de la Connexion gracieusement" à certains utilisateurs finals, et l'e-mail n'est jamais envoyé.

Le code est comme:

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;

Des conseils?

OriginalL'auteur Atlas | 2009-07-06