Home

Page 193
Page 193
background image

186

Глава 4

На компакт-диске в директории \Примеры\Глава

 вы можете увидеть

пример этой программы и цветные версии рисунков данного раздела.

4.10. Посылаем файлы в сеть

 С ПОМОЩЬЮ

 ServerSocket И ClientSocket

очень просто, и в этом вы убедились при написании троянского коня.
Но у многих почему-то возникают проблемы с отправкой файлов, хотя это
не намного сложнее.

Сейчас мы напишем две программы: клиент и сервер. Сервер будет загру-
жаться, открывать порт и ожидать соединения. Как только клиент соеди-

нится и запросит у сервера файл, сервер выберет файл и отошлет его.
Начнем наш пример с написания сервера, как с более простого. Создайте
новый проект и перенесите на форму следующие компоненты.
• Поле ввода Edit, в которое будет вводиться имя файла.

 Кнопку Button, с помощью которой можно будет находить отправляемый

файл. Таким образом, не надо будет вводить полный путь файла вруч-

ную.

 Компонент ServerSocket, с его помощью мы будет отправлять данные.

 Компонент

 с помощью которого мы будем открывать файл.

/ Сервер отправки данных

 для отправки.

  4 . 3 7 . Главная форма сервера

У компонента ServerSocket нужно установить свойство Port равным

му-нибудь реальному значению порта, который будет открываться для ожи-

дания подключения. Я для примера выбрал номер 2 024. После этого я уста-

новил свойство Active равным true, чтобы сервер автоматически
активизировался при старте.

В обработчик нажатия кнопки нужно вставить следующий код:
if

 then

Здесь мы просто отображаем на экране окно выбора файла, и если пользо-

ватель что-то выбрал, то помещаем найденное в строку ввода.


Copyright © 2020 Файлообменник files.d-lan.dp.ua

Использование любых материалов сайта возможно только с разрешения автора.