Форум: "Основная";
Текущий архив: 2002.12.02;
Скачать: [xml.tar.bz2];
ВнизДата создания файла...как поменять? Найти похожие ветки
← →
SiaCD (2002-11-19 19:47) [0]Добрый день Уважаемые!
Есть файл. создан например в 22:00(отображается в свойствах файла), как поменять это время на другое?
← →
Vovchik_A (2002-11-19 20:26) [1]FileSetDate( Handle: Integer; Age: Integer): Integer
Устанавливает Age в качестве даты создания файла, указанного
дескриптором Handle (см. FileCreate и FileOpen). Файл должен
быть открыт в режиме, допускающем запись. При успешном
завершении возвращает 0, в противном случае - код ошибки
Windows. Age задается в формате DOS. Это значение можно
получить из значения типа TDateTime функцией DateTimeToFileDate.
Подходит ?
← →
TTCustomDelphiMaster (2002-11-19 20:30) [2]SetFileTime
← →
SiaCD (2002-11-19 20:35) [3]Да, наверное подходит.
Только я неправильно немного поставил вопрос- мне нужно менять время а не дату.
Эта функция подходит к времени?
И если можно, напиши примерчик
← →
SiaCD (2002-11-19 20:42) [4]...посмотрел я SetFileTime,
BOOL SetFileTime(
HANDLE hFile, // identifies the file
CONST FILETIME *lpCreationTime, // time the file was created
CONST FILETIME *lpLastAccessTime, // time the file was last accessed
CONST FILETIME *lpLastWriteTime // time the file was last written
);
сразу возник вопрос: если неменять lpLastAccessTime ,lpLastWriteTime , то что вместо этих значений надо писать?
ребята, может кините пример
С Уважением. SiaCD
← →
TTCustomDelphiMaster (2002-11-19 20:47) [5]
> если неменять lpLastAccessTime ,lpLastWriteTime , то что
> вместо этих значений надо писать?
nil
> ребята, может кините пример
function FileSetDate(Handle: Integer; Age: Integer): Integer;
var
LocalFileTime, FileTime: TFileTime;
begin
Result := 0;
if DosDateTimeToFileTime(LongRec(Age).Hi, LongRec(Age).Lo, LocalFileTime) and
LocalFileTimeToFileTime(LocalFileTime, FileTime) and
SetFileTime(Handle, nil, nil, @FileTime) then Exit;
Result := GetLastError;
end;
← →
SiaCD (2002-11-19 20:50) [6]Спасибо!!!
Дальше я сам :)
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.12.02;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.007 c