[Denisonin]

Код:

  idFTP1:=TidFTP.Create(nil);
idFTP1.Host:='.......';
idFTP1.Username:='.........';
idFTP1.Port:=21;
idFTP1.Password:='......';
idFTP1.Connect;
IdFTP1.Put('C:\screen.jpg','screen.jpg' ,true);
idFTP1.Disconnect;

Выдает ошибку порта. Разрешал доступ в интернет программе, запускал от администратора. Не помогает. В чем проблема?

У хоста указан порт 21 для подключения.

При этом файл screen.jpg создается на FTP, но имеет вес 0.

[Alegun]

Попробуйте вообще убрать явное указание порта, поставьте 2 слеша на 4 строке - может автоматом между собой клиент с сервером и договорятся