为什么我不建议使用FileAge警告

Question

我试图使用函数FileAge来获取文件日期和时间，但是在Delphi 10.3中我得到警告，该函数已被弃用，所以我应该使用什么？我将同时在Windows和OS X上使用。我像这样使用它：

var
fileDate: Integer;
Begin

  fileDate := FileAge(path + fileName);

end;

Answer 1

  

Documentation:注意：不推荐使用FileAge的第一个重载版本。请改用FileAge的第二版。

第二个版本，也读取同一页，是在out参数中返回TDateTime的版本，因此您可以像这样使用它：

var
  FileDateTime: TDateTime;
Begin
  FileAge(path + fileName, FileDateTime);

不过，该函数的名称有点奇怪。建议的重载将返回文件的日期时间，您必须从当前日期时间中减去该日期时间才能获得实际的使用期限，因此就我个人而言，我会选择弃用该函数，而希望使用一个具有不同名称的函数。原始功能有相同的问题。

您可以看看TFile.GetCreationTime和相关功能。我认为这个名字更加清楚。但这当然取决于你。