11 Nov
1998
11 Nov
'98
5:16 p.m.
Orlando Llanes wrote:
PROGRAM Tmp;
var F : File Of Byte; V : Char;
BEGIN Assign( F, 'tmp.txt' ); Reset( F ); BlockRead( F, V, 1 ); Close( F ); END.
BlockRead and BlockWrite only work with untyped files (simply `File'), not typed files (`File of Byte'), just like in BP. So try:
PROGRAM Tmp;
var F : File; V : Char;
BEGIN Assign( F, 'tmp.txt' ); Reset( F, 1 ); BlockRead( F, V, 1 ); Close( F ); END.
(The 1 in the `Reset' is needed because of compatibility to a stupid CPM legacy in TP.)-:
-- Frank Heckenbach, frank@fjf.gnu.de http://fjf.gnu.de/ PGP and GPG keys: http://fjf.gnu.de/plan