如何取得文件的创建时间？

标签：style   color   io   文件   ar   cti   时间   res   

uses

  SysUtils

function GetFileDateTime(FileName: string): TDateTime;
var

  intFileAge: LongInt;

begin
    intFileAge := FileAge(FileName);
    if intFileAge = -1 then
      Result := 0
    else
      Result := FileDateToDateTime(intFileAge)
end;

如何取得文件的创建时间？,布布扣,bubuko.com

如何取得文件的创建时间？

标签：style   color   io   文件   ar   cti   时间   res   

原文地址：http://www.cnblogs.com/sensor/p/3910350.html