Клиент для таблицы Изделия
Имеется сервер «ServerJBI.exe» для работы с таблицей «Изделия» базы данных «Завод ЖБИ». Сама база данных создана в СУБД «MS SQL Server 2005», а сервер в среде разработки «Дельфи-7». Нужно написать клиент для этого сервера, чтобы можно было получить данные из таблицы «Изделия».
Запускаем «Дельфи-7», создаем новое приложение, называем проект «KlientJBI.dpr» и сохраняем его. На главной форме приложения размещаем компоненты: SocketConnection, DataSetProvider, ClientDataSet, DataSource, DBGrid.
Рис. 1. Расположение компонентов
Настраиваем компоненты между собой.
|
Компонент |
Свойство, значение |
Примечание |
|
SocketConnection1 |
Address =
127.0.0.1 ServerName
= ServerJBI.Izdeliya |
Предварительно надо запустить «scktsrvr.exe», который находится в папке «C:\Program
Files\Borland\Delphi7\Bin» |
|
DataSetProvider1 |
|
Можно ничего не выставлять |
|
ClientDataSet1 |
ProviderName
= DataSetProvider1 RemoteServer
= SocketConnection1 |
|
|
DataSource1 |
DataSet =
ClientDataSet1 |
|
|
DBGrid1 |
DataSource
= DataSource1 |
|
|
Button1 |
Procedure TForm1.Button1Click(Sender: TObject); Begin ClientDataSet1.Active:=True; End; |
|
Потом компилируем приложение, запускаем, жмем кнопку и получаем результат.
Рис. 2. Полученная с сервера таблица «Изделия»
