как 2 раза открыть файл ?

← →
sydenis (2007-11-28 16:59) [0]

Одна программа читает и пишет файл TFileStream.Create(FileName1,fmOpenReadWrite or fmShareDenyWrite);
Другая при этом пытается его прочесть
Memo1.Lines.LoadFromFile(FileName1);
и нифига у неё не получается потому как "Процесс не может получить доступ к файлу. Файл занят другим процессом".
А нафиг тогда задавались опции шары? И как тогда его читать?

← →
clickmaker © (2007-11-28 17:11) [1]

возможно, дело в том, что в TStrings.LoadFromFile
Stream := TFileStream.Create(FileName, fmOpenRead or fmShareDenyWrite);
попробуй у себя открывать с fmShareDenyNone

← →
clickmaker © (2007-11-28 17:14) [2]

либо
Stream := TFileStream.Create(FileName1, fmOpenRead or fmShareDenyNone);
Memo1.Lines.LoadFromStream(Stream);

← →
sydenis (2007-11-28 17:38) [3]

fmShareDenyNone не помогает - уже пробовал
а fmOpenRead - не подходит, потому, что там запись тоже должна идти...

← →
sydenis (2007-11-28 17:59) [4]

сорри.. понял твою мысль - мемо грузить не из файла, а из стрима
TFileStream.Create(fFileName1,fmShareDenyNone)
угу... вроде получаеца :))

как 2 раза открыть файл ? Найти похожие ветки