Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Здравствуйте!
Подскажите, как сделать, чтобы файл, созданный программой невозможно было удалить во время ее работы.

Вопрос задал: Евгений Eklmn (статус: Посетитель) Вопрос отправлен: 26 декабря 2007, 19:15 Состояние вопроса: открыт, ответов: 1.

Ответ #1. Отвечает эксперт: Вадим К

Здравствуйте, Трофимов Евгений!
Для этого нужно файл открыть и не закрывать до конца работы. Но открыть с специальными параметрами
Вот где то так

var stream : TFileStream;
begin
//открыть
stream := TFileStream.create('c:\test.txt',fmOpenReadWrite+fmShareExclusive);
//закрыть stream.free;

Ответ отправил: Вадим К (статус: Академик) Время отправки: 27 декабря 2007, 00:08 Оценка за ответ: 5

Мини-форум вопроса

Мини-форум пуст.

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.