Форум: "Система";
Текущий архив: 2003.04.14;
Скачать: [xml.tar.bz2];

Вниз

Блокировка файла   Найти похожие ветки 

← →
DelAlanPhi   (2003-02-17 17:05) [0]

Можно ли заблокировать файл для открытия???
Вот нашел пример:
type FileShareType = (DenyCompatibility,DenyAll,DenyWrite,DenyRead,DenyNone);

FileAccessType = (ReadOnly,WriteOnly,ReadWrite);

procedure SetFileAccess(AccessMode: FileAccessType;ShareMode: FileShareType);

{ Устанавливаем режим доступа к файлу для следующего вызова открытия файла }
begin
FileMode := ord(AccessMode) or (ord(ShareMode) shl 4)
end;

но он маленько не работает, если он рабочий - приведите пожалуйста пример работы с ним.

---

← →
Burmistroff   (2003-02-17 20:23) [1]

Да, можно заблокировать на чтение/запись
Достаточно его просто открыть (openfile или fileopen - точно не помню) с флагами fmShareDenyRead/Write (Кажется они так называются)

---

← →
DelAlanPhi   (2003-02-17 20:50) [2]

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

---

Страницы: 1 вся ветка

Форум: "Система";
Текущий архив: 2003.04.14;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.009 c