--------------------------------------------------------------------------------

Модуль: SysUtils

Описание
Функция возвращает атрибуты файла, имя которого передано в параметре FileName. Атрибуты могут быть разделены с помощью оператора AND и следующих значений констант атрибутов:



Константа
Значение
Описание

faReadOnly
$00000001
Только чтение

faHidden
$00000002
Скрытый файл

faSysFile
$00000004
Системный файл

faVolumeID
$00000008
Идентификатор тома

faDirectory
$00000010
Каталог

faArchive
$00000020
Архивный файл

faAnyFile
$0000003F
Произвольный файл

В случае возникновении ошибки функция возвращает -1.

Пример
Данный пример показывает, каким образом можно снять у файла атрибут 'Только чтение'.
var
At: Integer;
begin
At:= FileGetAttr('MyFile.zzz');
if At and faReadOnly <> 0 then
FileSetAttr( 'MyFile.zzz', At - faReadOnly );
end;