GetFAttr procedure

Declaration

procedure GetFAttr(var f; var attr: Word)

Description

GetFAttr returns the file attributes of the file-variable f. F can be a untyped or typed file, or of type Text. f must have been assigned, but not opened. The attributes can be examined with the following constants :

• ReadOnly
• Hidden
• SysFile
• VolumeId
• Directory
• Archive

Under Linux, supported attributes are:

• Directory
• ReadOnly if the current process doesn't have access to the file.
• Hidden for files whose name starts with a dot ('.').

Errors

Errors are reported in DosError

See also

• SetFAttr

Example: ex8

Program Example8;
uses Dos;

{ Program to demonstrate the GetFAttr function. }

var
  Attr : Word;
  f    : File;
begin
  Assign(f,ParamStr(1));
  GetFAttr(f,Attr);
  WriteLn('File ',ParamStr(1),' has attribute ',Attr);
  if (Attr and archive)<>0 then WriteLn('- Archive');
  if (Attr and directory)<>0 then WriteLn('- Directory');
  if (Attr and readonly)<>0 then WriteLn('- Read-Only');
  if (Attr and sysfile)<>0 then WriteLn('- System');
  if (Attr and hidden)<>0 then WriteLn('- Hidden');
end.