一句话获取文件的最新修改时间

var
  DateTime: TDateTime;
begin
  FileAge('C:\Windows\Notepad.exe', DateTime);
  ShowMessage(DateTimeToStr(DateTime));
end;