Changer les attributs d'un fichier

//cacher un fichier
procedure TForm1.Button1Click(Sender: TObject);
begin
FileSetAttr('C:YourFile.ext', faHidden);
end;

//Les autres attibuts

faReadOnly $00000001 Schreibgeschützte Datei
faHidden $00000002 Verborgene Datei
faSysFile $00000004 Systemdatei
faVolumeID $00000008 Laufwerks-ID
faDirectory $00000010 Verzeichnis
faArchive $00000020 Archivdatei
faAnyFile $0000003F Beliebige Datei

//plusieurs attributs en même temps
FileSetAttr('C:Autoexec.bat',faReadOnly + faHidden);