Home

Page 195
Page 195
background image

188

Глава 4

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

рится, "доверяй, но проверяй",— поэтому я насильно устанавливаю позицию в

начало:

 0;

Теперь необходимо отправить клиенту размер файла. Размер файла можно
узнать с помощью свойства size объекта файлового потока. Ну а отправить
эти данные можно как простой текст, с помощью метода sendText:

 + #0);

В начале отправляемых данных стоит слово

 по которому клиент узнает,

что мы выслали ему размер файла. После этого идет сам размер, преобразо-

ванный в строку. В самом конце строки добавляется нулевой символ #0, по

которому клиент сможет отделить эту информацию от данных самого файла.
Теперь можно отправлять выбранный файл. Это лучше сделать с помощью
метода

 компонента

 Этот метод отправляет поток любого

формата (файловый поток, поток в памяти и т. д.).

Вот и все. Сервер отправил файл, и можно приступать к написанию клиен-

та, который мы сделаем отдельной программой. Создайте новый проект и

поместите на форму следующие компоненты:

 поле ввода, куда мы будем вводить IP-адрес сервера;

• кнопку Подключиться, при нажатии которой будет запрашиваться файл;

G кнопку Отключиться, с помощью которой можно будет

сервера;

 компонент

 с помощью которого мы будем присоединяться

к серверу и запрашивать/получать файл.

7

 который получает файл

Рис.  4 . 3 8 . Главная форма клиента

У компонента

 нужно установить свойство

 равным тому

же значению, что и у сервера — 2024.

В разделе private объекта мы объявим несколько переменных:

private

{ Private declarations }

fs:


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

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