Ход работы

Упражнение 3

1. Откройте новый проект.

2. Снова откроите диалоговое окно Database Form Wizard (Мастер форм баз данных).

3. На этот раз включите параметр Create a master/detail form (Создать главную/подчиненную форму).

4. На следующей странице выберите псевдоним dbdemos и в качестве глав­ной таблицы — CUSTOMER.DB.

5. Отметьте любое поле или все поля, а на следующей странице выберите расположение Horizontally.

6. В качестве подчиненной таблицы выберите ORDERS.DB и снова от­метьте любое поле или все поля. Убедитесь, что для подчиненной таблицы вами выбрано сеточное (In a grid) расположение.

7. Нажмите Next.Теперь нужно выбрать поле, которое будет использовано для связи двух таблиц.

8. Раскройте комбинированный список Available Indexes (Индексы) и вы­берите CustNo (это вторичный индекс по номеру заказ­чика в таблице ORDERS).

9. В

   - 13 -

   ыберите CustNo в каждом столбце Detail Fields и Master Fields, щёлкните на кнопке Add (Добавить), перейдите на следующую страницу.

10. Установите переключатель Form and Data Module (Форма и модуль данных), прежде чем щёлкнуть на кнопке Finish.

11. Запустите эту программу.

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

Упражнение 4

1. Разместите на новой форме компонент Table и установите его свойство DatebaseName равным DBDemos (или любой другой базе данных в вашей системе). Если щёлкнуть на кнопке раскрытия списка рядом с DatebaseName в окне Object Inspector, то вы получите список псевдонимов.

2. Теперь щёлкните на свойстве TableName и выберите из списка таблицу указанной базы данных.

3. Установите свойство Active равным True и попробуйте изменить свой­ство DatebaseName или TableName. Delphi объяснит вам, что их нельзя менять, когда таблица открыта.

4. Установите свойство Active равным False — и можете изменить свойст­во DatebaseName или TableName; изменение значения теперь не будет иметь никакого эффекта. Если вы снова попытаетесь установить свойство Active равным True, то Delphi не позволит вам сделать этого — вы можете активизировать таб­лицу только при допустимых значениях DatebaseName и TableName.

- 14 -

Контрольные вопросы:

1. Как создать новый проект?

2. Как закрыть и сохранить проект?

3. Что создаёт модуль данных для проекта?

4. Какое назначение модуля данных?

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

6. Какие компоненты необходимы для создания полнофункционального приложения баз данных?

7. Какие основные свойства компонента Table? Чем эти свойства характеризуются?

Cодержание отчета

Выполненная работа включает работающие программы, описанные выше и запускаемые с ПК на рабочем месте. Отчет должен содержать наименование работы, цель, ответы на контрольные вопросы, и выводы по выполненной работе.

- 15 -