Foros Club Delphi - listar contenido de una carpeta

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

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

- - listar contenido de una carpeta (https://www.clubdelphi.com/foros/showthread.php?t=58317)

johurgi

16-07-2008 09:57:57

listar contenido de una carpeta

Buenas a todos,

Alguien sabe como puedo listar el contenido de una carpeta por fecha de modificacion. Quiero listar primero los ficheros mas nuevos y por ultimo los mas viejos.

Ya he probado con tsearchrec para listar una carpeta, pero no me la lista por fecha de modificacion que es lo que yo quiero.

Gracias un saludo.

Investment

23-07-2008 09:27:12

La siguiente funcion te devuelve la fecha de modificacion de un fichero. Con ella y el nombre del fichero ya puedes ordenar como quieres.

Código:

   function GetFileDate(TheFileName: string): string;

    var

      FHandle: integer;

    begin

      FHandle := FileOpen(TheFileName, 0);

      try

        Result := DateTimeToStr(FileDateToDateTime(FileGetDate(FHandle)));

      finally

        FileClose(FHandle);

      end;

    end;

johurgi

25-07-2008 08:00:33

Gracias por tu ayuda,

Al final lo solucione de la siguiente manera.Como tenia que pasar por la base de datos de todas formas lo que hice es insertar en la base de datos con un indice secundario que ordenara por fechas y la fecha es el valor de la fecha de modificado del fichero que acabo de insertar.

Un saludo.

La franja horaria es GMT +2. Ahora son las 07:35:40.