delphi 获取文件夹时间

最新推荐文章于 2023-11-02 17:42:58 发布

原创最新推荐文章于 2023-11-02 17:42:58 发布 · 400 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#Delphi #C #C++ #C#

Delphi 专栏收录该内容

15 篇文章

订阅专栏

本文介绍了一个使用Delphi读取并显示文件创建日期的方法。通过调用Windows API函数GetFileAttributesEx、FileTimeToLocalFileTime及FileTimeToSystemTime，实现了将文件的创建时间从UTC时间转换到本地时间，并以年月日时分秒的格式展示。

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;