Скачать: CL | DM;

Время создания директории.   Найти похожие ветки 

← →
Alexis ©   (2003-11-30 14:44) [0]

Насколько я знаю, с помошью процедуры GetFileTime можно получить время создания файла, но не директории.Попытался получить время создания директории с GetFileAttributesEx :

var
Handle: HFILE;
FTime: TFileTime;
STime: TSystemTime;
DTime:TDateTime;
datadir: WIN32_FIND_DATA;
begin
GetFileAttributesEx("C:\Program Files",GetFileExInfoStandard,@datadir);
FileTimeToSystemTime(datadir.ftCreationTime, STime);
DTime:=SystemTimeToDateTime(STime);
showmessage("vremia sozdanija direktorii= "+FormatDateTime("c",DTime));
end.

Результат таков: "vremia sozdanija direktorii= 01.01.01" ???
При изменении условия на "C:\Program Files\file.xxx" выдается совершенно верный ответ(но мне нужно время созд.директории) !

В чем причина ?
Заранее благодарен за ответы.

---

← →
DVM ©   (2003-11-30 15:28) [1]

Попробуй SHGetFileInfo, там среди прочего есть кажется и это.

---

← →
Бином Ньютоныч   (2003-11-30 16:15) [2]

Ft: TFileTime;
St: TSystemTime;
Dt: TDateTime;
s: string;
Sr: TSearchRec;
Res: Cardinal;
begin
Res:=FindFirst("C:\Program files", FILE_ATTRIBUTE_DIRECTORY, Sr);
if Res = 0 then
begin
FT:=SR.FindData.ftCreationTime;
FindClose(Sr);
FileTimeToSystemTime(Ft, St);
Dt:=SystemTimeToDateTime(St);
DateTimeToString(s, "", Dt);
ShowMessage(s);
end
else
ShowMessage(SysErrorMessage(Res));

---

← →
DDA ©   (2003-11-30 16:38) [3]

А может кто-нибудь знает как установить на папку время создания?
Кто -нибудь подскажите

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.018 c