Зв’язування таблиць в delphi

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

Для цього перетягуємо для кожної таблиці комплект необхідних компонентів:

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

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

3) Візуальний компонент «DBGrod» з закладки «Data Controls» - 4 штуки.

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

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

Далі починаємо пов'язувати компоненти між собою. У компонентах «Table», в налаштуванні «DatabaseName» необхідно вказати aliase бази даних - «Music», який попередньо створили в програмі «BDE Administrator», а також властивість «TableName», яке для «Table 1» вибираємо як «Artisti. dbf ». У компонентів «DataSource» необхідно налаштувати настройку «DataSet», наприклад, для «DataSource 1» це буде «Table 1». А у візуальних компонентів «DBGrid» треба встановити властивість «DataSource». Після того як встановили ці властивості, можна вибрати в компоненті «Table» властивість «Active» і встановити його в «True». При цьому значення таблиць бази відобразяться в компонентах «DBGrid».

Компонент «DBNavigator 1» через властивість «DataSource» можна прив'язати до будь-якої з таблиць, краще до першої - «Muzon», тобто вказати «DataSource 1».

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

Мал. 2. Приклад зв'язування таблиць

Якщо все зв'язати правильно, то при виборі записи в таблиці «Muson» записи в таблиці «Artisti» відобразиться виконавець, в таблиці «Zapisi» відобразяться всі записи альбому, а в таблиці «Stili» буде показаний стиль музичного виконання.

Для зручності на форму додатка додана кнопка, щоб підключатися до бази. На подію «OnClick» якої треба помістити код: