Delphi: Dateiattribute von Dateien ändern

Manchmal muss man die Dateiattribute von Dateien in Delphi ändern, zum Beispiel um eine Datei zu verstecken oder einen Schreibschutz der Datei zu aktivieren. So macht man es:

procedure TForm1.Button1Click(Sender: TObject);
begin
   FileSetAttr('C:\Datei.txt', faHidden);
end;

Dies setzt die Datei auf "faHidden", womit die Datei versteckt wird. Ansonsten können noch folgende Attribute der Datei gesetzt werden:

Es ist auch möglich mehrere Attribute auf einmal zu setzen. Das kann so bewerkstelligt werden:

FileSetAttr('C:\Datei.txt', faHidden + faReadOnly);

Dies setzt die Datei "Datei.txt" auf versteckt und schreibgeschützt.