delphi2007 教程

delphi2007 教程

首页 新随笔 联系 聚合 管理
  1013 Posts :: 0 Stories :: 28 Comments :: 0 Trackbacks
如何将数据表中俩个字段的记录放到一个动态数组中去? 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是动态数组?

posted on 2009-02-19 16:55 delphi2007 阅读(228) 评论(0)  编辑 收藏 引用
只有注册用户登录后才能发表评论。