[harbor]

Помогите разобраться пожалуйста
Вообщем у меня программа, которая пишет некие данные в файл.
Я в ней открываю файл для записи с помощью TFileStream.Create
Вроде, как почитал, если программа работает с файлом по этому методу, то другие программы тоже могут открывать файл, то есть он будет доступен, ноу меня при работе с файлом в программе у других программ(блокнот например) нет доступа к файлу.
А у меня эта программа пишет в файл данные, другая их считывает с определенным интервалом времени.
Хотя в описании метода написано что можно указать права доступа для работы..
Мне нужно чтобы даже в моменты записи файл все равно был доступен для чтения другой программой, возможно ли такое сделать?

[Aristarh Dark]

Код:

constructor Create(const FileName: string; Mode: Word; Rights: Cardinal); overload; 

Value Meaning

fmShareCompat Sharing is compatible with the way FCBs are opened.
fmShareExclusive Other applications can not open the file for any reason.
fmShareDenyWrite Other applications can open the file for reading but not for writing.
fmShareDenyRead Other applications can open the file for writing but not for reading.
fmShareDenyNone No attempt is made to prevent other applications from reading from or writing to the file.

[Страдалецъ]

Видимо вам нужен режим открытия файла fmShareCompat

[harbor]

режимы выставлял, все равно почему-то программа как-будто занимает файл и пока она работает, например, блокнотом я не могу открыть файл с данными. может у меня глюк какой, или так и должно быть
а других методов не нашел..

[harbor]

тоже самое если делаю так

AssignFile(myFile, Edit1.Text);
// if not FileExists(Edit1.Text) then
Rewrite(myFile);
f7:= 'строка' ;
// StrPCopy(buf1,f7);
WriteLn(myFile, f7);

пока файл не закрою. другим программам он недоступен
а мне желательно в программе держать файл открытым на запись

[harbor]

вот сделал такой код
...
var f9:TFileStream;
...
f7:= 'строка' ;
StrPCopy(buf1,f7);

f9:= TFileStream.Create(Edit1.Text, fmOpenReadWrite, fmShareCompat);
f9.Write(buf1, 100);

закрытие файла при закрытии программы.
все время пока файл открыт в программе к нему нет доступа из других программ. может я что-то не так делаю?

[harbor]

погодите, кажется все работает. стандартным блокнотом открывает
у меня по умолчанию порсто другая прога для открытия текстовых файлов, и видимо она с файлами по своему работает