Delphi - Fecha de un File

 
Vista:

Fecha de un File

Publicado por Roqui (24 intervenciones) el 10/06/2003 00:45:44
Hola Amigos.

Delphi tendra alguna instrucciones para poder obtener la fecha de algun archivo de mi disco duro por ejempos misnotas.txt

Saludos.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Fecha de un File

Publicado por Diego Romero (636 intervenciones) el 10/06/2003 06:25:05
var
Aux: integer;
FechaArch: TDateTime;
begin
Aux:=FileAge('misnotas.txt');
if Aux <> -1 then
FechaArch:=FileDateToDateTime(Aux)
else ShowMessage('Archivo no encontrado');
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Fecha de un File

Publicado por Delfino (1216 intervenciones) el 10/06/2003 23:02:06
La clase TSearchRec permite hacer esto de la siguiente manera:
var
SearchRec: TSearchRec;
procedure TForm1.SearchClick(Sender: TObject);
begin
FindFirst('c:\misnotas.txt', faAnyFile, SearchRec);
Label1.Caption := DatetoStr(SearchRec.Time);
end;
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar