procedure ......:byte; //读取一字节自定义函数;
If Address > NumRead then  //全局integer型 初始:address:=2,numread:=0
 begin
   numread:=InputStream.Read(RDBuffer,2048);//此资源文件为几百K;
   Address := 1;
 end;
 result := RdBuffer[Address];
 inc(Address);
end;另一方法;
procedure ......:byte;
inputstream.read(buffer,1);
result:=buffer;
end;看起来好像是第一种方法快一些!!但是不明白!!谁能给个合理通俗的解释!!