On Mon, 19 Jul 2010 09:53:34 +0400 dmitry boyarintsev <[email protected]> wrote:
> On Mon, Jul 19, 2010 at 4:23 AM, Marc Weustink <[email protected]> wrote: > > You need to make sure a file exists. IIRC it is not possible to create a > > file for sharing, you can only open a file sharable > > It's possible. at least the following example did work on Windows. > > begin > filemode:=fmShareDenyNone; > assign(f, 'c:\test.txt'); rewrite(f); > writeln(f,'test'); > writeln('press enter to unlock file'); > readln; > close(f); > end. > > The newly created c:\test.txt was sharable. > > AFAIK, it's "impossible" for TFileStream using fmCreate flag. fmCreate > flag causes a file to be re-created without sharing (at Windows). Can you create a new patch? Mattias -- _______________________________________________ Lazarus mailing list [email protected] http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
