КАТЕГОРИИ: Архитектура-(3434)Астрономия-(809)Биология-(7483)Биотехнологии-(1457)Военное дело-(14632)Высокие технологии-(1363)География-(913)Геология-(1438)Государство-(451)Демография-(1065)Дом-(47672)Журналистика и СМИ-(912)Изобретательство-(14524)Иностранные языки-(4268)Информатика-(17799)Искусство-(1338)История-(13644)Компьютеры-(11121)Косметика-(55)Кулинария-(373)Культура-(8427)Лингвистика-(374)Литература-(1642)Маркетинг-(23702)Математика-(16968)Машиностроение-(1700)Медицина-(12668)Менеджмент-(24684)Механика-(15423)Науковедение-(506)Образование-(11852)Охрана труда-(3308)Педагогика-(5571)Полиграфия-(1312)Политика-(7869)Право-(5454)Приборостроение-(1369)Программирование-(2801)Производство-(97182)Промышленность-(8706)Психология-(18388)Религия-(3217)Связь-(10668)Сельское хозяйство-(299)Социология-(6455)Спорт-(42831)Строительство-(4793)Торговля-(5050)Транспорт-(2929)Туризм-(1568)Физика-(3942)Философия-(17015)Финансы-(26596)Химия-(22929)Экология-(12095)Экономика-(9961)Электроника-(8441)Электротехника-(4623)Энергетика-(12629)Юриспруденция-(1492)Ядерная техника-(1748) |
Связь с сервером приложений по протоколу DCOM
Для проверки работы созданного в предыдущем пункте сервера приложений построим клиентское приложениедоступа к данным. 1. Командой File/New Application создадим новый проект. 2. Разместим на форме компонент DCOMConnection (связь клиентской программы с сервером приложений на основе технологии DCOM) с панели Midas со свойствами: ServerName = Project1.Istroiki. Если указать свойство Connected =True, то сервер приложений (программа Project1.exe) автоматически запустится. И сервер закроется, если указать Connected = False. Мы оставим Connected =False. 3. Разместим компонент ClientDataSet со свойствами: RemoteServer =DCOMConnection1, ProviderName =DataSetProvider1 (для автоматического запуска сервера приложений). 4. Разместим компонент DataSource со свойством DataSet = ClientDataSet1. 5. Разместим компонент DBGrid со свойством DataSource = DataSource1. Для компонента ClientDataSet1 установим свойство Active =True. Запустим клиентское приложение, и появится таблица. 4.10.4. Связь с сервером приложений по протоколу Интернет TCP/IP Каждый компьютер в сети имеет IP‑адрес в виде четырех чисел (от 0 до 255), разделенных точками (IP ‑ Internet Protocol). Например, IP‑адрес локального компьютера клиента имеет адрес 127.0.0.1 и имя Localhost. Для передачи информации в Интерненте используется протокол TCP/IP (TCP ‑ Transport Control Protocol, протокол транспортного управления). Работа с протоколом TCP/IP основана на технологии сокетов (Sockets). Сокет представляет собой окончание сетевого соединения с другим компьютером в прикладной программе, с которым устанавливается соединение перед и закрывается после передачи данных (аналогично файлу). Изменим в клиентском приложении (п. 4.10.2) установку связи с сервером по протоколу DCOM на протокол TCP/IP. 1. Откроем проект клиентского приложения и разместим на форме компонент SocketConnection установки связи с сервером по протоколу PCP/IP. В свойстве Address указывается IP‑адрес удаленного компьютера сервера приложений. Для отладки укажем адрес локального компьютера 127.0.0.1. В свойстве ServerGUID указывается идентификационный номер GUID сервера приложений (п. 4.10.1). Скопируем его одноименные свойства компонента DCOMConnection1 через буфер, предварительно указав для него свойство Connected =False. После этого свойству ServerName присвоится имя сервера Project1.IStroiki.
2. Для организации связи запустим специальную программу Delphi5\Bin\ScktSrvr.exe. На панели индикации Windows появится ее отображение в виде значка. После двойного щелчка по этому значку появится окно Borland Socket Server. Если флажок меню Connections/Register Objects Only установлен, то нужно его сбросить и перезапустить эту программу. В поле GUID введем (вставим из буфера) значение свойства ServerGUID. Нажмем кнопку Apply. 3. Для компонента SocketConnection1 для запуска сервера приложений установим свойство Connected =True. 4. Для компонента ClientDataSet1 установим свойства RemoteServer =SocketConnection1 и Active =True. 5. Выполним клиентское приложение, и появится таблица. Копии этого приложения могут запускаться на разных компьютерах, соединенных по протоколу TCP/IP при условиях, что в программах указаны верные IP‑адреса и на сервере была запущена программа ScktSrvr.exe.
Дата добавления: 2014-12-08; Просмотров: 371; Нарушение авторских прав?; Мы поможем в написании вашей работы! Нам важно ваше мнение! Был ли полезен опубликованный материал? Да | Нет |