Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.021 c
14-44408
FLIZ
2003-03-28 15:21
2003.04.14
Как определить длину RTF текста? (+)


1-44248
Num Lock
2003-04-02 10:57
2003.04.14
Оптимизатор убирает нужную строчку?


3-44031
Silver_
2003-03-24 12:55
2003.04.14
SQL (СУБД - Access)


3-44007
vlgrig1961
2003-03-25 13:40
2003.04.14
Есть что-либо похожее на Refresh в TQuery


14-44354
Феликс
2003-03-31 02:24
2003.04.14
Проект в котором слушают космос