Path: csiph.com!feeder.erje.net!2.eu.feeder.erje.net!newsfeed.xs4all.nl!newsfeed8.news.xs4all.nl!news.stack.nl!.POSTED.toad.stack.nl!not-for-mail
From: Marco van de Voort <marcov@toad.stack.nl>
Newsgroups: comp.lang.pascal.misc,comp.lang.pascal.borland
Subject: Re: Virtual Pascal: BlockRead open files (sharedenynone?)
Followup-To: comp.lang.pascal.borland
Date: Sun, 7 May 2017 08:34:49 +0000 (UTC)
Organization: Stack Usenet News Service
Message-ID: <slrnogtn19.fs2.marcov@toad.stack.nl>
References: <ocg1if$qn3$1@dont-email.me>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Injection-Date: Sun, 7 May 2017 08:34:49 +0000 (UTC)
Injection-Info: mud.stack.nl; posting-host="toad.stack.nl:2001:610:1108:5010::135"; logging-data="3299"; mail-complaints-to="abuse@stack.nl"
User-Agent: slrn/0.9.9p1 (FreeBSD)
Xref: csiph.com comp.lang.pascal.misc:1733 comp.lang.pascal.borland:193

On 2017-04-10, Robert Prins <robert@prino.org> wrote:
> Does anyone know what I need to do to BlockRead a file that's currently open?
> Normal Read(Ln) doesn't seem to care, but BlockRead gives me an error 32.

Aren't untyped file access being read/write by default? Try to
fiddle with filemode to try to make it readonly.