Настройка Delphi для работы с MS SQL Server 2000

1. В проекте Delphi добавьте следующие компоненты:

- DataSource (Data Access);

- DBGrid (Data Controls);

- ADOQuery (вкладка ADO).

Свяжите их между собой, указав имена одних компонентов в свойствах других:

DBGrid.DataSource <- DataSource;

DataSource.DataSet <- ADOQuery;

2. Выделите компонент ADOQuery, затем выберите свойство ConnectionString.

3. В появившемся окне нажмите кнопку Build. Далее необходимо выбрать драйвер доступа к данным; в нашем случае это Microsoft OLE DB Provider for SQL Server.

4. Нажмите кнопку Далее. Выберите имя сервера (или впишите его вручную). Далее способ аутентификации – учетные сведения Windows NT. И наконец выберете базу данных, к которой будет происходит подключение.

5. Добавьте на форму Delphi кнопку и на событие OnClick впишите следующий программный код:

ADOQuery1.SQL.Text:='select * from Table1'; // содержит SQL запрос

ADOQuery1.ExecSQL; // отправляет транзакт (запрос) на сервер

ADOQuery1.Active:=true; // возвращает буфер для отображения в компоненте DBGrid

Скомпилируйте приложение и нажмите кнопку. В компонент DBGrid будут выведены все поля таблицы Table1.

Примечание

1. Для удобства последовательность запросов ADOQuery1.ExecSQL и ADOQuery1.Active:=true можно заменить на ADOQuery1.Open.

2. Такие запросы как insert, delete, update не возвращают буфер данных, поэтому для их применения достаточно использовать ADOQuery1.ExecSQL.

3. Для того, чтобы пользователь имел возможность вводить данных, предназначенные для работы с базой данных, можно использовать параметры. Для этого необходимо добавить компонент TEdit, в который пользователь будет вводить данные, и далее в обработчике события написать следующий примерный программный код:

ADOQuery1.SQL.Text:=’select * from Table1 where ID=:ID’;

ADOQuery1.Parameters.ParamByName(‘ID’).Value:=Edit1.Text;

ADOQuery1.Open;

В этом случае из таблицы Tabel1 будут извлечены все записи поля ID со значением, введенным пользователем в компонент Edit1.