delphi 获取文件夹时间

本文整理自网络，侵删。

 
var 
    data:   WIN32_FILE_ATTRIBUTE_DATA; 
    systime:   SYSTEMTIME; 
    local:   FILETIME; 
begin 
    if(not   GetFileAttributesEx( 'C:\新建文件夹 ',   GetFileExInfoStandard,   @data))   then 
        RaiseLastWin32Error(); 
    FileTimeToLocalFileTime(data.ftCreationTime,   local);   //要转换为本地时间，否则为标准时间 
    FileTimeToSystemTime(local,   systime); 
    with   systime   do 
        ShowMessage(Format( '%d-%d-%d   %d:%d:%d ',   [wYear,   wMonth,   wDay,   wHour,   wMinute,   wSecond])); 
end; 
 

相关阅读 >>

[Delphi] 计算目录大小的函数，获得目录文件列表，计算文件的大小

Delphi 提升进程令牌

Delphi xe strpas 遇到的问题

Delphi 用webbrowser给要访问的页面加上referer(来路)参数

Delphi webbrowser控件实现对ie浏览器的各种控制

Delphi 设置文本框中光标的位置在最后

Delphi 如何删除动态数组的指定元素

Delphi 从paintbox拷贝一部分内容到tbitmap

Delphi获取两个字符之间的数

Delphi 解析json生成json

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 获取文件夹时间