It will good to have something like this : procedure TForm1.Connection1ConnectionLost(Sender: TObject; ConnLostCause: TConnLostCause;var RetryMode: TRetryMode); Regards, Ara -- http://www.fastmail.com - IMAP accessible web-mail