Este es el codigo que tengo en el boton de download y de ahi pretengo utilizar el get dentro del ciclo es correcto.

En principio es correcto,

realizas un create del objeto StringList antes de asignar al FTP.List

Código Delphi [-]
function FTP;
Var StringList : tStringList;
    r : Integer;
begin
     StringList := TSTringList.Create  //me lo dejé cuante te lo expliqué en el primer post
     IdFTP1.host := Host;
     IdFTP1.User := User;
     IdFTP1.Password := Password;
     try
        IdFTP1.connect;
        IdFTP1.changedir(dir);
     except
     end;

     IdFTP1.List(StringList, '*.txt', False);
     for r := 0 to StringList.count-1 do begin
          lista.Items.add(StringList[r]);
     end;
      IdFTP1.disconnect;
      StringList.Free;
end;

Antes me referia a que copiaras el texto del mensaje de error que te da cuando ejecutas el programa.

Lo que pasa que error que sale es algo grande como puedo enviarte una imagen;

Espero que no sea tan extenso el texto del mensaje de error como para tener que enviar una foto.

Si quieres subir una imagen, desde la misma página en la que respondes a los post, tienes la barra de herramientas encima del texto que escribes. Allí veras un clip para adjuntar ficheros (ojo a los limites de tamaño del fichero)

Saludos

Si es que falta inicializar la lista de string
el código queda así:
StringList:=TStringList.Create;
IdFTP1.List(StringList, '*.txt', false);

Bienvenido a clubdelphi, ¿ya leiste nuestra guía de estilo?, gracias por tu colaboración.


Recuerda poner el código entre etiquetas, ejemplo:

Hey Gracias la verdad no tenía ni idea :)