我检索磁盘上的文件,sr: TSearchRec
FindFirst('FilePath',faAnyFile, sr)
得到sr.FindData.ftLastWriteTime (修改时间)
该时间要转成DateTime,我现在是通过如下函数处理的function MyFun_FileTimeToDateTime(FileDate: _FileTime): TDateTime;
var
  ST: _SystemTime;
  FT: _FileTime;
begin
  FileTimeToLocalFileTime(FileDate, FT);
  FileTimeToSystemTime(FT, ST);
  Result:= SystemTimeToDateTime(ST);
end;因为要中英通用,所以DateTime格式的时间我通过FormatDateTime来显示但目前发现一个问题,操作系统都为中文或都为英文的两台机器,获取对方机器上的文件修改时间,显示正确
但英文操作系统去读取中文操作系统上的文件,获取出来的时间就不对了,中文操作系统去获取英文的目前还没试请大侠们指点一下