26.12.2007, 11:54
|
 |
Специалист
|
|
Регистрация: 07.09.2007
Адрес: Украина, г. Днепропетровск
Сообщения: 892
Версия Delphi: 7 + ОгнеПтица
Репутация: выкл
|
|
Цитата:
|
Сообщение от Electronic_Arts
я знаю 38 не отключает чекбокс "Только чтение"
|
Сорри.  
Замени на:
Код:
SetFileAttributes(PChar(имя файла),39 {faSysFile+faHidden+faReadOnly}); |