Foros Club Delphi - Obtener una lista de los archivos de un directorio

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)

- - Obtener una lista de los archivos de un directorio (https://www.clubdelphi.com/foros/showthread.php?t=64311)

David

26-03-2009 13:24:32

Obtener una lista de los archivos de un directorio

Hola

Hay un comando rapido que me devuelva de forma inmediata los archivos que hay en un directorio determinado, por ejemplo todos los archivos de extensión zip de un determinado directorio.

Saludos

Caro	26-03-2009 13:44:22

Hola, puedes utilizar FindFirst y FindNext.

Código Delphi [-]var
 Path : String;
 sr: TSearchRec;
begin
 if SelectDirectory('Seleccione la ruta del directorio', '', Path) then
  begin
   Try
     Path := IncludeTrailingPathDelimiter(Path);
 
     if FindFirst(Path + '*.zip', faArchive, sr) = 0 Then
      repeat
        Memo1.Lines.Add(sr.Name);
      until FindNext(sr) <> 0;
   Finally
    FindClose(sr);
  end;

Saluditos

Neftali [Germán.Estévez]

26-03-2009 14:01:07

Cita:

Empezado por David (Mensaje 342782)

un comando rapido que me devuelva de forma inmediata los archivos que hay en un directorio determinado, por ejemplo todos los archivos de extensión zip de un determinado directorio.

:(:(:(

cHackAll

27-03-2009 02:25:30

Cita:

Empezado por Neftali (Mensaje 342792)

:(:(:(

DIR !!! :rolleyes:

La franja horaria es GMT +2. Ahora son las 21:11:46.