4.7.3Присоединение к наборам данных новых полей

Двойным щелчком на компоненте tbNakls откройте окно редактора полей и щелчком правой кнопкой мыши вызовите его контекстное меню. Выберите в меню команду New Field, чтобы открыть окно конструктора нового поля (Рисунок 3 .45).

Рисунок 3.45 – Окно конструктора нового поля

С помощью конструктора нового поля в НД можно создать новые поля одного из 3-х типов (тип определяется переключателями в группе FieLd type):

• Lookup - поля содержат данные из таблицы подстановки;

• Calculated - поля содержат вычисляемые данные;

• Data - поля содержат произвольные данные.

Поле типа Lookup - подстановочное поле, заполняется данными из нужного поля другого НД. Его и рассмотрим первым.

Поле типа Calculated – вычисляемое поле, заполняется в обработчике события OnCalcFields этого НД.

Поле типа Data – данные, будет отображаться в сетке пустой колонкой, которую можно заполнить в обработчике события OnGetText этого поля.

Ниже рассматриваются способы создания подстановочных и вычисляемых полей. Поля типа Data особого интереса не представляют и специально не рассматриваются.

4.7.4Присоединение полей из других таблиц. Подстановочные поля

Рассмотрим процесс формирования подстановочного поля на примере создания поля название фирмы Firm в НД tbNakls. В строке Name окна конструктора поля введите имя нового поля. Раскройте список Туре и выберите для поля тип string, а его размер Size установите равным 40.

Установите переключатель Lookup, раскройте список полей Key Fields и выберите в нем поле NFirm. В списке Dataset выберите НД tbFirms, в списке Lookup Fields - ключевое поле FirmID и, наконец, в списке Result Field - поле FName. Закройте окно конструктора щелчком на кнопке ОК.

Рисунок 3.46 – Заполненное окно конструктора нового поля

Теперь создайте для НД tbNakls подстановочное поле с именем Туре типа string и длиной 23 символа. В качестве ключевого выберите поле NType и свяжите его с полем TypeID набора данных tbTypeNakl, а в качестве результирующего поля укажите поле TName этого же НД.

Для НД tbMove создайте 3-ри подстановочных поля с именами Name, Author и Publish. Свяжите их с НД tbBooks. Для этого в качестве Key Fields выберите поле MBook, а в качестве Lookup Keys выберите поле ВоокID. В качестве результирующих полей выберите соответственно поля BName, BAuthor, BPublish. Размеры выбранных полей установите соответственно 75, 30 и 40 символов.

Внимание! После создания подстановочных полей возникла определенная коллизия. Связанные с подстановочными полями ключевые поля tbNaklsNFirm, tbNaklsNType и tbMoveMBook стали "лишними" при отображении НД tbNakls и НД tbMove соответственно в сетке DBGrid1 и DBGrid2. Действительно, не имеет смысла рядом с названием партнера или книги показывать в сетке соответствующий им идентификатор в таблице БД. В то же время удалить из НД объекты-поля, связанные с этими ключевыми полями нельзя, так как соответствующие НД лишатся внешних ключей полей, и подстановочная связь будет разрушена.

Сокрытие полей НД, которые стали "лишними" после введения подстановочных полей, достигается за счет использования для сетки DBGrid объектов-столбцов - специальных компонентов, облегчающих управление отображением данных (см. подраздел 3.5).