GetAttributes(FileName: String): FileAttributes;
FileName — путь и наименование файла, атрибуты которого, необходимо получить.
Метод GetAttributes возвращает атрибуты файла, передаваемого посредством параметра FileName.
Sub UserProc;
Var
i: Integer;
Begin
If File.Exists("c:\New_folder\1.txt") Then
i:=File.GetAttributes("c:\New_folder\1.txt");
End If;
End Sub UserProc;
После выполнения примера в переменной «i» будут содержаться атрибуты файла «c:\New_Folder\1.txt», преобразованные к целочисленному виду.
См.также: