database - 如何使用delphi XE8获取数据库中元素的数量

Question

我正在尝试使用 Delphi 制作电子邮件发件人。我有包含状态和电子邮件的数据库，我需要获取数据库中元素的数量，以便我可以创建一个 for 循环。这是我的代码的一部分：

procedure TForm1.bDataBaseClick(Sender: TObject);
      var
        i : integer;
    begin
      FDConnection1.StartTransaction;
      FDConnection1.Open();
      //FDQuery1.ExecSQL('UPDATE Vasko '
                               //+' SET BatchNumber = 112233 '
                               //+' WHERE StatusOfProd = 4');
      //FDQuery1.ExecSQL('select * from Vasko');
      for i := 0 to FDQuery1.ComponentCount - 1 do
      showmessage('hello');

      FDConnection1.Commit;
      FDConnection1.Close();
end;

现在我只想制作多次显示消息的循环。我认为我在这一行有错误：

 for i := 0 to FDQuery1.ComponentCount - 1 do

先感谢您！

标签： databasedelphi