[Oleg]

Код:

try
// место где может произойти ошибка
  except
    on E: Exception do
// если произошла ошибка, обработка
    ShowMessage('Ошибка'+ E.Message); // сообщение об ошибке
  end;