Uso de TFileStream

[delphi.com.ar]

¿Dónde hallar información?... en la ayuda!
Al igual que todos los TStreams, se pueden utilizar accediendo a los métodos básico Create, Read, Write y Seek, como tambien a las propiedades Position y Size.

Dos ejemplos muy sencillos:

Código Delphi [-]
procedure EscribirArchivo(FileName: TFileName; S: string);
var
  Stream: TStream;
begin
  Stream := TFileStream.Create(FileName, fmCreate);
  try
    Stream.WriteBuffer(Pointer(S)^, Length(S));
  finally
    Stream.Free;
  end;
end;

function LeerArchivo(FileName: TFileName): string;
var
  Stream: TStream;
begin
  Stream := TFileStream.Create(FileName, fmOpenRead or fmShareDenyWrite);
  try
    SetString(Result, nil, Stream.Size);
    Stream.Read(Pointer(Result)^, Stream.Size);
  finally
    Stream.Free;
  end;
end;

Saludos