Мельница данных   (23.11.2017)
Оператор обработки исключительных ситуаций
try
  //Операторы1
except
  //Операторы2
end

Выполняются операторы Операторы1. В случае возникновения исключительной ситуации управление передается на Операторы2. Если исключительных ситуаций не возникло, Операторы2 не выполняются никогда. При передаче управления на Операторы2 исключительная ситуация деактивирована. Для ее повторного возбуждения можно воспользоваться оператором возбуждения исключения без указания текстовой строки сообщения.

       
try
  LObject.NeverTouch := True;
  LObject.ExecuteCoolMethod; //если метод выполнен неудачно
except
  LObject.NeverTouch := True;  //установить флаг и ничего не сообщать пользователю.
end;
       
try
   LObject.ExecuteCoolMethod; //если метод выполнен неудачно
except
   LObject.Destroy; //удалить неудачный объект
   raise;           // продолжить обработку исключения.
end;