Текущий архив: 2003.04.14;
Скачать: CL | DM;

Вниз

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

← →
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;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.012 c