Indy 9
Example
TIdFTP.List
      AFiles := TStringList.Create;
      AFtp.List(AFiles, '*.zip', True);
      AFtp.DirectoryListing.Items[0];

Created with Doc-O-Matic 2 donated to Project JEDI. Commercial license available from the Doc-O-Matic site.