我按照下面的语句,出错了,主要想知道当前文件夹的名字和创建时间2个数据
procedure Tsbpass.Button1Click(Sender: TObject);
var
 yy:tdatetime;
begin
  yy:=GetFileTime();
end;