var
fs:TFileStream;
buf:Pointer;
begin
fs:=TFileStream.Create(Edit1.Text,FMOpenRead or FMShareDenyNone);
GetMem(buf,fs.size);
fs.ReadBuffer(buf^,fs.size);---①
end;①句究竟是把流中的数据写入内存块中呢,还是把内存块中的数据写入流中呢?
fs:TFileStream;
buf:Pointer;
begin
fs:=TFileStream.Create(Edit1.Text,FMOpenRead or FMShareDenyNone);
GetMem(buf,fs.size);
fs.ReadBuffer(buf^,fs.size);---①
end;①句究竟是把流中的数据写入内存块中呢,还是把内存块中的数据写入流中呢?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货