дату и время создания, изменения, открытия файла

← →
BUTEK (2003-05-20 06:16) [0]

Люди помогите пожалуйста!!!!
как мне вытащить или изменить на Дельфях
дату и время создания, изменения, открытия файла

← →
Babay (2003-05-20 06:25) [1]

Смотри

http://blackman.wp-club.net/sovet/datetime.php#anc23

Это дата изменения, остальное по моему по хелпу можно найти - это тебе оправная точка

← →
Song (2003-05-20 08:55) [2]

TSearchRec

← →
dmitron (2003-05-20 10:10) [3]

var
FileHandle : Integer;
dt,dt1,dt2,dt3:PFileTime;
ds1,ds2:SYSTEMTIME;
begin
//переменные для хранения даты в формате filetime
getmem(dt,sizeof(dt));
getmem(dt1,sizeof(dt));
getmem(dt2,sizeof(dt));
getmem(dt3,sizeof(dt));
// имя файла
a:="filename";
FileHandle := FileOpen(a, fmOpenWrite or fmShareDenyNone);
try
if FileHandle > 0 then
begin
//получили дату создания, изменения, открытия
GetFileTime(FileHandle,dt1,dt2,dt3);
//получили текущее время в формате PFileTime
GetSystemTimeAsFileTime(dt^);
//сконвертировали pfiletime в systemtime
FileTimeToSystemTime(dt1^,ds1);
FileTimeToSystemTime(dt2^,ds2);
//если дата больше текущей - исправили
if SystemTimeToDateTime(ds1)>now then dt1^:=dt^;
if SystemTimeToDateTime(ds2)>now then dt2^:=dt^;
//записали изменения дат
SetFileTime(FileHandle,dt1,nil,dt2);
finally
fileclose(FileHandle);
end;
finally
freemem(dt);
freemem(dt1);
freemem(dt2);
freemem(dt3);
end;

P.S. кусок вдран из рабочего кода, может чего лишнего осталось...

← →
ddd (2003-05-22 11:05) [4]

Что это dt,dt1,dt2,dt3 - Четыре даты ?

дату и время создания, изменения, открытия файла Найти похожие ветки