Работа с таблицей Банки в ADO

Есть таблица «Банки», созданная в «MS Access 2002», в которой есть следующие поля: ID_Банка, Название, Город, Телефон. Необходимо организовать работу с этой таблицей, а именно добавлять, изменять и удалять записи.

Запускаем среду разработки «Дельфи-7», создаем новый проект, на главную форму приложения перетаскиваем компоненты: ADOConnection, ADOQuery, DataSource, DBGrid, 3 штуки DBEdit, 2 кнопки Button. Размещаем компоненты в удобном порядке.

Далее нужно настроить некоторые параметры компонентов.

У компонента «ADOConnection1» нужно установить параметры: ConnectionString и LoginPromt.

У компонента «ADOQuery1» надо выставить параметры: Active, Connection, SQL. В свойстве SQL нужно написать запрос:

SELECT * FROM Банки

В компоненте «DataSource1» нужно параметру «DataSet» выбрать значение «ADOQuery1».

Компоненту «DBGrid1» необходимо выставить для свойства «DataSource» значение «DataSource1», а также «Options – dbRowSelect» как «True».

Визуальным компонентам «Label» в свойство «Caption» занести названия полей таблицы «Банки», кроме поля «ID_Банка», т.к. это поле ключевое и автоинкриментальное.

Напротив компонент «Label» разместить «DBEdit», у которых выставить свойство «DataSource» как «DataSource1», после это станут доступны значения для свойства «DataField», которые нужно выбрать в соответствии с текстом в компонентах «Label».

На кнопках «Button» сделать надписи: Добавить запись, Удалить запись. На событие «OnClick» первой кнопки вставить код «ADOQuery1.Insert;», а для того же события кнопки «Удалить запись» код «ADOQuery1.Dealete;».

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

Чтобы удалить запись, необходимо кликнуть на нее мышкой, тем самым выбрав и нажать кнопку «Удалить запись».

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

Рис. 1. Рабочее окно программы