Функция FileGetAttr( const FileName: string ): Integer;
Модуль: 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;