Загрузка TidFTP разного размера - PullRequest
Новая
       21

Загрузка TidFTP разного размера

0 голосов
/ 16 ноября 2018

В моем приложении Delphi я пытаюсь загрузить файл с клиентом TidFTP (Indy 10, Delphi 2007), но файл результата больше исходного.Я читал другие посты об этом и о TransferType, но я до сих пор не решил проблему.Код 

IdFTP1 := TIdFTP.Create(NIL);
    with IdFTP1 do try
        Host := 'www.mysite.com';
        username := 'myName';
        password := 'myPassword';
        passive  := TRUE;
        Connect;
        transferType := ftBinary;
        IdFTP1.Get('mySite/data.zip','data.zip',TRUE);
    finally
        disconnect;
    end;

Как вы видите, я установил TransferType непосредственно перед получением, но результат больше (около 375 байт), чем оригинал.

PS.С тем же кодом у меня нет проблем в прошлом (несколько лет назад).Возможно ли это из-за изменений настроек сервера?Но FileZila отлично работает на том же файле.

...