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

Объект OpenDialog1 находится на странице Dialogs палитры компонентов. В качестве значения свойства FileName этого объекта надо указать путь к созданному текстовому файлу.

В окне формы находятся две командные кнопки: одна служит для считывания данных из текстового файла в компонент StringGrid1, а другая – для вычисления среднего арифметического тех чисел из текстового файла, которые меньше заданного числа и находятся на четных местах.

4.    Разработка процедуры глобальной обработки исключительных ситуаций. Шаблон процедуры ApplicationEvents1Exception следует заполнить операторами, обеспечивающими вывод сообщений об исключительных ситуациях (см. рис. 26). Сообщения выводятся в диалоговые окна с помощью процедуры


ShowMessage.

Рисунок 26Процедура глобального обработчика исключительных ситуаций


5.    Разработка процедуры ввода чисел из файла. Процедура, обеспечивающая ввод данных из текстового файла, их подсчет и занесение в компонент StringGrid1 приведена на рис. 27.

Рисунок 27Процедура ввода данных из текстового файла

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


Рисунок 28Процедура обработки чисел из текстового файла в проекте с глобальным обработчиком исключительных ситуаций

7.    Отладка проекта с глобальным обработчиком исключительных ситуаций. Для отладки созданного проекта с глобальным обработчиком исключительных ситуаций надо не только варьировать числа в текстовом файле и заданное число, но и проверить программную обработку каждого из четырех запланированных исключений. Таким образом, надо проверить следующие случаи:

1)    в диалогом окне задания имени текстового файла указать имя несуществующего файла, а затем имя файла, не являющегося текстовым;

2)    в текстовый файл занести вещественное число, а затем строку;

3)    в качестве заданного числа задать вещественное число;

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

8.    Создание интерфейса проекта с локальным обработчиком исключительных ситуаций Для создания проекта с локальным обработчиком исключительных ситуаций скопируем папку проекта с глобальным обработчиком и переименуем ее. Из окна формы удалим объект ApplicationEvents1, а из текста модуля – процедуру обработки исключительных ситуаций.


9.    Разработка процедуры ввода чисел из файла с локальной обработкой ошибок. Существующий текст процедуры (см. рис. 27), обеспечивающей ввод данных из текстового файла, их подсчет и занесение в компонент StringGrid1, надо включить в блок try-except-end так, как это показано на рис. 29.

Рисунок 29Процедура ввода данных из текстового файла с локальной обработкой исключительных ситуаций


10.    Разработка процедуры обработки чисел из файла с локальной обработкой ошибок. Аналогично преобразуется текст процедуры обработки элементов массива, представленный на рис. 28. Полученный текст приведен на рис. 30.

Рисунок 30Процедура обработки чисел из текстового файла в проекте с локальным обработчиком исключительных ситуаций

11.    Отладка проекта с локальным обработчиком исключительных ситуаций. Отладку проекта с локальным обработчиком событий следует провести для тех же тестов, что и проект с глобальным обработчиком (см. пункт 7).

Индивидуальные задания

Вариант 1

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

Вариант 2

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

Вариант3