Получение списка файлов на FTP сервере

try {
  IdFTP1->Username = "логин";
  IdFTP1->Password = "пароль";
  IdFTP1->Host = "хост";
  IdFTP1->AutoLogin = true;
  IdFTP1->Connect();
  }
  catch (...)
    {
Label1->Caption="Нет конекта";
    }
  IdFTP1->List( NULL, "*.txt", true);
 
 for(int i = 0; i < IdFTP1->DirectoryListing->Count; ++i)
  {
  Memo1->Lines->Add(IdFTP1->ListResult->Strings[i]);
  }

int lstcnt = IdFTP1->DirectoryListing->Count;
for (int i=0;i<lstcnt;++i)
{
  if (!IdFTP1->DirectoryListing->Strings[i].Pos("Size")) { // или SubString
    Memo1->Lines->Add(IdFTP1->ListResult->Strings[i]);
  }
}

Add(!IdFTP1->DirectoryListing->Items[i].FileName

Memo1->Lines->Add(IdFTP1->DirectoryListing->Items[i]->FileName);

  IdFTP1->Connect();
    IdFTP1->List("",true);
for (int i = 0; i < IdFTP1->DirectoryListing->Count; i++)
    {
    Memo1->Lines->Add(IdFTP1->DirectoryListing->Items[i]->FileName);
    }

  IdFTP1->Connect();
    IdFTP1->List("",true);
for (int i = 0; i < IdFTP1->DirectoryListing->Count; i++)
    {
    Memo1->Lines->Add(IdFTP1->DirectoryListing->Items[i]->FileName);
    }

IdFTP1->DirectoryListing->Items[i]->FileName

IdFTP1->ChangeDir("В какой папке будем смотреть содержимое");