掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
フォルダの更新日時を取得するには？ (ID：16608)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
下記で取得できると思います。 function GetFileInfo(saFileName: AnsiString): AnsiString; function fGetFileDateTime(ft: TFileTime): TDateTime; var SystemTime : TSYSTEMTIME; LocalFileTime : TFileTime; begin FileTimeToLocalFileTime(ft, LocalFileTime); FileTimeToSystemTime(LocalFileTime, SystemTime); Result := EncodeDate(SystemTime.wYear, SystemTime.wMonth, SystemTime.wDay) + EncodeTime(SystemTime.wHour, SystemTime.wMinute, SystemTime.wSecond, SystemTime.wMilliseconds); end; var SearchRec: TSearchRec; i: integer; begin i := FindFirst(saFileName, faAnyFile, SearchRec); try Result := FormatDateTime('yy/mm/dd hh:nn:ss', fGetFileDateTime(SearchRec.FindData.ftLastWriteTime)); finally FindClose(SearchRec); end; end; ShowMessage(GetFileInfo('C:\Temp'));
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.