如何从一个二进制文件中读数据到数组之中

Question

怎样从一个二进制文件中的指定位置读取数据到数组之中。例如读取一个二进制文件128--256字节的数据

Answer 1

可以用流打开
var
  fstream:TFilestream;
  p:string;
  i:integer;
begin
  fstream:=Tfilestream.create('文件名',fmOpenReadWrite);
  fstream.position:=128;
  for i:=128 to 256 do
  begin
    fstream.read(pointer(p)^,1);
    //自己添加 把 p[1]转换成合适类型进行转存到数组中。
  end;
  freeandnil(fstream);
  
end;