我可以设置创建/上次修改/上次访问文件的内容？

Question

in：How to get create/last modified dates of a file in Delphi?我找到了un file的get create / last modified / last access date / time，但是为了在文件中设置这个值，我该怎么做？ 非常感谢。

Answer 1

在单位IOUtils.pas中，您可以在记录TFile和TDirectory中找到相应的方法：SetCreationTime，SetLastAccesstime，SetLastWriteTime伴随他们的UTC sibbling。

Answer 2

尝试SysUtils单元中的SysUtils.FileSetDate函数，该函数在内部调用SetFileTime WinApi函数。

这个功能有两个版本

function FileSetDate(const FileName: string; Age: Integer): Integer;
function FileSetDate(Handle: THandle; Age: Integer): Integer;

Age参数是要设置的时间。您必须使用DateTimeToFileDate将TDateTime值转换为Windows操作系统时间戳。

喜欢这个

FileSetDate(FileName, DateTimeToFileDate(Now));