Как програмно считать/установить дату и время создания файла?

[Sewell]

Мне необходимо чтобы моя прога могла считать/установить дату, а самое главное время (чч:мм:сс) создания файла...
Если есть у кого пример кода или какие советы по этому вопросу, пожалуйста напишите....

[dron-s]

установить дату можно так

Function SetFileDate(
  Const FileName : String;
  Const FileDate : TDateTime): Boolean;
var
 FileHandle        : THandle;
 FileSetDateResult : Integer;
begin
 try
  try
   FileHandle := FileOpen
      (FileName,
       fmOpenWrite OR fmShareDenyNone);
   if FileHandle > 0 Then  begin
    FileSetDateResult :=
      FileSetDate(
        FileHandle,
        DateTimeToFileDate(FileDate));
      result := (FileSetDateResult = 0);
    end;
  except
   Result := False;
  end;
 finally
  FileClose (FileHandle);
 end;
end;

[Domino]

Для получения дат использую GetFileAttributesEx:

var
  FileAttributeData: TWin32FileAttributeData;
begin
  ZeroMemory(@FileAttributeData, SizeOf(TWin32FileAttributeData));
  GetFileAttributesEx(PAnsiChar(FileName), GetFileExInfoStandard, @FileAttributeData);
  ...
end;

В структуре TWin32FileAttributeData заполняются сразу все даты файла.

[MasterBoy]

Сильно подсказали, один пост как задать время последнего изменения (не создания) файла, второй как получить, и ни одного ответа как установить дату создания.

Сообщение отредактировано: MasterBoy - 27.11.16, 11:39

[MBo]

SetFileTime, некроманцер