领悟旧事--木头云之

获取文件创建时间、访问时间、修改时间

来源：http://www.xx0594.com/
时间：2017-7-1
作者：浏览人数:1078

AnsiString __fastcall TForm1::GetFileCreateTime(AnsiString sFile)//获取文件创建的时间。
{
   int FileHandle=FileOpen(sFile,fmOpenRead);
   AnsiString sResult;
   if(FileHandle==-1)    return "000000:000000";
   TFileTime CreateTime,LocalFileTime,AccessTime,WriteTime;
   if(GetFileTime((void*)FileHandle,&CreateTime,AccessTime,WriteTime))//NULL,NULL))
   {
       TSystemTime SystemTime;
       FileTimeToLocalFileTime(&CreateTime,&LocalFileTime) ;//注意：这一行不能少，否则不准确！！！

       FileTimeToSystemTime(&LocalFileTime,&SystemTime);//创建时间
       sResult = SystemTime.wYear % 100;//只取最后2位，如2017==>17
       sResult += SystemTime.wMonth<10?"0"+IntToStr(SystemTime.wMonth):IntToStr(SystemTime.wMonth);//格式化2位。
       sResult += SystemTime.wDay<10?"0"+IntToStr(SystemTime.wDay):IntToStr(SystemTime.wDay);
       sResult += SystemTime.wHour<10?"0"+IntToStr(SystemTime.wHour):IntToStr(SystemTime.wHour);
       sResult += SystemTime.wMinute<10?"0"+IntToStr(SystemTime.wMinute):IntToStr(SystemTime.wMinute);
       sResult += SystemTime.wSecond<10?"0"+IntToStr(SystemTime.wSecond):IntToStr(SystemTime.wSecond);
   }
   FileClose(FileHandle);
   return sResult;
}

【关闭窗口】