Delphi. FTP. Как создать свой FTP сервер и FTP клиент и передать файл с клиента на сервер?

Встала задача передачи файла на сервер. Выбрал FTP протокол. В Delphi есть соответствующие компоненты INDY

IdFTPServer

IdFTP

Но как ими пользоваться? Как их настроить так, чтобы всё работало и выполнялась задача передачи файлов с клиента на сервер?

На официальном сайте я нашёл уже более менее заполненный событиями пример с компонентом IdFTPServer и дописал к нему клиента. В результате удалось передавать файлы, но Касперский блокировал 21 порт и вылетала ошибка

Решения как минимум 3

-Отключить Касперского

-Настроить Касперского

-Сменить порт с 21, скажем на 22

FTP Сервер

Скачать FTPServer

Здесь я подробно останавливаться не буду – поскольку сам ещё во многих вопросах не разобрался, но не скрою – тема интересная.

FTP Клиент

Скачать MyFTPClient

Соединение с FTP сервером и получение папок файлов, выбранной директории

Смена директории

Загрузка файла в директорию

Получение текущей директории

Как узнать, что файл загрузился?

Обработаем процедуру AfterPut

Функция проверки

 

Добавить комментарий