首页 > 其他分享 >delphi FireDAC 数据集快速遍历方式

delphi FireDAC 数据集快速遍历方式

时间:2023-09-11 19:11:05浏览次数:37  
标签:遍历 vCount FDQuery1 vTick delphi FireDAC Table

FireDAC 数据集快速遍历方式

代码

遍历数据集

procedure TForm1.Button1Click(Sender: TObject);
var
  vTick: DWORD;
  I: Integer;
  vCount: Integer;
begin
  //查询数据
  FDQuery1.Open('SELECT * FROM tceshi');
  //获取全部数据
  FDQuery1.FetchAll;
  //通过Next方法循环遍历
  vTick := GetTickCount;
  vCount := 0;
  FDQuery1.First;
  while not FDQuery1.Eof do
  begin
    //取值计算
    if FDQuery1.FieldByName('ID').AsInteger > 10000 then
      Inc(vCount);
    FDQuery1.Next;
  end;
  Memo1.Lines.Add(Format('耗时:%f 秒', [(GetTickCount - vTick) / 1000]));
  Memo1.Lines.Add('ID大于10000的记录数 ' + vCount.ToString);
  //通过Table.Rows方法循环遍历
  vTick := GetTickCount;
  vCount := 0;
  for I := 0 to FDQuery1.Table.Rows.Count - 1 do
  begin
    //取值计算
    if FDQuery1.Table.Rows[I].ValueS['ID'] > 10000 then
      Inc(vCount);
  end;
  Memo1.Lines.Add(Format('耗时:%f 秒', [(GetTickCount - vTick) / 1000]));
  Memo1.Lines.Add('ID大于10000的记录数 ' + vCount.ToString);  
end;

方法

FireDAC.Comp.DataSet.TFDDataSet.Table

property Table: TFDDatSTable;

Unit

FireDAC.Comp.DataSet

返回对 TFDDatSTable 对象的引用。它是包含所有数据集行的内部数据存储。

当调用 Open 时,FireDAC 会自动为每个数据集创建一个表。如果表是自动创建的,则在数据集关闭后它将被销毁。

标签:遍历,vCount,FDQuery1,vTick,delphi,FireDAC,Table
From: https://www.cnblogs.com/txgh/p/17694265.html

相关文章

  • java版:层序遍历
    描述给定一个二叉树,返回该二叉树层序遍历的结果,(从左到右,一层一层地遍历)例如:给定的二叉树是{3,9,20,#,#,15,7},该二叉树层序遍历的结果是[[3],[9,20],[15,7]]示例1输入:{1,2}返回值:[[1],[2]]示例2输入:{1,2,3,4,#,#,5}返回值:[[1],[2,3],[4,5]]解题思路:层序遍历:就是从根......
  • 二叉树遍历
    #include<stdio.h>#include<stdlib.h>//定义typedefstructBiTNode{intdata;//数据域structBiTNode*lchild,*rchild;}BiTNode,*BiTree;//创建新节点boolcreateNode(BiTree&T,intvalue){T=(BiTNode*)malloc(sizeof(BiTNode));......
  • QTablewidget的使用 读写与遍历
    QTableWidget表格中的数据读写操作//读数据QStringstr=ui->TableWidget->item(row,column)->text();//取出字符串//item的参数row,column是行和列,都是从0开始,注意不要越界。intnum=str.toInt();//如果需要的是整型数,可以转成int//写数据ui->TableWidget->item(row,col......
  • 字面量、遍历、标识符
    title:字面量、变量、标识符index_img:https://picss.sunbangyan.cn/2023/07/30/stdtw2.jpgtags:-JavaSEcategories:-JavaSEhide:falseexcerpt:字面量、遍历、标识符。一、字面量说明数据怎么写字面量类型书写格式整型10、23小数类型3.14、3......
  • delphi FireDAC 调用 Execute 提示 `[FireDAC][SQL Server Native Client 10.0]字符串
    FireDAC调用Execute提示[FireDAC][SQLServerNativeClient10.0]字符串数据,长度不匹配错误问题调用Execute向SQLServer数据库中批量插入数据时,参数中有BLOB数据类型(ftBlob、ftMemo等)时,出现[FireDAC][Phys][ODBC][Microsoft][SQLServerNativeClient10.0]字符串......
  • STL在遍历过程中操作地址的改变
    2023-08-2609:57:22startwriting2023.8.269:18又遇到奇怪错误了,其实在打模拟赛(wzOI2023.8.24T1)的时候就发现有这个问题了,赛后来研究一下。以下代码://check是一个返回值为bool类型的判断函数,S是一个unordered_set<int>for(inti=1;i<=n;i++){intx=i,maxx=0,ans......
  • JS基本遍历方法
    for这大概是应用最广的循环语句了吧,简单实用,且大多数时候性能还是在线的,唯一的缺点大概就是太普通,没有特色,导致很多人现在不愿用它。constarray=[4,7,9,2,6];for(constindex=0;index<array.length;index++){constelement=array[index];console.log......
  • pandas-遍历和迭代
    pandas-遍历和迭代目录pandas-遍历和迭代iterrows()itertuples()借助zip()foriindf备注参考资料遍历数据是最常见的一种方式,pandas同样也可以遍历。iterrows()或itertuples():这两个方法用于遍历DataFrame的行。iterrows()返回一个迭代器,产生索引和行的元组,而itertup......
  • DELPHI TSCTreeView的基本应用与FireDAC读取EXCEL文件数据设置
    本例需要读取excel中的数据,然后动态的添加到TSCTreeView控件当中.最终效果如下图: 核心代码如下:procedureTForm1.FormCreate(Sender:TObject);varn:Integer;t:TTreeNode;I:Integer;beginn:=FDQuery1.RecordCount;ifn>0thenbeginscTr......
  • 剑指 Offer 33. 二叉搜索树的后序遍历序列
    输入一个整数数组,判断该数组是不是某二叉搜索树的后序遍历结果。如果是则返回 true,否则返回 false。假设输入的数组的任意两个数字都互不相同。 参考以下这颗二叉搜索树:5/\26/\13示例1:输入:[1,6,3,2,5]输出:false示例2:输入:[1,3,2,6,5]输出:truec......