IdFTP

← →
Andrey_r © (2006-05-25 15:32) [0]

Доброго времени!!!
Помогита пожалусто!!!

LS:=TStringList.Create;
FileList:=TStringList.Create;
IdFTP1.TransferType:=ftASCII;
IdFTP1.ChangeDir("C:\");
IdFTP1.List(LS);
FileList.Assign(LS);
For I:=0 to FileList.Count-1 do
ListBox1.Items.Add(IdFTP1.DirectoryListing.Items[I].FileName)
почему в последней строчке выдаёт ошибку EIdInvalidFTPListingFormat

← →
Delphi5.01 © (2006-05-27 01:31) [1]

У меня есть подозрения что проблема с TStringList, я в свое время (года два назад) имел похожую проблему, после чего избегаю использование данного компонента. Хотя там проблемы с памятью (нужно выделять) или еще что. Капните в этом направлении.

И главное попробуйте сделать без TStringList-а, если есть возможность. И еще проверьте как у вас с переменной FileList принимает ли оно правильное значение? И есть ли такое поле FileName у IdFTP1.DirectoryListing.Items[I] возможно оно есть только для файлов а не для директорий. Одним словом экспериментируйте

Удачи

IdFTP Найти похожие ветки