Ver Mensaje Individual
  #1  
Antiguo 29-10-2015
gdlrinfo gdlrinfo is offline
Miembro
 
Registrado: may 2007
Posts: 131
Reputación: 18
gdlrinfo Va por buen camino
Descarga Con Indy

Hola amigos estoy descargando archivos con indy tengo una duda hay manera de hacer que mientras descargue si encuentra el archivo en el directorio no lo baje ?
estoy usando un código como este !!

Código Delphi [-]
  FTP.ChangeDir('/siga/');
   Lista := TStringList.create;
   FTP.List(Lista,'*.*',false);
    try
       for i := 0 to Lista.Count - 1 do
      begin
         if FileExists('C:\P\' + Lista.Strings[i]) then
            Lista.Strings[i+1]; /// Aca cuando llega al ultimo da error !
         FTP.Get(Lista.Strings[i], 'C:\P\' + Lista.Strings[i], true);
      end;
    finally
      FTP.Disconnect;
      FTP.Free;
      Lista.Free;
Desde ya muchas gracias por su ayuda.-
Responder Con Cita