Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

IdFTP


rar ©   (2008-02-27 18:27:00) 

Не могу получить список файлов с FTP-сервера.
Все хорошо работало на D7, но предприятие закупила лицензионное ПО CodeGear RAD Studio 2007, с ним поставляется инди 10.
Попробовал перекомпилил приложение, но не работает команда List
Привожу код, на форме лежит ListBox1, StatusBar1 и IdFTP1
На событие создание формы все действия и происходят.
Вот код

procedure TForm1.FormCreate(Sender: TObject);
var
FileNameDate:string;
i:integer;
sl:TStringList;
begin
 sl:=TStringList.Create;
 try
 with IdFTP1 do
 begin
   Host:='172.10.1.6';
   Password:='QsCgYjM90';
   Username:='tasker';
   Connect;
   ChangeDir('/tasker/Changes');
   StatusBar1.SimpleText:=RetrieveCurrentDir;
   List(sl,'',true);
   //IdFTP1.DirectoryListing.Count-1;//количество файлов задачи
   ListBox1.Items.Assign(sl);
     {for  i:=0  to IdFTP1.DirectoryListing.Count-1 do
     begin //получаем ИмяФайла=ДатаИзменения  и заносим в StringList
       //n:=DirectoryListing.Items[i].ModifiedDate;
       FileNameDate:=DirectoryListing.Items[i].FileName+'='+DateTimeToStr(DirectoryListing.Items[i].ModifiedDate);

       ListBox1.Items.Add(FileNameDate)
     end; }
 end;
 finally
   sl.Free;
end;

Настройки  IdFTP1

object IdFTP1: TIdFTP
   ReadTimeout = 0
   TransferType = ftASCII
   ProxySettings.ProxyType = fpcmNone
   ProxySettings.Port = 0
   Left = 312
   Top = 24
 end

Что делать ума не приложу может кто уже столкнулся с этим


SpellCaster   (2008-02-29 11:37:00) [1]

Что мешает поставить девятку на Д2007?


Anatoly Podgoretsky   (2008-02-29 11:05:00) [2]

> Eraser  (29.02.2008 01:28:01)  [1]

А я бы шире посмотрел, не стал бы использовать Инди и для других случаев, кроме самых тривиальных.


Eraser   (2008-02-29 01:28:00) [3]

> [0] rar   (27.02.08 18:27)

не советовал бы использовать Indy для работы с FTP, проблем необерешься и все равно потом перепишешь с использованием других технологий.


Наверх

Титульная страница Поиск, карта сайта Написать письмо