TFileStream

Declaration: TFileStream = class(TFileStream)
TFileStream will open a named file and provide methods to read from or write to it. The following list provides the most important properties and methods of the TFileStream class:

Sample
program:
The following short program shows how to read part of a file:
program ReadFileStream;

const
  NBYTES = 40;

var
  FName   : string;
  FStream : TFileStream;
  Buf     : TBytes;

begin
Fname := SelectFile (GetILabDir (idWork), '*.*', 'Please select a file');
if FName <> '' then
  begin
  FStream := TFileStream.Create (FName, fmOpenRead);
  cout ('FName=', FStream.FileName);
  cout ('Size=',FStream.Size);
  cout ('Position=',FStream.Position);
  SetLength (Buf, NBYTES);
  FStream.ReadBuffer (Buf, NBYTES);
  cout ('Buffer: ',Buf);
  cout ('Position=',FStream.Position);
  end;
FStream.Free;
end.