Home

Page 199
Page 199
background image

192 Глава 4

 ;

 Файл  п р и н я т ' ,

e n d ;

e x i t ;

e n d ;

Как вы уже наверно поняли, тут происходит проверка: если переменная

Reciving равна true, значит, происходит прием данных, и мы получили
очередную порцию файла. Ее я сохраняю все тем же способом. После этого

происходит сравнение, если размер потока равен полученному размеру фай-

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

ную Reciving и выводить сообщение об удачном приеме.

Для приема изображений можно пользоваться подобным способом. Вот как

можно отправить картинку:

ras:

 //Поток памяти

begin

 //Создаю поток

 //Сохраняем картинку в поток

 + #0);

end;

Это минимальный пример отправки картинки из компонента

 Как

принять данные, попробуйте додумать сами.
На компакт-диске в директории \Примеры\Глава 4\Send File вы можете

увидеть пример программ, созданных в этом разделе.

 Персональный FTP-сервер

И снова я возвращаюсь к компонентам ICS, чтобы показать вам, как создать

свой собственный сервер FTP. Для реализации этой задачи я написал на

основе одного из примеров достаточно удобный и функциональный сервер,

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

компонент

 вокруг которого все вертится, я рассмотрю. У этого

компонента можно изменять следующие свойства:

 Bunner — это текст, который увидит пользователь, когда подключится

к серверу по FTP-протоколу;

 — максимальное количество клиентов, одновременно

ключенных к вашему серверу;


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

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