Delphi-XE6 загружает файлы на FTP-сервер, битыми, почему?

Question

[Docbrain]

Я пишу FTP-клиент в IDE Delphi-XE6. Использую следующий код:

IdFTP1.Connect;
IdFTP1.ChangeDir(FolderName);
IdFTP1.Put(Indnum, Indnum);
IdFTP1.Disconnect;
Timer3.Enabled := True;
Timer4.Enabled := False;

В Delphi-7, вышеприведенная конструкция работала нормально (только после IdFTP11.Connect, нужно было еще добавлять параметры). Но когда я использовал ее в XE6, возникла проблема - файлы стали приходить на сервер битыми. Текстовые файлы приходят либо пустыми, либо с какой-то абракадаброй внутри, картинки загружаются пустыми, их невозможно открыть.