Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   API de Windows (https://www.clubdelphi.com/foros/forumdisplay.php?f=7)
-   -   Última Modificación de un archivo (https://www.clubdelphi.com/foros/showthread.php?t=27224)

[Gunman] 15-11-2005 17:30:44

Última Modificación de un archivo
 
Antes que nada, quiero dejar claro que sí he visto los otros hilos y sus sugerencias, de las cuales cabria destacar la de Neftalí, sin embargo, yo he intentado elaborar mi propia función, para ello he usado la función FindFirst, véase el código siguiente:
Código Delphi [-]
 function GetLocalModified(FileName: String): String;
 var
   SearchRec: TSearchRec;
   Modified: Real;
 begin
   if FindFirst(FileName, faAnyFile, SearchRec) = 0 then
   begin
     Modified := SearchRec.FindData.ftLastWriteTime.dwHighDateTime;
     Result :=  FloatToStr(Modified);
   end;
   FindClose(SearchRec);
 end;
SearchRec.FindData.ftLastWriteTime tiene en su interior dos propiedades, la dwHighDateTime y la dwLowDateTime, ambas son de tipo Cardinal. Mi pregunta, cómo obtengo la fecha de modificación des de esta función (FindFirst) si se puede, alguien lo ha intentado? Deberia usar la función de Neftalí?

[Gunman] 15-11-2005 22:39:01

Sólo deciros que ya he solucionado el problema a partir del código de Neftalí, pero usando la función FindFirst.


La franja horaria es GMT +2. Ahora son las 05:05:48.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi