FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
Cliente ftp delphi 7
¿Cómo puedo listar el directorio ftp y poder visualizarlo en delphi 7? Gracias.
|
#2
|
|||
|
|||
con el comando list
En indy es: idFTP1.List(Dir) donde dir es tStringList Código:
For I := 1 to Config.Count - 1 Do Memo1.Lines.Append(Config.Strings[i]); Dir := tStringList.Create; If Not idFTP1.Connected Then Begin Memo1.Lines.Append('Conectando con host...'); idFTP1.Host := Config.Values['Host']; idFTP1.Username := Config.Values['User']; idFTP1.Password := Config.Values['Password']; idFTP1.Connect; End; If idFTP1.Connected Then Begin idFTP1.TransferType := ftBinary; Memo1.Lines.Append('buscando directorio de datos...'); idFTP1.ChangeDir('/grupopatmar.com/data'); Memo1.Lines.Append('obteniendo info...'); idFTP1.List(Dir); Memo1.Lines.Append('Directorio...'); For I := 0 to Dir.Count - 1 Do Begin Memo1.Lines.Append(Dir.Strings[i]); End; |
|
|
|