Problem with then List instruction

Giganews Newsgroups
Subject: Problem with then List instruction
Posted by:  giorgiobal (balloc…@qiwood.it)
Date: Wed, 3 Aug 2011

Good morning

Indy 10 for Delphi 7

Sometimes when I use the instruction .list of a TIdFTP component the program does not go over to the next line.
There is no error but the program never leaves the line "IDFTPClient.List(AFiles, 'Pre*.xml', True)"

The following piece of code that I use:

var
  IDFTPClient : TIdFTP
  AFiles    : TStrings;

begin

        IDFTPClient:= TIdFTP.Create(nil);
        IDFTPClient.TransferType := ftBinary;

        IDFTPClient.Host:=sHost;
        IDFTPClient.Username:=sLogin;
        IDFTPClient.Password :=sPassword;
        IDFTPClient.Connect;

        IDFTPClient.ChangeDir(sDirFTPLoc);
        AFiles := TStringList.Create;
        IDFTPClient.List(AFiles, 'Pre*.xml', True);

Thanks for the help

Ballocco Giorgio

Replies