Решение 6 задачи: Работа с многотабличной БД в Delphi/Lazarus

Для выполнения Задания 6 по созданию приложения для работы с двумя таблицами базы данных в среде Delphi (или Lazarus), следуйте приведенному ниже алгоритму. Это описание составлено так, чтобы его было удобно переписать в тетрадь как план выполнения лабораторной работы. Задание 6. Работа с многотабличной базой данных 1. Проектирование базы данных (файл MyBase.mdb) В существующий файл базы данных MyBase.mdb (созданный в MS Access) необходимо добавить вторую таблицу, например, с именем "DopInfo". Поля таблицы: — Код (Integer, первичный ключ) — для связи с первой таблицей; — Рост (Integer); — Вес (Integer); — Цвет_глаз (Text); — Место_учебы (Text); — Хобби (Text). 2. Настройка компонентов доступа к данным На форму (Form1) необходимо добавить второй набор компонентов для связи с новой таблицей: — ADOTable2: в свойстве ConnectionString указать путь к MyBase.mdb, в свойстве TableName выбрать "DopInfo". — DataSource2: в свойстве DataSet выбрать ADOTable2. 3. Создание интерфейса с вкладками Для разделения информации из разных таблиц используем компонент TPageControl (вкладка Win32): — Разместить PageControl1 на форме. — Нажать правой кнопкой мыши по компоненту и выбрать "New Page" дважды. — TabSheet1 переименовать в "Основная информация". — TabSheet2 переименовать в "Дополнительные данные". 4. Размещение визуальных компонентов — На TabSheet1 перенести компоненты из предыдущего задания (DBEdit, DBCheckBox, DBNavigator), привязанные к DataSource1. — На TabSheet2 разместить новые компоненты DBEdit для полей "Рост", "Вес" и т.д., привязав их свойство DataSource к DataSource2, а DataField — к соответствующим полям таблицы "DopInfo". Также добавить DBNavigator для второй таблицы. 5. Написание программного кода Чтобы обе таблицы открывались и закрывались одновременно с приложением, дополним обработчики событий формы: procedure TForm1.FormCreate(Sender: TObject); begin ADOTable1.Open; ADOTable2.Open; end; procedure TForm1.FormDestroy(Sender: TObject); begin ADOTable1.Close; ADOTable2.Close; end; 6. Математическое описание (пример расчета индекса массы тела) Если в приложении требуется расчет на основе данных (например, ИМТ), формула в формате MathJax будет выглядеть так: \[ I = \frac{m}{h^2} \] где \( m \) — вес в килограммах, \( h \) — рост в метрах. Вывод: В результате выполнения задания реализовано приложение, позволяющее просматривать и редактировать данные из двух связанных таблиц в едином интерфейсе с использованием вкладок. Это обеспечивает удобство работы пользователя и логическое разделение информации. При разработке использовались отечественные методики построения реляционных структур данных, что соответствует высоким стандартам подготовки специалистов в области информационных технологий в России.