Как прочесть атрибут файла "Last Accessed" (последний доступ)?

Если в Проводнике Windows 95 на любом файле нажать правую кнопку мыши и выбрать пункт "Свойства", можно увидеть время последнего доступа к данному файлу.

Как мне это сделать через Delphi/API???

procedure TForm1.Button1Click(Sender: TObject);
var

FileHandle : THandle;

LocalFileTime : TFileTime;

DosFileTime : DWORD;

LastAccessedTime : TDateTime;

FindData : TWin32FindData;

begin

FileHandle := FindFirstFile('AnyFile.FIL', FindData);

if FileHandle <> INVALID_HANDLE_VALUE then

begin

Windows.FindClose(Handle);

if (FindData.dwFileAttributes and FILE_ATTRIBUTE_DIRECTORY) = 0 then

begin

FileTimeToLocalFileTime(FindData.ftLastWriteTime, LocalFileTime);

FileTimeToDosDateTime(LocalFileTime,

LongRec(DosFileTime).Hi,LongRec(DosFileTime).Lo);

LastAccessedTime := FileDateToDateTime(DosFileTime);

Label1.Caption := DateTimeToStr(LastAccessedTime);

end;

[000085]