terça-feira, 10 de novembro de 2009

Como pegar a data de um arquivo

Unit SysUtils


var
DataArq: TDateFile;
begin
DataArq:= FileDateToDateTime(FileAge('NomeDoArquivo'));
end;

Nenhum comentário:

Postar um comentário