TDirectory.GetLastAccessTime获取指定目录最后访问时间

使用函数：

　　System.IOUtils.TDirectory.GetLastAccessTime

函数定义：

class function GetLastAccessTime(const Path: string): TDateTime; static;

说明： 参数为指定目录，返回最后一次访问时间(每次访问了某个目录如果下次不在访问，则都属于最后一次访问)

异常处理：指定目录不存在或无效

示例：

var
    sDir: string;
begin
    if not SelectDirectory('', 'H:\tmp', sDir) then Exit;
    try
        Edit_Time.Text := DateTimeToStr(TDirectory.GetLastAccessTime(sDir));
    except
        on e: Exception do
        begin
            MessageDlg(e.ClassName + e.Message, mtError, [mbok], );
            Exit;
        end;
    end;

end;