Descarga FTP

[Luis Alberto]

if not IdFTP1.Connected then exit;
IdFTP1.changedir(CurrentDirEdit.Text);

IdFTP1.List(StringList, '*.fff', False);
for r := 0 to StringList.count-1 do begin
FileListBox1.Items.Add(StringList[r]);
end;

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

[[Bicho]]

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.

[Luis Alberto]

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

[[Bicho]]

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

[FranTsiles]

Originally Posted by Luis Alberto

Todo salio perfecto para poder subir archivos al FTP
pero cuando trato de bajar archivos download me marca error cuando le digo que: IdFTP1.List(StringList, '*.fff', False);

que puede ser que estoy haciendo mal?

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

[Casimiro Noteví]

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


Recuerda poner el código entre etiquetas, ejemplo:

[FranTsiles]

Hey Gracias la verdad no tenía ni idea