Coger ficheros desde ftp

[Ubed]

si bastante, porque mi siguiente pregunta era como hacer una lista de los elementos de la carpeta, jejeje.

Ahora tengo otra pregunta, Como hago para que no aparezcan los permisos del fichero, bueno como obtengo solo el nombre del fichero.

[Tal]

Ese problema también lo tuve yo.
Yo creo que si pones
[delphi]
FTP.List(lista,'',false);
[/DEPLHI]

el false ese es para que no te liste los detalles.
Aún así yo gasto gasto esto:
En sysutils.pas hay una función "ExtractFileName" que te devuelve sólo el nombre del fichero pasando del resto de cosas que te devuelve ftp.list.
Eso es al menos lo que uso yo.

[Ubed]

COmo utilizas el ExtractFileName sobre la lista??

[Tal]

Con un bucle.

Código Delphi [-]
for i := 2 to lista.count-1 do
      lista[n] := ExtractFileName(lista[n]);

el lista[0] es '.' y el lista[1] son los '..'
El '.' indica directorio actual y '..' para ir al directorio anterior que se usan
para navegar lo que pasa es que a la hora de coger nombres de archivos nos traen sin cuidado.

Y al final lo que tu quires es

Código Delphi [-]
FTP.List(lista,'',false);
for i := 2 to lista.count-1 do
      lista[n] := ExtractFileName(lista[n]);

Y ya tienes la lista de tus ficheros listos para mostrar al usuario limpios.

NOTA: tal cual esta lista no te valdrá para abrir ficheros ya que no tendrás la extensión. Usa otra lista auxiliar para mostrar. Una para enseñar y otra para manejar. Consejo gratis.
PD2: Evidentemente haz FTP.get sobre la que manejas.

[Ubed]

Bien, ahora llega otra pregunta dificil, lo que quiero coger son archivos de PHP y kiero k me muestre el resultado en un memo o algo parecido, como deberia acerlo???

[Tal]

Tan sencillo como hacer

Código Delphi [-]
Memo.lines := lista;

Creo recordar que así funciona, sino

Código Delphi [-]
for i := 0 to lista.count-1
Memo.lines.add(lista[i]);

Donde lista es la lista de archivos ya bonitos para mostrar.