Функции для работы с объектами > Прочие функции для работы с объектами >

ExceptionsOff – отключить генерацию исключений

Предыдущий раздел В начало Следующий раздел

Синтаксис:

procedure ExceptionsOff;

Описание:

Функция отключает генерацию исключений. Включить генерацию исключений можно с помощью функции ExceptionsOn. Получить информацию о сгенерированных после вызова функции исключениях можно с помощью функций ExceptionExists и GetLastException. Отключая генерацию исключений, следует четко представлять ход выполнения вычисления в случае возникновения исключений, чтобы избежать возникновения наведенных ошибок из-за необработанных исключений.

Пример использования:

// Обработать исключение при загрузке сохраненного поиска.

// SearchName – имя поиска.

// SavedSearchNotFoundMsg – текст исключения в случае,

// когда сохраненный поиск не найден.

// SaveToFileFormat – форматная строка для записи

// исключения в лог.

// LogFile – имя файла лога.

// NeedDialog - признак необходимости отображения диалога

// сообщения об ошибке.

ExceptionsOff()

FreeException()

SearchDescription = SearchFactory.Load(SearchName)

ExceptionsOn()

if ExceptionExists()

 if NeedDialog == True

   Raise(CreateException('ESavedSearchNotFound';

     SavedSearchNotFoundMsg; ecException))

 else

   ФайлЗаписать(LogFile; 'Д'; Format(SaveToFileFormat;

     ArrayOf(Time(); TAB; SavedSearchNotFoundMsg; CR)))

   Exit()

 endif

endif

См. также

Функция ExceptionExists

Функция ExceptionsOn

Функция GetLastException