Ошибки TIdTCPClient при подключении

Question

Я пытаюсь смоделировать некоторые проблемы с подключением (например, при отключении провода) и получить каскад окон ошибок:

Ошибка сокета 10054

Похоже, блок Except никогда не выполняется. Как правильно решить эту проблему? и как я могу отключить окна ошибок от TIdTCPClient?

Спасибо!

procedure TClient.onTimer(Sender: TObject);
begin
  try
    self.FunctionRead(0);
  except
    self.Timer.Enabled:= FALSE;
    inc(self.cntErr);
  end;
end;