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

Рисунок 17 – Текст процедуры, реализующей запрос на выборку

5. 

Создание процедуры
удаления данных. Создадим процедуру обработки щелчка по кнопке Button2 для удаления данных об ученике с заданным номером. Текст процедуры приведен на рис. 18.

Рисунок 18 – Текст процедуры, реализующей запрос на удаление

6.  Создание процедуры обновления данных. Создадим процедуру обработки щелчка по кнопке Button3 для изменения среднего балла ученику с заданным номером. Текст процедуры приведен на рис. 19.

Рисунок 19 – Текст процедуры, реализующей запрос на обновление

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

Вариант 1

Создайте в системе Paradox базу данных со следующими полями:

·  номер ученика;

·  фамилия;

·  класс;

·  адрес;

·  год рождения;

·  средний балл.

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

·  вычислить количество человек в заданном классе со средним баллом выше заданного;

·  удалить данные о конкретном ученике;

·  для заданного ученика обновить все сведения;

·  вычислить средний балл у учеников заданного года рождения.

Вариант 2

Создайте в системе Paradox базу данных со следующими полями:

·  код товара;

·  наименование товара;

·  цена, р.;

·  дата производства;

·  срок годности, дни;

·  производитель;

·  количество, кг.

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

·  вычислить количество просроченного товара;

·  удалить данные о конкретном товаре;

·  для заданного кода товара обновить все сведения;

·  вычислить среднюю цену товара заданного производителя.

Вариант 3

Создайте в системе Paradox базу данных со следующими полями:

·  код книги;

·  название книги;

·  автор;

·  жанр;

·  издательство;

·  цена, р.;

·  количество, штук.

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

·  вычислить среднюю цену книг заданного автора;

·  удалить данные о книгах заданного автора;

·  для заданного кода книги обновить все сведения;

·  вычислить количество книг заданного жанра, выпущенных заданным издательством.

Вариант 4

Создайте в системе Paradox базу данных со следующими полями:

·  код больного;

·  ФИО больного;

·  адрес;

·  место работы;

·  день рождения;

·  ФИО участкового врача.

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

·  вычислить количество пациентов у заданного врача;

·  удалить данные о заданном больном;

·  для заданного кода больного обновить все сведения;

·  вычислить количество больных с заданным годом рождения.

Вариант 5

Создайте в системе Paradox базу данных со следующими полями:

·  код студента;

·  ФИО студента;

·  факультет;

·  группа;

·  специальность;

·  средний балл;

·  год поступления.

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

·  вычислить средний балл студентов заданного факультета;

·  удалить данные о студентах заданной группы;

·  для заданного кода студента обновить все сведения о нем;

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

Вариант 6

Создайте в системе Paradox базу данных со следующими полями: