如何将数据表中俩个字段的记录放到一个动态数组中去? Delphi / Windows SDK/APIhttp://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是动态数组?