如何将数据表中俩个字段的记录放到一个动态数组中去？

如何将数据表中俩个字段的记录放到一个动态数组中去？ Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiDB/html/delphi_20061219114601222.html

AdoQuery.Close;
AdoQuery.SQL.Clear;
AdoQuery.SQL.Add('Select No,Name from stu');
AdoQuery.Open;
将no，name的值放到一动态数组，总共40条记录左右，所以放在数组中进行，以免频繁访问数据库，我的想法对吗，请指教！

以前经常干的事情：
var
vPose : OleVariant;

//建立数据输出时定位的数组, 定位数据已在检查日报表数据时取得
vPose:=VarArrayCreate([0,AdoQueryTemp.RecordCount-1],VarVariant);
AdoQueryTemp.First;
for i:=0 to AdoQueryTemp.RecordCount-1 do
begin
vPose[i]:=VarArrayof([AdoQueryTemp.FieldByName('指标名称').Value,
AdoQueryTemp.FieldByName('目标行').Value,
AdoQueryTemp.FieldByName('第二行').Value,
AdoQueryTemp.FieldByName('目标列').Value]);
AdoQueryTemp.Next;
end;

访问这个数组元素：vPose[i][j]

VarArray是动态数组?