Лабораторная работа №4 по дисциплине "Основы визуального программирования". Тема: "Базы данных"

ЗАДАНИЕ 1:
1. Создание таблиц.
Создайте таблицы:
Faculty (Название факультета, Курс, Количество групп на курсе );
Group (Название группы, Фамилия старосты, Количество студентов в группе);
Stud (ФИО, Домашний адрес, Телефон).
2. Построение внешних ключей
1) Постройте внешние ключи так, чтобы
- в таблице Group отображались только записи с группами текущего факультета таблицы Faculty;
- в таблице Stud отображались только записи со студентами текущей группы таблицы Group.
3. Разработка Приложения.
1) Разместить на форме компоненты как показано на рисунке 1
2) Сохранить Приложение в том же каталоге, где хранится каталог базы данных
3) Для удобства работы изменить названия компонентов TTable на tbF, tbGrp, tbStd и TDataSource на dsF, dsGrp, dsStd.
4) Связать компоненты и активизировать таблицы (см. лекцию, п.8.4).
Должны появиться пустые таблицы с заголовками полей.
4. Объединение таблиц.
1) Свойство MasterSource: TDataSource; - определяет имя главной таблицы в связи главный-подчиненный
Установите TbStd.MasterSourse - dsGrp;
TbGrp.MasterSourse - dsF;
2) Свойство MasterFields: String; - Содержит список полей главной таблицы, по которым в данной подчиненной таблице будет установлена связь главный - подчиненный
5. Заполнение таблиц.
- Запустите Приложение (обратите внимание на скорость запуска Приложения при первом запуске и при последующих) и заполните таблицы (поля F_Num, G_Num, St_Num заполняются автоматически).
6. Редактирование полей
1) Чтобы работать с конкретным полем надо создать объект для этого поля.
2) Для настройки полей поочередно щелкайте мышью в списке редактора по каждому полю и в окне Object Inspector устанавливайте нужные значения свойств.
7. Проверка работы Приложения
1) Запустите Приложение и проследите за изменением индексированных полей во всех таблицах каждый раз при переходе на другую запись.
2) С помощью Database Desktop просмотрите содержимое и структуры таблиц.
Формы приложения
Текст программы

ЗАДАНИЕ 2:
Добавить в Приложение (см. рис. 2)
1. Для таблицы Facultу и Group – компонент TDBNavigator.
Установите свойства TDBNavigator: DataSource = dsF (dsGrp);
      ShowHint = True 
2. Для таблицы Stud:
- Перемещение на первую запись (First)
- Перемещение на одну запись назад (Prior)
- Перемещение на одну запись вперед (Next)
- Перемещение на последнюю запись (Last)
- Добавление новой записи (значение поля Фамилия - из Edit1) (Insert)
- Редактирование записи (значение поля Фамилия - из Edit1) (Edit)
- Удаление записи (Delete)
- Удаление всех записей (Del All)
- Перемещение на заданное количество записей, '-' – движение к первой записи (Move by)
- Включение режима сортировки (неотсортированный список/ сортировка по фамилиям).
Для возможности сортировки по полю Фамилия надо создать вторичный индекс таблицы Stud по двум полям: G_Num и St_FIO (Фамилия). Для этого выполните следующее:
• Установите значения свойства Active=False у всех таблиц (это необходимо, чтобы можно было реконструировать таблицы. При Active=True таблицы находятся в режиме работы с базой данных и изменять их нельзя) 
• Запустите DBD и создайте вторичный индекс известным способом
• Вернитесь к Приложению и у всех таблиц установите значения свойства Active=True 
– Поиск фамилии способом перебора (Фамилия набирается в Edit2)
2. Для выполнения в таблице Stud Точного поиска и Поиска по символам необходимо:
• Установить значения свойства Active=False у всех таблиц
• Запустить DBD и создать вторичный индекс (inFIO) табл. Stud по полю St_FIO
• Вернуться в Приложение к табл. Stud и установить значение свойства Active=True (у таблиц Faculty и Group свойство Active=False)
• Запустить Приложение и проверить оба варианта поиска.
Формы приложения
Поиск перебором
Сортировка
Точный поиск
Поиск по символам
Текст программы

Работа успешно зачтена!
В архиве отчет + программы