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

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

Вариант 4

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

Вариант 5

Вычислить среднее арифметическое чисел, содержащихся в текстовом файле и принадлежащих заданному промежутку [x, y].

Вариант 6

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

Вариант 7

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

Вариант 8

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

ЛАБОРАТОРНАЯ РАБОТА № 7. Заполнение, просмотр и редактирование информации в таблицах базы данных СУБД Access НА ОСНОВЕ технологии ADO

Цель работы: получение навыков использования технологии ADO для обеспечения универсального доступа к данным из приложений БД на примере СУБД Access.

Задание: Для указанного преподавателем варианта создайте в СУБД MS Access базу данных из четырех таблиц. Создайте в СП Delphi проект, позволяющий заполнять, просматривать и редактировать данные из таблиц БД.

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

1.    Создание БД в MS Access. В среде СУБД MS Access опишем структуру четырех таблиц и создадим схему данных БД Клиенты-Заказы. В таблице Клиенты содержатся сведения о клиентах торговой фирмы, в таблице Товары – сведения о продаваемых товарах и их наличии на складе фирмы. В таблицах Заказы и СтрокиЗаказов содержатся сведения из заказов на поставки, пример соответствующего документа приведен в табл. 1.

Таблица 1 – Заказ № 4 от 04.03.2011 г.

Клиент – ОАО «Гомельские баранки»

Наименование товара	Количество
Желе вишневое	12
Желе апельсиновое	4

Структура таблиц БД приведена на рис. 31, а схема данных – на рис. 32.

Рисунок 31 – Структура таблиц БД Клиенты-Заказы

Рисунок 32 – Схема данных БД Клиенты-Заказы

2.    Создание интерфейса проекта. Создадим интерфейс проекта в соответствии с образцом, приведенном на рис. 33.

Рисунок 33 – Окно формы проекта использования БД Клиенты-Заказы

Поместим в окно формы компонент ADOConnection (страница ADO палитры компонентов), который обеспечивает соединение приложения с хранилищем данных. Установим следующие значения для свойств этого компонента:

1)  True для свойства Connected;

2)  Falseдля свойства LoginPromt (беспарольный доступ к БД);

3)  для свойства ConnectedString надо сначала указать поставщика данных MSJet 4.0 OLEDBProvider по команде…/ Build/ Поставщик данных, затем по команде / Подключение необходимо указать путь к БД Access и по команде Проверка подключения проверить подключение, после чего последовательно три раза щелкнуть по кнопке OK.

Поместим в окно формы четыре компонента ADOTable (страница ADO палитры компонентов), которые обеспечат использование в проекте Delphi всех таблиц БД, подключенных через ADO. Установим следующие значения для свойств каждого из этих компонентов:

1)  ADOConnection1для свойства Connection;

2)  для свойства TableName надо выбрать из списка одну из таблиц БД (ADOTable1 – Клиенты, ADOTable2 – Товары, ADOTable3 – Заказы, ADOTable4 – СтрокиЗаказов);

3)  clUseServer для свойства CursorLocation;

4)  True для свойства Active.

На следующем этапе разработки интерфейса необходимо перенести на форму и настроить четыре компонента DataSource (страница DataAccess палитры компонентов). Для связи набора данных с компонентом DataSource используется свойство DataSet, в качестве значения которого надо указать ADOTable1, ADOTable2, ADOTable3 и ADOTable4 соответственно.