Comment crée un fichier ini caché

Uses [...] IniFiles ; 

procedure TForm1.Button1Click(Sender: TObject);
Var FileIni          : TIniFile;
    Chaine           : String;
    SysDateTime  : TDateTime;
    Attributs         : Word;
begin
 Try
  FileIni := TIniFile.Create('C:\Teste\Teste.ini'); // Ouvre ou crée le fichier
  Attributs := FileGetAttr('C:\Teste\Teste.ini');
  Chaine   := 'Chaine de caractére';
  SysDateTime := Now;

   // Crée ou même temps met à jour les valeurs
  FileIni.WriteString('GSSP-Information, mail : ' + 'GSSP-Information@yahoo.fr', 'NomClé String', Chaine);
  FileSetAttr('C:\Teste\Teste.ini', Attributs and faHidden); // caché le fichier
  FileIni.WriteDateTime('Section DateTime', 'NomClé DateTime',SysDateTime);
  FileIni.WriteDate('Section Date', 'NomClé Date',SysDateTime);
  FileIni.WriteTime('Section Time', 'NomClé Time',SysDateTime);
 finally
  FileIni.Free ;
 end ;
end;