Saber el ultimo archivo de una carpeta
 

Saludos, clolegas, necesito saber cual fue el ultimo archivo guardado en una carpeta desde delphi, gracias de antemano.

¿Tiene algo que ver con "Internet"?

Casimiro
 

No pero la descripcion del foro dice internet y delphi.

Hola ingmichel.

No había contestado por que tenía la misma duda que Casimiro ya que en este foro se tratan temas de Delphi en relación a internet.

No mediando internet, una forma de obtener el último archivo modificado en determinada carpeta, es:

Código Delphi [-]
function LastModifiedFile(DirName: string): string;
var
  SR: TSearchRec;
  MaxF, aux: TDateTime;
  MaxN: string;
begin
  DirName:= IncludeTrailingPathDelimiter(DirName);
  MaxF:= 1.00002;
  MaxN:= '';
  if FindFirst(DirName + '*.*', faArchive, SR) = 0 then
  begin
    repeat
      aux := FileDateToDatetime(SR.Time);
      if aux > MaxF then
      begin
        MaxF := aux;
        MaxN := DirName + SR.Name;
      end;
    until FindNext(SR) <> 0;
    FindClose(SR);
  end;
  Result := MaxN;
end;

Uso (ej.):

Código Delphi [-]
   ShowMessage(LastModifiedFile('C:\UnaCarpeta'));

Saludos :)

Solucionado
 

Muchisimas gracias ecfisa, tu funcion ha solucionado mi problema era justo lo que necesitaba, una pregunta mas, para evitar inconvenientes, podrian decirme cual es el tema de delphi unicamente en este foro ?
saludos y bendiciones.

Hola ingmichel.

De nada :).

Los temas son todos aquellos donde Delphi tiene alguna interacción con internet. Es decir, consultas cuya problemática principal involucre la dupla Delphi / Internet.

Saludos :)