Delphi вопрос

[jpg]

Как программно поставить файлу "только чтение" а так же убрать "только чтение"

Спасибо

[J-Fobos]

Используем функцию SetFileAttributes(). Задаём ей два параметра: сначала имя файла, затем задаваемые атрибуты. Например, так можем файл сделать "только для чтения"

SetFileAttributes('C:\file.txt', faReadOnly);


Можно задавать следующие значения:

* faReadOnly
* faHidden
* faSysFile
* faVolumeID
* faDirectory
* faArchive
* faAnyFile

:)

[jpg]

О великий фобос!! ты мой бОХ

Добавлено через 12 часов 54 минуты
Что бы вернуть файлу нормальный вид:

SetFileAttributes('файл.ехе', faNormal)

Сам додумался...