BDE

Связывание таблиц в Delphi

У нас есть база данных состоящая из 4 таблиц в формате «dBASE IV»: Muzon, Artisti, Zapisi, Stili. Необходимо с помощью средств BDE в среде «Delphi-7» связать эти таблицы.

Для этого перетаскиваем для каждой таблицы комплект необходимых компонентов:

1) Компонент «Table» с закладки «BDE» – 4 штуки.

2) Компонент «DataSource» с закладки «Data Access» – 4 штуки

3) Визуальный компонент «DBGrid» с закладки «Data Controls» – 4 штуки.

4) Визуальный компонент «DBNavigator» с закладки «Data Controls» – 1 штуки.

Рис. 1. Размещение компонентов на главной форме приложения

Далее начинаем связывать компоненты между собой. В компонентах «Table», в настройке «DatabaseName» необходимо указать aliase базы данных – «Music», который предварительно создали в программе «BDE Administrator», а также свойство «TableName», которое для «Table1» выбираем как «Artisti.dbf». У компонентов «DataSource» необходимо настроить настройку «DataSet», например, для «DataSource1» это будет «Table1». А у визуальных компонентов «DBGrid» надо установить свойство «DataSource». После того как установили эти свойства, можно выбрать в компоненте «Table» свойство «Active» и установить его в «True». При этом значения таблиц базы отобразятся в компонентах «DBGrid».

Компонент «DBNavigator1» через свойство «DataSource» можно привязать к любой из таблиц, лучше к первой – «Muzon», т.е. указать «DataSource1».

Для настройки связей между таблицами в компонентах «Table» предназначены настройки:

1) MasterSource,

2) IndexName,

3) MasterFields.

Рис. 2. Пример связывания таблиц

Если все связать правильно, то при выборе записи в таблице «Muson» записи в таблице «Artisti» отобразится исполнитель, в таблице «Zapisi» отобразятся все записи альбома, а в таблице «Stili» будет показан стиль музыкального исполнения.

Для удобства на форму приложения добавлена кнопка, чтобы подключаться к базе. На событие «OnClick» которой надо поместить код:

Table1.Open;

Table2.Open;

Table3.Open;

Table4.Open;

А отключение от базы произойдет при закрытии приложения.

Рис. 3. Результат работы приложения с БД