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

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

Вариант 6

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

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

Вариант 7

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

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

Вариант 8

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

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


ЛАБОРАТОРНАЯ РАБОТА № 4. Последовательный доступ к данным с использованием технологии BDE

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

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

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

1.  Описание структуры таблицы в системе Paradox. Вызовем систему Paradox по команде Пуск / Программы / BorlandDelphi 7 / DatabaseDesctop / File / New / Table. Создадим в системе Paradox таблицу Ученики со следующими полями: номер ученика, фамилия, класс, адрес, год рождения, средний балл (см. рис. 14).

Рисунок 14Структура таблицы Ученики в системе Paradox

2. 


Заполнение таблицы БД информацией. Заполним таблицу БД информацией так, как это показано на рис. 15, и закроем БД.

Рисунок 15Содержимое таблицы Ученики в системе Paradox


3.  Создание интерфейса проекта. Вызовем СП Delphi и поместим на форму компонент TTable из палитры компонентов BDE, который обеспечивает соединение с таблицей Ученики.

Установим следующие значения для свойств этого компонента:

1)  значение True для свойства Active;

2)  укажем путь к БД Paradox для свойства DatabaseName;

3)  выберем из выпадающего списка имя таблицы Ученики.dbдля свойства TableName.

Поместим на форму компонент DataSource1 (страница Data Access палитры компонентов). Установим значение Table1 для свойства DataSet этого компонента.

Поместим на форму компонент DBGrid (страница DataControls палитры компонентов), который представляет данные в виде таблицы. В столбцах таблицы размещаются поля набора данных, а в строках – записи. Связь с набором данных устанавливается значением DataSource1 свойства DataSource.

Компонент DBNavigator (страница DataControls палитры компонентов) предназначен для перемещения по записям набора данных. Связь с набором данных устанавливается значением DataSource1 свойства DataSource.

Окно формы приведено на рис. 16.


Рисунок 16Интерфейс проекта

4.  Создание процедуры на выборку.Создадим процедуру обработки щелчка по кнопке Button1 для подсчета количества человек с заданным годом рождения и средним баллом выше заданного значения. Текст процедуры приведен на рис. 17.