Обработка исключительных ситуаций. Последовательный доступ к данным с использованием технологии BDE, страница 9

·  вывести все сведения о просроченных товарах;

·  вывести все сведения о товарах заданного производителя в заданной ценовой категории.

Вариант 3

Разработать процедуры, реализующие отмену фильтрации и фильтрацию данных по следующим условиям:

·  вывести все сведения о книгах заданного автора;

·  вывести все сведения о книгах заданного жанра в заданном ценовом диапазоне.

Вариант 4

Разработать процедуры, реализующие отмену фильтрации и фильтрацию данных по следующим условиям:

·  для заданного врача вывести все сведения о пациентах, родившихся после заданного года;

·  вывести все сведения о заданном пациенте.

Вариант 5

Разработать процедуры, реализующие отмену фильтрации и фильтрацию данных по следующим условиям:

·  вывести все сведения о студентах заданного факультета, поступивших в заданный год;

·  вывести сведения о заданном студенте.

Вариант 6

Разработать процедуры, реализующие отмену фильтрации и фильтрацию данных по следующим условиям:

·  вывести все сведения о работниках заданного подразделения, работающих на заданной должности;

·  вывести все сведения о заданном работнике.

Вариант 7

Разработать процедуры, реализующие отмену фильтрации и фильтрацию данных по следующим условиям:

·  вывести все сведения о заказах заданной рубрики в заданную дату;

·  вывести все сведения о заданном заказе.

Вариант 8

Разработать процедуры, реализующие отмену фильтрации и фильтрацию данных по следующим условиям:

·  вывести все сведения об экзаменах для заданной группы;

·  вывести все сведения о заданном экзамене для всех групп, в которых были получены двойки на экзаменах.

ЛАБОРАТОРНАЯ РАБОТА № 6. Обработка исключительных ситуаций

Цель работы: повышение надежности программ за счет использования глобального и локального обработчиков исключительных ситуаций.

Задание: Требуется разработать проект в СП Delphi, который в режиме диалога открывает заранее подготовленный текстовый файл, содержащий набор целых чисел, считывает эти числа в компонент StringGrid и выполняет над ними действия в соответствии с вариантом индивидуального задания.

Следует составить два варианта программы: с использованием глобального обработчика исключительных ситуаций и с использованием локального обработчика исключительных ситуаций.

Обе программы должны обрабатывать следующие исключения:

1)    отсутствует заданный файл;

2)    данные в файле не являются целыми числами;

3)    заданное число не является целым;

4)    в файле нет чисел, удовлетворяющих заданному условию.

Порядок выполнения работы

Порядок выполнения работы рассмотрим на примере вычисления среднего арифметического тех чисел из текстового файла, которые меньше заданного числа и находятся на четных местах.

1.    Создание текстового файла. В текстовом редакторе Блокнот создадим текстовый файл, содержащий целые числа. Каждое число должно находиться в отдельной строке. Сохраним файл в ту папку, в которой впоследствии будет находиться проект Delphi. Пример файла приведен на рис. 24.

Рисунок 24 – Текстовый файл с целыми числами

2.    Отключение обработчика событий редактора Delphi. После вызова СП Delphi и сохранения пока еще пустого проекта снимите флажок Integrateddebugging в диалоговом окне команды Tools / DebuggerOptios. Это делается с целью отключения отладчик СП Delphi от обработки исключительных ситуаций.

3.    Создание интерфейса проекта с глобальным обработчиком исключительных ситуаций. Поместим в окно формы объекты, показанные на рис. 25.

Рисунок 25 – Окно формы проекта с глобальным обработчиком исключительных ситуаций

Объект ApplicationEvents1 находится на странице Additional палитры компонентов. Для события onException этого объекта надо в инспекторе объектов указать метод ApplicationEvents1Exception. Указанный метод является глобальным обработчиком исключительных ситуаций.