Обработка исключительных ситуаций в Delphi

В языке Delphi предусмотрено очень мощное и удобное средство обработки ошибок – оператор TRY:

TRY

опасное место в программе

EXCEPT

выполняется при возникновении ошибки

END;

Если на участке между TRY и EXCEPT возникнет ошибка, то будут выполняться операторы, стоящие между EXCEPT и END, иначе они пропускаются, и выполняется команда, следующая за END. В реальной программе оператор TRY выглядит примерно так:

TRY
reset(f);
WriteLn(f,’123’);
Close(f)
EXCEPT
MessageBox(‘Ошибка записи в файл’);
END;