Атрибуты файлов
Установить атрибут “Скрытый” – SetFileAttributes(PChar(‘1.txt’),faHidden); Установить атрибут “Только для чтения” – SetFileAttributes(PChar(‘1.txt’),faReadOnly); Установить атрибут “Системный” – SetFileAttributes(PChar(‘1.txt’),faSysFile); Установить атрибут “Архивный” – SetFileAttributes(PChar(‘1.txt’),faArchive); Снять атрибут “Только для чтения” с файла – FileSetAttr(PChar(‘1.txt’),Not(faReadOnly)); Снять атрибут “Скрытый” – FileSetAttr(PChar(‘1.txt’),Not(faHidden)); Снять атрибут “Системный” – FileSetAttr(PChar(‘1.txt’),Not(faSysFile)); Снять атрибут “Архивный” – FileSetAttr(PChar(‘1.txt’),Not(faArchive)); Вывести сообщение если файл имеет атрибут “Скрытый” – if… Читать далее »