"cannot perform this opertation on a closed dataset",啥意思？

出现警告提示："cannot perform this opertation on a closed dataset",啥意思？
我现在是在实验怎么在一张表格里把一个字段下的全部数据一一取出来。
用循环怎么处理？
model_quantity字段里有一年的数据。procedure TForm1.Button1Click(Sender: TObject);
 var
 i:integer;
 s:string;
 source:array[1..365];
begin
 i:=1;
While i<=adoquery1.RecordCount do
 begin
  s:=adoquery1.fieldbyname('model_quantity').AsString;
  source[i]:=strtoint(s);
  adoquery1.next;
 i:=i+1;
 end;
end;
这段代码有问题。我也不知道怎么办。请求帮助！
我还试过source[i]:=strtoint(adoquery1.fieldbyname('model_quantity').AsString);
不行的？？？
因为我要把这些数据提取出来算移动平均数的，现在先试验怎么取，但一直还没进展！