怎样开辟一个缓冲区?怎样读写缓冲区?

Question

由于是delphi刚入门,现在我想操作缓冲区,请大家帮忙,尽量详细点.
我有一些数据(1000条)由于特别要求,先一条一条存进缓冲区,然后再一条一条读出来.

Answer 1

定义一个结构体，然后定义一个这个结构体数组，将你的数据插入到这个数组里
type
rec = record
  id:string;
  name:string;
end;private
 buff:array of rec;
....
setlength(buff,1000);
for i:=0 to 999 do
begin
  .....
end;
setlength(buff,0);

Answer 2

TO hongqi162 你采用什么样的编辑器,怎么回复的东西跟别人都不一样,是WORD文档吗?

Answer 3

问一下“失踪的月亮”，setlength(buff,1000);给buff分配的空间到底是多大？
1000个字节？还是1000个结构体，即1000*sizeof（rec）？？？？？上面的情况，我认为应该写成setlength(buff,1000*sizeof（rec）);
setlength(buff,1000);
for i:=0 to 999 do
begin
  buff[i]:=???;
//...........................
end;
setlength(buff,0);

Answer 4

应该写成setlength(buff,1000);
因为是设置数组的长度。