Directory: IDirectoryInfo;
The Directory property returns a description of a directory in which a file is located.
Sub Main;
Var
FileInf: IFileInfo;
DirInfo: IDirectoryInfo;
d: DateTime;
Begin
FileInf:=New FileInfo.Attach("c:\Work\1.txt");
If FileInf.Exists Then
DirInfo:=FileInf.Directory;
d:=DirInfo.CreationTime;
End If;
Dispose FileInf;
End Sub Main;
After executing this example, variable "d" contains date and time of creation of a directory in which file 1.txt is located.
See also: