4.5.8Связь главный-детальный между наборами данных

Если сейчас запустить проект на выполнение, то в сетках мы увидим содержимое 2-х НД – tbNakls и tbMove, которые между собой никак не связаны.

Однако в БД "Поставщик книг" таблицы NAKLS и MOVEBOOK связаны реляционной связью один ко многим. Т.е. одной записи в таблице NAKLS соответствует несколько записей в таблице MOVEBOOK. Такую связь между 2‑мя наборами данных еще называют главный-детальный (Master-Detail, Master-Slave).

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

Примечание 1. Механизм реляционной связи между 2-мя наборами данных имеет смысл применять при использовании в качестве главного и детального только компонентов TTable.

Примечание 1. При использовании в качестве детального компонента TQuery используется другой способ (см. раздел 8).

4.5.9Задание реляционной связи между наборами данных

Находясь в окне модуля даных DM, нажмите клавишу F12 и перейдите в окно кода этого модуля dmNaklsUnit. После этого перейдите на вкладку Diagram в окне кода модуля данных. С помощью мыши "перетащите" компоненты tbNakls и tbMove из окна дерева объектов на вкладку Diagram.

Рисунок 3.36 – Расположение таблиц в окне Data Diagram

Для установления связи между таблицами щелкните на кнопке Master Detail панели инструментов, подведите указатель мыши в виде перечеркнутого круга к нижней кромке верхней таблицы NAKLS (в этот момент указатель превратится в крестик), нажмите левую кнопку мыши и, удерживая ее нажатой, прочертите линию к верхней кромке нижней таблицы MOVEBOOK, после чего отпустите кнопку. На экране появится окно конструктора связей (Рисунок 3 .37.а).

Чтобы установить связь между таблицами, нужно указать связываемые поля в родительской и дочерней таблицах. В списке Master Fields щелкните на имени поля NaklID, а в поле Detail Fields щелкните на имени поля MNakl. После чего щелкните на кнопке Add. Эта кнопка станет доступной только после выделения полей связи и перестает быть доступной после щелчка на ней (Рисунок 3 .37.б).

Закройте окно конструктора связей щелчком на кнопке ОК.

а)

б)

Рисунок 3.37 – Окно конструктора связей

После выполнения этих действий между таблицами NAKLS и MOVEBOOK устанавливается связь один ко многим по полю NaklID, о чем свидетельствует вид окна Data Diagram (Рисунок 3 .38).

Рисунок 3.38 – Окно Data Diagram после установления связи между таблицами

Теперь, перемещаясь по НД tbNakls, для каждой накладной будет получен соответствующий набор книг из НД tbMove.

Аналогично на вкладку Diagram можно добить другие компоненты типа TTable, например tbBooks, и связать их с уже размещенными компонентами.

4.5.10Активизация наборов данных

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

Если в процессе создания НД tbNakls и tbMove не была выполнена их активизация, то ее следует выполнить вручную.

Для ручной активизации набора данных щелкните на таблице MOVEBOOK в окне дерева объектов.

Рисунок 3.39 – Окно Object TreeView после выделение таблицы

В окне инспектора объектов появятся свойства НД tbMove. Поместите в его свойство Active значение True.

Теперь в окне дерева объектов щелкните на НД tbNakls и в окне инспектора объектов поместите значение True в его свойство Active.

На этом начальный этап работы с окном модуля данных закончен, но он еще не связан с главным окном (см. подраздел 3.4).

Примечание 1. Так как наборы данных tbMove и tbNakls были активизированы, то при очередной загрузке проекта верхняя и нижняя сетки DBGrid будут заполняться описанным выше образом.

Примечание 2. При внесении изменений в псевдонимы БД в ODBC или BDE в свойство Active в окне инспектора объектов для НД tbMove и НД tbNakls автоматически заносится False. Поэтому после внесения изменений необходимо принудительно занести значение True в свойство Active для НД tbMove и tbNakls.