读出目录创建时间：
Pipi. (2000-2-28 11:57:57)
-------------------------------------------
var
data:WIN32_FILE_ATTRIBUTE_DATA;
systime:SYSTEMTIME;
local:FILETIME;
begin
if(not GetFileAttributesEx('c:/books',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;
