Delphi获取文件创建时间和最后修改时间
uses System.SysUtils, System.IOUtils; procedure TForm1.Button1Click(Sender: TObject); var CreationTime, LastWriteTime: TDateTime; begin CreationTime := TFile.GetCreationTime('C:\A.TXT'); LastWriteTime := TFile.GetLastWriteTime('C:\A.TXT'); Edit1.Text := '创建时间: ' + DateTimeToStr(CreationTime); Edit2.Text := '最后修改时间: ' + DateTimeToStr(LastWriteTime); end;