[fpc-pascal]TFileStream.Seek Bug in 1.1 ??
Michael Van Canneyt
michael.vancanneyt at wisa.be
Thu Oct 31 13:44:43 CET 2002
On Thu, 31 Oct 2002, Peter Vreman wrote:
> >> program test_stream;
> >> uses Classes;
> >> var
> >> Stream: TStream;
> >> begin
> >> Stream := TFileStream.Create('test_stream.pas', fmOpenRead);
> >> WriteLn(Stream.Position);
> >> Stream.Free;
> >> end.
> > This works in Delphi 5 Sp2. I wonder if the file is 'locked' by the OS?
> > Which
> > OS are you using, sorry I forgot to look. Try opening a different file.
> > Try 'fmCreate' a new file. If that works, it could be the OS locking the
> > file.
> Test first if the program works with fpc 1.0.x. If it works then it's a
> bug in 1.1.
This IS a bug in 1.1 see my mail to the core list. The same code works
in 1.0, not in 1.1
More information about the fpc-pascal