КОДИНГ

Разработка простого приложения БД
Теперь, когда база данных создана, можно перейти к созданию первого приложения для работы с ней. Прежде всего в Delphi необходимо создать новый проект. Затем в него нужно добавить модуль данных командой главного меню File > New > Data Module. Модуль нужно сохранить под именем DataModule. В нем нужно расположить два компонента ТТable, которые находятся на вкладке ВDЕ, и два компонента TDataSource. Для обоих компонентов ТТable в свойстве Database Name надо выбрать из списка значение TestAliace. Компонент Tablel надо переименовать в StudentsTbl при помощи свойства Name, а компонент Тable2 — в GradeTbl.
Также компоненту DataSourcel надо дать имя StudentsSrc, a Data - Source2 - GradeSrc.

Теперь надо связать попарно компоненты таблиц и источников данных. При помощи свойства Dataset надо увязать StudentsTbl с StudentsSrc, aGradeTbl — cGradeSrc. На этом этапе уже можно определить отношения между таблицами.
Для этого в свойстве MasterSource компонента GradeTbl необходимо указать родительский источник данных, который будет связывать компонент с родительской таблицей. В данном случае это будет StudentSrc. Далее в свойстве MasterFlelds этого же компонента необходимо указать поля, по которым будет установлена связь.
В правой части свойства необходимо нажать на кнопку, и появится диалоговое окно, показанное на рис. 3.8.

Рис. 3.8. Окно редактора связей

Оно содержит два списка — Master Fields и Detail Fields. В них перечислены поля, по которым можно создать связь. В обоих списках надо выбрать поля STUDENT, а потом нажать кнопку Add. Будет создана связь между таблицами. В списке Available Indexes перечислены доступные индексы, по которым тоже можно создать связь.
Затем на основной форме приложения нужно разместить дна компонента TDBGrid, располагающихся на вкладке Data Controls палитры компонентов. Модуль данных надо подключить к главному модулю приложения одной строкой кода:

uses DataModule;

Теперь необходимо связать компоненты TDBGrid с компонентами TDatasource, расположенными в модуле данных, при помощи одноименного свойства Data-Source. Также надо разместить на форме компонент TPopupMenu. Его надо связать с компонентами TDBGrid через их свойство PopupMenu.

Двойным щелчком на компоненте TPopupMenu нужно активировать редактор меню и определить несколько новых пунктов.

Потребуется создать пункт Новая, для которого в свойстве Name указать значение NewRec.

Также нужно будет создать пункты Принять (PostRec) и Удалить (DeleteRec). Реализация этих методов приведена в листинге 3.1 далее.