как задать атрибуты папки

[Alex_09]

Моя программа создает папку в определенной директории, но как мне сделать что бы она создавалась скрытой??????подскажите......

[KORN]

SetFileAttributes(pchar('имя папки'), FaHidden)

[Terran]

Можно ещё так задавать:

Procedure TForm1.Button1Click(Sender: TObject);
Begin
FileSetAttr('C:\111',HaHidden);
End;