Форум: "Основная";
Текущий архив: 2003.11.17;
Скачать: [xml.tar.bz2];

Вниз

Как узнать дату создания файла?   Найти похожие ветки 

← →
KMI   (2003-11-06 14:14) [0]

Функции FileAge и FileGetDate возвращают дату последнего изменения файла. Но надо получить дату создания копии файла.

---

← →
clickmaker   (2003-11-06 14:22) [1]

GetFileTime

---

← →
KMI   (2003-11-06 14:43) [2]

А можно поподробнее... Какие параметры должны быть?

---

← →
KMI   (2003-11-06 14:47) [3]

Скорее даже как ее использовать для получения даты? Ведь она возвращает только LongBool.

---

← →
zapped   (2003-11-06 15:29) [4]

ещё FindFirstFile может помочь отцу русской демократии

---

← →
han_malign   (2003-11-06 15:52) [5]

var FAD: TWin32FileAttributeData;
begin
if(GetFileAttributesEx(PChar(FilePath),GetFileExInfoStandard,@FAD))then begin
Result:=FAD.ftCreationTime;
end;
end;

З.Ы. Начиная с 98-ых, в 95-ых, скорее всего "GetLAstError=ERROR_CALL_NOT_IMPLEMENTED"

>GetFileTime
> Ведь она возвращает только LongBool.
- она возвращает от 1 до 4 значений
var
hF: THandle;
ftCreate, ftLastAccess, ftLastWrite: TFileTime;
FSZ,i: integer;
_t: DWORD;
begin
Result:=0;
hF:=CreateFile(PChar(ParamStr(1)),0,0,nil,OPEN_EXISTING,0,0);
if(hF<>INVALID_HANDLE_VALUE)then begin
if(GetFileTime(hF,@ftCreate,@ftLastAccess,@ftLastWrite))
then Result:=ftCreate;
CloseHandle(hF);
end;
end;


---

← →
han_malign   (2003-11-06 15:54) [6]

FSZ,i: integer;
_t: DWORD;
- лишние, из другого контекста выдернуто...

---

← →
KMI   (2003-11-06 23:58) [7]

Спасибо!!!

---

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

Форум: "Основная";
Текущий архив: 2003.11.17;
Скачать: [xml.tar.bz2];

Наверх

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